Online (CICS) program · 288 linesCOADM01C
How it is started
- Transactions
- CA00CARDDEMO.CSD:327
- JCL steps
- none
- Called by
What it calls
| CICS XCTL | COUSR00CCOUSR01CCOUSR02CCOUSR03CCOTRTLICCOTRTUPC via CDEMO-ADMIN-OPT-PGMNAME derived | COADM01C.cbl:145–148 |
| CICS XCTL | COSGN00C via CDEMO-TO-PROGRAM derived | COADM01C.cbl:168–170 |
CICS commands
HANDLE CONDITION ×1RETURN ×2XCTL ×2SEND MAP ×1RECEIVE MAP ×1
- Screens
- COADM01 · COADM1A
- Returns to
- CA00
CICS files
No file commands.
Paragraphs (8)
- MAIN-PARA 23 stmts↳RETURN-TO-SIGNON-SCREEN, SEND-MENU-SCREEN, RECEIVE-MENU-SCREEN, PROCESS-ENTER-KEY
- PROCESS-ENTER-KEY 19 stmts↳SEND-MENU-SCREEN
- RETURN-TO-SIGNON-SCREEN 3 stmts
- SEND-MENU-SCREEN 4 stmts↳POPULATE-HEADER-INFO, BUILD-MENU-OPTIONS
- RECEIVE-MENU-SCREEN 1 stmts
- POPULATE-HEADER-INFO 13 stmts
- BUILD-MENU-OPTIONS 26 stmts
- PGMIDERR-ERR-PARA 5 stmts↳SEND-MENU-SCREEN
Copybooks (9)
COCOM01YCOADM02YCOADM01COTTL01YCSDAT01YCSMSG01YCSUSR01YDFHAID (system)DFHBMSCA (system)