CardDemo — System Data & Control Flowderived from parsed facts · basis 231692d4 · 2026-08-02 System call/transfer graph (51 nodes) CBTRN03C job & file flow Batch dependency chain (15 jobs) CRUD matrix ↗ Static findings ↗ Impact analysis ↗ click a program box = drill down · Up / breadcrumb / browser Back = back out · scroll = zoom · drag = pan

External runtime services

Batch programs

CICS — online (XCTL/LINK web)

CBLTDLI

CEE3ABD

CEEDAYS

COBDATFT

DSNTIAC

MQCLOSE

MQGET

MQOPEN

MQPUT

MQPUT1

MVSWAIT

CBACT01C

CBACT02C

CBACT03C

CBACT04C

CBCUS01C

CBSTM03A

CBSTM03B

CBTRN01C

CBTRN02C

CBTRN03C

COBSWAIT

CSUTLDTC

DBUNLDGS

PAUDBLOD

PAUDBUNL

COACCT01

COACTUPC

COACTVWC

COADM01C

COBIL00C

COCRDLIC

COCRDSLC

COCRDUPC

CODATE01

COMEN01C

COPAUA0C

COPAUS0C

COPAUS1C

COPAUS2C

CORPT00C

COSGN00C

COTRN00C

COTRN01C

COTRN02C

COTRTLIC

COTRTUPC

COUSR00C

COUSR01C

COUSR02C

COUSR03C

STEP05R.PRC001
IDCAMS

&CNTLLIB(REPROCT)
(JCL symbolic)

TRANSACT.VSAM.KSDS

TRANSACT.BKUP(+1)

STEP05R
SORT

TRANSACT.DALY(+1)

STEP10R
CBTRN03C

LOADLIB
(load library)

CARDXREF.VSAM.KSDS

TRANTYPE.VSAM.KSDS

TRANCATG.VSAM.KSDS

DATEPARM

TRANREPT(+1)

SYSOUT (job log)

SYSIN · SHR

PRC001.FILEIN · SHR

PRC001.FILEOUT · NEW

SORTIN · SHR

SORTOUT · NEW

STEPLIB · SHR

TRANFILE · SHR

CARDXREF · SHR

TRANTYPE · SHR

TRANCATG · SHR

DATEPARM · SHR

TRANREPT · NEW

46 DISPLAY stmts

CBTRN03C — job & file flow (JCL member TRANREPT.jcl)

Derived ordering from parsed dataset dependencies
not the scheduler calendar

Coverage: 15 of 88 JCL decks have mapped corpus programs
and harvested file_flow; unmapped/utility-only decks are not represented

CBPAUP0J
CBPAUP0J.jcl
STEP01: DFSRRC00

CREASTMT
CREASTMT.JCL
STEP010: SORT
STEP020: IDCAMS
STEP030: IEFBR14
STEP040: CBSTM03A

INTCALC
INTCALC.jcl
STEP15: CBACT04C

LOADPADB
LOADPADB.JCL
STEP01: DFSRRC00

MNTTRDB2
MNTTRDB2.jcl
STEP1: IKJEFT01

POSTTRAN
POSTTRAN.jcl
STEP15: CBTRN02C

READACCT
READACCT.jcl
PREDEL: IEFBR14
STEP05: CBACT01C

READCARD
READCARD.jcl
STEP05: CBACT02C

READCUST
READCUST.jcl
STEP05: CBCUS01C

READXREF
READXREF.jcl
STEP05: CBACT03C

TRANREPT
TRANREPT.jcl
STEP05R.PRC001: IDCAMS
STEP05R: SORT
STEP10R: CBTRN03C

UNLDGSAM
UNLDGSAM.JCL
STEP01: DFSRRC00

UNLDPADB
UNLDPADB.JCL
STEP0: IEFBR14
STEP01: DFSRRC00

WAITSTEP
WAITSTEP.jcl
WAIT: COBSWAIT

Z81187P
RUN.jcl
COBRUN: UNKNOWN
RUN: PRTRPT1

Cross-job cycles: none

PAUTDB.CHILD.FILEO [bare → bare]
dataset dependency
W jcl/UNLDPADB.JCL:STEP01/OUTFIL2@L53; R jcl/LOADPADB.JCL:STEP01/INFILE2@L38

PAUTDB.ROOT.FILEO [bare → bare]
dataset dependency
W jcl/UNLDPADB.JCL:STEP01/OUTFIL1@L48; R jcl/LOADPADB.JCL:STEP01/INFILE1@L36

TRANSACT.BKUP [(+1) → (+1)]
intra-job sequence
W jcl/TRANREPT.jcl:STEP05R.PRC001/PRC001.FILEOUT@L29; R jcl/TRANREPT.jcl:STEP05R/SORTIN@L38

TRANSACT.DALY [(+1) → (+1)]
intra-job sequence
W jcl/TRANREPT.jcl:STEP05R/SORTOUT@L51; R jcl/TRANREPT.jcl:STEP10R/TRANFILE@L65

TRXFL.SEQ [bare → bare]
intra-job sequence
W jcl/CREASTMT.JCL:STEP010/SORTOUT@L48; R jcl/CREASTMT.JCL:STEP020/INFILE@L58

PREDEL
IEFBR14

ACCTDATA.PSCOMP

ACCTDATA.ARRYPS

ACCTDATA.VBPS

STEP05
CBACT01C

LOADLIB
(load library)

ACCTDATA.VSAM.KSDS

