PL/SQL-1 块的使用

晨曦之光 发布于 2012/04/19 16:36
阅读 71
收藏 0
 

--------------------------------------------------------------------------
**************************************************************************
第一部分:PL/SQL块的使用:
**************************************************************************
--------------------------------------------------------------------------


--案例01:简单的变量使用
declare
eno varchar2(10);
ename varchar2(20);
begin
eno:='9527';
ename:='wind';
dbms_output.put_line('eno:' ||eno ||'ename:' ||ename);
end;

--案例02:定义并常规赋值变量
declare
eno varchar(20);
ename varchar(20);
 sid constant varchar(10):='110' ;
v_valid boolean  default false;
begin
eno:='9527';
ename:='wind';
dbms_output.put_line('eno:' ||eno ||', ename:' ||ename ||' ,sid'||sid);
end;


--案例03:通过查询表赋值变量
declare
eno varchar(20);
ename varchar(20);
 sid constant varchar(10):='110' ;
v_valid boolean  default false;
begin
select empno, ename into eno, ename from emp where empno=7788;  /*一定使用where指明条件*/
dbms_output.put_line('eno:' ||eno ||', ename:' ||ename ||' ,sid'||sid);
end;

 


--案例04:PL/SQL块

--基础01:%rowtype
declare
name emp%rowtype;  /*表示变量name和emp表的一行的所有列属性相同*/
begin
select * into name from emp where empno=7788;  /*select后只能使用*,把该行的所有列赋值给变量*/
dbms_output.put_line('name'||name.ename);  /*name.ename即:变量中的列名ename*/
end;


---or
declare
name emp%rowtype;  /*表示变量name和emp表的一行的所有列属性相同*/
begin
select * into name from emp where empno=7788;  /*select后只能使用*,把该行的所有列赋值给变量*/
dbms_output.put_line('name:'||' ' || name.ename );  /*name.ename即:变量中的列名ename*/
dbms_output.put_line('work no:' ||name.empno);
dbms_output.put_line('emp job:' ||name.job);
dbms_output.put_line('salary:' ||name.sal);
end;
/

 


--基础02:%type
declare
nm emp.ename%type;   --表示与表emp表中的ename列属性相同
no emp.empno%type; 
begin
select ename, empno into nm, no from emp where empno=7788; /*select后使用部分字段列赋值给变量*/
dbms_output.put_line('name:'||' ' ||nm); 
end;


--完整案例:

declare
eno emp.empno%type;
name emp.ename%type;
emprow emp%rowtype;  --与emp表中的所有行属性相同
begin
select empno, ename into eno, name from emp where empno=7369;
select * into emprow from emp  where empno=7788; /*将一行数据的所有列赋值给变量*/
dbms_output.put_line('tmpno:'||eno||'  '||'cname:' ||name);
dbms_output.put_line('empno:'||emprow.empno||'  '||'ename:' ||emprow.ename);
exception
 when no_data_found then
 dbms_output.put_line('没有数据');
end;


----or
declare
eno emp.empno%type;
name emp.ename%type;
emprow emp%rowtype;  --与emp表中的所有行属性相同
begin
 select empno, ename into eno, name from emp where empno=7369;
dbms_output.put_line('tmpno:'||eno||'  '||'cname:' ||name);
select * into emprow from emp  where empno=7799; /*将一行数据的所有列赋值给变量*/
dbms_output.put_line('empno:'||emprow.empno||'  '||'ename:' ||emprow.ename);
exception
 when no_data_found then
 dbms_output.put_line('没有数据');
end;


--案例05:日期转换
declare 
thisday date;
begin
 thisday:=sysdate;
 dbms_output.put_line('this is day:' ||to_char(thisday,'yyyy-mm-dd hh24:mi:ss'));
exception
 when no_data_found then
 dbms_output.put_line('没有数据');
end;


--案例06:比较日期
declare 
thisday date;
begin
 thisday:=sysdate;
if thisday >'20-3月-2004' then --必须按照这样的日期格式。或案例07.
 dbms_output.put_line('this is day:' ||to_char(thisday,'yyyy-mm-dd'));
 else
 dbms_output.put_line('this is  no day');
 end if;
exception
 when no_data_found then
 dbms_output.put_line('没有数据');
end;


--案例07:
declare 
thisday date;
begin
 thisday:=sysdate;
if thisday <to_date('2006-03-12', 'yyyy-mm-dd' )then  /*通过格式转换,最好按照这样的转换*/
 dbms_output.put_line('this is day:' ||to_char(thisday,'yyyy-mm-dd'));
 else
 dbms_output.put_line('this is  no day');
 end if;
exception
 when no_data_found then
 dbms_output.put_line('没有数据');
end;


原文链接:http://blog.csdn.net/yangzhawen/article/details/7335141
加载中
返回顶部
顶部