Как да декларирам променлива и да я използвам в същия Oracle SQL скрипт?

Има няколко начина за деклариране на променливи в SQL*Plus скриптове.

Първият е да използвате VAR, за да декларирате свързваща променлива. Механизмът за присвояване на стойности на VAR е с извикване EXEC:

SQL> var name varchar2(20)
SQL> exec :name := 'SALES'

PL/SQL procedure successfully completed.

SQL> select * from dept
  2  where dname = :name
  3  /

    DEPTNO DNAME          LOC
---------- -------------- -------------
        30 SALES          CHICAGO

SQL>

VAR е особено полезен, когато искаме да извикаме съхранена процедура, която има OUT параметри или функция.

Като алтернатива можем да използваме заместващи променливи. Те са добри за интерактивен режим:

SQL> accept p_dno prompt "Please enter Department number: " default 10
Please enter Department number: 20
SQL> select ename, sal
  2  from emp
  3  where deptno = &p_dno
  4  /
old   3: where deptno = &p_dno
new   3: where deptno = 20

ENAME             SAL
---------- ----------
CLARKE            800
ROBERTSON        2975
RIGBY            3000
KULASH           1100
GASPAROTTO       3000

SQL>

Когато пишем скрипт, който извиква други скриптове, може да бъде полезно да дефинираме променливите предварително. Този фрагмент се изпълнява, без да ме подканва да въведа стойност:

SQL> def p_dno = 40
SQL> select ename, sal
  2  from emp
  3  where deptno = &p_dno
  4  /
old   3: where deptno = &p_dno
new   3: where deptno = 40

no rows selected

SQL>

И накрая, има анонимният PL/SQL блок. Както виждате, ние все още можем да присвояваме стойности на декларираните променливи интерактивно:

SQL> set serveroutput on size unlimited
SQL> declare
  2      n pls_integer;
  3      l_sal number := 3500;
  4      l_dno number := &dno;
  5  begin
  6      select count(*)
  7      into n
  8      from emp
  9      where sal > l_sal
 10      and deptno = l_dno;
 11      dbms_output.put_line('top earners = '||to_char(n));
 12  end;
 13  /
Enter value for dno: 10
old   4:     l_dno number := &dno;
new   4:     l_dno number := 10;
top earners = 1

PL/SQL procedure successfully completed.

SQL>