MFmainframe-rea
WS carddemo · 26f629ef

CICS transaction · group CARDDEMOCU01 → COUSR01C

BMS

What the user sees

 Tran: ####          ########################################    Date: ######## 
 Prog: ########      ########################################    Time: ######## 
                                                                                
                                   Add User                                     
                                                                                
                                                                                
                                                                                
      First Name: ____________________       Last Name: ____________________    
                                                                                
                                                                                
      User ID: ________ (8 Char)             Password: ________ (8 Char)        
                                                                                
                                                                                
      User Type: _ (A=Admin, U=User)                                            
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
 ############################################################################## 
 ENTER=Add User  F3=Back  F4=Clear  F12=Exit                                    
COUSR01 / COUSR1A
COUSR01.COUSR1A

Fields the user types

LabelFieldLenMap
First Name:FNAME 20COUSR01.bms:84
Last Name:LNAME 20COUSR01.bms:97
User ID:USERID 8COUSR01.bms:111
Password:PASSWD hidden8COUSR01.bms:126
User Type:USRTYPE 1COUSR01.bms:141

Full map definition COUSR01.bms:26

VSAM · DB2

Data it touches

CommandCICS fileDatasetAt
WRITEUSRSEC derivedAWS.M2.CARDDEMO.USRSEC.VSAM.KSDSCOUSR01C.cbl:240–248
Navigation

Where it goes next

RETURNnext tran
CU01 derived
always
XCTLtransfer
always
in RETURN-TO-PREV-SCREEN COUSR01C.cbl:175–178
3 pieces of evidence
  • MOVE 'COSGN00C' at app/cbl/COUSR01C.cbl:79
  • MOVE 'COADM01C' at app/cbl/COUSR01C.cbl:94
  • MOVE 'COSGN00C' at app/cbl/COUSR01C.cbl:168
Depth 1

Programs reached

ProgramScreensTransfers toData
COSGN00CCOSGN00.COSGN0ARETURN CC00XCTL COADM01CXCTL COMEN01CUSRSEC
COADM01CCOADM01.COADM1ARETURN CA00XCTL COUSR00CXCTL COUSR01CXCTL COUSR02CXCTL COUSR03CXCTL COTRTLICXCTL COTRTUPCXCTL COSGN00C