SQL> SET LINE 300;
SQL> CL SCR
SQL> SELECT 3+4 FROM DUAL;

       3+4                                                                                                                                                                                                                                                                                                  
----------                                                                                                                                                                                                                                                                                                  
         7                                                                                                                                                                                                                                                                                                  

SQL> DECLARE
  2  V1 NUMBER:=3;
  3  V2 NUMBER:=4;
  4  V3 NUMBER;
  5  BEGIN
  6  V3:=V1+V2;
  7  DBMS_OUTPUT.PUT_LINE(V3);
  8  END;
  9  /

PL/SQL procedure successfully completed.

SQL> SET SERVEROUTPUT ON;
SQL> 
SQL> DECLARE
  2  V1 NUMBER:=3;
  3  V2 NUMBER:=4;
  4  V3 NUMBER;
  5  BEGIN
  6  V3:=V1+V2;
  7  DBMS_OUTPUT.PUT_LINE(V3);
  8  END;
  9  /
7                                                                                                                                                                                                                                                                                                           

PL/SQL procedure successfully completed.

SQL> DECLARE
  2  V1 NUMBER:=3;
  3  V2 NUMBER:=4;
  4  V3 NUMBER;
  5  BEGIN
  6  V3:=V1+V2;
  7  DBMS_OUTPUT.PUT_LINE('OUTPUT:='||V3);
  8  END;
  9  /
OUTPUT:=7                                                                                                                                                                                                                                                                                                   

PL/SQL procedure successfully completed.

SQL> ED
Wrote file afiedt.buf

  1  DECLARE
  2  V1 NUMBER(10):=3;
  3  V2 NUMBER(10):=4;
  4  V3 NUMBER(10);
  5  BEGIN
  6  V3:=V1+V2;
  7  DBMS_OUTPUT.PUT_LINE('OUTPUT:='||V3);
  8* END;
SQL> /
OUTPUT:=7                                                                                                                                                                                                                                                                                                   

PL/SQL procedure successfully completed.

SQL> ED
Wrote file afiedt.buf

  1  DECLARE
  2  V1 NUMBER(1):=3;
  3  V2 NUMBER(1):=4;
  4  V3 NUMBER(10);
  5  BEGIN
  6  V3:=V1+V2;
  7  DBMS_OUTPUT.PUT_LINE('OUTPUT:='||V3);
  8* END;
SQL> /
OUTPUT:=7                                                                                                                                                                                                                                                                                                   

PL/SQL procedure successfully completed.

SQL> ED
Wrote file afiedt.buf

  1  DECLARE
  2  V1 NUMBER(1):=300;
  3  V2 NUMBER(1):=400;
  4  V3 NUMBER(10);
  5  BEGIN
  6  V3:=V1+V2;
  7  DBMS_OUTPUT.PUT_LINE('OUTPUT:='||V3);
  8* END;
SQL> /
DECLARE
*
ERROR at line 1:
ORA-06502: PL/SQL: numeric or value error: number precision too large 
ORA-06512: at line 2 


SQL> ED
Wrote file afiedt.buf

  1  DECLARE
  2  V1 NUMBER(4):=300;
  3  V2 NUMBER(4):=400;
  4  V3 NUMBER(10);
  5  BEGIN
  6  V3:=V1+V2;
  7  DBMS_OUTPUT.PUT_LINE('OUTPUT:='||V3);
  8* END;
SQL> /
OUTPUT:=700                                                                                                                                                                                                                                                                                                 

PL/SQL procedure successfully completed.

SQL> ED
Wrote file afiedt.buf

  1  DECLARE
  2  V1 NUMBER(4):=&V1;
  3  V2 NUMBER(4):=&V2;
  4  V3 NUMBER(10);
  5  BEGIN
  6  V3:=V1+V2;
  7  DBMS_OUTPUT.PUT_LINE('OUTPUT:='||V3);
  8* END;
