READ - Format 5a - Transaction (Subfile Sequential) 1 READ SUBFILEfile-name 2?NEXT 3MODIFIED 4?RECORD 5?INTO identifier-1 6?FORMAT 6.1?IS 6.2identifier-2 6.2literal-1 7?TERMINAL 7.1?IS 7.2identifier-3 7.2literal-2 8? 8.0INDICATOR 8.0INDICATORS 8.0INDIC 8.1? 8.1IS 8.1ARE 8.2identifier-4 9?AT 9.1END imperative-statement-3 10?NOT 10.1?AT 10.2END imperative-statement-4 11?END-READ
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.