COBOL/400 Language Help

Format 3 (Random Retrieval)

Description
You must specify Format 3 (Random Retrieval) for indexed and relative files in random access mode.
Format 3 (Random Retrieval)
 
->->---READ file-name-*--------*-*-------------------*-------->
                    *-RECORD-* *-INTO identifier-1-*
 
->----*------------------*----------------------------------->
     *-*------*-NO LOCK-*
       *-WITH-*
 
->---*------------------------*------------------------------>
    *-KEY-*----*-data-name-1-*
          *-IS-*
 
->----*--------------------------------*--------------------->
     *-FORMAT-*----*-*-identifier-2-*-*
              *-IS-* *-literal-1----*
 
->---*--------------------------------------------*---------->
    *-INVALID---*-----*---imperative-statement-1-*
                *-KEY-*
 
->---*------------------------------------------------*------>
    *-NOT INVALID---*-----*---imperative-statement-2-*
                    *-KEY-*
 
->---*----------*--------------------------------------------><-
    *-END-READ-*


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