SQL> 
SQL> /
Enter value for v1: 200
old   2: V1 NUMBER(4):=&V1;
new   2: V1 NUMBER(4):=200;
Enter value for v2: 300
old   3: V2 NUMBER(4):=&V2;
new   3: V2 NUMBER(4):=300;
OUTPUT:=500                                                                                                                                                                                                                                                                                                 

PL/SQL procedure successfully completed.

SQL> SET VERIFY OFF;
SQL> 
SQL> /
Enter value for v1: 300
Enter value for v2: 500
OUTPUT:=800                                                                                                                                                                                                                                                                                                 

PL/SQL procedure successfully completed.

SQL> ED
Wrote file afiedt.buf

  1  DECLARE
  2  V1 NUMBER(4):=&V1;
  3  V2 NUMBER(4):=&V2;
  4  V3 NUMBER(10);
  5  BEGIN
  6  V3:=V1+V2;
  7  DBMS_OUTPUT.PUT_LINE('Addition:='||V3);
  8  V3:=V1-V2;
  9  DBMS_OUTPUT.PUT_LINE('Subtraction:='||V3);
 10  V3:=V18V2;
 11  DBMS_OUTPUT.PUT_LINE('Multiple:='||V3);
 12  V3:=V1/V2;
 13  DBMS_OUTPUT.PUT_LINE('Division:='||V3);
 14* END;
SQL> /
Enter value for v1: 5
Enter value for v2: 8
V3:=V18V2;
    *
ERROR at line 10:
ORA-06550: line 10, column 5: 
PLS-00201: identifier 'V18V2' must be declared 
ORA-06550: line 10, column 1: 
PL/SQL: Statement ignored 


SQL> ed
Wrote file afiedt.buf

  1  DECLARE
  2  V1 NUMBER(4):=&V1;
  3  V2 NUMBER(4):=&V2;
  4  V3 NUMBER(10);
  5  BEGIN
  6  V3:=V1+V2;
  7  DBMS_OUTPUT.PUT_LINE('Addition:='||V3);
  8  V3:=V1-V2;
  9  DBMS_OUTPUT.PUT_LINE('Subtraction:='||V3);
 10  V3:=V1*V2;
 11  DBMS_OUTPUT.PUT_LINE('Multiple:='||V3);
 12  V3:=V1/V2;
 13  DBMS_OUTPUT.PUT_LINE('Division:='||V3);
 14* END;
SQL> /
Enter value for v1: 5
Enter value for v2: 8
Addition:=13                                                                                                                                                                                                                                                                                                
Subtraction:=-3                                                                                                                                                                                                                                                                                             
Multiple:=40                                                                                                                                                                                                                                                                                                
Division:=1                                                                                                                                                                                                                                                                                                 

PL/SQL procedure successfully completed.

SQL> SELECT EMPLOYEE_ID,LAST_NAME,HIRE_DATE,SALARY,JOB_ID,DEPARTMENT_ID FROM EMPLOYEES;

EMPLOYEE_ID LAST_NAME                 HIRE_DATE     SALARY JOB_ID     DEPARTMENT_ID                                                                                                                                                                                                                         
----------- ------------------------- --------- ---------- ---------- -------------                                                                                                                                                                                                                         
        198 OConnell                  21-JUN-99       2600 SH_CLERK              50                                                                                                                                                                                                                         
        199 Grant                     13-JAN-00       2600 SH_CLERK              50                                                                                                                                                                                                                         
        200 Whalen                    17-SEP-87       4400 AD_ASST               10                                                                                                                                                                                                                         
        201 Hartstein                 17-FEB-96      13000 MK_MAN                20                                                                                                                                                                                                                         
        202 Fay                       17-AUG-97       6000 MK_REP                20                                                                                                                                                                                                                         
        203 Mavris                    07-JUN-94       6500 HR_REP                40                                                                                                                                                                                                                         
        204 Baer                      07-JUN-94      10000 PR_REP                70                                                                                                                                                                                                                         
        205 Higgins                   07-JUN-94      12000 AC_MGR               110                                                                                                                                                                                                                         
        206 Gietz                     07-JUN-94       8300 AC_ACCOUNT           110                                                                                                                                                                                                                         
        100 King                      17-JUN-87      24000 AD_PRES               90                                                                                                                                                                                                                         
        101 Kochhar                   21-SEP-89      17000 AD_VP                 90                                                                                                                                                                                                                         

