Previous Topic: z/OS JCLNext Topic: Central Version Modifications


Running in Local Mode

JCL for executing CA IDMS reports in local mode is shown as follows.

CULPRIT (z/OS)

//CULPRIT  EXEC PGM=CULPRIT,REGION=1024K
//STEPLIB  DD   DSN=idms.dba.loadlib,DISP=SHR
//         DD   DSN=idms.custom.loadlib,DISP=SHR
//         DD   DSN=idms.cagjload,DISP=SHR
//SORTLIB  DD   DSN=sys1.sortlib,DISP=SHR
//SYSOUT   DD   SYSOUT=A
//SYSPRINT DD   SYSOUT=A
//SORTPRNT DD   SYSOUT=A
//SORTMSG  DD   SYSOUT=A
//SYS004   DD   SYSOUT=A,DCB=(RECFM=FBA,LRECL=133,BLKSIZE=1330)
//SYS005   DD   DSN=&&SPRMWORK.,DISP=(NEW,DELETE),
//             UNIT=disk,SPACE=(CYL,(5,2)),
//             DCB=(RECFM=FB,LRECL=320,BLKSIZE=1600)
//SYS006   DD   DSN=&&SEXTWORK.,DISP=(NEW,DELETE),
//             UNIT=disk,SPACE=(CYL,(5,2)),
//             DCB=(RECFM=VB,LRECL=2044,BLKSIZE=4628)
//SYS007   DD   DSN=&&SRTPWORK.,DISP=(NEW,DELETE),
//             UNIT=disk,SPACE=(TRK,(1,1)),
//             DCB=(RECFM=F,LRECL=80,BLKSIZE=80)
//SYS008   DD   DSN=&&NSRTWORK.,DISP=(NEW,DELETE),
//             UNIT=disk,SPACE=(CYL,(5,2)),
//             DCB=(RECFM=VB,LRECL=512,BLKSIZE=4628)
//SORTWK01 DD   DSN=&&WRKAWORK.,
//             UNIT=disk,SPACE=(CYL,(5,2))
//SORTWK02 DD   DSN=&&WRKBWORK.,
//             UNIT=disk,SPACE=(CYL,(5,2))
//SORTWK03 DD   DSN=&&WRKCWORK.,
//             UNIT=disk,SPACE=(CYL,(5,2))
//SORTWK04 DD   DSN=&&WRKDWORK.,
//             UNIT=disk,SPACE=(CYL,(5,2))
//CULSRT1I DD   *
SORT FIELDS=(1,69,A),FORMAT=BI
RECORD TYPE=F,LENGTH=(320,,320)
/*
//SYSIN4   DD   DUMMY,DCB=BLKSIZE=80
//VSAMCTRL DD   DUMMY
//CULLIB   DD   DSN=yourHLQ.CAGJSRC,DISP=SHR
//SYS002   DD   DSN=user.keyfile,DISP=SHR
//SYS010   DD   DSN=user.inputfil,DISP=OLD,
//             UNIT=tape,VOL=SER=vvvvvv
//SYS020   DD   DSN=user.nonprint,DISP=(NEW,CATLG),
//             UNIT=tape,VOL=SER=vvvvvv,
//             DCB=(DSORG=PS,LRECL=llll,BLKSIZE=bbbb)
//dictdb   DD   DSN=idms.appldict.ddldml,DISP=SHR
//dloddb   DD   DSN=idms.appldict.ddldclod,DISP=SHR
//dccat    DD   DSN=idms.appldict.ddlcat,DISP=SHR
//dccatx   DD   DSN=idms.appldict.ddlcatx,DISP=SHR
//dccatl   DD   DSN=idms.appldict.ddlcatlod,DISP=SHR
//dirldb   DD   DSN=idms.sysdirl.ddldml,DISP=SHR
//dcmsg    DD   DSN=idms.sysmsg.ddldcmsg,DISP=SHR
//asfdml   DD   DSN=idms.asfdict.ddldml,DISP=SHR
//asflod   DD   DSN=idms.asfdict.ddldclod,DISP=SHR
//asfdefn  DD   DSN=idms.asfdict.asfdefn,DISP=SHR
//asfdata  DD   DSN=idms.asfdict.asfdata,DISP=SHR
//sysjrnl  DD   DUMMY
//syspch   DD   SYSOUT=B,DCB=BLKSIZE=80
/*
//SYSIDMS  DD   *
DMCL=dmcl-name
Other SYSIDMS parameters, as appropriate
/*
//SYSIN    DD   *
 CULPRIT parameters
/*
//*

appldict

Name of the application dictionary

asfdata

DDname of the ASF data (IDMSR-AREA2) area; required to execute IREPORTs

ASFDEFN

DDname of the ASF data definition (IDMSR-AREA) area; required to execute IREPORTs

asfdml

DDname of the ASF dictionary definition (DDLDML) area; required to execute IREPORTs

asflod

DDname of the ASF dictionary definition load (DDLDCLOD) area; required to execute IREPORTs

bbbb

Blocksize of the file

dcmsg

DDname of the system message (DDLDCMSG) area

dictdb

DDname of the application dictionary definition area

dirldb

DDname of the IDMSDIRL definition (DDLDML) area; to execute A, C, and DREPORTs, use a dictionary built by IDMSDIRL

disk

Symbolic device name for work files

dloddb

DDname of the application dictionary definition load area; required for CREPORT 053

dccat

DDname of the SQL application dictionary catalog (DDLCAT) area

ddcatx

DDname of the SQL application dictionary catalog index (DDLCATX) area

ddcatl

DDname of the SQL application dictionary catalog load (DDLCATLOD) area

dmcl-name

Name of the DMCL used by the central version

idms.appldict.ddldclod

Data set name of the application dictionary definition load (DDLDCLOD) area; required for CREPORT 053

idms.appldict.ddldml

Data set name of the application dictionary definition (DDLDML) area

idms.asfdict.asfdata

Data set name of the ASF data (IDMSR-AREA2) area; required for IREPORTs

idms.asfdict.asfdefn

Data set name of the ASF data definition (IDMSR-AREA) area; required for IREPORTs

idms.asfdict.ddldclod

Data set name of the ASF data definition load (DDLDCLOD) area; required for IREPORTs

idms.asfdict.ddldml

Data set name of the ASF dictionary definition (DDLDML) area; required for IREPORTs

idms.custom.loadlib

Data set name of the load library containing customized CA IDMS executable modules

idms.dba.loadlib

Data set name of the load library containing the DMCL and database name table load modules

idms.cagjload

Data set name of the load library containing the CA IDMS executable modules that do not require customization

yourHLQ.CAGJSRC

Data set name of PDS containing parameters to be copied (necessary only if USE, =COPY, or =MACRO features are being used)

yourHLQ.CAGJSRC(sort1)

Data set name and member name of stored sort parameters, as established during installation

idms.sysdirl.ddldml

Data set name of the IDMSDIRL definition (DDLDML) area

idms.sysmsg.ddldcmsg

Data set name of the system message (DDLDCMSG) area

sysdirl

Name of the IDMSDIRL dictionary

sysjrnl

DDname of the tape journal file

syspch

Punched card output (required for DREPORT 051 and CREPORT 051, omitted otherwise)

sys1.sortlib

Data set name of system sort library

tape

Symbolic device name for tape file

user.inputfil

Data set name for primary input file (required for JREPORT and SREPORT runs)

user.keyfile

Data set name of a key file (necessary only if a keyfile is input)

user.nonprint

Data set name for nonprint/nonpunch output (required for SREPORT 099, DREPORT 052, CREPORT 052; omitted otherwise)

vvvvvv

Volume serial number

Note: If the user's subschema is not in the CA IDMS/DB load library, then the load library that contains the module must also be included in the STEPLIB concatenation when running in local mode.