CICS transaction · group CARDDEMOCC00 → COSGN00C
observed CARDDEMO.CSD:378
What the user sees
Tran : #### ######################################## Date : ######## Prog : ######## ######################################## Time : ######### AppID: ######## SysID: ######## This is a Credit Card Demo Application for Mainframe Modernization +========================================+ |%%%%%%% NATIONAL RESERVE NOTE %%%%%%%%| |%(1) THE UNITED STATES OF KICSLAND (1)%| |%$$ ___ ******** $$%| |%$ {x} (o o) $%| |%$ ****** ( V ) O N E $%| |%(1) ---m-m--- (1)%| |%%~~~~~~~~~~~ ONE DOLLAR ~~~~~~~~~~~~~%%| +========================================+ Type your User ID and Password, then press ENTER: User ID : ________ (8 Char) Password : ________ (8 Char) ############################################################################## ENTER=Sign-on F3=Exit
Fields the user types
| Label | Field | Len | Map |
|---|---|---|---|
| User ID : | USERID | 8 | COSGN00.bms:156 |
| Password : | PASSWD hidden | 8 | COSGN00.bms:175 |
Data it touches
| Command | CICS file | Dataset | At |
|---|---|---|---|
| READ | USRSEC derived | AWS.M2.CARDDEMO.USRSEC.VSAM.KSDS | COSGN00C.cbl:211–219 |
Where it goes next
RETURNnext tran
XCTLtransfer
COADM01C observed
- WS-RESP-CD = 0
- SEC-USR-PWD = WS-USER-PWD
- CDEMO-USRTYP-ADMIN
in READ-USER-SEC-FILE COSGN00C.cbl:231–234
XCTLtransfer
COMEN01C observed
- WS-RESP-CD = 0
- SEC-USR-PWD = WS-USER-PWD
- NOT (CDEMO-USRTYP-ADMIN)
in READ-USER-SEC-FILE COSGN00C.cbl:236–239
Programs reached
| Program | Screens | Transfers to | Data |
|---|---|---|---|
| COADM01C | COADM01.COADM1A | RETURN CA00XCTL COUSR00CXCTL COUSR01CXCTL COUSR02CXCTL COUSR03CXCTL COTRTLICXCTL COTRTUPCXCTL COSGN00C | |
| COMEN01C | COMEN01.COMEN1A | RETURN CM00XCTL COACTVWCXCTL COACTUPCXCTL COCRDLICXCTL COCRDSLCXCTL COCRDUPCXCTL COTRN00CXCTL COTRN01CXCTL COTRN02CXCTL CORPT00CXCTL COBIL00CXCTL COPAUS0CXCTL COSGN00C |