EMPLOYEE_ID LAST_NAME                 HIRE_DATE     SALARY JOB_ID     DEPARTMENT_ID                                                                                                                                                                                                                         
----------- ------------------------- --------- ---------- ---------- -------------                                                                                                                                                                                                                         
        102 De Haan                   13-JAN-93      17000 AD_VP                 90                                                                                                                                                                                                                         
        103 Hunold                    03-JAN-90       9000 IT_PROG               60                                                                                                                                                                                                                         
        104 Ernst                     21-MAY-91       6000 IT_PROG               60                                                                                                                                                                                                                         
        105 Austin                    25-JUN-97       4800 IT_PROG               60                                                                                                                                                                                                                         
        106 Pataballa                 05-FEB-98       4800 IT_PROG               60                                                                                                                                                                                                                         
        107 Lorentz                   07-FEB-99       4200 IT_PROG               60                                                                                                                                                                                                                         
        108 Greenberg                 17-AUG-94      12000 FI_MGR               100                                                                                                                                                                                                                         
        109 Faviet                    16-AUG-94       9000 FI_ACCOUNT           100                                                                                                                                                                                                                         
        110 Chen                      28-SEP-97       8200 FI_ACCOUNT           100                                                                                                                                                                                                                         
        111 Sciarra                   30-SEP-97       7700 FI_ACCOUNT           100                                                                                                                                                                                                                         
        112 Urman                     07-MAR-98       7800 FI_ACCOUNT           100                                                                                                                                                                                                                         

EMPLOYEE_ID LAST_NAME                 HIRE_DATE     SALARY JOB_ID     DEPARTMENT_ID                                                                                                                                                                                                                         
----------- ------------------------- --------- ---------- ---------- -------------                                                                                                                                                                                                                         
        113 Popp                      07-DEC-99       6900 FI_ACCOUNT           100                                                                                                                                                                                                                         
        114 Raphaely                  07-DEC-94      11000 PU_MAN                30                                                                                                                                                                                                                         
        115 Khoo                      18-MAY-95       3100 PU_CLERK              30                                                                                                                                                                                                                         
        116 Baida                     24-DEC-97       2900 PU_CLERK              30                                                                                                                                                                                                                         
        117 Tobias                    24-JUL-97       2800 PU_CLERK              30                                                                                                                                                                                                                         
        118 Himuro                    15-NOV-98       2600 PU_CLERK              30                                                                                                                                                                                                                         
        119 Colmenares                10-AUG-99       2500 PU_CLERK              30                                                                                                                                                                                                                         
        120 Weiss                     18-JUL-96       8000 ST_MAN                50                                                                                                                                                                                                                         
        121 Fripp                     10-APR-97       8200 ST_MAN                50                                                                                                                                                                                                                         
        122 Kaufling                  01-MAY-95       7900 ST_MAN                50                                                                                                                                                                                                                         
        123 Vollman                   10-OCT-97       6500 ST_MAN                50                                                                                                                                                                                                                         

