COBOL/400 Language Help

Format 2 (Sequential Retrieval using Dynamic Access)

Description
Use Format 2 for indexed and relative files in dynamic access mode. In dynamic access mode, Format 2 with NEXT, FIRST, LAST, or PRIOR must be specified for sequential retrieval.
Format 2 (Sequential Retrieval using Dynamic Access)
 
->->---READ file-name-*-NEXT--*-*------*-*-----------------*-->
                    *-FIRST-* *RECORD* *INTO identifier-1*
                    *-LAST--*
                    *-PRIOR-*
 
->----*------------------*----------------------------------->
     *-*------*-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 ]