SYSOUT (job log)

DD01 · MOD

DD02 · MOD

DD03 · MOD

STEPLIB · SHR

ACCTFILE · SHR

OUTFILE · NEW

ARRYFILE · NEW

VBRCFILE · NEW

43 DISPLAY stmts

CBACT01C — job & file flow (JCL member READACCT.jcl)

STEP05
CBACT02C

LOADLIB
(load library)

CARDDATA.VSAM.KSDS

SYSOUT (job log)

STEPLIB · SHR

CARDFILE · SHR

13 DISPLAY stmts

CBACT02C — job & file flow (JCL member READCARD.jcl)

STEP05
CBACT03C

LOADLIB
(load library)

CARDXREF.VSAM.KSDS

SYSOUT (job log)

STEPLIB · SHR

XREFFILE · SHR

14 DISPLAY stmts

CBACT03C — job & file flow (JCL member READXREF.jcl)

STEP15
CBACT04C

LOADLIB
(load library)

TCATBALF.VSAM.KSDS

CARDXREF.VSAM.KSDS

CARDXREF.VSAM.AIX.PATH

ACCTDATA.VSAM.KSDS

DISCGRP.VSAM.KSDS

SYSTRAN(+1)

SYSOUT (job log)

STEPLIB · SHR

TCATBALF · SHR

XREFFILE · SHR

XREFFIL1 · SHR

ACCTFILE · SHR

DISCGRP · SHR

TRANSACT · NEW

45 DISPLAY stmts

CBACT04C — job & file flow (JCL member INTCALC.jcl)

STEP05
CBCUS01C

LOADLIB
(load library)

CUSTDATA.VSAM.KSDS

SYSOUT (job log)

STEPLIB · SHR

CUSTFILE · SHR

14 DISPLAY stmts

CBCUS01C — job & file flow (JCL member READCUST.jcl)

STEP010
SORT

TRANSACT.VSAM.KSDS

TRXFL.SEQ

STEP020
IDCAMS

TRXFL.VSAM.KSDS

STEP030
IEFBR14

STATEMNT.HTML

STATEMNT.PS

STEP040
CBSTM03A

LOADLIB
(load library)

CARDXREF.VSAM.KSDS

ACCTDATA.VSAM.KSDS

CUSTDATA.VSAM.KSDS

SYSOUT (job log)

SORTIN · SHR

SORTOUT · NEW

INFILE · SHR

OUTFILE · SHR

HTMLFILE · MOD

STMTFILE · MOD

STEPLIB · SHR

TRNXFILE · SHR

XREFFILE · SHR

ACCTFILE · SHR

CUSTFILE · SHR

STMTFILE · NEW

HTMLFILE · NEW

33 DISPLAY stmts

CBSTM03A — job & file flow (JCL member CREASTMT.JCL)

CBSTM03B

ACCT-FILE

CUST-FILE

TRNX-FILE

XREF-FILE

CBSTM03A

READ

READ

READ

READ

CBTRN01C

ACCOUNT-FILE

DALYTRAN-FILE

XREF-FILE

CEE3ABD

SYSOUT (job log)

READ

READ

READ

42 DISPLAY stmts

STEP15
CBTRN02C

LOADLIB
(load library)

TRANSACT.VSAM.KSDS

DALYTRAN.PS

CARDXREF.VSAM.KSDS

DALYREJS(+1)

ACCTDATA.VSAM.KSDS

TCATBALF.VSAM.KSDS

SYSOUT (job log)

STEPLIB · SHR

TRANFILE · SHR

DALYTRAN · SHR

XREFFILE · SHR

DALYREJS · NEW

ACCTFILE · SHR

TCATBALF · SHR

45 DISPLAY stmts

CBTRN02C — job & file flow (JCL member POSTTRAN.jcl)

STEP05R.PRC001
IDCAMS

&CNTLLIB(REPROCT)
(JCL symbolic)

TRANSACT.VSAM.KSDS

TRANSACT.BKUP(+1)

STEP05R
SORT

TRANSACT.DALY(+1)

STEP10R
CBTRN03C

LOADLIB
(load library)

CARDXREF.VSAM.KSDS

TRANTYPE.VSAM.KSDS

TRANCATG.VSAM.KSDS

DATEPARM

TRANREPT(+1)

SYSOUT (job log)

SYSIN · SHR

PRC001.FILEIN · SHR

PRC001.FILEOUT · NEW

SORTIN · SHR

SORTOUT · NEW

STEPLIB · SHR

TRANFILE · SHR

CARDXREF · SHR

TRANTYPE · SHR

TRANCATG · SHR

DATEPARM · SHR

TRANREPT · NEW

46 DISPLAY stmts

CBTRN03C — job & file flow (JCL member TRANREPT.jcl)

COACCT01

LIT-ACCTFILENAME
(CICS file, WS name)

MQCLOSE

MQGET

MQOPEN

MQPUT

SYSOUT (job log)

READ

7 DISPLAY stmts

COACTUPC

LIT-ACCTFILENAME
(CICS file, WS name)

LIT-CARDXREFNAME-ACCT-PATH
(CICS file, WS name)

LIT-CUSTFILENAME
(CICS file, WS name)

COMEN01C

CSUTLDTC

READ

REWRITE

READ

READ

REWRITE

COACTVWC

LIT-ACCTFILENAME
(CICS file, WS name)

LIT-CARDXREFNAME-ACCT-PATH
(CICS file, WS name)

