COBOL/400 Language Help

Format 3 (FORMATFILE)

Description
The WRITE statement releases a logical record for an output or input/output file. When the WRITE statement is executed, the associated file must be open in OUTPUT, I-O, or EXTEND mode.
Format 3 (FORMATFILE)
 
->->---WRITE record-name-1--*-----------------*------------------>
                          *FROM identifier-1*
 
->----*--------------------------------*------------------------>
     *-FORMAT-*----*-*-identifier-2-*-*
              *-IS-* *-literal-1----*
 
->----*------------------------------------------*-------------->
     *-*-INDICATOR--*--*-----*--identifier-3----*
       *-INDICATORS-*  *-IS--*
       *-INDIC------*  *-ARE-*
 
->----*----------------------------------------------------*---->
     *-*-----*-*--END-OF-PAGE-*-imperative-statement-1----*
       *-AT--* *-----EOP------*
 
->----*----------------------------------------------------*---->
     *--NOT-*----**-END-OF-PAGE-*-imperative-statement-2--*
            *-AT-**----EOP------*
 
->----END-WRITE-------------------------------------------------><-
 

INDICATOR

The INDICATOR phrase specifies which indicators are to be written. When a data record is written, indicators can be written with it. The indicators can be used to pass information about the data record and how it was entered into the program. INDICATOR, INDICATORS, and INDIC are equivalent.

identifier-3

Identifier-3 must be either an elementary Boolean data item specified without the OCCURS clause, or a group item that has elementary Boolean data items subordinate to it.


[ Top of Page | Previous Page | Next Page | Table of Contents ]