Online (CICS) program · 695 linesCOUSR00C

Entry points

How it is started

CALL · XCTL · LINK

CICS XCTL

EXEC CICS

RETURN ×1XCTL ×3SEND MAP ×2RECEIVE MAP ×1STARTBR ×1READNEXT ×1READPREV ×1ENDBR ×1

VSAM

STARTBR	USRSEC	AWS.M2.CARDDEMO.USRSEC.VSAM.KSDS	COUSR00C.cbl:588–595
READNEXT	USRSEC	AWS.M2.CARDDEMO.USRSEC.VSAM.KSDS	COUSR00C.cbl:621–629
READPREV	USRSEC	AWS.M2.CARDDEMO.USRSEC.VSAM.KSDS	COUSR00C.cbl:655–663
ENDBR	USRSEC	AWS.M2.CARDDEMO.USRSEC.VSAM.KSDS	COUSR00C.cbl:689–691

PERFORM graph

MAIN-PARA 32 stmts
↳RETURN-TO-PREV-SCREEN, PROCESS-ENTER-KEY, SEND-USRLST-SCREEN, RECEIVE-USRLST-SCREEN, PROCESS-PF7-KEY, PROCESS-PF8-KEY
PROCESS-ENTER-KEY 61 stmts
↳PROCESS-PAGE-FORWARD
PROCESS-PF7-KEY 10 stmts
↳PROCESS-PAGE-BACKWARD, SEND-USRLST-SCREEN
PROCESS-PF8-KEY 9 stmts
↳PROCESS-PAGE-FORWARD, SEND-USRLST-SCREEN
PROCESS-PAGE-FORWARD 26 stmts
↳STARTBR-USER-SEC-FILE, READNEXT-USER-SEC-FILE, INITIALIZE-USER-DATA, POPULATE-USER-DATA, ENDBR-USER-SEC-FILE, SEND-USRLST-SCREEN
PROCESS-PAGE-BACKWARD 22 stmts
↳STARTBR-USER-SEC-FILE, READPREV-USER-SEC-FILE, INITIALIZE-USER-DATA, POPULATE-USER-DATA, ENDBR-USER-SEC-FILE, SEND-USRLST-SCREEN
POPULATE-USER-DATA 53 stmts
INITIALIZE-USER-DATA 53 stmts
RETURN-TO-PREV-SCREEN 6 stmts
SEND-USRLST-SCREEN 5 stmts
↳POPULATE-HEADER-INFO
RECEIVE-USRLST-SCREEN 1 stmts
POPULATE-HEADER-INFO 13 stmts
STARTBR-USER-SEC-FILE 16 stmts
↳SEND-USRLST-SCREEN
READNEXT-USER-SEC-FILE 16 stmts
↳SEND-USRLST-SCREEN
READPREV-USER-SEC-FILE 16 stmts
↳SEND-USRLST-SCREEN
ENDBR-USER-SEC-FILE 1 stmts

COPY