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.