LIT-CUSTFILENAME
(CICS file, WS name)

COMEN01C

READ

READ

READ

COADM01C

COTRTLIC

COTRTUPC

COUSR00C

COUSR01C

COUSR02C

COUSR03C

COSGN00C

COBIL00C

WS-ACCTDAT-FILE

WS-CXACAIX-FILE

WS-TRANSACT-FILE

COMEN01C

COSGN00C

SYSOUT (job log)

READ

REWRITE

READ

READPREV, STARTBR

WRITE

6 DISPLAY stmts

WAIT
COBSWAIT

LOADLIB
(load library)

STEPLIB · SHR

COBSWAIT — job & file flow (JCL member WAITSTEP.jcl)

COCRDLIC

LIT-CARD-FILE
(CICS file, WS name)

COCRDSLC

COCRDUPC

COMEN01C

SYSOUT (job log)

READNEXT, READPREV, STARTBR

2 DISPLAY stmts

COCRDSLC

LIT-CARDFILENAME
(CICS file, WS name)

LIT-CARDFILENAME-ACCT-PATH
(CICS file, WS name)

COCRDLIC

COMEN01C

READ

READ

COCRDUPC

LIT-CARDFILENAME
(CICS file, WS name)

COCRDLIC

COMEN01C

READ

REWRITE

CODATE01

MQCLOSE

MQGET

MQOPEN

MQPUT

SYSOUT (job log)

7 DISPLAY stmts

COMEN01C

COACTUPC

COACTVWC

COBIL00C

COCRDLIC

COCRDSLC

COCRDUPC

COPAUS0C

CORPT00C

COTRN00C

COTRN01C

COTRN02C

COSGN00C

COPAUA0C

WS-ACCTFILENAME

WS-CCXREF-FILE

WS-CUSTFILENAME

MQCLOSE

MQGET

MQOPEN

MQPUT1

SYSOUT (job log)

READ

READ

READ

29 DISPLAY stmts

COPAUS0C

WS-ACCTFILENAME

WS-CARDXREFNAME-ACCT-PATH

WS-CUSTFILENAME

COPAUS1C

COMEN01C

COSGN00C

SYSOUT (job log)

READ

READ

READ

19 DISPLAY stmts

COPAUS1C

COPAUS0C

COPAUS2C

SYSOUT (job log)

1 DISPLAY stmts

COPAUS2C

COPAUS1C

CORPT00C

COMEN01C

COSGN00C

CSUTLDTC

SYSOUT (job log)

2 DISPLAY stmts

COSGN00C

WS-USRSEC-FILE

COADM01C

COBIL00C

COMEN01C

COPAUS0C

CORPT00C

COTRN00C

COTRN01C

COTRN02C

COUSR00C

COUSR01C

COUSR02C

COUSR03C

READ

COTRN00C

WS-TRANSACT-FILE

COTRN01C

COMEN01C

COSGN00C

SYSOUT (job log)

READNEXT, READPREV, STARTBR

3 DISPLAY stmts

COTRN01C

WS-TRANSACT-FILE

COTRN00C

COMEN01C

COSGN00C

SYSOUT (job log)

READ

1 DISPLAY stmts

COTRN02C

WS-CCXREF-FILE

WS-CXACAIX-FILE

WS-TRANSACT-FILE

COMEN01C

COSGN00C

CSUTLDTC

SYSOUT (job log)

READ

READ

READPREV, STARTBR

WRITE

5 DISPLAY stmts

COTRTLIC

COADM01C

COTRTUPC

DSNTIAC

COTRTUPC

COTRTLIC

COADM01C

COUSR00C

WS-USRSEC-FILE

COADM01C

COSGN00C

COUSR02C

COUSR03C

SYSOUT (job log)

READNEXT, READPREV, STARTBR

3 DISPLAY stmts

COUSR01C

WS-USRSEC-FILE

COADM01C

COSGN00C

WRITE

COUSR02C

WS-USRSEC-FILE

COUSR00C

COADM01C

COSGN00C

SYSOUT (job log)

READ

REWRITE

2 DISPLAY stmts

COUSR03C

WS-USRSEC-FILE

COUSR00C

COADM01C

COSGN00C

SYSOUT (job log)

READ

DELETE

2 DISPLAY stmts

CSUTLDTC

COACTUPC

CORPT00C

COTRN02C

CEEDAYS

STEP01
DFSRRC00

OEMA.IMS.IMSP.SDFSRESL
(load library)

OEM.IMS.IMSP.PSBLIB

PAUTDB.ROOT.GSAM

PAUTDB.CHILD.GSAM

OEM.IMS.IMSP.PAUTHDB

OEM.IMS.IMSP.PAUTHDBX

OEMPP.IMS.V15R01MB.PROCLIB(DFSVSMDB)

STEPLIB · SHR

DFSRESLB · SHR

IMS · SHR

PASFILOP · OLD

PADFILOP · OLD

DDPAUTP0 · SHR

DDPAUTX0 · SHR

DFSVSAMP · SHR

DBUNLDGS — job & file flow (JCL member UNLDGSAM.JCL)

STEP01
DFSRRC00

OEMA.IMS.IMSP.SDFSRESL
(load library)

OEM.IMS.IMSP.PSBLIB

PAUTDB.ROOT.FILEO

PAUTDB.CHILD.FILEO

OEMPP.IMS.V15R01MB.PROCLIB(DFSVSMDB)

STEPLIB · SHR

