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