数据库开发高手请进
大家好,请教个问题
我在plsql 中如是定义数组并初始化:
create procedure ...
is
type type_record is table of varchar2(100);
lv_procedure type_record := new type_record();
begin
...
end
为何这行会报错lv_procedure type_record := new type_record();
Compilation errors for PACKAGE BODY DEVBUS.PKG_REPORT_TRANSFER
Error: PLS-00103: 出现符号 "TYPE_RECORD "在需要下列之一时:
.(*@%&=-+; </> atin
modnotrem <an exponent (**)> <> or != or ~=> = <= <> andorlike
betweenis nullis not||is dangling
符号 ". " 被替换为 "TYPE_RECORD " 后继续。
------解决方案--------------------去掉NEW
------解决方案------------------------------------------ 单维数组 ------------------------
DECLARE
TYPE emp_ssn_array IS TABLE OF NUMBER
INDEX BY BINARY_INTEGER;
best_employees emp_ssn_array;
worst_employees emp_ssn_array;
BEGIN
best_employees(1) := '123456 ';
best_employees(2) := '888888 ';
worst_employees(1) := '222222 ';
worst_employees(2) := '666666 ';
FOR i IN 1..best_employees.count LOOP
DBMS_OUTPUT.PUT_LINE( 'i= '|| i || ', best_employees= ' ||best_employees(i)
|| ', worst_employees= ' ||worst_employees(i));
END LOOP;
END;
---------------------- 多维数组 ------------------------
DECLARE
TYPE emp_type IS RECORD
( emp_id employee_table.emp_id%TYPE,
emp_name employee_table.emp_name%TYPE,
emp_gender employee_table.emp_gender%TYPE );
TYPE emp_type_array IS TABLE OF
emp_type INDEX BY BINARY_INTEGER;
emp_rec_array emp_type_array;
emp_rec emp_type;
BEGIN
emp_rec.emp_id := 300000000;
emp_rec.emp_name := 'Barbara ';
emp_rec.emp_gender := 'Female ';
emp_rec_array(1) := emp_rec;
emp_rec.emp_id := 300000008;
emp_rec.emp_name := 'Rick ';
emp_rec.emp_gender := 'Male ';
emp_rec_array(2) := emp_rec;
FOR i IN 1..emp_rec_array.count LOOP
DBMS_OUTPUT.PUT_LINE( 'i= '||i
|| ', emp_id = '||emp_rec_array(i).emp_id
|| ', emp_name = '||emp_rec_array(i).emp_name
|| ', emp_gender = '||emp_rec_array(i).emp_gender);
END LOOP;
END;
-------------- Result --------------
i=1, emp_id =300000000, emp_name =Barbara, emp_gender = Female
i=2, emp_id =300000008, emp_name =Rick, emp_gender = Male