DFSRESLB · SHR

IMS · SHR

INFILE1 · SHR

INFILE2 · SHR

DFSVSAMP · SHR

PAUDBLOD — job & file flow (JCL member LOADPADB.JCL)

STEP0
IEFBR14

PAUTDB.ROOT.FILEO

PAUTDB.CHILD.FILEO

STEP01
DFSRRC00

OEMA.IMS.IMSP.SDFSRESL
(load library)

OEM.IMS.IMSP.PSBLIB

OEM.IMS.IMSP.PAUTHDB

OEM.IMS.IMSP.PAUTHDBX

OEMPP.IMS.V15R01MB.PROCLIB(DFSVSMDB)

DD1 · OLD

DD2 · OLD

STEPLIB · SHR

DFSRESLB · SHR

IMS · SHR

OUTFIL1 · NEW

OUTFIL2 · NEW

DDPAUTP0 · SHR

DDPAUTX0 · SHR

DFSVSAMP · SHR

PAUDBUNL — job & file flow (JCL member UNLDPADB.JCL)

CBACT01C — inside the program (paragraph ⇄ data-store flow)

1000-ACCTFILE-GET-NEXT

1300-POPUL-ACCT-RECORD

1350-WRITE-ACCT-RECORD

1450-WRITE-ARRY-RECORD

1550-WRITE-VB1-RECORD

1575-WRITE-VB2-RECORD

9999-ABEND-PROGRAM

ACCOUNT-RECORD

program-level

ACCTDATA.VSAM.KSDS
DD: ACCTFILE

ACCTDATA.ARRYPS
DD: ARRYFILE

ACCTDATA.PSCOMP
DD: OUTFILE

ACCTDATA.VBPS
DD: VBRCFILE

COBDATFT

CEE3ABD

SYSOUT (job log)

ACCTFILE-FILE @L240

READ INTO

OUT-ACCT-REC @L317

ARR-ARRAY-REC @L338

VBR-REC @L364

VBR-REC @L379

CALL

CALL

43 DISPLAY stmts

CBACT02C — inside the program (paragraph ⇄ data-store flow)

1000-CARDFILE-GET-NEXT

9999-ABEND-PROGRAM

CARD-RECORD

program-level

CARDDATA.VSAM.KSDS
DD: CARDFILE

CEE3ABD

SYSOUT (job log)

CARDFILE-FILE @L108

READ INTO

CALL

13 DISPLAY stmts

CBACT03C — inside the program (paragraph ⇄ data-store flow)

1000-XREFFILE-GET-NEXT

9999-ABEND-PROGRAM

CARD-XREF-RECORD

program-level

CARDXREF.VSAM.KSDS
DD: XREFFILE

CEE3ABD

SYSOUT (job log)

XREFFILE-FILE @L105

READ INTO

CALL

14 DISPLAY stmts

CBACT04C — inside the program (paragraph ⇄ data-store flow)

1000-TCATBALF-GET-NEXT

1050-UPDATE-ACCOUNT

1100-GET-ACCT-DATA

1110-GET-XREF-DATA

1200-A-GET-DEFAULT-INT-RATE

1200-GET-INTEREST-RATE

1300-B-WRITE-TX

9999-ABEND-PROGRAM

ACCOUNT-RECORD

CARD-XREF-RECORD

DIS-GROUP-RECORD

TRAN-CAT-BAL-RECORD

program-level

ACCTDATA.VSAM.KSDS
DD: ACCTFILE

DISCGRP.VSAM.KSDS
DD: DISCGRP

TCATBALF.VSAM.KSDS
DD: TCATBALF

SYSTRAN(+1)
DD: TRANSACT

CARDXREF.VSAM.KSDS
DD: XREFFILE

CEE3ABD

SYSOUT (job log)

TCATBAL-FILE @L409

READ INTO

FD-ACCTFILE-REC @L439

ACCOUNT-FILE @L456

READ INTO

XREF-FILE @L477

READ INTO

DISCGRP-FILE @L499

READ INTO

DISCGRP-FILE @L527

READ INTO

FD-TRANFILE-REC @L583

CALL

45 DISPLAY stmts

CBCUS01C — inside the program (paragraph ⇄ data-store flow)

1000-CUSTFILE-GET-NEXT

Z-ABEND-PROGRAM

CUSTOMER-RECORD

program-level

CUSTDATA.VSAM.KSDS
DD: CUSTFILE

CEE3ABD

SYSOUT (job log)

CUSTFILE-FILE @L120

READ INTO

CALL

14 DISPLAY stmts

CBSTM03A — inside the program (paragraph ⇄ data-store flow)

1000-XREFFILE-GET-NEXT

2000-CUSTFILE-GET

3000-ACCTFILE-GET

4000-TRNXFILE-GET

5000-CREATE-STATEMENT

5100-WRITE-HTML-HEADER

5200-WRITE-HTML-NMADBS

6000-WRITE-TRANS

8100-TRNXFILE-OPEN

8200-XREFFILE-OPEN

8300-CUSTFILE-OPEN

8400-ACCTFILE-OPEN

8500-READTRNX-READ

9100-TRNXFILE-CLOSE

9200-XREFFILE-CLOSE

9300-CUSTFILE-CLOSE

9400-ACCTFILE-CLOSE

9999-ABEND-PROGRAM

program-level

STATEMNT.HTML
DD: HTMLFILE

STATEMNT.PS
DD: STMTFILE

