Ricerca…


Osservazioni

L'istruzione WRITE rilascia record logici a una risorsa di archiviazione di output o input-output e per il posizionamento logico di righe all'interno di una pagina logica.

SCRIVI sequenziale

SCRIVI il diagramma della sintassi sequenziale

SCRIVERE casualmente

SCRIVI il diagramma di sintassi casuale

SCRIVI esempi

WRITE record-buff

WRITE indexed-record
    WITH LOCK
    ON INVALID KEY
        DISPLAY "Key exists, REWRITING..." END-DISPLAY
        PERFORM rewrite-key
END-WRITE
IF indexed-file-status NOT EQUAL ZERO THEN
    DISPLAY "Write problem: " indexed-file-status UPON SYSERR
    END-DISPLAY
    PERFORM evasive-manoeuvres
END-IF

WRITE record-name-1 AFTER ADVANCING PAGE

WRITE record-name-1 FROM header-record-1
    AFTER ADVANCING 2 LINES
    AT END-OF-PAGE
        PERFORM write-page-header
        PERFORM write-last-detail-reminder
END-WRITE


Modified text is an extract of the original Stack Overflow Documentation
Autorizzato sotto CC BY-SA 3.0
Non affiliato con Stack Overflow