Source - COBOL - General

MainPgm EXEC-SQL EXEC-CICS EXEC-DLI DynSQL EXEC-ADABAS Upd:User Upd:Date Upd:T Load-Mod Main-Lib System Copy Call File FileU FileD DB2 CICS IMS Vars Cmnt VarU Dead XML Ltrl Src Lines-M. Lines-T. CommentM CommentT Sections Paragraphs Sentences Format1 Format2 Format3 Picture Integer Real String Figurative FD RD ACCEPT ADD ALTER CALL CANCEL CLOSE COMPUTE CONTINUE COPY DELETE DISPLAY DIVIDE ENTRY EVALUATE EXECUTE EXIT GENERATE GOBACK GOTO IF INITIALIZE INITIATE INSPECT INVOKE MERGE MOVE MULTIPLY NEXTSENT OPEN PERFORM READ RELEASE REPLACE RETURN REWRITE SEARCH SET SORT START STOP STRING SUBTRACT SUPPRESS TERMINATE UNSTRING USE WRITE XMLGENERATE XMLPARSE
DSN8BC3 Y N N N N       DSN8BC3 DSNC10.SDSNSAMP PROJ1 Y Y Y Y Y Y N N Y Y Y N N Y N 621 645 267 267 1 15 65 102 0 1 84 17 0 45 25 2 0 0 0 0 9 0 1 0 0 1 0 0 0 0 0 26 0 0 1 1 12 0 0 1 0 0 34 0 0 1 13 2 0 0 0 0 0 0 0 0 0 0 0 0 0 2 0 13 0 0

Programs - Source - Call Diagram

Programs - Source - Call

MainMod MLng SubPgm SLng Level Method
DSN8BC3 COB DSN8BC3 COB 0 DUMMY
DSN8BC3 COB DSN8MCG COB 1 CALL
DSN8BC3 COB DSNTIAR   1 CALL

Source - COBOL - General

MainPgm Copy Call File EXEC-SQL DynSQL DB2 CICS EXEC-CICS IMS EXEC-DLI Lines-M. CommentM Main-Lib
DSN8BC3 Y Y Y Y N Y N N N N 621 267 DSNC10.SDSNSAMP

Programs - Load Modules

Module Mod-Size Link-Date LinkTime APF AMODE RMODE RENT REUS LoadLib
DSN8BC3 26548 02.04.2021 16:24:01 00 31 ANY N N DSNC10.DBCG.RUNLIB.LOAD

Source - COBOL - COPY

MainPgm Line COPY-Mem COPY-Lib Nest
DSN8BC3 239 SQLCA   1

Programs - Source - DB2 Accesses

MainPgm MTyp SubPgm STyp Level Object Object Typ Action
DSN8BC3 COB DSN8BC3 COB 0 VEMPLP TABLE DECLARE
DSN8BC3 COB DSN8BC3 COB 0 VEMPLP TABLE/VIEW UPDATE
DSN8BC3 COB DSN8BC3 COB 0 VPHONE TABLE DECLARE
DSN8BC3 COB DSN8BC3 COB 0 VPHONE TABLE/VIEW SELECT

Programs - Source - File Accesses

MainPgm MTyp SubPgm STyp Level DD-Name Access Method
DSN8BC3 COB DSN8BC3 COB 0 CARDIN CLOSE  
DSN8BC3 COB DSN8BC3 COB 0 CARDIN OPEN INPUT
DSN8BC3 COB DSN8BC3 COB 0 CARDIN READ  
DSN8BC3 COB DSN8BC3 COB 0 REPORT CLOSE  
DSN8BC3 COB DSN8BC3 COB 0 REPORT OPEN OUTPUT
DSN8BC3 COB DSN8BC3 COB 0 REPORT WRITE  

JCL - DSN

Program Jobname DD-Name DSN Mem/Gen. DIS LRECL BLKSZ RECF UNIT SPACE
DSN8BC3 DB2COB2 REPORT SYSH.XINFO.V4R0.DATA.DB2COB2.REPORT   NCC   23474 FB   TRK,(10,10),RLSE
DSN8BC3 DB2COB2 SYSTSIN *              
DSN8BC3 DB2COB2 CARDIN *              
DSN8BC3 DB2COB2# REPORT SYSH.XINFO.V4R0.DATA.DB2COB2.REPORT   NCC   23474 FB   TRK,(10,10),RLSE
DSN8BC3 DB2COB2# SYSTSIN *              
DSN8BC3 DB2COB2# CARDIN *              
DSN8BC3 DB2COB2T REPORT P390K.XINFO.V3R6.DATA.DB2COB2.REPORT.D&OYMD1   NCC   23474 FB   TRK,(10,10),RLSE
DSN8BC3 DB2COB2T SYSTSIN *              
DSN8BC3 DB2COB2T CARDIN *              
DSN8BC3 HJOB0029 REPORT SYSH.XINFO.V3R5.DATA.DB2COB2.REPORT   NCC   23474 FB   TRK,(10,10),RLSE
DSN8BC3 HJOB0029 SYSTSIN *              
DSN8BC3 HJOB0029 CARDIN *              

CICS - Transaction

Program CICS GROUP Tran TRANClas Status DATAloc DATAkey Action

JCL - EXEC Statements

Program Jobname SNr JobStep Procedur ProcStep Prg-Orig PARM REGION COND JCL-Lib
DSN8BC3 DB2COB2 2 PH02CS04     IKJEFT01     4,LT SYSH.IXJC.JOBLIB
DSN8BC3 DB2COB2# 2 PH02CS04     IKJEFT01     4,LT SYSH.IXJC.JOBLIB
DSN8BC3 DB2COB2T 2 PH02CS04     IKJEFT01     4,LT SYSH.IXJC.JOBLIB
DSN8BC3 HJOB0029 2 PH02CS04     IKJEFT01     4,LT SYSH.CTM.V919.JOBLIB

Scheduler - IWS z/OS - Run Cycles + Jobs

Jobname Application ID Period Rule Definition IATim DD DTime
DB2COB2 XINFODB2DEMO DAY   06:00:00 1 06:00:00
DB2COB2T XINFODB2DEMOT DAY   06:00:00 1 06:00:00