Skip to content

LGUCVS01

Source: src/lgucvs01.cbl

Type: CICS transaction program

CICS commands

READ FILE, ABEND ABCODE, RETURN END, REWRITE FILE, ASKTIME ABSTIME, FORMATTIME ABSTIME, LINK PROGRAM

Copybooks

LGCMAREA

Paragraph flow

flowchart TD
    MAINLINE[["MAINLINE"]]
    A_EXIT["A-EXIT"]
    WRITE_ERROR_MESSAGE["WRITE-ERROR-MESSAGE"]
    MAINLINE --> WRITE_ERROR_MESSAGE

Paragraphs

Paragraph Line Performs
MAINLINE 64 WRITE-ERROR-MESSAGE, WRITE-ERROR-MESSAGE
A-EXIT 100
WRITE-ERROR-MESSAGE 104