MFmainframe-rea
WS carddemo · 26f629ef

CICS transaction · group CARDDEMOCT00 → COTRN00C

observed CARDDEMO.CSD:419
BMS

What the user sees

 Tran: ####          ########################################    Date: ######## 
 Prog: ########      ########################################    Time: ######## 
                                                                                
                              List Transactions                  Page: ######## 
                                                                                
     Search Tran ID: ________________                                           
                                                                                
  Sel    Transaction ID      Date          Description                Amount    
  ---   ----------------   --------   --------------------------   ------------ 
   _    ################   ########   ##########################   ############ 
   _    ################   ########   ##########################   ############ 
   _    ################   ########   ##########################   ############ 
   _    ################   ########   ##########################   ############ 
   _    ################   ########   ##########################   ############ 
   _    ################   ########   ##########################   ############ 
   _    ################   ########   ##########################   ############ 
   _    ################   ########   ##########################   ############ 
   _    ################   ########   ##########################   ############ 
   _    ################   ########   ##########################   ############ 
                                                                                
            Type 'S' to View Transaction details from the list                  
                                                                                
 ############################################################################## 
 ENTER=Continue  F3=Back  F7=Backward  F8=Forward
COTRN00 / COTRN0A
COTRN00.COTRN0A

Fields the user types

LabelFieldLenMap
Search Tran ID:TRNIDIN 16COTRN00.bms:95
—SEL0001 1COTRN00.bms:153
—SEL0002 1COTRN00.bms:182
—SEL0003 1COTRN00.bms:211
—SEL0004 1COTRN00.bms:240
—SEL0005 1COTRN00.bms:269
—SEL0006 1COTRN00.bms:298
—SEL0007 1COTRN00.bms:327
—SEL0008 1COTRN00.bms:356
—SEL0009 1COTRN00.bms:385
—SEL0010 1COTRN00.bms:414

Full map definition COTRN00.bms:26

VSAM · DB2

Data it touches

CommandCICS fileDatasetAt
STARTBRTRANSACT derivedAWS.M2.CARDDEMO.TRANSACT.VSAM.KSDSCOTRN00C.cbl:593–600
READNEXTTRANSACT derivedAWS.M2.CARDDEMO.TRANSACT.VSAM.KSDSCOTRN00C.cbl:626–634
READPREVTRANSACT derivedAWS.M2.CARDDEMO.TRANSACT.VSAM.KSDSCOTRN00C.cbl:660–668
ENDBRTRANSACT derivedAWS.M2.CARDDEMO.TRANSACT.VSAM.KSDSCOTRN00C.cbl:694–696
Navigation

Where it goes next

RETURNnext tran
CT00 derived
always
in MAIN-PARA COTRN00C.cbl:138–141
XCTLtransfer
COSGN00CCOMEN01CCOTRN01C derived
  1. (CDEMO-CT00-TRN-SEL-FLG NOT = SPACES AND LOW-VALUES) AND (CDEMO-CT00-TRN-SELECTED NOT = SPACES AND LOW-VALUES)
  2. CDEMO-CT00-TRN-SEL-FLG = 'S' OR CDEMO-CT00-TRN-SEL-FLG = 's'
in PROCESS-ENTER-KEY COTRN00C.cbl:192–195
4 pieces of evidence
  • MOVE 'COSGN00C' at app/cbl/COTRN00C.cbl:108
  • MOVE 'COMEN01C' at app/cbl/COTRN00C.cbl:123
  • MOVE 'COTRN01C' at app/cbl/COTRN00C.cbl:188
  • MOVE 'COSGN00C' at app/cbl/COTRN00C.cbl:513
XCTLtransfer
COSGN00CCOMEN01CCOTRN01C derived
always
in RETURN-TO-PREV-SCREEN COTRN00C.cbl:518–521
4 pieces of evidence
  • MOVE 'COSGN00C' at app/cbl/COTRN00C.cbl:108
  • MOVE 'COMEN01C' at app/cbl/COTRN00C.cbl:123
  • MOVE 'COTRN01C' at app/cbl/COTRN00C.cbl:188
  • MOVE 'COSGN00C' at app/cbl/COTRN00C.cbl:513
Depth 1

Programs reached

ProgramScreensTransfers toData
COSGN00CCOSGN00.COSGN0ARETURN CC00XCTL COADM01CXCTL COMEN01CUSRSEC
COMEN01CCOMEN01.COMEN1ARETURN CM00XCTL COACTVWCXCTL COACTUPCXCTL COCRDLICXCTL COCRDSLCXCTL COCRDUPCXCTL COTRN00CXCTL COTRN01CXCTL COTRN02CXCTL CORPT00CXCTL COBIL00CXCTL COPAUS0CXCTL COSGN00C
COTRN01CCOTRN01.COTRN1ARETURN CT01XCTL COSGN00CXCTL COMEN01CXCTL COTRN01CXCTL COTRN00CTRANSACT