Batch program · IMS · 317 linesPAUDBUNL
How it is started
- Transactions
- none
- JCL steps
- UNLDPADB.STEP01 PARM='DLI,PAUDBUNL,PAUTBUNL,,,,,,,,,,,N' (IMS region type DLI, PSB PAUTBUNL)
- Called by
- no callers in workspace
- USING
- PAUTBPCB
What it calls
| CALL | CBLTDLI | PAUDBUNL.CBL:213–216 +1 |
Files
| File | DD | Organization | Opened | Bound by JCL to | Declared |
|---|---|---|---|---|---|
| OPFILE1 | OUTFIL1 | SEQUENTIAL / SEQUENTIAL | OUTPUT | AWS.M2.CARDDEMO.PAUTDB.ROOT.FILEO UNLDPADB.STEP01 | PAUDBUNL.CBL:26 |
| OPFILE2 | OUTFIL2 | SEQUENTIAL / SEQUENTIAL | OUTPUT | AWS.M2.CARDDEMO.PAUTDB.CHILD.FILEO UNLDPADB.STEP01 | PAUDBUNL.CBL:32 |
Paragraphs (11)
- MAIN-PARA 5 stmts↳1000-INITIALIZE, 2000-FIND-NEXT-AUTH-SUMMARY, 4000-FILE-CLOSE
- 1000-INITIALIZE 16 stmts↳9999-ABEND
- 1000-EXIT 1 stmts
- 2000-FIND-NEXT-AUTH-SUMMARY 20 stmts↳3000-FIND-NEXT-AUTH-DTL, 9999-ABEND
- 2000-EXIT 1 stmts
- 3000-FIND-NEXT-AUTH-DTL 15 stmts↳9999-ABEND
- 3000-EXIT 1 stmts
- 4000-FILE-CLOSE 9 stmts
- 4000-EXIT 1 stmts
- 9999-ABEND 3 stmts
- 9999-EXIT 1 stmts