


                      14             

 ⮩   ਣ ꥪ SQL*Forms.  筥,    뢠
᫥騥 ⥬:
      * । ਣ஢
      * ࠪ⨪ ਣ
      * ⨯ ਣ஢
 ⢥ : ਣ, 楯樨

     ।     ਣ஢

 ᮧ   ਣ  䥩 (ࠡ稪) SQL*Forms
१  । ਣ  ७ ⠡ ५ ਣ.

           ଠ । ਣ

  ଠ  ।  ਣ  -         䥩 (ࠡ稪)
SQL*Forms,   ᮧ,   㤠 ਣ.  ଠ
  ᬠਢ  ଠ   ਣ   ࠧ.

  㭪  14-1    ଠ  ।  ਣ   ਬ묨
묨.

            14-1         ଠ । ਣ

   Action  foRm  Block  Field  Trigger  Procedure  Image  Help  Options
    Trigger Definition   
  
   Trigger: ON-VALIDATE-FIELD               ---- For Key Triggers Only ----
   Block:   ITEMS                           [   ] Show Keys
   Field:   QTY                             Descrip:
   Trigger Style:  V3                      
  
   ------------------------------- Trigger Text ----------------------------
   :ITEMTOT := :QTY * :ACTUALPRICE;
  
  
   --------------------------------- Comment -------------------------------
   This trigger reads a calculated value into the Item Total field.
  
  
 Enter the name of the trigger.
 Frm: ORDER_ENTR  Blk: items       Fld: QTY      Trg: ON-VALIDAT  <List><Rep>


  ᯮ:    ⨦  । ਣ 
                  , 믮 ᫥騥 蠣:
     1.     ⥪ .
     2. 롥  ਣ.
     3. ᫨    ७  ⠡  । ਣ,
         [  뤠].

   ⠪      ।  ਣ ᫥騬 ﬨ:
     * 롥  ਣ   .
     * 롥  ਣ   .
     * 롥  ਣ   .



                                   -- 138 --



     *  [Zoom In]  ଥ । .
     * ᫨  ࠡ⠥  ਣ஬ V2,  [Zoom Out]
         ।  ਣ.

     *  [Navigate]        ७   ⠡  
   ।  ⥪  ਣ.      ⠪ । ⥪
       ,         易⥫쭮.

,      ⮤  뤠 ७ ⠡ ।
ਣ.

           ७  । ਣ

  ७    ।  ਣ  -     䥩
(ࠡ稪)  SQL*Forms,       ᮧ, 樯  㤠
ਣ.  ७ ⠡   ᬠਢ ଠ  
  祬   ਣ      ࠧ.  ,       ⮩
⠡     ࠧ.

砭:   । ਣ,  ᫨   
ᬮ    ଠ    ਣ   ࠧ.

㭮 14-2 ਢ  ७   । ਣ 
묨  ਬ.

            14-2         ७  । ਣ

   Action  foRm  Block  Field  Trigger  Procedure  Image  Help  Options
    Trigger Definition   
 
                                                         Trigger   Show
 Ĵ   Trigger Name       Block Name        Field Name      Style    Keys
  
   KEY-NXTFLD        ORDERS            ORDID                V3    [   ]
   KEY-PRVFLD        ORDERS            ORDID                V3    [   ]
   ON-VALIDATE-FIEL  ORDERS            ORDID                V3    [   ]
                                                                 
 Ĵ                                                               
 
 
 Enter the name of the trigger.
 Frm: order       Blk: orders      Fld:             Trg:         <List><Rep>


    ⮭宦:   ⨦ ७ ⠡ । ਣ
                         ,  믮  ᫥騥 蠣:
   1.     ⥪ .
   2. 롥  ਣ.
   3. ᫨  ଠ । ਣ,  [  뤠]

 ⠪   ७  ⠡    । ਣ
᫥騬 ﬨ:
     * 롥  ਣ   .
     * 롥  ਣ   .
     * 롥  ਣ   .
     *  [Zoom In]  ७ ⠡ । .
     * ᫨  ࠡ⠥  ਣ஬ V2,  [Zoom Out]
         ।  ਣ.

                                   -- 139 --



     *  [Navigate]        ७   ⠡  
       ।  ⥪  ਣ.      ⠪ । ⥪
           ,         易⥫쭮.
,      ⮤   뤠   । ਣ.

     ࠪ⨪     ਣ

   । ਣ  ⮨    ⠭     ਣ
ࠪ⨪.  ࠪ⨪ 뢠 ᫥騥   ਣ:
     *  ଠ,    ꥪ  ଥ,     ன
       祭 ਣ
     * ⨫ ਣ  ,   ࠡ⠥

   ⮬  ࠧ  ।⠢  ࠪ⨪  ਣ   䠢⭮
浪. ,   ࠪ⨪ ਣ 筮 ᮮ⢥ 
⮢    ଥ । ਣ    ७  ⠡ ।
ਣ.   ਬ,      ਣ   ७ ⠡
।  ਣ  -      ,    । ࠪ⨪
ਣ  ਣ.

:         ࠪ⨪  ਣ   ᮪ 
䥩 (ࠧࠡ稪)  SQL*Forms.    ⮬ ࠧ   ᮪饭
᫥  묨  (..,   ()).

    ᢠ  ࠪ⨪  ਣ  १  ࠧ 
䥩  ࠧ묨 ᯮᮡ:
 䥩  ᢠ ࠪ⨪


                    ਣ

஢筠 ࠬ    몫  ࠪ⨪
                     祭
 ஫஢   祭

    ࠧ   ᢠ,  ⠪       ,
      ࠧ  뢠    ࠪ⨪.   ਬ,
ࠪ⨪,  ᢠ  ஢ ࠬ    ᠭ  
⠭   砭   (   㤥       "祭"  
"몫祭"). ୠ⨢,  ࠪ⨪,  ᢠ १  
 易⥫쭮/易⥫쭮 ᠭ, 뢠        
  ⮣   । ꥪ .
⢥ :                䥩

            

  ࠪ⨪ ਣ   뢠    ,   ஬ 
 祭,  ᫨  । ਣ  ஢   .

易⥫/易⥫:      ࠪ⨪     ॡ  ᫨
     ਣ  ⤥쭮   .

砭:  ࠪ⨪    㬮砭 ⠭
             ⥪騩 , ᫨ ⠪ .
⢥ :  ਣ

           ਩


                                   -- 140 --



  ࠪ⨪   ਣ   ਩  ।  ᭮ ଠ 
ਣ.  ਩  -        ।⢮ ᠭ  楫 
ࠪ⨪ ਣ.   ᮡ  ᯮ 㣨
ࠧࠡ稪,    ᯮ   ꥪ   ਫ   
⫠  প  ਫ.
易⥫/易⥫:   易⥫


           ᠭ (Descrip)

  ࠪ⨪  ਣ  ᠭ    ⥪,    뤠  
࠭  祩  祢 ਣ.     ⠪  ᯮ짮
ࠪ⨪   ᠭ    ᠭ 祢 ਣ஢.

    ᠭ    ਣ  ⥪,      ᢮
뢠 䨧᪮ . ਬ,  ᫨  ।    ਣ
Key-NXTBLK,        ।        ࠭
  ଥ,        [Next  Block],     ⥪
ᠭ    騩    -      ࠭.  
⨥    㭪樮쭮   ( ..,  PF1) 뤠  ०.
,   ᠭ    ਣ஢  Key-Fn,  㤠    
। ⥪ ᠭ १ ࠪ⨪ ᠭ.