EMPLOYEE_ID LAST_NAME                 HIRE_DATE     SALARY JOB_ID     DEPARTMENT_ID                                                                                                                                                                                                                         
----------- ------------------------- --------- ---------- ---------- -------------                                                                                                                                                                                                                         
        124 Mourgos                   16-NOV-99       5800 ST_MAN                50                                                                                                                                                                                                                         
        125 Nayer                     16-JUL-97       3200 ST_CLERK              50                                                                                                                                                                                                                         
        126 Mikkilineni               28-SEP-98       2700 ST_CLERK              50                                                                                                                                                                                                                         
        127 Landry                    14-JAN-99       2400 ST_CLERK              50                                                                                                                                                                                                                         
        128 Markle                    08-MAR-00       2200 ST_CLERK              50                                                                                                                                                                                                                         
        129 Bissot                    20-AUG-97       3300 ST_CLERK              50                                                                                                                                                                                                                         
        130 Atkinson                  30-OCT-97       2800 ST_CLERK              50                                                                                                                                                                                                                         
        131 Marlow                    16-FEB-97       2500 ST_CLERK              50                                                                                                                                                                                                                         
        132 Olson                     10-APR-99       2100 ST_CLERK              50                                                                                                                                                                                                                         
        133 Mallin                    14-JUN-96       3300 ST_CLERK              50                                                                                                                                                                                                                         
        134 Rogers                    26-AUG-98       2900 ST_CLERK              50                                                                                                                                                                                                                         

EMPLOYEE_ID LAST_NAME                 HIRE_DATE     SALARY JOB_ID     DEPARTMENT_ID                                                                                                                                                                                                                         
----------- ------------------------- --------- ---------- ---------- -------------                                                                                                                                                                                                                         
        135 Gee                       12-DEC-99       2400 ST_CLERK              50                                                                                                                                                                                                                         
        136 Philtanker                06-FEB-00       2200 ST_CLERK              50                                                                                                                                                                                                                         
        137 Ladwig                    14-JUL-95       3600 ST_CLERK              50                                                                                                                                                                                                                         
        138 Stiles                    26-OCT-97       3200 ST_CLERK              50                                                                                                                                                                                                                         
        139 Seo                       12-FEB-98       2700 ST_CLERK              50                                                                                                                                                                                                                         
        140 Patel                     06-APR-98       2500 ST_CLERK              50                                                                                                                                                                                                                         
        141 Rajs                      17-OCT-95       3500 ST_CLERK              50                                                                                                                                                                                                                         
        142 Davies                    29-JAN-97       3100 ST_CLERK              50                                                                                                                                                                                                                         
        143 Matos                     15-MAR-98       2600 ST_CLERK              50                                                                                                                                                                                                                         
        144 Vargas                    09-JUL-98       2500 ST_CLERK              50                                                                                                                                                                                                                         
        145 Russell                   01-OCT-96      14000 SA_MAN                80                                                                                                                                                                                                                         

EMPLOYEE_ID LAST_NAME                 HIRE_DATE     SALARY JOB_ID     DEPARTMENT_ID                                                                                                                                                                                                                         
----------- ------------------------- --------- ---------- ---------- -------------                                                                                                                                                                                                                         
        146 Partners                  05-JAN-97      13500 SA_MAN                80                                                                                                                                                                                                                         
        147 Errazuriz                 10-MAR-97      12000 SA_MAN                80                                                                                                                                                                                                                         
        148 Cambrault                 15-OCT-99      11000 SA_MAN                80                                                                                                                                                                                                                         
        149 Zlotkey                   29-JAN-00      10500 SA_MAN                80                                                                                                                                                                                                                         
        150 Tucker                    30-JAN-97      10000 SA_REP                80                                                                                                                                                                                                                         
        151 Bernstein                 24-MAR-97       9500 SA_REP                80                                                                                                                                                                                                                         
        152 Hall                      20-AUG-97       9000 SA_REP                80                                                                                                                                                                                                                         
        153 Olsen                     30-MAR-98       8000 SA_REP                80                                                                                                                                                                                                                         
        154 Cambrault                 09-DEC-98       7500 SA_REP                80                                                                                                                                                                                                                         
        155 Tuvault                   23-NOV-99       7000 SA_REP                80                                                                                                                                                                                                                         
        156 King                      30-JAN-96      10000 SA_REP                80                                                                                                                                                                                                                         

