REWRITE Statement - Format 2 - Transaction (Subfile) 1 REWRITE SUBFILErecord-name-1 2?FROM identifier-1 3?FORMAT 3.1?IS 3.2identifier-2 3.2literal-1 4?TERMINAL 4.1?IS 4.2identifier-3 4.2literal-2 5? 5.0INDICATOR 5.0INDICATORS 5.0INDIC 5.1? 5.1IS 5.1ARE 5.2identifier-4 6?INVALID 6.1?KEY 6.2 imperative-statement-1 7?NOT INVALID 7.1?KEY 7.2 imperative-statement-2 8?END-REWRITE
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.