Introduction to the IBM Application Development Tools on z/OS and OS/390

Appendix A. Supporting information 477

End

End

“LMDList ListID(“DataID”) Option(Free)”

intRCode = RC

“LMDFree ListID(“DataID”)”

intRCode = RC

Final: Exit

Components of the Trader application

Table A-1 lists all of the components of the Trader application. Refer to Appendix

C for instructions to download these from the Web.

Table A-1 Components used in the making of this redbook

Name Description

Source code in DEMOS.PDPAK.SOURCE

MYTRADMV COBOL CICS main routine (VSAM)

MYTRADS COBOL CICS subroutine (VSAM)

MYTRADMD COBOL CICS DB2 main routine

MYTRADD COBOL CICS DB2 subroutine

MYTRADMI COBOL CICS IMS main routine

MYTRADI COBOL CICS IMS subroutine

TRADERB Batch COBOL for VSAM data

TRADERD Batch COBOL for DB2 data

TRADERI Batch COBOL for IMS data

Copybooks in DEMOS.PDPAK.COPYLIB

COMPFILE Record layout for the VSAM Company file

COMPANY DCLGEN for the Company table

CUSTOMER DCLGEN for the Customer table

CUSTFILE Record layout for the VSAM Customer file

NEWTRAD BMS Map for the Trader application

TRANFILE Record layout for the sequential Transaction file

478 IBM Application Development Tools for z/OS and OS/390

Check to insure that all the required data sets are generated.

Table A-2 List of data sets included in the zip file

PCB IMS PCB model

DLIUIB IMS DLIUIB without level 01

DLI IMS standard declarations

DLICUST Layouts for both segments of the CUSTOMER

database

DLICOMP Layouts for the segment of the COMPANY

database

Samples in DEMOS.PDPAK.SAMPLES

$README Information about the contents of the data set

CONTACTS Sample contacts file used with the Fault Analyzer

REXX user exit, WAKUP3AM

MYTRADD COBOL subroutine with errors used in Scenario 3

(DB2 data)

SAMPFIL1 Sample file with errors used in Scenario 1

SENDIT2 Fault Analyzer REXX user exit to send abends to

different fault history files

SEQ2PDS1 Sample REXX routine to take multiple sequential

files and create members of a PDS

TRADERB COBOL batch program with errors used in

Scenario 2 (VSAM data)

TRANFILE Sample records used to create the transaction file

WAUP3AM Fault Analyzer REXX user exit to send e-mail after

an abend

Name Description

Company file (Sequential) DEMOS.PDPAK.COMPANY

Customer file (Sequential) DEMOS.PDPAK.CUSTOMER

Transaction file DEMOS.PDPAK.SAMPLES(TRANFILE)

COBOL compiler listings DEMOS.PDPAK.COBLIST

Name Description

Appendix A. Supporting information 479

Debug Tool side files DEMOS.PDPAK.DT.SIDEFILE

Fault Analyzer side files DEMOS.PDPAK.FA.SIDEFILE

JCL DEMOS.PDPAK.JCL

Load library DEMOS.PDPAK.LOAD

BMS Maps DEMOS.PDPAK.MAPS

Name Description

480 IBM Application Development Tools for z/OS and OS/390