VMS Help  —  COBOL  PROCEDURE_DIVISION, WRITE  1format_sequential
  The WRITE statement releases a logical record to an output or
  input-output file.  It can also position lines vertically on a logical
  page.

  Format 1 -

   WRITE rec-name [ FROM src-item ] [ ALLOWING NO OTHERS ]

      [                      { advance-num [ LINE  ]   } ]
      [ { BEFORE }           {             [ LINES ]   } ]
      [ { AFTER  } ADVANCING { top-name                } ]
      [                      { PAGE                    } ]

      [ AT { END-OF-PAGE } stment ]
      [    { EOP         }        ]

      [ NOT AT { END-OF-PAGE } stment ]
      [        { EOP         }        ]

      [ END-WRITE ]

1  –  rec-name

  is the name of a logical record described in the Data Division File
  Section.  It cannot be qualified.  The logical record cannot be in a
  sort-merge file description entry.

2  –  src-item

  is the identifier of the data item that contains the data. If
  src-item is a function-identifier, it must reference an alphanumeric
  function.

3  –  advance-num

  is an integer or the identifier of an unsigned data item described as
  an integer.  Its value can be zero.

4  –  top-name

  is a mnemonic-name equated to "C01" in the SPECIAL-NAMES paragraph of
  the Environment Division.  It represents top-of-page and is
  equivalent to the PAGE phrase.

5  –  stment

  is an imperative statement.
Close Help