Previous Topic

Next Topic

Book Contents

Book Index

Example

The ON DDNAME statement identifies the report created in the current step that is referenced by DD statement REPORT.

Figure 259 ON DDNAME Statement Example

     LIBRARY : CTB.PROD.RULES                                RULE : ONDDNAME

 COMMAND ===>                                                    SCROLL===> CRSR

 +-----------------------------------------------------------------------------+

  ===========================================================================

  EXECUTE INPUT    UPON                                                   C  

  ON DDNAME     DDNAME REPORT                                                

      MODE PG    LINECT 0060   DATASTAMP                                     

  WHEN LINE 001     - 060     COL 010     - 020              STOP    AND/OR  

       STRING = /                                                            

    DO EXTRACT  = SALARY                                                     

                  LEVEL 0 LINE +000 COL +002 - +008 PROCESS          TYP     

    DO BLOCK    = CHECK    ARG SALARY                                     C  

    DO                                                                       

  WHEN LINE         -         COL         -                  STOP    AND/OR  

       STRING =                                                              

    DO                                                                       

  ===========================================================================

  EXECUTE CHECK    UPON BARG01 < 1000 | BARG01 > 20000                    C  

  ON DATA                                                                    

  ALWAYS                                                                     

    DO PRINT    = %%BARG01                                            F   C  

    DO                                                                       

               (ENTER "ALWAYS", "IF")                                        

 PLEASE FILL IN RULE DEFINITION.                                        16.30.11

Parent Topic

ON DDNAME: Data Selection Statement