Распределенные базы данных на примере Oracle. Астахова И.Ф. - 32 стр.

UptoLike

ВУЗ: 

ВГУ | Воронеж

Составители: 

Рубрика: 

32
Zljb[mlh\dfhf_glmkha^Zgby l_eZiZd_lZkha^ZgZIjhlhdhekha^Zgbyl_eZ
iZd_lZijb\_^_ggb`_
IjbhibkZgbbnmgdpbcbijhp_^mjiZd_lZ\hlebqb_hl hibkZgbch^b
ghqguonmgdpbcb ijhp_^mjhi_jZlhj CREATEg_bkihevam_lky
IJBF?J 4.5.2.
SQL> CREATE OR REPLACE PACKAGE BODY PAC
2 AS
3 PAC_COUNT NUMBER
:=
0;
4 FUNCTION MUL(Argl NUMBER, Arg2 NUMBER)
5 RETURN NUMBER IS
6 BEGIN
7 AUDIT;
8 RETURN Arg1* PAC_CONST + Arg2*PAC_CONST;
9 END;
10 PROCEDURE AUDIT IS
11 BEGIN
12 PAC_COUNT := PAC_COUNT + 1;
13 INSERT INTO TabAUD
VALUES ( PAC_COUNT
,
SYSDATE )
;
14 COMMIT;
15 END;
16 END;
17 /
Package body created.
DhgklZglZbebi_j_f_ggZyhibkZggZy\ki_pbnbdZpbbiZd_lZfh`_l
[ulv ^hklmigZ ba ihevah\Zl_evkdhc ijh]jZffudhg_qgh _keb ijhp_^mj_
bebnmgdpbblZdhc^hklmijZaj_r_gQlh[uh[jZlblvkyd]eh[Zevghci_j_
f_gghcbebdhgklZgl_iZd_lZgm`ghmdZaZlv\dZq_kl\_ij_nbdkZbfyiZd_
lZ Gb`_ ijb\_^_g ijbf_j beexkljbjmxsbc \hafh`ghklv ^hklmiZ d ]eh
[Zevghc dhgklZgl_ iZd_lZ b g_\hafh`ghklv ^hklmiZ d qZklghc i_j_f_gghc
iZd_lZ
SQL>EXEC DBMS_OUTPUT.PUT_LINE(PAC.PAC_CONST);
20.0
PL/SQL procedure successfully completed.
SQL>EXEC DBMS_OUTPUT.PUT_LINE ( PAC.PAC_COUNT ) ;
begin
dbms_output.put_line (pac. pac_count) ;
end;
ERROR at line 1; 
��������� ���������������������������������������������������������������
���������������������
      �����������������������������������������������������������������
���������������������������������� CREATE�����������������
������ 4.5.2.
SQL> CREATE OR REPLACE PACKAGE BODY PAC
  2 AS
  3 PAC_COUNT NUMBER := 0;
  4 FUNCTION MUL(Argl NUMBER, Arg2 NUMBER)
  5 RETURN NUMBER IS
  6     BEGIN
  7     AUDIT;
  8     RETURN Arg1* PAC_CONST + Arg2*PAC_CONST;
  9     END;
 10 PROCEDURE AUDIT IS
 11 BEGIN
 12     PAC_COUNT := PAC_COUNT + 1;
 13     INSERT INTO TabAUD
        VALUES ( PAC_COUNT, SYSDATE ) ;
 14     COMMIT;
 15     END;
 16 END;
 17 /
    Package body created.
       �����������������������������������������������������������������
����� ��������� ��� ����������������� ���������� ���������� ����� ����������
�����������������������������������������������������������������������
������������������������������������������������������������������������
���� ����� ��������� �������� ��������������� ������������ �������� �� ����
�������� ���������� ������� �� �������������� �������� �� �������� �����������
��������

SQL>EXEC DBMS_OUTPUT.PUT_LINE(PAC.PAC_CONST);

20.0

PL/SQL procedure successfully completed.

SQL>EXEC DBMS_OUTPUT.PUT_LINE ( PAC.PAC_COUNT ) ;

begin
dbms_output.put_line (pac. pac_count) ;
end;
ERROR at line 1;

                                                                            32

Страницы