Batch program · 178 linesCBACT03C
How it is started
- Transactions
- none
- JCL steps
- READXREF.STEP05 EXEC PGM=CBACT03C
- Called by
- no callers in workspace
What it calls
| CALL | CEE3ABD | CBACT03C.cbl:158 |
Files
| File | DD | Organization | Opened | Bound by JCL to | Declared |
|---|---|---|---|---|---|
| XREFFILE-FILE | XREFFILE | INDEXED / SEQUENTIAL key FD-XREF-CARD-NUM | INPUT | AWS.M2.CARDDEMO.CARDXREF.VSAM.KSDS READXREF.STEP05 | CBACT03C.cbl:29 |
Paragraphs (5)
- 1000-XREFFILE-GET-NEXT 16 stmts↳9910-DISPLAY-IO-STATUS, 9999-ABEND-PROGRAM
- 0000-XREFFILE-OPEN 12 stmts↳9910-DISPLAY-IO-STATUS, 9999-ABEND-PROGRAM
- 9000-XREFFILE-CLOSE 12 stmts↳9910-DISPLAY-IO-STATUS, 9999-ABEND-PROGRAM
- 9999-ABEND-PROGRAM 4 stmts
- 9910-DISPLAY-IO-STATUS 10 stmts