oracle 笔记7 pl/sql 开始

--建立测试用的表simple
create table simple(
id number(4,0),
value varchar2(20)
);

--声明变量
declare
    simple_id simple.id%type:=1;
    simple_value simple.value%type;
begin
    simple_value:='di';
    simple_id:=simple_id+1;
    insert into simple values(simple_id,simple_value);
end;

--使用复合变量
--使用tables类型
declare
    simple_id simple.id%type:=1;
    simple_value simple.value%type;
    type just is table of simple.value%type index by binary_integer;
    name just;
    i binary_integer:=1;
begin
    while i<9 loop
        i:=i+1;
        name(i):='first'||i;
        simple_value:=name(i);
        simple_id:=simple_id+1;
        insert into simple values(simple_id,simple_value);
    end loop;
end;
--使用records类型
declare
    type use_test is record(id simple.id%type,value simple.value%type);
    use1 use_test;
begin
    select id into use1.id from simple where id = 2;
    select value into use1.value from simple where id = 4;
    insert into simple values (use1.id,use1.value);
end;