COBOL Manual for TNS and TNS/R Programs

Procedure Division Verbs
HP COBOL Manual for TNS and TNS/R Programs—522555-006
9-301
WRITE for Relative, Indexed, and Queue Files
WRITE for Relative, Indexed, and Queue Files
record-name
is a logical record described in the File Section of the Data Division. The record-
name can be qualified by the name of the file with which the record is associated.
from-name
is the identifier of a data area whose contents are to be moved to the record
specified by record-name before the WRITE occurs. from-name must specify
a data area other than that specified by record-name. It also cannot specify an
index data item.
invalid-key
executes imperative-statement when an invalid-key condition arises. This
phrase is required if no USE statement is applicable for the file.
not-invalid-key
executes imperative-statement when no invalid-key condition arises.
WRITE record-name
FROM from-name
invalid-key
NOT not-invalid-key
END-WRITE
VST240.vsd
KEY
imperative-statementINVALID
VST239.vsd
KEY
imperative-statementINVALID
VST239.vsd