Batch program · 230 linesCBSTM03B

Entry points

How it is started

Transactions: none
JCL steps: none
Called by: CBSTM03A CALL observed CBSTM03A.CBL:351
CBSTM03A CALL observed CBSTM03A.CBL:377
CBSTM03A CALL observed CBSTM03A.CBL:401
CBSTM03A CALL observed CBSTM03A.CBL:734
CBSTM03A CALL observed CBSTM03A.CBL:746
CBSTM03A CALL observed CBSTM03A.CBL:769
CBSTM03A CALL observed CBSTM03A.CBL:787
CBSTM03A CALL observed CBSTM03A.CBL:805
CBSTM03A CALL observed CBSTM03A.CBL:835
CBSTM03A CALL observed CBSTM03A.CBL:860
CBSTM03A CALL observed CBSTM03A.CBL:877
CBSTM03A CALL observed CBSTM03A.CBL:893
CBSTM03A CALL observed CBSTM03A.CBL:909
USING: LK-M03B-AREA

CALL · XCTL · LINK

No calls.

FILE-CONTROL

File	DD	Organization	Opened	Declared
TRNX-FILE	TRNXFILE	INDEXED / SEQUENTIAL key FD-TRNXS-ID	INPUT	CBSTM03B.CBL:31
XREF-FILE	XREFFILE	INDEXED / SEQUENTIAL key FD-XREF-CARD-NUM	INPUT	CBSTM03B.CBL:37
CUST-FILE	CUSTFILE	INDEXED / RANDOM key FD-CUST-ID	INPUT	CBSTM03B.CBL:43
ACCT-FILE	ACCTFILE	INDEXED / RANDOM key FD-ACCT-ID	INPUT	CBSTM03B.CBL:49

PERFORM graph

0000-START 11 stmts
↳1000-TRNXFILE-PROC, 2000-XREFFILE-PROC, 3000-CUSTFILE-PROC, 4000-ACCTFILE-PROC, 9999-GOBACK
9999-GOBACK 1 stmts
1000-TRNXFILE-PROC 9 stmts
↳1900-EXIT
1900-EXIT 1 stmts
1999-EXIT 1 stmts
2000-XREFFILE-PROC 9 stmts
↳2900-EXIT
2900-EXIT 1 stmts
2999-EXIT 1 stmts
3000-CUSTFILE-PROC 10 stmts
↳3900-EXIT
3900-EXIT 1 stmts
3999-EXIT 1 stmts
4000-ACCTFILE-PROC 10 stmts
↳4900-EXIT
4900-EXIT 1 stmts
4999-EXIT 1 stmts

COPY