COSGN00C
Source: cbl/COSGN00C.cbl
Type: CICS transaction program
LLM overview unavailable: [WinError 10054] An existing connection was forcibly closed by the remote host
CICS commands
RETURN, RECEIVE, SEND, SEND TEXT, ASSIGN, READ, XCTL
Copybooks
COCOM01Y, COSGN00, COTTL01Y, CSDAT01Y, CSMSG01Y, CSUSR01Y, DFHAID, DFHBMSCA
Paragraph flow
flowchart TD
MAIN_PARA["MAIN-PARA"]
PROCESS_ENTER_KEY["PROCESS-ENTER-KEY"]
SEND_SIGNON_SCREEN["SEND-SIGNON-SCREEN"]
SEND_PLAIN_TEXT["SEND-PLAIN-TEXT"]
POPULATE_HEADER_INFO["POPULATE-HEADER-INFO"]
READ_USER_SEC_FILE["READ-USER-SEC-FILE"]
MAIN_PARA --> PROCESS_ENTER_KEY
MAIN_PARA --> SEND_PLAIN_TEXT
MAIN_PARA --> SEND_SIGNON_SCREEN
PROCESS_ENTER_KEY --> READ_USER_SEC_FILE
PROCESS_ENTER_KEY --> SEND_SIGNON_SCREEN
READ_USER_SEC_FILE --> SEND_SIGNON_SCREEN
SEND_SIGNON_SCREEN --> POPULATE_HEADER_INFO
Paragraphs
| Paragraph | Line | Performs |
|---|---|---|
| MAIN-PARA | 73 | SEND-SIGNON-SCREEN, PROCESS-ENTER-KEY, SEND-PLAIN-TEXT, SEND-SIGNON-SCREEN |
| PROCESS-ENTER-KEY | 108 | SEND-SIGNON-SCREEN, SEND-SIGNON-SCREEN, READ-USER-SEC-FILE |
| SEND-SIGNON-SCREEN | 145 | POPULATE-HEADER-INFO |
| SEND-PLAIN-TEXT | 162 | |
| POPULATE-HEADER-INFO | 177 | |
| READ-USER-SEC-FILE | 209 | SEND-SIGNON-SCREEN, SEND-SIGNON-SCREEN, SEND-SIGNON-SCREEN |