cobol
Declaración WRITE

.NET Framework C Language C# Language C++ Java Language GNU/Linux Python Language Ruby Language SQL Microsoft SQL Server
Buscar..


Observaciones

La instrucción WRITE libera registros lógicos para un recurso de almacenamiento de output o input-output , y para el posicionamiento lógico de líneas dentro de una página lógica.

ESCRIBIR secuencial

ESCRIBIR diagrama de sintaxis secuencial

ESCRIBIR al azar

ESCRIBIR diagrama de sintaxis aleatoria

ESCRIBIR EJEMPLOS

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
Licenciado bajo CC BY-SA 3.0
No afiliado a Stack Overflow