EMPLOYEE_ID LAST_NAME                 HIRE_DATE     SALARY JOB_ID     DEPARTMENT_ID                                                                                                                                                                                                                         
----------- ------------------------- --------- ---------- ---------- -------------                                                                                                                                                                                                                         
        157 Sully                     04-MAR-96       9500 SA_REP                80                                                                                                                                                                                                                         
        158 McEwen                    01-AUG-96       9000 SA_REP                80                                                                                                                                                                                                                         
        159 Smith                     10-MAR-97       8000 SA_REP                80                                                                                                                                                                                                                         
        160 Doran                     15-DEC-97       7500 SA_REP                80                                                                                                                                                                                                                         
        161 Sewall                    03-NOV-98       7000 SA_REP                80                                                                                                                                                                                                                         
        162 Vishney                   11-NOV-97      10500 SA_REP                80                                                                                                                                                                                                                         
        163 Greene                    19-MAR-99       9500 SA_REP                80                                                                                                                                                                                                                         
        164 Marvins                   24-JAN-00       7200 SA_REP                80                                                                                                                                                                                                                         
        165 Lee                       23-FEB-00       6800 SA_REP                80                                                                                                                                                                                                                         
        166 Ande                      24-MAR-00       6400 SA_REP                80                                                                                                                                                                                                                         
        167 Banda                     21-APR-00       6200 SA_REP                80                                                                                                                                                                                                                         

EMPLOYEE_ID LAST_NAME                 HIRE_DATE     SALARY JOB_ID     DEPARTMENT_ID                                                                                                                                                                                                                         
----------- ------------------------- --------- ---------- ---------- -------------                                                                                                                                                                                                                         
        168 Ozer                      11-MAR-97      11500 SA_REP                80                                                                                                                                                                                                                         
        169 Bloom                     23-MAR-98      10000 SA_REP                80                                                                                                                                                                                                                         
        170 Fox                       24-JAN-98       9600 SA_REP                80                                                                                                                                                                                                                         
        171 Smith                     23-FEB-99       7400 SA_REP                80                                                                                                                                                                                                                         
        172 Bates                     24-MAR-99       7300 SA_REP                80                                                                                                                                                                                                                         
        173 Kumar                     21-APR-00       6100 SA_REP                80                                                                                                                                                                                                                         
        174 Abel                      11-MAY-96      11000 SA_REP                80                                                                                                                                                                                                                         
        175 Hutton                    19-MAR-97       8800 SA_REP                80                                                                                                                                                                                                                         
        176 Taylor                    24-MAR-98       8600 SA_REP                80                                                                                                                                                                                                                         
        177 Livingston                23-APR-98       8400 SA_REP                80                                                                                                                                                                                                                         
        178 Grant                     24-MAY-99       7000 SA_REP                                                                                                                                                                                                                                           

EMPLOYEE_ID LAST_NAME                 HIRE_DATE     SALARY JOB_ID     DEPARTMENT_ID                                                                                                                                                                                                                         
----------- ------------------------- --------- ---------- ---------- -------------                                                                                                                                                                                                                         
        179 Johnson                   04-JAN-00       6200 SA_REP                80                                                                                                                                                                                                                         
        180 Taylor                    24-JAN-98       3200 SH_CLERK              50                                                                                                                                                                                                                         
        181 Fleaur                    23-FEB-98       3100 SH_CLERK              50                                                                                                                                                                                                                         
        182 Sullivan                  21-JUN-99       2500 SH_CLERK              50                                                                                                                                                                                                                         
        183 Geoni                     03-FEB-00       2800 SH_CLERK              50                                                                                                                                                                                                                         
        184 Sarchand                  27-JAN-96       4200 SH_CLERK              50                                                                                                                                                                                                                         
        185 Bull                      20-FEB-97       4100 SH_CLERK              50                                                                                                                                                                                                                         
        186 Dellinger                 24-JUN-98       3400 SH_CLERK              50                                                                                                                                                                                                                         
        187 Cabrio                    07-FEB-99       3000 SH_CLERK              50                                                                                                                                                                                                                         
        188 Chung                     14-JUN-97       3800 SH_CLERK              50                                                                                                                                                                                                                         
        189 Dilly                     13-AUG-97       3600 SH_CLERK              50                                                                                                                                                                                                                         

