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.
|
Copyright © 2013 CA.
All rights reserved.
|
|