CBSTM03B

CEE3ABD

SYSOUT (job log)

FD-STMTFILE-REC @L534

FD-STMTFILE-REC @L535

FD-STMTFILE-REC @L536

FD-HTMLFILE-REC @L539

FD-HTMLFILE-REC @L541

FD-HTMLFILE-REC @L543

FD-HTMLFILE-REC @L545

FD-HTMLFILE-REC @L547

FD-HTMLFILE-REC @L549

FD-HTMLFILE-REC @L551

FD-HTMLFILE-REC @L553

FD-STMTFILE-REC @L559

FD-STMTFILE-REC @L587

FD-STMTFILE-REC @L588

FD-STMTFILE-REC @L589

FD-STMTFILE-REC @L590

FD-STMTFILE-REC @L591

FD-STMTFILE-REC @L592

FD-STMTFILE-REC @L593

FD-STMTFILE-REC @L594

FD-STMTFILE-REC @L595

FD-STMTFILE-REC @L596

FD-STMTFILE-REC @L597

FD-STMTFILE-REC @L598

FD-STMTFILE-REC @L599

FD-STMTFILE-REC @L600

FD-STMTFILE-REC @L601

FD-HTMLFILE-REC @L608

FD-HTMLFILE-REC @L610

FD-HTMLFILE-REC @L612

FD-HTMLFILE-REC @L614

FD-HTMLFILE-REC @L616

FD-HTMLFILE-REC @L618

FD-HTMLFILE-REC @L620

FD-HTMLFILE-REC @L622

FD-HTMLFILE-REC @L624

FD-HTMLFILE-REC @L626

FD-HTMLFILE-REC @L629

FD-HTMLFILE-REC @L631

FD-HTMLFILE-REC @L633

FD-HTMLFILE-REC @L635

FD-HTMLFILE-REC @L637

FD-HTMLFILE-REC @L639

FD-HTMLFILE-REC @L641

FD-HTMLFILE-REC @L643

FD-HTMLFILE-REC @L645

FD-HTMLFILE-REC @L647

FD-HTMLFILE-REC @L649

FD-HTMLFILE-REC @L651

FD-HTMLFILE-REC @L667

FD-HTMLFILE-REC @L675

FD-HTMLFILE-REC @L683

FD-HTMLFILE-REC @L691

FD-HTMLFILE-REC @L694

FD-HTMLFILE-REC @L696

FD-HTMLFILE-REC @L698

FD-HTMLFILE-REC @L700

FD-HTMLFILE-REC @L702

FD-HTMLFILE-REC @L704

FD-HTMLFILE-REC @L706

FD-HTMLFILE-REC @L708

FD-HTMLFILE-REC @L710

FD-HTMLFILE-REC @L718

FD-HTMLFILE-REC @L725

FD-HTMLFILE-REC @L732

FD-HTMLFILE-REC @L734

FD-HTMLFILE-REC @L736

FD-HTMLFILE-REC @L738

FD-HTMLFILE-REC @L740

FD-HTMLFILE-REC @L742

FD-HTMLFILE-REC @L744

FD-HTMLFILE-REC @L746

FD-HTMLFILE-REC @L748

FD-HTMLFILE-REC @L750

FD-HTMLFILE-REC @L752

FD-HTMLFILE-REC @L754

FD-HTMLFILE-REC @L756

FD-HTMLFILE-REC @L758

FD-HTMLFILE-REC @L760

FD-HTMLFILE-REC @L762

FD-HTMLFILE-REC @L764

FD-HTMLFILE-REC @L766

FD-HTMLFILE-REC @L768

FD-STMTFILE-REC @L778

FD-HTMLFILE-REC @L781

FD-HTMLFILE-REC @L784

FD-HTMLFILE-REC @L791

FD-HTMLFILE-REC @L793

FD-HTMLFILE-REC @L796

FD-HTMLFILE-REC @L803

FD-HTMLFILE-REC @L805

FD-HTMLFILE-REC @L808

FD-HTMLFILE-REC @L815

FD-HTMLFILE-REC @L817

FD-HTMLFILE-REC @L820

CALL

CALL

CALL

CALL

CALL

CALL

CALL

CALL

CALL

CALL

CALL

CALL

CALL

33 DISPLAY stmts

CBSTM03B — inside the program (paragraph ⇄ data-store flow)

1000-TRNXFILE-PROC

2000-XREFFILE-PROC

3000-CUSTFILE-PROC

4000-ACCTFILE-PROC

LK-M03B-FLDT

DD: ACCTFILE

DD: CUSTFILE

DD: TRNXFILE

DD: XREFFILE

TRNX-FILE @L141

READ INTO

XREF-FILE @L165

READ INTO

CUST-FILE @L190

READ INTO

ACCT-FILE @L215

READ INTO

CBTRN01C — inside the program (paragraph ⇄ data-store flow)

1000-DALYTRAN-GET-NEXT

2000-LOOKUP-XREF

3000-READ-ACCOUNT

Z-ABEND-PROGRAM

ACCOUNT-RECORD

CARD-XREF-RECORD

DALYTRAN-RECORD

program-level

DD: ACCTFILE

DD: DALYTRAN

DD: XREFFILE

CEE3ABD

SYSOUT (job log)

DALYTRAN-FILE @L322

READ INTO

XREF-FILE @L348

READ INTO

ACCOUNT-FILE @L362

READ INTO

CALL

42 DISPLAY stmts

