COBOL/400 Language Help

Format 4 (TRANSACTION Nonsubfile)

Description
You must use the Format 4 READ statement for a subfile control record format to place those subfile records that were updated on a display into the subfile. You cannot use the Format 4 READ statement to read a subfile record.
Format 4 (TRANSACTION Nonsubfile)
 
->->---READ file-name-*--------*-*-------------------*-------->
                    *-RECORD-* *-INTO identifier-1-*
 
->----*--------------------------------*--------------------->
     *-FORMAT-*----*-*-identifier-2-*-*
              *-IS-* *-literal-1----*
 
->----*----------------------------------*------------------->
     *-TERMINAL-*----*-*-identifier-3-*-*
                *-IS-* *-literal-2----*
 
->----*------------------------------------------*----------->
     *-*-INDICATOR--*--*-----*--identifier-4----*
       *-INDICATORS-*  *-IS--*
       *-INDIC------*  *-ARE-*
 
->----*--------------------------------*--------------------->
     *-NO DATA imperative-statement-1-*
 
->----*-----------------------------------*------------------>
     *-*----*-END imperative-statement-2-*
       *-AT-*
 
->----*---------------------------------------*-------------->
     *-NOT-*----*-END imperative-statement-3-*
           *-AT-*
 
->---*----------*--------------------------------------------><-
    *-END-READ-*


[ Top of Page | Previous Page | Next Page | Table of Contents ]