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-*
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.