ADD

Folgender Syntax wird für das ADD Statement erkannt:

        .------------------.       
        V                  |       
>>-ADD----+-identifier-1-+-+--TO-------------------------------->
          '-literal-1----'         

   .---------------------------.   
   V                           |   
>----identifier-2--+---------+-+-------------------------------->
                   '-ROUNDED-'     

>--+--------------------------------------------+--------------->
   '-+----+--SIZE ERROR--imperative-statement-1-'   
     '-ON-'                                         

>--+-------------------------------------------------+---------->
   '-NOT--+----+--SIZE ERROR--imperative-statement-2-'   
          '-ON-'                                         

>--+---------+-------------------------------------------------><
   '-END-ADD-'   
        .------------------.                             
        V                  |                             
>>-ADD----+-identifier-1-+-+--+----+--+-identifier-2-+---------->
          '-literal-1----'    '-TO-'  '-literal-2----'   

           .---------------------------.   
           V                           |   
>--GIVING----identifier-3--+---------+-+------------------------>
                           '-ROUNDED-'     

>--+--------------------------------------------+--------------->
   '-+----+--SIZE ERROR--imperative-statement-1-'   
     '-ON-'                                         

>--+-------------------------------------------------+---------->
   '-NOT--+----+--SIZE ERROR--imperative-statement-2-'   
          '-ON-'                                         

>--+---------+-------------------------------------------------><
   '-END-ADD-'   
>>-ADD--+-CORRESPONDING-+--identifier-1--TO--identifier-2------->
        '-CORR----------'                                   

>--+---------+-------------------------------------------------->
   '-ROUNDED-'   

>--+--------------------------------------------+--------------->
   '-+----+--SIZE ERROR--imperative-statement-1-'   
     '-ON-'                                         

>--+-------------------------------------------------+---------->
   '-NOT--+----+--SIZE ERROR--imperative-statement-2-'   
          '-ON-'                                         

>--+---------+-------------------------------------------------><
   '-END-ADD-'   
cobmig:cobol:stmt:add · Zuletzt geändert: 14.11.2019 16:09

Copyright © 1992-2024 TeamWiSE Gesellschaft für Softwaretechnik mbH         Adressen |  Kontakt |  AGB |  Datenschutzerklärung |  Impressum