CBTRN02C — inside the program (paragraph ⇄ data-store flow)

1000-DALYTRAN-GET-NEXT

1500-A-LOOKUP-XREF

1500-B-LOOKUP-ACCT

2500-WRITE-REJECT-REC

2700-A-CREATE-TCATBAL-REC

2700-B-UPDATE-TCATBAL-REC

2700-UPDATE-TCATBAL

2800-UPDATE-ACCOUNT-REC

2900-WRITE-TRANSACTION-FILE

9999-ABEND-PROGRAM

ACCOUNT-RECORD

CARD-XREF-RECORD

DALYTRAN-RECORD

TRAN-CAT-BAL-RECORD

program-level

ACCTDATA.VSAM.KSDS
DD: ACCTFILE

DALYREJS(+1)
DD: DALYREJS

DALYTRAN.PS
DD: DALYTRAN

TCATBALF.VSAM.KSDS
DD: TCATBALF

TRANSACT.VSAM.KSDS
DD: TRANFILE

CARDXREF.VSAM.KSDS
DD: XREFFILE

CEE3ABD

SYSOUT (job log)

DALYTRAN-FILE @L437

READ INTO

XREF-FILE @L474

READ INTO

ACCOUNT-FILE @L486

READ INTO

FD-REJS-RECORD @L542

TCATBAL-FILE @L565

READ INTO

FD-TRAN-CAT-BAL-RECORD @L601

FD-TRAN-CAT-BAL-RECORD @L619

FD-ACCTFILE-REC @L645

FD-TRANFILE-REC @L655

CALL

45 DISPLAY stmts

CBTRN03C — inside the program (paragraph ⇄ data-store flow)

0550-DATEPARM-READ

1000-TRANFILE-GET-NEXT

1111-WRITE-REPORT-REC

1500-A-LOOKUP-XREF

1500-B-LOOKUP-TRANTYPE

1500-C-LOOKUP-TRANCATG

9999-ABEND-PROGRAM

CARD-XREF-RECORD

TRAN-CAT-RECORD

TRAN-RECORD

TRAN-TYPE-RECORD

WS-DATEPARM-RECORD

program-level

DATEPARM
DD: DATEPARM

TRANREPT(+1)
DD: TRANREPT

TRANCATG.VSAM.KSDS
DD: TRANCATG

TRANSACT.DALY(+1)
DD: TRANFILE

TRANTYPE.VSAM.KSDS
DD: TRANTYPE

CARDXREF.VSAM.KSDS
DD: CARDXREF

CEE3ABD

SYSOUT (job log)

DATE-PARMS-FILE @L353

READ INTO

TRANSACT-FILE @L381

READ INTO

FD-REPTFILE-REC @L477

XREF-FILE @L617

READ INTO

TRANTYPE-FILE @L627

READ INTO

TRANCATG-FILE @L637

READ INTO

CALL

46 DISPLAY stmts

COACCT01 — inside the program (paragraph ⇄ data-store flow)

2100-OPEN-ERROR-QUEUE

2300-OPEN-INPUT-QUEUE

2400-OPEN-OUTPUT-QUEUE

3000-GET-REQUEST

4100-PUT-REPLY

5000-CLOSE-INPUT-QUEUE

5100-CLOSE-OUTPUT-QUEUE

5200-CLOSE-ERROR-QUEUE

9000-ERROR

program-level

MQOPEN

MQGET

MQPUT

MQCLOSE

SYSOUT (job log)

CALL

CALL

CALL

CALL

CALL

CALL

CALL

CALL

CALL

7 DISPLAY stmts

COACTUPC — inside the program (paragraph ⇄ data-store flow)

0000-MAIN

9200-GETCARDXREF-BYACCT

9300-GETACCTDATA-BYACCT

9400-GETCUSTDATA-BYCUST

9600-WRITE-PROCESSING

EDIT-DATE-LE

LIT-ACCTFILENAME

LIT-CARDXREFNAME-ACCT-PATH

LIT-CUSTFILENAME

CSUTLDTC

COMEN01C

READ @L7310

READ @L7359

READ @L7409

READ @L7550

READ @L7577

REWRITE @L7721

REWRITE @L7741

CALL

XCTL

COACTVWC — inside the program (paragraph ⇄ data-store flow)

0000-MAIN

9200-GETCARDXREF-BYACCT

9300-GETACCTDATA-BYACCT

9400-GETCUSTDATA-BYCUST

LIT-ACCTFILENAME

LIT-CARDXREFNAME-ACCT-PATH

LIT-CUSTFILENAME

COMEN01C

READ @L1537

READ @L1586

READ @L1636

XCTL

COADM01C — inside the program (paragraph ⇄ data-store flow)

RETURN-TO-SIGNON-SCREEN

COSGN00C

XCTL

COBIL00C — inside the program (paragraph ⇄ data-store flow)

READPREV-TRANSACT-FILE

READ-ACCTDAT-FILE

READ-CXACAIX-FILE

RETURN-TO-PREV-SCREEN

STARTBR-TRANSACT-FILE

UPDATE-ACCTDAT-FILE

WRITE-TRANSACT-FILE

program-level

WS-ACCTDAT-FILE

WS-CXACAIX-FILE

WS-TRANSACT-FILE

COMEN01C

COSGN00C

SYSOUT (job log)

READ @L701

REWRITE @L735

READ @L766

STARTBR @L799

READPREV @L830

WRITE @L868

XCTL

XCTL

6 DISPLAY stmts