᫨ ࠪ⨪ ਣ 뤠 祩 몫祭,  室  㭪樮-
    (  ᠭ)     ࠭ 뤠 祩.
易⥫쭠/易⥫쭠: 易⥫쭠

祭  砭: 祭      㬮砭    ࠪ⨪ ᠭ
.   㪠뢠  ,   SQL*Forms   ᯮ짮   ᠭ
 㬮砭 㭪樮 祩.
⢥ : ࠪ⨪ ਣ 뤠 祩

                 (Field)

  ࠪ⨪  ਣ      뢠      ஬
ਣ 祭,  ᫨  । ਣ   ஢ .

易⥫쭠/易⥫쭠:    ࠪ⨪        ॡ ᫨ 
   ਣ    ⭮ .
祭  砭:  ਣ 4-3

           뤠 祩

  ࠪ⨪ ਣ 뤠 祩   㭪樮 祢  室
뤠    ࠭  뤠 祩.
  ⮫쪮 몫 㭪樮 祢 室⥬ ८।
⮣  㭪樮쭮      祢 ਣ஬.
⠭  砭: 祭
⢥ : ᠭ, ࠪ⨪ ਣ 14-5

     (Trigger)

  ࠪ⨪  ਣ    ਣ  㪠뢠    , ஥
SQL*Forms  ᯮ    䨪樨   ਣ.     ਣ஢,
   짮⥫, ࠪ⨪  ਣ -    
襬 롮    ᮡ  ᮣ襭    .       㣨
ਣ஢,   ࠪ⨪     ਣ      ਣ - -
ON-DELETE.

                                   -- 141 --



砭:  ᫨     ਣ,   짮⥫ 
饬 ਫ, 㤮⮢,  ந    
ਣ,  뫠  , 짮⥫  ਣ.
易⥫쭠/易⥫쭠: 易⥫쭠 ⢥ : ꥪ,
                             ᮣ襭   20-2

           ⨫ ਣ

  ࠪ⨪ ਣ ⨫ ਣ । -   
ਣ ਣ஬ V2  ਣ஬ V3.

祭  砭: V3
⢥ : ਣ, ⨯ 14-8
                  V3 ਣ  ࠢ  V2 ਣࠬ

          ਣ

  ࠪ⨪  ਣ  ਣ । ணࠬ PL/SQL  
楤,     믮    ᪥ ਣ.   ।
ࠪ⨪  ਣ ⮫쪮  ਣ஢ V2.

砭:  ᫨    ᮧ  ਣ  V2,     SQL*Forms   
ଠ,      ।   ࠪ⨪      ਣ.
   ਣ   V2 ।   믮 蠣 ਣ.

易⥫쭠/易⥫쭠:   ࠪ⨪  ਣ 易⥫쭠 
                               ਣ஢ V3.

          ਣ

   ⮬ ࠧ 뢠 ⨯ ਣ஢.   ਢ   ⨯
ਣ஢  ࠢ ᯮ짮   ,  ᫥
ଠ:
     * ࠭祭  ᯮ짮 ਣ஢
     * । ஢,    ਣ
     * ࠢ ,       ⥪ ਣ
     * 筮 ᯮ짮 ਣ

砭:  ⮩    ᯮ  ନ "樮  ਣ"
  "࠭樮  ਣ".   ନ     ⤥ ⨯
ਣ஢,   ᪮॥ 㯯 த⢥ ਣ஢.

樮    ⭮     ਣࠬ ,
ਣ        ᥩ,   .


࠭樮  ⭮  ਣࠬ -  -
ਣ        ਣࠬ ᥭ ଠ樨, 㤠,
               ⠢    ਣࠬ -
               㤠, ⠢  .
⢥ : ਣ, 楯樨 4-1

           祢 ਣ

    ⨯ 祢 ਣ஢:
     * 㭪樮 祢 ਣ



                                   -- 142 --



     * Key-Fn ਣ
     * Key-Others
     * Key-Startup

   ᭮ 祢 ਣ -   㭪樮  祢 ਣ.  
祢  ਣ  -筮 ᮮ⢥⢨   ᯥ᪨
蠬.    ࠧ,   ਣ  ᪠ ⮫쪮 ⮣,   
 ।      ।   ᫥⥫쭮 .
  ⠫  ਣ   ᪫祭ﬨ  ⮣  筮
ᮮ⢥⢨.

         㭪樮 祢 ਣ

㭪樮 祢 ਣ  樨஢   ⤥쭮 㭪樮쭮
襩 SQL*Forms (Run Form). 㭪樮 ਣ  ᪠ ⮫쪮
⮣,    ᮮ⢥ 㭪樮 .  -
, ।塞  㭪樮 ਣ஬   ⢨,  ஥
뫮    맢    㭪樮쭮 襩  㬮砭.

    ᫥饩  ⠡ ਢ  㭪樮 祢 ਣ 
ᮮ⢥騥 㭪樮   SQL*Forms (Run Form).

 ਣ          ⢥ 㭪樮쭠 

Key-CLRBLK               [Clear Block]
Key-CLRFRM               [Clear Form]
Key-CLRREC               [Insert Record]
Key-COMMIT               [Commit]
Key-CQUERY               [Count Query Hits]
Key-CREREC               [Create Record]
Key-DELREC               [Delete Record]
Key-DOWN                 [Down]
Key-DUPFLD               [Duplicate Field]
Key-DUPREC               [Duplicate Record]
Key-EDIT                 [Edit]
Key-ENTER                [Enter]
Key-ENTQRY               [Enter Query]
Key-EXEQRY               [Execute Query]
Key-EXIT                 [Exit]
Key-HELP                 [Help]
Key-LISTVAL              [List]
Key-MENU                 [Block Menu]
Key-NXTBLK               [Next Block]
Key-NXTFLD               [Next Field]
Key-NXTKEY               [Next Primary Key Fld]
Key-NXTREC               [Next Record]
Key-NXTSET               [Next Set of Records]
Key-PRINT                [Print]
Key-PRVBLK               [Previous Block]
Key-PRVFLD               [Previous Field]
Key-PRVREC               [Previous Record]
Key-SCRDOWN              [Scroll Down]
Key-SCRUP                [Scroll Up]
Key-UP                   [Up]
Key-UPDREC               [Lock Record]




                                   -- 143 --



,     ८।  㭪樮 
SQL*Forms  (Run  Form)    㭪樮  祢 ਣ.  筥
,       ८। ᫥騥  ﭭ  㭪樮
,  ⠪     ࠡ뢠  ନ    ⥬
প 짮⥫᪮ 䥩,   SQL*Forms-ᮬ.

[Begining of Line]                    [Last Line]
[Clear Field]                         [Left]
[Cut]                                 [Paste]
[Delete Backward]                     [Refresh]
[Delete Character]                    [Right]
[Delete Line]                         [Scroll Left]
[Display Error]                       [Scroll Right]
[End of Line]                         [Search]
[Fist Line]                           [Select]
[Instret Line]                        [Show Keys]
[Insert/Replace]                      [Transmit]

࠭祭:  SQL*Forms    㭪樮 祢 ਣ  ०
    (    ਣ Key-EXEQRY  Key-EXIT)   ०
஢.

஢ ।: ,   ଠ

⨬  :  SELECT,  ࠭祭  楤,
                     ࠭祭  楤

筮 ᯮ짮: ᯮ  㭪樮  祢 ਣ 
                       ᫥ :
     * ᪮ 몫祭 㭪樮 
     *   ⢨    㬮砭  㭪樮 
     * ᪮ ८। 㭪樮 
     * 믮 ᫮  ⢥  㭪権  
       襩  ᫥⥫쭮 


           ਣ Key-Fn

    ਣ Key-Fn    蠬 
