0% found this document useful (0 votes)
76 views

XPED Jobis

This document is a JCL file that compiles and links a COBOL program. It specifies options for the COBOL compiler including listing, cross-reference, and debugging. It identifies libraries and copybooks used for the compile. The JCL then links the object code, specifying libraries used for the link.
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
0% found this document useful (0 votes)
76 views

XPED Jobis

This document is a JCL file that compiles and links a COBOL program. It specifies options for the COBOL compiler including listing, cross-reference, and debugging. It identifies libraries and copybooks used for the compile. The JCL then links the object code, specifying libraries used for the link.
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as TXT, PDF, TXT or read online on Scribd
You are on page 1/ 3

//C5LSK65F JOB (C5L,SK6,5,154060),'C5LSK6 COMPILE ',MSGLEVEL=(1,1), *

// CLASS=X,PRTY=4,MSGCLASS=Z,NOTIFY=C5LSK6,TIME=1
//*MAIN LINES=(040,C)
//*
//UCCSCR EXEC UCCSCR
//*
//*****************************************************
//* THIS IS A CICS ENTERPRISE COBOL COMPILE
//*
//* THE OPTIONS SELECTED FOR THIS COMPILE ARE:
//*
//* LIST() XREF()
//* INTERTEST() IBM-OPTIMIZER()
//* XPEDITER(S) IBM DEBUGGER()
//*
//* THE OPTIONS SELECTED FOR THIS LINKEDIT ARE:
//*
//* AMODE 24() RMODE 24()
//* NORENT()
//*
//* OTHER OPTIONS SELECTED FOR THIS JOB ARE:
//*
//* DBMS? ()
//* MQSERIES? (N)
//*
//*****************************************************
//***************************************************************
//* ENTERPRISE COBOL FOR BATCH AND ONLINE JCL *
//***************************************************************
//*
//***************************************************************
//* ENTERPRISE COBOL STEP *
//***************************************************************
//COBOL390 EXEC PGM=CWPCMAIN,REGION=8M 7
//STEPLIB DD DISP=SHR,DSN=SYS2.COBOL.SIGYCOMP
// DD DISP=SHR,DSN=FLDXCMN.TEST.SDFHLOAD RAS
// DD DISP=SHR,DSN=SYS1.MLCX800.SLCXLOAD
//SYSLIB DD DSN=SYS2.DUMMY.COPYBOOK,DISP=SHR
// DD DSN=FLDXCMN.PROD.SCSQCOBC,DISP=SHR MQSERIES
//* THERE ARE NO PROJECT COPYLIBS FOR THIS COMPILE
// DD DSN=FLDXCMN.TEST.SDFHCOB,DISP=SHR LNL CICS MACROS
// DD DSN=CICS.USERMAC,DISP=SHR LNL CICS MACROS
// DD DSN=FLDXDDN.DDCPYTRQ.DATA,DISP=SHR DBA TEST COPIES
// DD DSN=FLDXDDN.DDCOPYRQ.DATA,DISP=SHR DBA PROD COPIES
// DD DSN=FNNDVRN.PROD.PROD.SHARE000.CPYLIB,DISP=SHR SHR
//* DD DSN=FLDXDAN.DB2TCPRQ.DATA,DISP=SHR DB2 TEST COPIES
// DD DSN=FLDXDAN.DB2PCPRQ.DATA,DISP=SHR DB2 PROD COPIES
//* DD DSN=FLCRDVD.MDP.DEVL.MDARNDS.COPYLIB,DISP=SHR
//* DD DSN=FNNDVRN.DVLP.UNIT.LCSRM000.CPYLIB,DISP=SHR
//* DD DSN=FNNDVRN.DVLP.UNIT.LCSRM001.CPYLIB,DISP=SHR
//* DD DSN=FNNDVRN.DVLP.SYSTEM.LCSRM000.CPYLIB,DISP=SHR
//* DD DSN=FNNDVRN.DVLP.SYSTEM.LCSRM001.CPYLIB,DISP=SHR
//* DD DSN=FNNDVRN.UAT.ACCPT.LCSRM000.CPYLIB,DISP=SHR
//* DD DSN=FNNDVRN.UAT.ACCPT.LCSRM001.CPYLIB,DISP=SHR
//* DD DSN=FNNDVRN.UAT.PREPROD.LCSRM000.CPYLIB,DISP=SHR
//* DD DSN=FNNDVRN.UAT.PREPROD.LCSRM001.CPYLIB,DISP=SHR
// DD DSN=FNNDVRN.PROD.PROD.LCSRM000.CPYLIB,DISP=SHR
//* DD DSN=FNNDVRN.DVLP.UNIT.LDBA000.CPYLIB,DISP=SHR
//* DD DSN=FNNDVRN.DVLP.SYSTEM.LDBA000.CPYLIB,DISP=SHR
//* DD DSN=FNNDVRN.UAT.ACCPT.LDBA000.CPYLIB,DISP=SHR
//* DD DSN=FNNDVRN.UAT.PREPROD.LDBA000.CPYLIB,DISP=SHR
// DD DSN=FNNDVRN.PROD.PROD.LDBA000.CPYLIB,DISP=SHR
// DD DSN=CICSVS11.COBLIB,DISP=SHR PROD BMS MAPS
// DD DSN=FNDXMRN.PRODNFDA.COPY,DISP=SHR MPROD PROD COPYLB
//SYSPRINT DD SYSOUT=*,
// DCB=(LNL1.U3380.FBA133)
//SYSLIN DD DSNAME=&CMLOBJ,UNIT=SRTWRK,
// DISP=(MOD,PASS),SPACE=(CYL,(5,1)),
// DCB=(BLKSIZE=80,LRECL=80,RECFM=FB)
//SYSTERM DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSUT1 DD UNIT=SRTWRK,SPACE=(CYL,(1,1))
//SYSUT2 DD UNIT=SRTWRK,SPACE=(CYL,(1,1))
//SYSUT3 DD UNIT=SRTWRK,SPACE=(CYL,(1,1))
//SYSUT4 DD UNIT=SRTWRK,SPACE=(CYL,(1,1))
//SYSUT5 DD UNIT=SRTWRK,SPACE=(CYL,(1,1))
//SYSUT6 DD UNIT=SRTWRK,SPACE=(CYL,(2,2))
//SYSUT7 DD UNIT=SRTWRK,SPACE=(CYL,(2,2))
//SYSIN DD DSN=SYS2.COBOL.OPTLIB(CICS),DISP=SHR
// DD *
PROCESS CICS
/*
// DD DSN=C5LSK6.TEST.CO2C(STOEDE),DISP=SHR
//XUTILITY DD UNIT=SRTWRK,DISP=(MOD,PASS),SPACE=(CYL,(5,5)),
// DCB=(LNL1.U3380.FBA133)
//XSOURCE DD UNIT=SRTWRK,SPACE=(CYL,(5,5))
//XTABLE DD UNIT=SRTWRK,SPACE=(CYL,(5,5))
//CWPDDIO DD DISP=SHR,DSN=FLDXCMV.XPEDCICS.SYTA.SYMLIB
//CWPPRMO DD DISP=SHR,DSN=SYS2.MLCX800.SLCXCNTL(COBOL)
//CWPWRK0 DD BLKSIZE=19000,SPACE=(CYL,(9,9)),UNIT=SRTWRK
//CWPWRK1 DD BLKSIZE=19000,SPACE=(CYL,(9,9)),UNIT=SRTWRK
//CWPWRK2 DD BLKSIZE=19000,SPACE=(CYL,(9,9)),UNIT=SRTWRK
//CWPWRK3 DD BLKSIZE=19000,SPACE=(CYL,(9,9)),UNIT=SRTWRK
//CWPWRK4 DD BLKSIZE=19000,SPACE=(CYL,(9,9)),UNIT=SRTWRK
//CWPWRK5 DD BLKSIZE=19000,SPACE=(CYL,(9,9)),UNIT=SRTWRK
//CWPWRK6 DD BLKSIZE=19000,SPACE=(CYL,(9,9)),UNIT=SRTWRK
//CWPPRTI DD BLKSIZE=3200,SPACE=(CYL,(9,15)),UNIT=SRTWRK
//MSGPRINT DD SYSOUT=*
//CAIUT1 DD UNIT=SRTWRK,SPACE=(CYL,(2,2))
//CAIUT2 DD UNIT=SRTWRK,SPACE=(CYL,(2,2))
//*
//C9BEND EXEC PGM=USREND,PARM=0400,COND=(4,GE,COBOL390)
//*
//*
//***************************************************************
//* CICS LINK FOR ENTERPRISE COBOL AND ASSEMBLER *
//***************************************************************
//*
//C9CLNK EXEC PGM=IEWL,REGION=2M,
// PARM=(XREF,LET,LIST,MAP)
//CSQSTUB DD DSN=FLDXCMN.PROD.SCSQLOAD,DISP=SHR MQSERIES
//SYSUT1 DD UNIT=SRTWRK,SPACE=(CYL,(4,2))
//SYSPRINT DD SYSOUT=*
//SYSLIB DD DSN=SYS2.DUMMY.SYSLIB,DISP=SHR
//* THERE ARE NO CICS PROJECT SYSLIBS FOR THIS COMPILE
// DD DSN=SYS2.LANGENV.SCEELKED,DISP=SHR
// DD DSN=SYS0.CAI.CAILIB,DISP=SHR
// DD DSN=SYS0.CAI.CAILPA,DISP=SHR
// DD DSN=SYS0.COBOL.LIB,DISP=SHR
// DD DSN=FLCRCID.CGENSY2A.LOADLIB,DISP=SHR
// DD DSN=CICSVS11.LOADLIB,DISP=SHR
// DD DSN=FLDXCMN.TEST.SDFHLOAD,DISP=SHR
// DD DSN=CICS.PROD.LOADLIB,DISP=SHR
// DD DSN=CICS.USERMAC,DISP=SHR
//TSTLIB DD DSN=FLCRCID.CGENSY2A.LOADLIB,DISP=SHR
//SYSLMOD DD DSN=FLCRCID.CGENSY2A.LOADLIB,DISP=SHR
//URSLIB DD DSN=FNDXMRN.OLDLIBDA.LOAD,DISP=SHR
//SYSLIN DD DSN=&CMLOBJ,DISP=(OLD,PASS)
// DD *
INCLUDE SYSLIB(DFHECI)
ORDER DFHECI
ENTRY STOEDE
LIBRARY (DFHCBLI)
NAME STOEDE(R)
/*
//LNKEND EXEC PGM=USREND,PARM=0400,COND=(4,GE,C9CLNK)

You might also like