COBSWAIT — inside the program (paragraph ⇄ data-store flow)

(mainline)

MVSWAIT

CALL

COCRDLIC — inside the program (paragraph ⇄ data-store flow)

0000-MAIN

9000-READ-FORWARD

9100-READ-BACKWARDS

program-level

LIT-CARD-FILE

COCRDSLC

COCRDUPC

COMEN01C

SYSOUT (job log)

STARTBR @L1939

READNEXT @L1956

READNEXT @L2007

STARTBR @L2083

READPREV @L2104

READPREV @L2132

XCTL

XCTL

XCTL

2 DISPLAY stmts

COCRDSLC — inside the program (paragraph ⇄ data-store flow)

0000-MAIN

9100-GETCARD-BYACCTCARD

9150-GETCARD-BYACCT

LIT-CARDFILENAME

LIT-CARDFILENAME-ACCT-PATH

COMEN01C

READ @L1255

READ @L1296

XCTL

COCRDUPC — inside the program (paragraph ⇄ data-store flow)

0000-MAIN

9100-GETCARD-BYACCTCARD

9200-WRITE-PROCESSING

LIT-CARDFILENAME

COMEN01C

READ @L1919

READ @L1964

REWRITE @L2014

XCTL

CODATE01 — inside the program (paragraph ⇄ data-store flow)

2100-OPEN-ERROR-QUEUE

2300-OPEN-INPUT-QUEUE

2400-OPEN-OUTPUT-QUEUE

3000-GET-REQUEST

4100-PUT-REPLY

5000-CLOSE-INPUT-QUEUE

5100-CLOSE-OUTPUT-QUEUE

5200-CLOSE-ERROR-QUEUE

9000-ERROR

program-level

MQOPEN

MQGET

MQPUT

MQCLOSE

SYSOUT (job log)

CALL

CALL

CALL

CALL

CALL

CALL

CALL

CALL

CALL

7 DISPLAY stmts

COMEN01C — inside the program (paragraph ⇄ data-store flow)

RETURN-TO-SIGNON-SCREEN

COSGN00C

XCTL

COPAUA0C — inside the program (paragraph ⇄ data-store flow)

1100-OPEN-REQUEST-QUEUE

3100-READ-REQUEST-MQ

5100-READ-XREF-RECORD

5200-READ-ACCT-RECORD

5300-READ-CUST-RECORD

7100-SEND-RESPONSE

9100-CLOSE-REQUEST-QUEUE

program-level

WS-ACCTFILENAME

WS-CCXREF-FILE

WS-CUSTFILENAME

MQOPEN

MQGET

MQPUT1

MQCLOSE

SYSOUT (job log)

READ @L727

READ @L775

READ @L823

CALL

CALL

CALL

CALL

29 DISPLAY stmts

COPAUS0C — inside the program (paragraph ⇄ data-store flow)

GETACCTDATA-BYACCT

GETCARDXREF-BYACCT

GETCUSTDATA-BYCUST

PROCESS-ENTER-KEY

RETURN-TO-PREV-SCREEN

program-level

WS-ACCTFILENAME

WS-CARDXREFNAME-ACCT-PATH

WS-CUSTFILENAME

COPAUS1C

COMEN01C

COSGN00C

SYSOUT (job log)

READ @L1941

READ @L1992

READ @L2043

XCTL

XCTL

XCTL

19 DISPLAY stmts

COPAUS1C — inside the program (paragraph ⇄ data-store flow)

MARK-AUTH-FRAUD

RETURN-TO-PREV-SCREEN

program-level

COPAUS2C

COPAUS0C

SYSOUT (job log)

LINK

XCTL

1 DISPLAY stmts

COPAUS2C — inside the program (paragraph ⇄ data-store flow)

FRAUD-UPDATE

MAIN-PARA

DB2 CARDDEMO.AUTHFRDS

INSERT

UPDATE

CORPT00C — inside the program (paragraph ⇄ data-store flow)

PROCESS-ENTER-KEY

RETURN-TO-PREV-SCREEN

program-level

CSUTLDTC

COMEN01C

COSGN00C

SYSOUT (job log)

CALL

XCTL

XCTL

2 DISPLAY stmts

COSGN00C — inside the program (paragraph ⇄ data-store flow)

READ-USER-SEC-FILE

WS-USRSEC-FILE

READ @L551

COTRN00C — inside the program (paragraph ⇄ data-store flow)

PROCESS-ENTER-KEY

READNEXT-TRANSACT-FILE

READPREV-TRANSACT-FILE

RETURN-TO-PREV-SCREEN

STARTBR-TRANSACT-FILE

program-level

WS-TRANSACT-FILE

COMEN01C

COSGN00C

COTRN01C

SYSOUT (job log)

STARTBR @L1504

READNEXT @L1537

READPREV @L1571

XCTL

XCTL

XCTL

XCTL

XCTL

XCTL

3 DISPLAY stmts

COTRN01C — inside the program (paragraph ⇄ data-store flow)

READ-TRANSACT-FILE

RETURN-TO-PREV-SCREEN

program-level

WS-TRANSACT-FILE

COMEN01C

COSGN00C

COTRN00C

SYSOUT (job log)

READ @L724

XCTL

XCTL

XCTL

1 DISPLAY stmts

COTRN02C — inside the program (paragraph ⇄ data-store flow)

READPREV-TRANSACT-FILE

READ-CCXREF-FILE

READ-CXACAIX-FILE

