Format 4 (Printer Files) ->->--FD file-name-------------------------------------------------> ->--*--------------------------------------------------------*----> *-BLOCK-*--------**------------*-integer-2-*----------*--* *CONTAINS**integer-1 TO* *CHARACTERS* *RECORDS---* ->--*---------------------------------------------------------*---> *RECORD**--------*-integer-3-*----------*---------------*-* +*CONTAINS* *CHARACTERS* + **--------*-integer-4 TO integer-5-*----------*--* *CONTAINS* *CHARACTERS* ->--*----------------------------------------*--------------------> *-LABEL-*RECORD-*--*-*--*-STANDARD-----*-* + *IS* + *-OMITTED------* *RECORDS*---** *ARE* ->--*----------------------------------------------*--------------> + *---------------------------------*+ + V ++ *-VALUE OF----system-name-1*--*--*-data-name-1** *IS* *-literal-1--* ->-*-----------------------------------------*--------------------> + *-----------* + + v + + *-DATA-*-RECORD--*----*--*--data-name-2-*-* + *-IS-* + *-RECORDS-*-----*-* *-ARE-*
->-*--------------------------------------------------------------> 1 *-LINAGE-*----*-data-name-3-*-*-------*------------------------> 2 *-IS-* integer-6---* *-LINES-* 1 ->----------------------------------------------------------------> 3 2 ->--*---------------------------------------*---------------------> 4 **------*-FOOTING-*----*-*-data-name-4-** *-WITH-* *-AT-* *-integer-7---* 3 ->--------------------------------------------------------------*-> 4 ->*---------------------------*-*------------------------------** **-----**--*TOP*data-name-5** **-----**--*BOTTOM*data-name-6** *LINES**AT* *integer-8--* *LINES**AT* *integer-9--* ->-*---------------------------------*--.-------------------------><- *-CODE-SET-*----*-alphabet-name-1-* *-IS-*
(C) Copyright IBM Corporation 1992, 2006. All Rights Reserved.