᫥⥫쭮 ,   筮   ᯮ ﬨ
SQL*Forms.    ।  Key-F0 - Key-F9.   ।  ⥬  
  ᬮ    祢 ਣ    ⨬  蠬,       DBA
() ⢮  ORACLE*Terminal     ࠧ⪨      
ᮮ⢥騥 㭪樨.

ਣ Key-Fn ᪠    ᮮ⢥ .

࠭祭: SQL*Forms  ਣ Key-Fn    ०
                 ० ஢.
஢ ।: ,   ଠ
⨬  :  SELECT,  ࠭祭 
                     楤, ࠭祭  楤

筮  ᯮ짮:  ᯮ  ਣ  Key-Fn    ᮧ
⥫  㭪樮      筮 ᯮ짮.
⢥ :  Key-F0  Key-F9, ࠧ⪠ 25-11

         ਣ Key-Others

                                   -- 144 --



ਣ Key-Others  ᮮ⢥  ᥬ  蠬,     
ਣ,  樨஢  ,     । ।⢮
㭪樭 祢 ਣ஢  (    ஢).   ਣ   Key-Others
᪠     ᮮ⢥ .

ਣ Key-Others  ८।  ⢨    㬮砭 㭪樮쭮
   SQL*Forms  (Run  Form)  (᫨      ᫥
࠭祭).     ⮬ 砥  SQL*Forms  த  뤠 室
㭪樮   㬮砭  ࠭  .

࠭祭: SQL*Forms   ਣ  Key-Others   ᫥
             ᫮:
   * ଠ  ०  
   * 뤠 ᯨ᮪ 祭,࠭ 뤠 , ࠭ ,  ࠭ 訡
   *  稫 ⢥砥   ਣ襭  SQL*Forms  (Run Form)
   *   ﭭ 㭪樮 

஢ ।: , ,  ଠ
⨬  :  SELECT,  ࠭祭 
                     楤, ࠭祭  楤

  筮 ᯮ짮: ᯮ ਣ  Key-Others   ࠭祭
  㭪権  .  筥  , ᯮ ਣ
Key-Others    믮  ᫥ :
     *  몫祭   ,    㦭   樨
     *  믮    ᯥ᪮   ⢨   
        ⨥ ஬   


         ਣ Key-Startup

ਣ  Key-Startup  ᪠    SQL*Forms 室  . 
ਣ ⭮  祢 ਣࠬ,  ⠪     ᫨ 
  "startup" .

ਣ  Key-Startup  ᥣ  ᪠   ᫥ 蠣 ᮡ 
.   ࠧ,     祭      ஢   
।  ਣ  Key-Startup,    ᪠ ᫥ ᯥ譮 믮
 樮 ਣ,  祭    .  ᫨  
।   祬  ਣ Key-Startup  ଥ,     
ᠬ  ਪ  ஢  ।   ਮ.

஢    ।:         ।   ਣ Key-Startup  
஢  ,       .   ᫨   ।  ਣ    ஢
,    㤥 饭 ⮫쪮 ᫨     ࢮ  ,
   ⠭     室  .  ᫨  ।
ਣ  ஢ ,     㤥 饭 ⮫쪮 ᫨    
ࢮ ,  ஥ ⠭   室  .

⨬ :  SELECT,  ࠭祭   楤,
                    ࠭祭  楤

筮  ᯮ짮:  ᯮ ਣ Key-Startup  ⠭  ,
ᯮ㥬  ஬.  ,   ਣ Key-Startup 
ᯮ짮 ࠭祭  楤,        ⨬  
ਣ  Pre-Form, Pre-Block,  Pre-Field.

⢥ :   21-41

                                   -- 145 --



           n-Clear-Block     ਣ

  ਣ  On-Clear-Block ᪠ 直 ࠧ,  SQL*Forms 뢠
⥪騩 .   ⢨ ந室  ᫥ ᮡ:
     * CLEAR_BLOCK
     * COUNT_QUERY
     * ENTER_QUERY
     * ⨥ 

,   ਣ On-Clear-Block   ᪠   SQL*Forms
뢠 ⥪騩   ᮡ⨨ CLEAR_FORM.


  ஢ ।: , ,  ଠ

⨬ :  SELECT, ࠭祭  楤

筮  ᯮ짮:  ᯮ  ਣ On-Clear-Block   믮
⢨  直   ࠧ,      SQL*Forms 뢠  ⥪騩  .
ਬ,       믮   ⮬᪮   襭
直   ࠧ    㯫 ⮣ ᫮.

⢥ : CLEAR_BLOCK, flow chart
               COUNT_QUERY, flow chart
               ENTER_QUERY, flow chart
               ⨥ 


           On-Database-Record

     ਣ
  ਣ  On-Database-Record  ᪠  直  ࠧ   SQL*Forms
  ࠧ  砥       ⠢    㤠.  ࠧ,
ਣ ᪠  SQL*Forms ।   㤥 ࠡ⠭ 
쭥襬  ᫨  ⠢  .  ⢨  
 ᫥ ᮡ:

     * DUPLICATE_RECORD
     *      

஢ ।: ,   ଠ
⨬ :  SELECT, ࠭祭  楤

筮 ᯮ짮: ᯮ ਣ
On-Database-Record  믮 ⢨ 直 ࠧ,    
ࠧ  祭    ⠢      㤠.

ਬ, ᯮ  ਣ    饩 㬬.

⢥ : DUPLICATE_RECORD, flow chart


           ਣ On-Delete

  ਣ  On-Delete   ᪠  ᮡ Post  Commit.  筥 ,
 ᪠ ᫥ ਣ  Pre-Delete   ।  ਣ஬  Post-Delete.



                                   -- 146 --



ਣ  On-Delete   ࠡ SQL*Forms-ᮬ  㬮砭 
ࠡ⪨  㤠 ᥩ    ࠭樨.   ᪠  
ப,  祭  㤠   .

஢ ।:   ଠ

  ⨬ :   SELECT,  몠 㫨஢ -
묨 (DML) (.., DELETE, INSERT, UPDATE), ࠭祭  楤

筮 ᯮ짮: ᯮ ਣ  On-Delete     
ࠡ⪨  SQL*Forms  㬮砭  ⢨  㤠 ᥩ  
࠭樮 ᥭ.
⢥ : 騥  騥 ࠭樨 21-88

           On-Error ਣ

  On-Error ਣ  ᪠  直  ࠧ    SQL*Forms ॢ
ଠ쭮 뤠 訡筮 ᮮ饭.  ⢨ On-Error ਣ 砥
  뤠  訡筮 ᮮ襭.

஢ ।: , , ଠ
⨬ :  SELECT,   ࠭祭  楤

筮  ᯮ짮:  ᯮ  ਣ  On-Error    
                         ࠢ 訡.
⢥ : 뤠 ᮮ饭
                  訡 ᮮ饭, ⨯ ᮮ饭

           On-Insert ਣ

  On-Insert   ਣ    ᪠    ᮡ⨨  믮 ࠭樨
  ᥭ. 筥 ,  ᪠ ᫥ Pre-Insert ਣ  
।  Post-Insert  ਣ஬.

ਣ  On-Insert   ⢨ SQL*Forms  ࠡ⪥ ⠢塞
      ࠭樨  ᥭ.   ᪠  直 ࠧ 
 ப,   祭  ⠢   .

஢ ।:   ଠ