EMPLOYEE_ID LAST_NAME                 HIRE_DATE     SALARY JOB_ID     DEPARTMENT_ID                                                                                                                                                                                                                         
----------- ------------------------- --------- ---------- ---------- -------------                                                                                                                                                                                                                         
        190 Gates                     11-JUL-98       2900 SH_CLERK              50                                                                                                                                                                                                                         
        191 Perkins                   19-DEC-99       2500 SH_CLERK              50                                                                                                                                                                                                                         
        192 Bell                      04-FEB-96       4000 SH_CLERK              50                                                                                                                                                                                                                         
        193 Everett                   03-MAR-97       3900 SH_CLERK              50                                                                                                                                                                                                                         
        194 McCain                    01-JUL-98       3200 SH_CLERK              50                                                                                                                                                                                                                         
        195 Jones                     17-MAR-99       2800 SH_CLERK              50                                                                                                                                                                                                                         
        196 Walsh                     24-APR-98       3100 SH_CLERK              50                                                                                                                                                                                                                         
        197 Feeney                    23-MAY-98       3000 SH_CLERK              50                                                                                                                                                                                                                         

107 rows selected.

SQL> ---Displays employees information using pl/sql block---
SQL> llcl scr
SP2-0042: unknown command "llcl scr" - rest of line ignored.
SQL> 
SQL> 
SQL> cl scr
SQL> DECLARE
  2  VEMPNO NUMBER;
  3  VNAME VARCHAR2(20);
  4  VDATE DATE;
  5  VSAL NUMBER(10);
  6  VJOB VARCHAR2(20);
  7  VDEPTNO NUMBER(10);
  8  BEGIN
  9  SELECT EMPLOYEE_ID,LAST_NAME,HIRE_DATE,SALARY,JOB_ID,DEPARTMENT_ID FROM EMPLOYEES
 10  WHERE EMPLOYEE_ID=100;
 11  .
SQL> 
SQL> ED
Wrote file afiedt.buf

  1  DECLARE
  2  VEMPNO NUMBER;
  3  VNAME VARCHAR2(20);
  4  VDATE DATE;
  5  VSAL NUMBER(10);
  6  VJOB VARCHAR2(20);
  7  VDEPTNO NUMBER(10);
  8  BEGIN
  9  SELECT EMPLOYEE_ID,LAST_NAME,HIRE_DATE,SALARY,JOB_ID,DEPARTMENT_ID 
 10  INRO VEMPNO,VNAME,VDATE,VSAL,VJOB,VDEPTNO FROM EMPLOYEES
 11  WHERE EMPLOYEE_ID=100;
 12  DBMS_OUTPUT.PUT_LINE(VEMPNO||'   '||VNAME||'  '||VDATE||'  '||VSAL||'   '||VJOB||'  '||VDEPTNO);
 13* END;
SQL> /
INRO VEMPNO,VNAME,VDATE,VSAL,VJOB,VDEPTNO FROM EMPLOYEES
     *
ERROR at line 10:
ORA-06550: line 10, column 6: 
PL/SQL: ORA-00923: FROM keyword not found where expected 
ORA-06550: line 9, column 1: 
PL/SQL: SQL Statement ignored 


SQL> ED
Wrote file afiedt.buf

  1  DECLARE
  2  VEMPNO NUMBER;
  3  VNAME VARCHAR2(20);
  4  VDATE DATE;
  5  VSAL NUMBER(10);
  6  VJOB VARCHAR2(20);
  7  VDEPTNO NUMBER(10);
  8  BEGIN
  9  SELECT EMPLOYEE_ID,LAST_NAME,HIRE_DATE,SALARY,JOB_ID,DEPARTMENT_ID 
 10  INTO VEMPNO,VNAME,VDATE,VSAL,VJOB,VDEPTNO FROM EMPLOYEES
 11  WHERE EMPLOYEE_ID=100;
 12  DBMS_OUTPUT.PUT_LINE(VEMPNO||'   '||VNAME||'  '||VDATE||'  '||VSAL||'   '||VJOB||'  '||VDEPTNO);
 13* END;
