SQL> create or replace procedure testout (strin in number,strout out varchar2)
2 as
3 begin
4 if strin=0 then
5 strout :='error:in is 0;';
6 else
7 strout :='in is ' || strin || ';';
8 end if;
9 end;
10 /
Procedure created.
Elapsed: 00:00:02.13
SQL> commit;
Commit complete.
Elapsed: 00:00:00.30
SQL> set serveroutput on
SQL> declare
2 i number :=1;
3 j varchar2(50);
4 begin
5 testout(i,j);
6 dbms_output.put_line('out value=' || j || ';');
7 end;
8 /
out value=in is 1;;