⨬  :    SELECT,      몠 ࠢ
묨  (DML) ( ..,  DELETE,  INSERT,UPDATE), ࠭祭 
楤

筮 ᯮ짮: ᯮ On-Insert    ਣ   
⢨ SQL*Forms  ࠡ⪥ ⠢塞    ࠭樨
ᥭ.
⢥ : ࠭樨 ᥭ   21-88


             On-Lock ਣ

  On-Lock  ਣ    ᪠  直  ࠧ  SQL*Forms ଠ쭮
⠥ ஢ ப.  ⢨  ਣ On-Lock      
  ࠡ⪨ SQL*Forms  㬮砭 ஢ ப.

஢ ।:   ଠ


                                   -- 147 --



⨬ :  SELECT, ࠭祭  楤

筮   ᯮ짮:  ᯮ  ਣ  On-Lock   
⢨    㬮砭  SQL*Forms     ࠡ⪥ ஢   ப.
ਬ,   ᫨      ஥஢ ਫ    ᯮ짮  
   짮⥫᪮ ⥬,       ᯮ짮  ਣ  On-Lock
 ᪮७  ࠡ⪨  ।⢮  室     ॡ ஢.
⢥ : ஢ ப 21-70

           On-Message ਣ

  On-Message ਣ  ᪠ 直 ࠧ,   SQL*Forms ଠ쭮
뤠 ଠ⨢ ᮮ饭.  ⢨ ਣ On-Message   
 ᠭ ᮮ饭.

  筮  ᯮ짮:  ᯮ  ਣ  On-New-Record  믮
⢨ 直 ࠧ,   SQL*Forms ᮧ   .   ਬ,
ᯮ    ਣ         ᪨
祭ﬨ  㬮砭.
⢥ : DOWN, flow chart 21-33
                 21-39
               NEXT_RECORD, flow chart 21-83


           On-Remote-Record ਣ

  On-Remote-Record ਣ ᪠ 直 ࠧ,  SQL*Forms 頥 
㤠  .     ⢨ ந室  ᫥ ᮡ:
     * CLEAR_RECORD
     * DELETE_RECORD
     *  PREVIOUS_RECORD  (  ᫥,  ⮩     )

஢ ।: ,   ଠ

⨬   :      SELECT,   ࠭祭
 楤

筮 ᯮ짮: ᯮ ਣ  On-Remote-Record   믮
⢨ 直 ࠧ,   SQL*Forms   㤠 .  ਬ,
ᯮ  ਣ  㢥祭 ⥪饩 㬬.

⢥ : CLEAR_RECORD, flow chart 21-22
                  DELETE_RECORD, flow chart 21-28
                  PREVIOUS_RECORD, flow chart  21-98


           ਣ On-Update-Record

  ਣ On-Update-Record  ᪠  ᮡ⨨ ࠭樨 ᥭ  
.  筥  ,    ᪠ ᫥ ਣ Pre-Update  ।
ਣ஬  Post-Update.  ਣ On-Update-Record  ⢨ SQL*Forms
 㬮砭  ࠡ⪥    ᥩ   ࠭樨 ᥭ.  
᪠  ࠧ   ப,   祭    
.

஢ ।:   ଠ



                                   -- 148 --



⨬  :    SELECT,      몠
ࠢ 묨 (DML)  (  ..,  DELETE,  INSERT,UPDATE),
࠭祭  楤

筮  ᯮ짮: ᯮ ਣ On-Update-Record ⢨
SQL*Forms  㬮砭      ᥩ   ࠭樨 ᥭ.

⢥ : ࠭樨 ᥭ   21-88


             ਣ On-Validate-Field

  ਣ  On-Validate-Field  ᪠  ᮡ⨨ ஢ન .  筥
,    ᪠    ᫥  䠧 ஢ન      
   ஢ ᮬ.

஢ ।: ,   ଠ

⨬   :      SELECT,   ࠭祭 
楤

筮 ᯮ짮: ᯮ ਣ On-Validate-Field  
⢨ SQL*Forms  ஢ન .

,        ਣ On-Validate-Field ,  
祭 ,  ஥ ஢ SQL*Forms.  ᫨ ஢ઠ ᯥ譠,  
SQL*Forms     ࠢ쭮   㤥 ९஢ .
    ⠪   室     ஢ப,  
    ᥭ ࠢ쭮 祭   .

⢥ : ஢ઠ  21-122


           ਣ On-Validate-Record

  ਣ On-Validate-Record  ᪠  ᮡ⨨ ஢ન .  筥
,   ᪠   ᫥  䠧 ஢ન         ᥩ
       ஢ ᮬ.

஢ ।:    ଠ
⨬  :  SELECT, ࠭祭  楤
筮 ᯮ짮: ᯮ ਣ On-Validate-Record    
                       ⢨  SQL*Forms   ஢ન .

,       ਣ On-Validate-Record ,    
祭   ,   ஥   ஢ SQL*Forms.  ᫨  ஢ઠ  ᯥ譠,
  SQL*Forms      ࠢ     㤥
९஢ .        ⠪    室    
 ஢ப,        ᥭ ࠢ쭮
祭   .
⢥ : ஢ઠ  21-125


             ਣ Post-Block

  ਣ  Post-Block  ᪠ 砥 ᮡ⨥ 室  .
࠭祭: ਣ Post-Block  ᪠  ⮫쪮  ⮣, 褠   ଠ
ࠡ⠥    ஢  ꥤ  , ,  .

                                   -- 149 --



஢ ।:   ଠ
⨬ :  SELECT, ࠭祭  楤
筮  ᯮ짮:  ᯮ  ਣ Post-Block  믮
᫮ ஢ப  ᥩ    ᯨ᪥  ᥩ .
⢥ : 室   21-62


           ਣ Post-Change

 ਣ Post-Change ᪠,  砥   ᫥ ᮡ⨩:
     * ᮡ⨥ ஢ન  뢠     祭   
         㫥.
     *  ⠥ 祭    ᯨ᪠ 祭
     *  SQL*Forms  ⠥  祭       롨ࠥ ᥩ

஢ ।: ,   ଠ
⨬  :    SELECT,   ࠭祭  楤
筮  ᯮ짮:  ᯮ ਣ Post-Change 
                         믮 ᫥ :
     * ⠭  ६
     *   SQL*Forms,     
        १ ᯨ᮪ 祭  ।⢮ 롮ન

Oracle  Corporation  ।    ᯮ짮 ਣ Post-Change  
஢  楫.      ६     ⠭⭮ ࠪ⨪ 
।  SQL*Forms -           ࠡ⠥  -  ⨢
ᯮ  ਣ On-Validete-Field.

,     ਣ Post-Change ,     祭
,  ஥ ஢ SQL*Forms.  ᫨ ஢ઠ ᯥ譠,   SQL*Forms
     ࠢ쭮      㤥  ९஢  .
   ⠪  室      ஢ப,   
   ᥭ ࠢ쭮 祭   .
⢥ : ஢ઠ  21-122


             ਣ Post-Commit

  ਣ Post-Commit  ᪠  直  ࠧ,    ந室 ᮡ⨥
࠭樨 ᥭ   .  筥 ,    ᪠ ᫥ ⮣,
 SQL*Forms 믮  ࠭,    ⮣,   ந  
 .

஢ ।: ଠ
⨬  :    SELECT,     몠
ࠢ 묨 (DML)  (..,  DELETE,  INSERT,UPDATE), ࠭祭
                            楤
