COBOL/400 Language Help

Format 1 (Sequential Retrieval using Sequential Access)

Description
Use Format 1 for all files in sequential access mode. Format 1 retrieves the next logical record from the file. The file organization determines the next record accessed.
Format 1 (Sequential Retrieval using Sequential Access)
 
->->---READ file-name-*----*-*------*-*-----------------*----->
                    *NEXT* *RECORD* *INTO identifier-1*
 
->----*------------------*----------------------------------->
     *-*------*-NO LOCK-*
       *-WITH-*
 
->----*--------------------------------*--------------------->
     *-FORMAT-*----*-*-identifier-2-*-*
              *-IS-* *-literal-1----*
 
->----*-----------------------------------*------------------>
     *-*----*-END imperative-statement-1-*
       *-AT-*
 
->----*---------------------------------------*-------------->
     *-NOT-*----*-END imperative-statement-2-*
           *-AT-*
 
->----*----------*-------------------------------------------><-
     *-END-READ-*
 


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