RETURN-TO-PREV-SCREEN

STARTBR-TRANSACT-FILE

VALIDATE-INPUT-DATA-FIELDS

WRITE-TRANSACT-FILE

program-level

WS-CCXREF-FILE

WS-CXACAIX-FILE

WS-TRANSACT-FILE

CSUTLDTC

COMEN01C

COSGN00C

SYSOUT (job log)

READ @L1066

READ @L1099

STARTBR @L1132

READPREV @L1163

WRITE @L1201

CALL

XCTL

XCTL

5 DISPLAY stmts

COTRTLIC — inside the program (paragraph ⇄ data-store flow)

9200-UPDATE-RECORD

9300-DELETE-RECORD

9999-FORMAT-DB2-MESSAGE

program-level

DSNTIAC

COADM01C

COTRTUPC

DB2 CARDDEMO.TRANSACTION_TYPE

DB2 SYSIBM.SYSDUMMY1

CALL

XCTL

XCTL

DELETE

SELECT (program-level)

UPDATE

SELECT (program-level)

COTRTUPC — inside the program (paragraph ⇄ data-store flow)

9100-GET-TRANSACTION-TYPE

9600-WRITE-PROCESSING

9700-INSERT-RECORD

9800-DELETE-PROCESSING

program-level

COADM01C

DB2 CARDDEMO.TRANSACTION_TYPE

XCTL

DELETE

INSERT

SELECT

UPDATE

COUSR00C — inside the program (paragraph ⇄ data-store flow)

PROCESS-ENTER-KEY

READNEXT-USER-SEC-FILE

READPREV-USER-SEC-FILE

RETURN-TO-PREV-SCREEN

STARTBR-USER-SEC-FILE

program-level

WS-USRSEC-FILE

COADM01C

COSGN00C

COUSR02C

COUSR03C

SYSOUT (job log)

STARTBR @L1504

READNEXT @L1537

READPREV @L1571

XCTL

XCTL

XCTL

XCTL

XCTL

XCTL

XCTL

XCTL

3 DISPLAY stmts

COUSR01C — inside the program (paragraph ⇄ data-store flow)

RETURN-TO-PREV-SCREEN

WRITE-USER-SEC-FILE

WS-USRSEC-FILE

COADM01C

COSGN00C

WRITE @L592

XCTL

XCTL

COUSR02C — inside the program (paragraph ⇄ data-store flow)

READ-USER-SEC-FILE

RETURN-TO-PREV-SCREEN

UPDATE-USER-SEC-FILE

program-level

WS-USRSEC-FILE

COADM01C

COSGN00C

SYSOUT (job log)

READ @L674

REWRITE @L712

XCTL

XCTL

2 DISPLAY stmts

COUSR03C — inside the program (paragraph ⇄ data-store flow)

DELETE-USER-SEC-FILE

READ-USER-SEC-FILE

RETURN-TO-PREV-SCREEN

program-level

WS-USRSEC-FILE

COADM01C

COSGN00C

SYSOUT (job log)

READ @L609

DELETE @L647

XCTL

XCTL

2 DISPLAY stmts

CSUTLDTC — inside the program (paragraph ⇄ data-store flow)

A000-MAIN

CEEDAYS

CALL

DBUNLDGS — inside the program (paragraph ⇄ data-store flow)

2000-FIND-NEXT-AUTH-SUMMARY

3000-FIND-NEXT-AUTH-DTL

3100-INSERT-PARENT-SEG-GSAM

3200-INSERT-CHILD-SEG-GSAM

program-level

IMS DL/I databases
(via CBLTDLI)

SYSOUT (job log)

GN

GNP

ISRT

ISRT

15 DISPLAY stmts

PAUDBLOD — inside the program (paragraph ⇄ data-store flow)

2000-READ-ROOT-SEG-FILE

2100-INSERT-ROOT-SEG

3000-READ-CHILD-SEG-FILE

3100-INSERT-CHILD-SEG

3200-INSERT-IMS-CALL

program-level

PAUTDB.ROOT.FILEO
DD: INFILE1

PAUTDB.CHILD.FILEO
DD: INFILE2

IMS DL/I databases
(via CBLTDLI)

SYSOUT (job log)

INFILE1 @L367

INFILE2 @L413

ISRT

GU

ISRT

26 DISPLAY stmts

PAUDBUNL — inside the program (paragraph ⇄ data-store flow)

2000-FIND-NEXT-AUTH-SUMMARY

3000-FIND-NEXT-AUTH-DTL

program-level

PAUTDB.ROOT.FILEO
DD: OUTFIL1

PAUTDB.CHILD.FILEO
DD: OUTFIL2

IMS DL/I databases
(via CBLTDLI)

SYSOUT (job log)

OPFIL1-REC @L374

OPFIL2-REC @L412

GN

GNP

15 DISPLAY stmts


solid → = XCTL (transfer)  ·  thick ⇒ = LINK (call & return)  ·  dotted = CALL  ·  checkboxes hide/show groups  ·  click an arrow = source cites  ·  on a box = click to drill down⚠ roster-scoped: 42 programs; 0 outside-roster referenced Descriptions marked ◇ are a short purpose summary from the program's generated Program Logic Manual (AI-authored, verified against the source facts); unmarked program descriptions are quoted verbatim from the program's own source header. Descriptions marked † are curated reference entries for external system services and JCL utilities that are not part of the analyzed corpus (from vendor documentation or confirmed call context).