筮   ᯮ짮:   ᯮ  ਣ  Post-Commit 直 ࠧ 
砥 ᮡ⨥    , ⠪   ஫쭮 ୠ.
⢥ : ࠭樨 ᥭ   21-88


           ਣ Post-Delete

  ਣ  Post-Delete  ᪠  直    ᮡ⨨ ࠭樨 ᥭ
 ,  ᫥ 㤠 .   ᪠      ப,
 㤠     ᮡ⨨ .


                                   -- 150 --



஢ ।:   ଠ

⨬  :    SELECT,      몠 ࠢ
묨  (DML) (., DELETE, INSERT,UPDATE), ࠭祭  楤
筮 ᯮ짮: ᯮ ਣ Post-Delete    ୠ
࠭権
⢥ : ࠭樨 ᥭ   21-88


           ਣ Post-Field

  ਣ  Post-Field  ᪠ ⮫쪮  ଠ ࠡ⠥
 ꥤ ஢ન .

஢ ।: ,   ଠ
⨬ :  SELECT, ࠭祭  楤
筮  ᯮ짮:  ᯮ  ਣ Post-Field   
                          祭 .
⢥ : 室   21-63


             ਣ Post-Form

  ਣ Post-Form  ᪠  砥 ᮡ⨥ 室  .
஢ ।:  ଠ ⨬  :  SELECT,
࠭祭  楤 筮  ᯮ짮:  ᯮ
ਣ  Post-Form  "⪨  "  ।   室.   ਬ,
ᯮ Post-Form    ਣ   㭨⮦  ६,
     ॡ    ଥ.  ,  ᯮ Post-Form
ਣ    뤠  ᮮ饭  । 室  .

⢥ : 室   21-64


           ਣ Post-Insert

  ਣ Post-Insert    ᪠    ᮡ⨨  ࠭樨 ᥭ 
, ᫥ ⠢ .  ᪠   , 
⠢     ᮡ⨨ .

஢ ।:   ଠ

⨬   :    SELECT,     몠 ࠢ
묨 (DML)  (., DELETE, INSERT, UPDATE), ࠭祭  楤
筮 ᯮ짮: ᯮ ਣ Post-Insert  ୠ ࠭.
⢥ : ࠭樨 ᥭ   21-88


           ਣ Post-Query

  ਣ Post-Query ᪠ 直 ࠧ,  SQL*Forms 롨ࠥ  
.
஢ ।:   ଠ
⨬  :  SELECT,   ࠭祭  楤
筮 ᯮ짮:  ᯮ ਣ Post-Query   믮
                         ᫥ :
     *  ६   롨ࠥ ᥩ


                                   -- 151 --



     *  ⨪  , 롨ࠥ  
     *        㣮 
⢥ : 롮ઠ ᥩ 21-50


             ਣ Post-Record

  ਣ Post-Record   ᪠ ᮡ⨨ 室  .

࠭祭: ਣ Post-Record  ᪠  ⮫쪮  
             ଠ ࠡ⠥  ஢    .
஢ ।:   ଠ
⨬ :     SELECT,   ࠭祭  楤
筮 ᯮ짮: ᯮ ਣ Post-Record  믮
                       ᫥ :
     * 믮 ᫥
     * ࠭ ⥪饩 㬬
     * ஢ન 樨   
⢥ : 室   21-65


           ਣ Post-Update

  ਣ  Post-Update      ᪠  ᮡ⨨ ࠭樨 ᥭ 
,  ᫥  ப.   ᪠     ப,  
      ᮡ⨨ .

஢ ।:   ଠ
⨬  :    SELECT,      몠
ࠢ  묨  (DML) ( ..,  DELETE,  INSERT,UPDATE),
࠭祭  楤
筮 ᯮ짮: ᯮ ਣ  Post-Update  
                       ୠ ࠭権


           ਣ Pre-Block

  ਣ  Pre-Block    ᪠    ଠ  ࠡ⠥  
஢  ,   .

஢ ।:   ଠ
⨬ :    SELECT, ࠭祭  楤
筮 ᯮ짮: ᯮ  ਣ  Pre-Block  믮 ᫥
                       :
     * ਧ 㯠  
     * ந 祭  㬮砭   
     * ⠭  ६
⢥ : 室   21-39


           ਣ Pre-Commit

  ਣ  Pre-Commit    ᪠    ᮡ⨨  ࠭権 ᥭ 
, । ⥬  SQL*Forms ࠡ⠥  ࠭.  筥  
  㪠  ।  ⥬  SQL*Forms  ।      
  ଥ   ᥭ  .



                                   -- 152 --



஢ ।: ଠ
⨬  :    SELECT,     몠 ࠢ
묨 (DML) (., DELETE, INSERT,UPDATE), ࠭祭  楤
筮  ᯮ짮:  ᯮ ਣ Pre-Commit   믮
⢨ 直 ࠧ  ,  砥       ,  ⠪ 
⠭ ᯥ樠 ஢ ࠭祭.
⢥ : ࠭樨 ᥭ   21-88


           ਣ Pre-Delete

  ਣ  Pre-Delete    ᪠    ᮡ⨨  ࠭樨 ᥭ 
,  । 㤠 ப.   ᪠   ப,  
祭    㤠     .


஢ ।:   ଠ

⨬   :    SELECT,     몠 ࠢ
묨 (DML)  (., DELETE, INSERT,UPDATE), ࠭祭  楤
筮  ᯮ짮:  ᯮ ਣ Pre-Delete   ।饭
㤠 ,  ᫨          ᥩ
⠫,   .
⢥ : ࠭樨 ᥭ   21-88


             ਣ Pre-Field

  ਣ Pre-Field  ᪠  砥 ᮡ⨥ 室  .

࠭祭: ਣ  Pre-Field  ᪠  ⮫쪮   ଠ ࠡ⠥
              ஢  .

஢ ।: ,   ଠ
⨬ :  SELECT, ࠭祭  楤
筮 ᯮ짮:  ᯮ  ਣ  Pre-Field  祭 ᫮
                         祭  㬮砭.
⢥ : 室  


           ਣ Pre-Form

  ਣ Pre-Form  ᪠  砥 ᮡ⨥  室  .

஢ ।: ଠ
⨬ :  SELECT, ࠭祭  楤
筮  ᯮ짮:  ᯮ  ਣ  Pre-Form  
                         믮 ᫥ :
     * ࠭祭 㯠  ଥ
     * 樠  ६
     *  ᮮ饭

⢥ : 室   21-41


           ਣ Pre-Insert



                                   -- 153 --



  ਣ  Pre-Insert      ᪠   ᮡ⨨ ࠭権 ᥭ 
,  । ⠢ ப.    ᪠     ப,  
祭    ⠢    .

஢ ।:   ଠ
⨬  :    SELECT,      몠
ࠢ  묨  (DML) ( ..,  DELETE,  INSERT,UPDATE),
࠭祭  楤

筮 ᯮ짮: ᯮ ਣ Pre-Insert    
                       믮 ᫥ :
     *  ६ 
     * ஢ઠ ६   
⢥ : ࠭樨 ᥭ   21-88


             ਣ Pre-Query

  ਣ  Pre-Query    ᪠    뢠 㭪樨 EXECUTE_QUERY
 COUNT_QUERY,   । ⥬    SQL*Forms ᮧ    
SELECT,     롨ࠥ   ⠥ .

஢ ।:   ଠ
⨬ :  SELECT, ࠭祭  楤
筮  ᯮ짮:  ᯮ  ਣ  Pre-Query  䨪樨
࠭ ,   ।  ⮣,    ࠭ ᮬ.
⢥ : COUNT_QUERY, flow chart
                  EXECUTE_QUERY, flow chart


           ਣ Pre-Record

  ਣ Pre-Record  ᪠  ᮡ⨨  .

