Writing an edit routine in PL/I for VM with language environment (LE)

The QMF edit exit interface for PL/I in CMS with LE consists of these parts:

• Interface control block, which is shipped with QMF as DXEECSP
• Control program, which is shipped with QMF as DSQUXILE
• Dynamic loaded LE preinitialization service program, which is named CEEPIPI
• Your edit exit program, which is named DSQUXDT

Figure 169 shows the program structure of a PL/I edit exit routine in CMS.

Figure 169. Program structure of a PL/I edit exit routine with LE

Generating your PL/I program for LE

Before you can create your DSQUEDIT module file, ensure that you can access the IBM-supplied module DSQUXILE. This module is located on the production disk. You need to access this disk prior to creating the module file. Use the CMS LOAD and GEMOD commands as follows:

1. Load the text files that make up the DSQUEDIT module.

   The DSQUEDIT module must be relocatable. To be relocatable, the module must be loaded with RLD entries. Do this by specifying the RLDSAVE option on the CMS/LOAD command. The entry point to the DSQUEDIT module must be DSQUXILE. LE text libraries must be made available by using a CMS GLOBAL TXTLIB command:

   GLOBAL TXTLIB SCEELKED
   LOAD DSQUXILE DSQUXDT ( RLDSAVE RESET DSQUXILE

   You can run your edit routine in either 24-bit or 31-bit addressing mode. QMF manages address switching as required. You can specify 31-bit addressing on the CMS LOAD command:

   GLOBAL TXTLIB SCEELKED
   LOAD DSQUXILE DSQUXDT ( RLDSAVE RESET DSQUXILE AMODE 31 RMODE ANY

2. Generate the DSQUEDIT module. Issue the CMS GENMOD command to generate the DSQUEDIT module from the text files just loaded by the CMS LOAD command:

   GENMOD DSQUEDIT

An example procedure statement specifying parameters is as follows:

DSQUXDT:
    PROCEDURE(DXEECSF,ECSINPTF,ECSRSLTF) OPTIONS(REENTRANT);