ORACLE过程、函数

过程、函数
 
 
 
create or replace procedure p1
is
  empname emp.ename%type;
begin
  select ename into empname from emp where empno=7788;
  dbms_output.put_line(empname);
end;
 
SQL> ed
SQL> /
 
Procedure created
 
SQL> exec p1;
 
SCOTT
 
PL/SQL procedure successfully completed
 
 
 
create or replace procedure p1(eno emp.empno%type)
is
empname emp.ename%type;
begin
  select ename into empname from emp where empno=eno;
  dbms_output.put_line(empname);
end;
 
SQL> ed
SQL> /
 
Procedure created
 
SQL> exec p1(7788);
 
SCOTT
 
PL/SQL procedure successfully completed
 
create or replace procedure p1(eno in emp.empno%type)
is
  empname emp.ename%type;
begin
  select ename into empname from emp where empno=eno;
  dbms_output.put_line(empname);
end;
 
SQL> ed
SQL> /
 
Procedure created
 
SQL> exec p1(7788);
 
SCOTT
 
PL/SQL procedure successfully completed
 
 
create or replace procedure p1(eno in emp.empno%type,outname out emp.ename%type)
is
  empname emp.ename%type;
begin
  select ename into empname from emp where empno=eno;
  outname:=empname;
end;
 
declare
  empname emp.ename%type;
begin
  p1(7788,empname);
  dbms_output.put_line(empname);
end;
 
SQL> ed
SQL> /
 
SCOTT
 
PL/SQL procedure successfully completed
 
 
 
create or replace procedure p1(eno_name in out emp.ename%type)
is
  empname emp.ename%type;
begin
  select ename into empname from emp where empno=eno_name;
  eno_name:=empname;
end;
 
declare
  empname emp.ename%type;
begin
  empname:=7788;
  p1(empname);
  dbms_output.put_line(empname);
end;
 
SQL> ed
SQL> /
 
SCOTT
 
PL/SQL proc