࠭祭:  ਣ  Pre-Record  ᪠  ⮫쪮 
              ଠ ࠡ⠥  ஢  .
஢ ।:     ଠ
筮 ᯮ짮: ᯮ  ਣ  Pre-Record  
                       믮 ᫥ :
     * ࠭ ⥪饩 㬬
     * 祭 ᫮ 祭  㬮砭
⢥ :   21-42


           ਣ Pre-Update

  ਣ  Pre-Update    ᪠    ᮡ⨨  ࠭樨 ᥭ 
, ।  ப.   ᪠     ப,  
祭      .

஢ ।:   ଠ
⨬  :    SELECT,      몠
ࠢ  묨  (DML) ( ..,  DELETE,  INSERT,UPDATE),
࠭祭  楤





                                   -- 154 --



  筮 ᯮ짮: ᯮ  ਣ  Pre-Update   믮
                         ᫥ :
     *  祭 
     * ஢ઠ 祭   
⢥ : ࠭樨 ᥭ   21-88


           ਣ User-named

  ਣ User-named  ᪠  맮 㣨 ਣ஬.


      ਣ஢   짮⥫.  ,
 짮⥫,  ਣ,     ᮧ,    ,
஥    ᢠ ,    ᯮ      맠
ਣ    ⥫  㣨 ਣ஢.

    ਣ஢,   짮⥫ ਣ - 
। ஢  .  ᫨     ਣ஢
    ,   ,    ।     ஢
㤥  ਮ.

筮  짮⥫ ਣ  ।   ஢ .

砭:  楤  ஢      믮  ,  
ன     ᯮ짮   짮⥫ ਣ.
 짮⥫ ਣ  ⮫쪮  ᮢ⨬ 
।騬 ﬨ.

஢ ।: ,   ଠ

⨬ : ⨬묨    짮⥫
ਣ   ,       ਣ,  뢠  
짮⥫ ਣ.

筮 ᯮ짮: ᯮ  짮⥫ ਣ 
믮   ਣ,     ।    
  祬   ਣ.

                    15      P L / S Q L

PL/SQL  -    楤  ࠭権       ࠧ
ਫ.         ᮥ   譨 楤    -  ⠪
  ᫮ 室  横 -  楤묨 ﬨ SQL.

    㦤  -    ᯮ짮  PL/SQL   SQL*Forms.
筥  ,    뢠  ᫥騥 :
     *  SQL*Forms ᯮ PL/SQL
     *  PL/SQL  SQL*Forms
     *  楤  PL/SQL
     * ࠭祭 PL/SQL   SQL*Forms
     * 訡 믮塞 ஢
     * PL/SQL  

    㦤   ணࠬ  PL/SQL.  ⠪ -
樨   㪮 짮⥫  ࠢ筮 㪮 PL/SQL.
⢥ : ࠡ⪠ ਣ஢ 4-5


                                   -- 155 --




      SQL*Forms ᯮ PL/SQL

  SQL*Forms ᯮ PL/SQL   ਣ஢  ਣ஢
V3.  ਣ ⥪ ਣ V3 -   PL/SQL.

ਣ,  ᠭ  PL/SQL   筮  짮⥫ 訩  ᯮᮡ
믮,  祬  ਣ ᠭ  SQL.  ⥫쭮,   ਣ  V3
    २⢮ ᫥⢨ PL/SQL  믮 ᫥ :
     *  믮  䬥᪨,   ப    㫥 権
     *  ⢫   ஢ IF...  THEN   GOTO
     * 믮 ᮡ ⢨  ࠡ⪥ 訡

PL/SQL  蠥  ਣ SQL*Forms ।⢮ ᯥ祭 २
楤୮ 몠        SQL.


      PL/SQL  SQL*Forms

  ⠭  ᥣ  PL/SQL 뢠 .   ⮨ 
⠭ ⥩:
     * । ६, ⠭  ᮡ 権
     * 믮塞 ,  祭   祢묨
       ᫮ BEGIN  END
     * ॠ樨  ᮡ 樨

SQL*Forms   ᯮ     PL/SQL        ࠧ :
     *  
     * 楤 (뢠  楤ࠬ  ஢      SQL*Forms)

            

      -      PL/SQL ,   ⫨稥  楤
஢ ,   .  砥,    믮  
  ⮫쪮  १  ਣ   ஬  ।.

,     SQL*Forms,        ॡ   ⢨
祢  ᫮  BEGIN    END     祭 믮塞  ஢.
SQL*Forms  ⮬᪨  砥 祢 ᫮ BEGIN    END    ਣ
  樨   믮.

       ᮡ   ᯮ짮 祢 ᫮ BEGIN 
END.     㪠 BEGIN  END ᫨  楤 砥 ࠧ
.   ⮬ 砥, PL/SQL 㦤   ⢨  BEGIN  
END    ⤥ ࠧ   믮塞 ஢. 
 ॡ   ࠧ     ᫨      ᯮ 
६,     ॠ樨   ᮡ ᮡ.

砭:    ᥣ ⠭ 祢 ᫮ BEGIN  END  
 .    ࠪ⨪  ন ᨭ⠪
௮⨢稢.

     ।  ᯥ᪨  ਣV3,     
אַ   ஫  ਣ  ଥ । ਣ஢.





                                   -- 156 --



        ਬ
1.    ࠭ 祭 ᫠ ᥩ,    
ORDERS  ଥ.     ᮧ  ਣ Post-Insert,  
ন  ⢮     , 뢠 NEW_ITEMS. 
襣 ਣ :

  :NEW_ITEMS := :NEW_ITEMS + 1;

2.      ⥪饥 祭 ⮫ MINPRICE
  ६ 直 ࠧ     
   PRICE.   騩  ਣ  Pre-Field  믮   㭪:

  SELECT MINPRICE INTO :GLOBAL.MINIMUM
     FROM PRICE
     WHERE PRICE.PRODID = :PRODID
          AND SYSDATE BETWEEN STARTDATE AND NVL(ENDDATE, SYSDATE);


        楤 ஢ 

  楤 ஢   -   PL/SQL ,   ॡ .   
PL/SQL  ᨭ⠪,        祢 ᫮ BEGIN  END, ⠪
ॡ.

楤  ஢       SQL*Forms      ᮤঠ ।
楤  PL/SQL  .        ᮤঠ  .

   楤  ⥪ 楤  ஢     ७
⠡  । 楤   ଥ.    ⥬ 뢠 
楤  ஢       ਣ V3  ⥪饩 ଥ.

    ᯮ짮  楤  ஢  ,   । 
㣨  ଠ  ।⢮  ஢     ⥪   ।⢮
뫪  .  ⮣, ⮡ ᤥ    ᯮ    ࠬ
[Copy Object]    ꥪ 筨   ꥪ.

  楤 ஢      ᮧ  饭 楤  
⥬  ᯮ짮     .  楤 ஢ 묮
⠪    㬥,     ६   楤   ⮣.

            楤  ஢ 

    楤 ஢   ਤন ᮣ襭  
ORACLE   㭨  .     ⠪  㤮⮢,
      ᮢ     楤,  䠪᪨ । 
ᮮ⢥饬 ⥪ 楤.

            楤 ஢ 

  楤 ஢   ᫥襩 ଥ:

 PROCEDURE _楤 [ᯨ᮪_㬥⮢] IS
    __६
BEGIN
    _楤