SQL> /
100   King  17-JUN-87  24000   AD_PRES  90                                                                                                                                                                                                                                                                  

PL/SQL procedure successfully completed.

SQL> ed
Wrote file afiedt.buf

  1  DECLARE
  2  VEMPNO EMPLOYEES.EMPLOYEE_ID%TYPE;
  3  VNAME EMPLOYEES.LAST_NAME%TYPE;
  4  VDATE EMPLOYEES.HIRE_DATE%TYPE;
  5  VSAL EMPLOYEES.SALARY%TYPE;
  6  VJOB EMPLOYEES.JOB_ID%TYPE;
  7  VDEPTNO EMPLOYEES.DEPARTMENT_ID%TYPE;
  8  BEGIN
  9  SELECT EMPLOYEE_ID,LAST_NAME,HIRE_DATE,SALARY,JOB_ID,DEPARTMENT_ID 
 10  INTO VEMPNO,VNAME,VDATE,VSAL,VJOB,VDEPTNO FROM EMPLOYEES
 11  WHERE EMPLOYEE_ID=100;
 12  DBMS_OUTPUT.PUT_LINE(VEMPNO||'   '||VNAME||'  '||VDATE||'  '||VSAL||'   '||VJOB||'  '||VDEPTNO);
 13* END;
SQL> /
100   King  17-JUN-87  24000   AD_PRES  90                                                                                                                                                                                                                                                                  

PL/SQL procedure successfully completed.

SQL> 
SQL> 
SQL> ------Displays employees information from employees table using non-pl/sql variable---
SQL> CL SCR
SQL> VARIABLE VEMPNO NUMBER;
SQL> VAR VNAME VARCHAR2(20);
SQL> VAR VDATE VARCHAR2(20);
SQL> VAR VSAL NUMBER;
SQL> VAR VJOB VARCHAR2(20);
SQL> VAR VDEPTNO NUMBER;
SQL> 
SQL> 
SQL> BEGIN
  2  SELECT EMPLOYEE_ID,LAST_NAME,HIRE_DATE,SALARY,JOB_ID,DEPARTMENT_ID
  3  INTO :VEMPNO,:VNAME,:VDATE,:VSAL,:VJOB,:VDEPTNO FROM EMPLOYEES
  4  WHERE EMPLOYEE_ID=100;
  5  DBMS_OUTPUT.PUT_LINE(:VEMPNO||'  '||:VNAME||'  '||:VDATE||'  '||:VSAL||'  '||:VJOB||'  '||:VDEPTNO);
  6  END;
  7  /
100  King  17-JUN-87  24000  AD_PRES  90                                                                                                                                                                                                                                                                    

PL/SQL procedure successfully completed.

SQL> 
SQL> PRINT VEMPNO VNAME VDATE VSAL VJOB VDEPTNO;

    VEMPNO                                                                                                                                                                                                                                                                                                  
----------                                                                                                                                                                                                                                                                                                  
       100                                                                                                                                                                                                                                                                                                  


VNAME                                                                                                                                                                                                                                                                                                       
--------------------------------                                                                                                                                                                                                                                                                            
King                                                                                                                                                                                                                                                                                                        


VDATE                                                                                                                                                                                                                                                                                                       
--------------------------------                                                                                                                                                                                                                                                                            
17-JUN-87                                                                                                                                                                                                                                                                                                   


      VSAL                                                                                                                                                                                                                                                                                                  
----------                                                                                                                                                                                                                                                                                                  
     24000                                                                                                                                                                                                                                                                                                  


VJOB                                                                                                                                                                                                                                                                                                        
--------------------------------                                                                                                                                                                                                                                                                            
AD_PRES                                                                                                                                                                                                                                                                                                     


   VDEPTNO                                                                                                                                                                                                                                                                                                  
----------                                                                                                                                                                                                                                                                                                  
        90                                                                                                                                                                                                                                                                                                  

SQL> 
SQL> EXIT;
