PL/SQL Example 1

set serveroutput on

DECLARE
   CURSOR c1 IS SELECT username from dba_users;
   v_string	varchar2(30);
   v_number	number;

PROCEDURE proc1 is
BEGIN
   DBMS_OUTPUT.PUT_LINE('Proc1');
END proc1;

BEGIN
   DBMS_OUTPUT.PUT_LINE('MAIN');
   proc1();
END;
/

Output:

SQL>@plsql1.sql
MAIN
Proc1

PL/SQL procedure successfully completed.

SQL>