END;

  :

                                   -- 157 --



 _楤           㭨쭮  楤 ஢ .
 ᯨ᮪_㬥⮢       ᫥ :

                [{_६ [०] ⨯},...]
   :
                _६     㭨쭮  쭮 ६.
                ०                {IN|OUT|IN OUT}.
                ⨯                  {BOOLEAN|CHAR|NUMBER|DATE}.

         _쭮_             ᫥ :

 ६_
                  [{_६ ⨯ [:= 祭]};...]

   _
                 믮塞  PL/SQL.
 楤

             ਬ

  1.  ।⠢  ᥡ   室  ⮣ 㬬  
 祬  樨  ଥ.    䥪⨢   ᮧ 楤
஢  뢠 CALCULATE_ITEM_TOTAL  믮  ᫥:

  PROCEDURE CALCULATE_ITEM_TOTAL IS
BEGIN
     :ITEMTOTAL := :QUANTITY*:ACTUALPRICE;
END;

     ⥯ 뢠  楤   ਣ V3  ⥪饩
ଥ. (ਬ 2   .)

砭: 楤 ஢    ਬ 뫠  譨 ꥪ
( ..,  ꥪ ).  㭪樨  ਣ   믮      饬
  楤ன ஢ ,   ᯮ ᯨ᮪  㬥⮢.
楤   ਬ 4   ⮤.

2.      ਣ,   믮 ⮫쪮 楤  ஢
  CALCULATE_ITEM_TOTAL.          ⮩  楤  
  ⢥ ⥪ ਣ  ࠧ⥫ -   ⮩:

  CALCULATE_ITEM_TOTAL;

  3.         맢   楤   ஢   
CALCULATE_ITEM_TOTAL   ਣ ⮫쪮 ᫨   業 த (
 PRICE),        쭮  業 (ᠭ 
⮫ MINPRICE).  뢠 楤 ஢  ( 
뤥 ⮬) ᫥騬 ࠧ:

   DECLARE
     MINIMUM NUMBER;
BEGIN
     SELECT PRICE.MINPRICE INTO MINIMUM
          FROM PRICE WHERE PRICE.PROUD = :ITEMS.PRODID
               AND SYSDATE BETWEEN STARDATE AND NVL(ENDDATE, SYSDATE);
     IF :PRICE<MINIMUM
          THEN MESSAGE ('Price must be greater than'
               || TO_CHAR(MINIMUM) || '.');

                                   -- 158 --



               RAISE FORM_TRIGGER_FAILURE;
          ELSE CALCULETE_ITEM_TOTAL;
     END IF;
END;


  砭:   FORM_TRIGGER_FAILURE   -    ।। ᮡ ᮡ⨥
PL/SQL    (஥      ᯮ짮 ⮫쪮  SQL*Forms),  
砥,  ਣ 室  ﭨ 訡   ⨦.

  4.     ᮧ 楤 ஢ ,   뢠
ந      ᥫ.      楫   - ᯮ짮   楤 
᫥ ६쭮  ࠡ⭨.     ᮧ  楤
஢   뢠 BONUS_PAY:

  PROCEDURE BONUS_PAY (A IN NUMBER, B IN NUMBER,
     C OUT NUMBER) IS
BEGIN
     C := A * B
END;

  ⥬    뢠  BONUS_PAY    ,  
 ᫥ ६   BONUS.

  BONUS_PAY (:PERSENT, :SAL, :BONUS);


     ꥪ SQL*Forms  PL/SQL

   ਣ V3    楤  ஢  ,  饭   ଠ, 
  SQL*Forms ந室  ,  묨     ।  
䥩  ࠧࠡ稪   ।⢮ ⨬ ६ . 
⥫ ᨭ⠪᪨ ,    ᯮ   
⮣,  頥     祭 ꥪ SQL*Forms    ꥪ
SQL*Forms.

     * ᫨  頥  祭  (   祭   ६,
     ।⠢  ),  ।   ꥪ 稥:

     :

     :GLOBAL.ﯥ६

             -  ﯮ  .ﯮ

     * ᫨  頥   ,     ,    ꥪ
    ࠭ 窨.   ।   ꥪ 稥:

     ''
     ''
     ''

             -  ﯮ  .ﯮ.

           ਬ

  1.  ⠭ 祭  EMPNO ࠢ 100, :


                                   -- 159 --



  :empno := 100;

  2.  맮  PERSONNEL  ⥪饩 , :

  CALL ('PERSONNEL');

  3.  樨   EMPNO, :

  GO_FIELD('EMPNO');

  ୠ⨢,  ᫨   EMPNO ।⠢ ।⢮
६ GLOBAL.LASTFIELD,  ᯮ    㭪 NAME_IN:

  GO_FIELD(NAME_IN('GLOBAL.LASTFIELD'));

  ⢥ : ⭠ 㭪 NAME_IN 17-10


      楤  PL/SQL

      PL/SQL  (        ਣ V3   楤
஢ ),     뢠    뢠    
楤      믮塞   .  ᯮ  ᯥ᪨
ᨭ⠪      ⭮ 楤.

     ࠭祭 PL/SQL  SQL*Forms

    ᫥騥  ࠭祭    ᮧ  PL/SQL
 饭  ꥪ⠬ SQL*Forms  㭪:

     *   ᯮ짮   楤   
     PL/SQL ⮫쪮  PL/SQL ࠡ⠥  SQL*Forms.

     *      뫠  ꥪ SQL*Forms  
     PL/SQL    ⮫쪮    PL/SQL      ࠡ⠥   
     SQL*Forms.         ⠥   믮  
     ᪮஢  PL/SQL  ORACLE RDBMS,   
        訡   ᫨    뫠    ꥪ
     SQL*Forms.


     訡 믮塞 ஢

   ਣ SQL*Forms,  ,  ।, ᯥ  訡
ࠧ筮    ᨬ     ⮣,       믮塞 
஬ SQL  ⭮ 楤ன.

ᯮ  ᮮ⢥騩  ⮤ ࠡ⪨ 訡,   ᯥ  訡
믮塞 ஢   믮 ਣ.


             訡 ஢ SQL

  ᯮ ࠡ ᮡ 権    ᯥ   㤠
  SQL.  㭪樨  PL/SQL  SQLCODE  SQLERRM 㯭  䨪樨
ᯥ᪨ 訡.     㪮 짮⥫  ࠢ筮
㪮 PL/SQL   祭  ଠ樨    ⮬,     ᯮ짮
 㭪樨.

                                   -- 160 --



           ࠡ⪠ ᮡ 権

  ࠡ⪠  ᮡ  権  ।  ,   믮 
ᮡ ᫮,    PL/SQL.    ᮡ  ᫮
  ।  ।묨    譥  ⭮襭  PL/SQL (
.., ZERO_DIVIDE),   ६  ࠡ⪠ 㣨 ᮡ 権
। 짮⥫        ஬  RAISE.

 ᮡ  ந室,  PL/SQL   ਮ⠭ 믮
   PL/SQL      ।   ࠢ   ᮮ⢥饩  ࠡ⪨
ᮡ   樨.   믮 ਣ  V3 ⠭  襭
ࠡ⪨ ᮡ 樨.

     㪮   짮⥫      ࠢ筮 㪮
PL/SQL  ᭥ ࠡ⪨ ᮡ 樨.

           訡  楤

  ᯮ  ᫥騥    㭪樨    ⮣,  ⮡ 㫮 ᯥ
 㤠  楤:
   * FORM_SUCCESS
   * FORM_FAILURE
   * FORM_FATAL
   * ERROR_TYPE
   * ERROR_CODE
   * ERROR_TEXT

     㭪権    祭  ᯥ᪮ ६ 訡
