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

Under z/VSE

Executing Under the Central Version

IDMSDMLP (z/VSE)

* step1
// EXEC PROC=IDMSLBLS
// UPSI b
// DLBL   idmspch,'temp.dmlp',0
// EXTENT  sys020,nnnnnn,,,ssss,llll
// ASSGN  sys020,DISK,VOL=nnnnnn,SHR
// EXEC   IDMSDMLP
DMCL=dmcl-name
DICTNAME=dictionary-name
Other optional SYSIDMS parameters
/*
PL/I DML source statements
/*
* step2
// DLBL   IJSYSIN,'temp.dmlp',0
// EXTENT  SYSIPT,nnnnnn
  ASSGN   SYSIPT,DISK,VOL=nnnnnn,SHR
// OPTION  CATAL,NODECK,NOSYM
 PHASE userprog,*
// EXEC   PL/I
* step3
  CLOSE   SYSIPT,SYSRDR
ENTRY (dmlp)
// EXEC   LNKEDT
/*

Note: You can define a SYSCTL file in the JCL to override the IDMSOPTI statement for the back-end system:

// DLBL  sysctl,'idms.sysctl',,DA
// EXTENT sys008,nnnnnn
// ASSGN  sys008,DISK,VOL=nnnnnn,SHR

IDMSLBLS

Procedure containing all of the file definitions required by the system

Note: For a complete listing of IDMSLBLS, see "IDMSLBLS procedure", later in this section.

b

Appropriate UPSI switch, 1-8 characters, if specified in the IDMSOPTI module

idmspch

Filename of dataset output from the DML precompiler

temp.dmlp

File ID of the dataset output from the DML precompiler

sys020

Logical unit assignment of DMLP output

nnnnnn

Volume serial identifier of appropriate disk volume

dmcl-name

Name of the DMCL to access at runtime

dictionary-name

Name of the dictionary to access at runtime

ssss

Starting track (CKD) or block (FBA) of disk extent

llll

Number of tracks (CKD) or blocks (FBA) of disk extent

userprog

Name of program in the library

dmlp

Name of PL/I DML module

sysctl

Filename of the SYSCTL file

idms.sysctl

File ID of the SYSCTL file

sys008

Logical unit assignment of the SYSCTL file