DML Precompile, PL/I Compile, and Link-Edit JCL › Compiling a PL/I Program › Under z/OS › Runtime Parameters

Runtime Parameters

To specify a dictionary or DMCL to access at runtime, you can include DICTNAME and DMCL parameters in a SYSIDMS DD statement in the JCL (see previous sample JCL).

Note: For more information about SYSIDMS runtime parameters, see the CA IDMS Common Facilities Guide.

Executing in Local Mode

IDMSDMLP (Local Mode) (z/OS)

//*****************************************************************
//**         PRECOMPILE PL/I PROGRAM          **
//*****************************************************************
//precomp EXEC PGM=IDMSDMLP,REGION=1024K,
//       PARM='optional parameters'
//STEPLIB DD  DSN=idms.dba.loadlib,DISP=SHR
//     DD  DSN=idms.custom.loadlib,DISP=SHR
//         DD DSN=idms.cagjload,DISP=SHR
//dictb  DD  DSN=idms.appldict.ddldml,DISP=SHR
//dcmsg  DD  DSN=idms.sysmsg.ddldcmsg,DISP=SHR
//sysjrnl DD  DSN=idms.tapejrnl,DISP=(NEW,CATLG),UNIT=tape
//SYS001  DD  UNIT=disk,SPACE=(TRK,(10,10))
//SYS002  DD  UNIT=disk,SPACE=(TRK,(10,10))
//SYS003  DD  UNIT=disk,SPACE=(TRK,(10,10))
//SYSPCH  DD  DSN=&&source,DISP=(NEW,PASS),
//       UNIT=disk,SPACE=(TRK,(10,5),RLSE),
//       DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SYSLST  DD  SYSOUT=A
//SYSIDMS DD  *
DMCL=dmcl-name
DICTNAME=dictionary-name
Other SYSIDMS parameters, as appropriate
/*
//SYSIPT  DD  *
PL/I DML source statements
/*
//*****************************************************************
//**         COMPILE PL/I PROGRAM            **
//*****************************************************************
//plicmp  EXEC PGM=IEL0AA,REGION=300K,
//       PARM='DECK,LIST,OFFSET,STORAGE,NOP'
//STEPLIB DD  DSN=sys1.pliopt,DISP=SHR
//SYSUT1  DD  UNIT=disk,SPACE=(1024,(200,50),,CONTIG,ROUND),
//       DCB=BLKSIZE=6144
//SYSPUNCH DD  DSN=&&object,DISP=(NEW,PASS),
//       UNIT=disk,SPACE=(TRK,(10,5),RLSE),
//       DCB=(RECFM=FB,LRECL=80,BLKSIZE=3120)
//SYSPRINT DD  SYSOUT=A
//SYSIN  DD  DSN=&&source,DISP=(OLD,DELETE)
//*****************************************************************
//**         LINK PROGRAM MODULE            **
//*****************************************************************
//link   EXEC PGM=HEWL,REGION=300K,PARM='LET,LIST,XREF'
//SYSUT1  DD  UNIT=disk,SPACE=(TRK,(20,5))
//SYSLIB  DD  DSN=sys1.plibase,DISP=SHR
//vanilla DD  DSN=idms.cagjload,DISP=SHR
//custom   DD DSN=idms.custom.loadlib,DISP=SHR
//SYSLMOD DD  DSN=idms.custom.loadlib,DISP=SHR
//SYSPRINT DD  SYSOUT=A
//SYSLIN  DD  DSN=&&object,DISP=(OLD,DELETE)
//     DD  *
 INCLUDE vanilla(IDMS)   Required, except omit for CICS
 INCLUDE vanilla(IDMSCANC) Required for BATCH and DC_BATCH
              if using IDMS_STATUS module
 INCLUDE custom(IDMSOPTI) optional; BATCH and DC_BATCH only
 INCLUDE custom(IDMSCINT) Required for CICS, otherwise omit
 ENTRY  userentry
 NAME  userprog(R)
/*
//*

dictdb

DDname of the application dictionary definition area

idms.appldict.ddldml

Dataset name of the application dictionary definition area

sysjrnl

DDname of the tape journal file

idms.tapejrnl

Dataset name of the tape journal file

tape

Symbolic device name

Note: For information about other variables, see the table following the JCL for central version.