--使用pl/sql语句打印一个hello world
begin
? dbms_output.put_line(‘hello,world‘);
end;
??
?
但是在sqlplus里面就不一样了
首先输入
begin
dbms_output.put_line(‘hello,world‘);
end;
/
通过set serveroutput on
/
来调用输出语句
?
可以通过edit命令对过程语句进行修改
?
name [constrant]datatype[notnull]:=|default value
?
?
--pl/sql语句中的if语句
declare
? ? ?sal1 number(6,2);
begin
? select sal into sal1 from emp where lower(ename)=lower(‘&ename‘);
? if (sal1<2000) then
? ? dbms_output.put_line(‘less 2000‘);
? ? end if;
end;
?
--pl/sql 里面的 if else 语句
declare
? ? ?sal1 number(6,2);
begin
? select sal into sal1 from emp where lower(ename)=lower(‘&ename‘);
? if (sal1<2000) then
? ? dbms_output.put_line(‘less 2000‘);
? ? else
? ? ? dbms_output.put_line(‘more 2000‘);
? ? end if;
end;
?
--pl/sql语句中的if elsif语句
declare
? ? ?sal1 number(6,2);
begin
? select sal into sal1 from emp where lower(ename)=lower(‘&ename‘);
? ? if (sal1<2000) then
? ? dbms_output.put_line(‘less 2000‘);
? ? elsif (sal1>2000 and sal1<400) then
? ? dbms_output.put_line(‘between 2000 and 4000‘);
? ? elsif (sal1>400) then
? ? dbms_output.put_line(‘more 4000‘);
? ? else
? ? ? dbms_output.put_line(‘other...........‘);
? ? end if;
end;
?
--pl/sql语句里面的case语句
declare
? ? a number(2):=0;
begin
? ? a:=&a;
? ? case a
? ? ? when 10 then
? ? ? ? dbms_output.put_line(‘aaaaaaaaaaa‘);
? ? ? when 20 then
? ? ? ? dbms_output.put_line(‘bbbbbbbbbbbb‘);
? ? ? else
? ? ? ? dbms_output.put_line(‘other.....‘);
? ? end case; ? ?
end;
?
--pl/sql语句里面的loop语句
declare
? ? q number :=0;
begin
? ? loop
? ? ? q:=q+1;
? ? ? dbms_output.put_line(‘q=‘||q);
? ? ? exit when q=10;
? ? end loop;
end;
?
--使用if 结束的
declare
? ? q number :=0;
begin
? ? loop
? ? ? q:=q+1;
? ? ? dbms_output.put_line(‘q=‘||q);
? ? ? if q=10 then
? ? ? ? exit;
? ? ? end if;
? ? end loop;
end;
?
?
--使用 while 循环
declare
? ? ?q number :=0;
begin
? ? ?while(q<10)loop
? ? ? q:=q+1;
? ? ? dbms_output.put_line(‘q=‘||q);
? ? ?end loop;
end;
?
--使用 for循环 ?反向遍历 reverse
declare
begin
? ? ?for i in reverse 1..10 loop
? ? ? dbms_output.put_line(i); ?
? ? ?end loop;
end;
?
?
PLS_INTEGER和BINARY_INTENER唯一区别是在计算当中发生溢出时，BINARY_INTENER型的变量会被自动指派给一个NUMBER型而不会出错，PLS_INTEGER型的变量将会发生错误。
?
?
record ?定义类型
?
集合容器
index_by table
嵌套表
varray
type num_array is table of number(5) index by binary_integer;
?
?
单行单列 ?变量 varchar2 %type
单行多列 record
单列多行 集合 （type）
多行多列 集合（rowtype）
?
索引表的格式
type name is table of element_type index by key_type;
?
declare
? ? ?v_ename emp.ename%type;
? ? ?v_emp emp%rowtype;
begin
? ? ?select ename into v_ename from emp where empno=7369;
? ? ?select * into v_emp from emp where empno=7369;
? ? ?dbms_output.put_line(v_ename);
? ? ?dbms_output.put_line(v_emp.sal||‘ ?‘||v_emp.ename);
end;
?
--仅输出特殊的结构 ? 使用 record来定义
declare
? ??type emp_record is record(
? ? ? ? ?v_ename emp.ename%type,
? ? ? ? ?v_sal emp.sal%type,
? ? ? ? ?v_deptno emp.deptno%type
? ? );
? ? v_emp_record emp_record;
begin
? ? select ename,sal,deptno into v_emp_record from emp where empno=7369;
? ? --我也可以通过赋值语句修改里面的值
? ? v_emp_record.v_ename:=‘zhaan‘;
? ? dbms_output.put_line(v_emp_record.v_ename);
? ? dbms_output.put_line(v_emp_record.v_sal);
? ? dbms_output.put_line(v_emp_record.v_deptno);
end;
?
--
declare
? ? type num_array is table of number(5) index by binary_integer;
? ? a num_array;
begin
? ? for i in 1..10 loop
? ? ? a(i):=i;
? ? end loop;
? ? for i in 1..10 loop
? ? ? dbms_output.put_line(a(i));
? ? end loop;
end;
?
?
--例子一
declare
? ? type emp_array is table of emp%rowtype index by binary_integer;
? ? a emp_array;
begin
? ? select * bulk collect into a from emp;
? ? for i in a.first..a.last loop
? ? ? dbms_output.put_line(a(i).ename||‘ ?‘||a(i).job);
? ? end loop;
end;
--集合中装有集合
declare
? ? type record1 is record(
? ? ? ? ?vempno emp.empno%type,
? ? ? ? ?vename emp.ename%type,
? ? ? ? ?vsal ? emp.sal%type
? ? );
? ? type record2 is record(
? ? ? ? ?vdeptno emp.deptno%type,
? ? ? ? ?vrecord record1
? ? );
? ? a record1;
? ? b record2;
begin
? select empno,ename,sal into a from emp where empno=7369;
? b.vrecord:=a;
? dbms_output.put_line(b.vrecord.vempno);
? dbms_output.put_line(b.vrecord.vename);
? dbms_output.put_line(b.vrecord.vsal);
end;
--
declare
? ? type cc is table of varchar2(20) index by varchar2(20);
? ? a cc;
begin
? ? a(‘beijing‘):=‘china‘;
? ? a(‘dongjing‘):=‘japan‘;
? ? a(‘huashengdun‘):=‘usa‘;
? ? dbms_output.put_line(a(‘beijing‘));
end;