(ਬ. .: .., ६, ਭ饩 祭  訡),  
⠭  直 ࠧ  믮  ⭮  楤.   
६   訡  ᫥ ଠ:

     *  稫  ᫥  ᯥ譮,  㤠筮
         ਢ  ⠫쭮 訡
     * ⨯,  ,   ⥪ ᮮ⢥饣 ᮮ饭   訡

     ⭠ 楤 頥 祭  㭪権  
믮,    㭪樨 ᮮ ⮫쪮  ᠬ  ᫥  믮
⭮  楤   ᨨ SQL*Forms (Run Form).

   ଠ쭮  祭  믮  ਣ ⥬
஢      ६ 訡 १ ᮮ⢥騥 
㭪樨  쭥襣  ନ஢ ᮡ 樨  ஢
ᮮ⢥ ⢨.

  騩  ਬ      ਣ    ᮡ  ᫮
  ⭮  楤.   ,    ਣ,     ਬ,
 訡 ࠧ ᫥ 믮   ⭮   楤.      ⠪
ࠪ⨪ ४,        室.   
஢  १   ᫥   믮   ⭮ 楤  
 ,   ਫ  믮 㣮 ⭮  楤    
SQL*Forms  (Run  Form)   稫.

     1.      祭  㬮砭   ORDER_DATE,
   ᫨ 㭪 DUPLICATE_FIELD 稫 㤠祩 믮 祢 ਣ,
   ᫥⢨ ⮣,   뫮 ।饩 ,  ன 
   祭 .   DUPLICATE_FIELD    㤠祩   


                                   -- 161 --



   祬  稭,   室 ஢    訡.
   騩 祢 ਣ 믮   (  ELSIF)
   ।⢮   ஢ન  ࠧࠡ⠭ ⥪ 訡.

    ਣ ⠪  㣨    訡 ᮮ饭  
   樨  ⮣,        ஢  祬  ᫮.

       DUPPLICATE_FIELD;
     IF ERROR_TEXT = 'Field is protected against update.'
          THEN
               SYNCHRONIZE;
     ELSEIF ERROR_TEXT = 'No previous record to copy value from.'
          THEN
               SELECT SYSDATE INTO :ORDER_DATE FROM DUAL;
     END IF;

       砭:   ᫨     ਫ  ନ஢     ⢥
   몮,     ஢  ⭮   㭪樥  ERROR_TEXT.
   ⨢,  ᯮ  㭪樨   ERROR_TYPE  ERROR_CODE  ஢
   ᯥ᪮   訡.
⢥ :
                    ⭠ 㭪 ERROR_CODE 17-4
                    ⭠ 㭪 ERROR_TEXT 17-5
                    ⭠ 㭪 ERROR_TYPE 17-5
                    ⭠ 㭪 ERROR_FAILURE 17-8
                    ⭠ 㭪 ERROR_FATAL 17-9
                    ⭠ 㭪 ERROR_SUCCESS 17-10


      PL/SQL

   PL/SQL    ᪮஢ । ⥬    믮.
  樨  PL/SQL,   㤠  ᨭ⠪᪨ 訡,
ᥬ᪨  訡,    뫪   騥 ꥪ  楤.

    ᯮ      楤 ஢  ਣ஢
V3,  SQL*Forms     ࠧ  ᫥ ᮧ   䨪樨
ਣ V3     , ᮤঠ ਣ V3.

SQL*Forms  뢠         ଠ    樨  
  뢠 ,   । ⥬     ᮧ  䠩  INF,
⠢  ⮫쪮  筨 ਣ஢  楤 ஢ .

             ६ ࠡ⪨

  SQL*Forms   ᭠砫        PL/SQL   ਣ V3
᫥ ⮣        ਣ    ଥ ।  ਣ  
 [ACCEPT].  ᫨     訡  ,
SQL*Forms  뤠   訡 樨.   ଠ 뤥  訡 
ਣ    뤠  騩  ⥪       訡,   
 樨.  SQL*Forms   楤 ஢   ଥ
।  楤,  ᫨  ࠫ  ࠧࠡ⪨ 몫祭
樨 ਣ.

⢥  :    ࠧࠡ⪨  몫祭 樨 ਣ


     樨

                                   -- 162 --



  SQL*Forms     PL/SQL      ਣ  
楤 ஢ ,    .

筥  SQL*Forms  ᫥騥 樨  ᫥饬 浪:
     1. SQL*Forms  ᪠   楤 ஢     
        ⮫쪮 ᯥ䨪,  "ᯥ".

     楤 ᯥ -   ⥪  楤,     砥   
   楤    樨஢  ᯨ᮪   㬥⮢.  SQL*Forms  㦤
     ⮩  ଠ樨   । ⥬,    த  楤.
      ॡ ⮬,   SQL*Forms    ᯮᮡ   ஢
   ,   楤,    ந   뫪,    ,
     ࠬ     뫠 ⠪ ࠧ.

   2. SQL*Forms      楤  ஢ .
   3. SQL*Forms ।  ਣ V3     

,    SQL*Forms  ᮮ頥      訡     樨
   ⮣,            ப,  
(ࠡ稪) SQL*Forms.

            PL/SQL       ப

  ᫨         ப,  SQL*Forms  
ਣ  楤 ஢     ଥ.

   ᮮ饭,    楤
஢   ਣ  ⥬ ᮮ頥   訡   ⮭宦.
 SQL*Forms 뤠 ᮮ饭,    㣨  襬 ࠭ ନ.

   뤠 ।⢮   ४⥫  ப -d.

⢥  :  SQL*Forms (),  ४⥫ -b


            PL/SQL      (ࠡ稪) SQL*Forms

  ᫨        (ࠡ稪)  SQL*Forms  (..,   १  
  ਣ  楤 ஢     ଥ.

   ᮮ饭,     楤
஢      ਣ    ᮮ   訡  
⮭宦:

     *  SQL*Forms 뤠 ᮮ饭   Errors and warning written to file
        .err,  ,      -   ⥪饩 .
     * SQL*Forms  ᮮ饭  㪠 䠩.

᫨   㦨 訡,  SQL*Forms   䠩 .

     饭  訡

    SQL*Forms      ਣ,     뤠 ᮮ饭 
訡 樨   㣨.  ᮮ饭  ᫥ :





                                   -- 163 --



Compiling _ꥪ ⨯_ꥪ on _ ⨯_ ...
Error _訡 at line _ப, column _⮫:
     ⥪_訡
  :

  _ꥪ             㭨쭮  ਣ  楤 ஢
                          , ஥  SQL*Forms.

   ⨯_ꥪ            "ਣ", "楤",  "ᯥ楤."

   _
              㭨쭮    ,    ,     ஬
            ਣ 祭.

   ⨯_          ᫮ "ଠ", ""  "."

   _訡           㬥஢  訡.

   _ப
              ப ਣ    楤     ,  
        ந諠 訡.    ப      ஫஢
          ਣ     ஫஢  楤.

   _⮫
                ⮫ ਣ  楤    ,  
        ந諠 訡.    ⮫       ஫஢
         ਣ     ஫஢  楤.

  ⥪_訡             ᠭ 訡.

ਬ,  ࠭ 襣  ନ    뤠  ᫥饥 ᮮ饭:

  Compiling KEY-COMMIT trigger on ORDER_ENTRY form ...
  Error 313 at line 1, column 4:
  'COMIT_FORM' not declared in this scope

  饭    訡  ORACLE    ࠢ筮 㪮⢮  
㬥  訡 樨  ⥪.





















                                   -- 164 --
