COBOL Manual for TNS/E Programs (H06.03+)

Procedure Division
HP COBOL Manual for TNS/E Programs—520347-003
43-42
REWRITE for Line Sequential Files
REWRITE for Line Sequential Files
SEARCH VARYING
REWRITE
END-REWRITE
record-name
FROM data-name
VST721.vsd
table indexerSEARCH VARYING
AT
WHEN condition
imperative-stmt-1
END-SEARCH
END
SENTENCE
imperative-stmt-2
NEXT
VST206.vsd