Preparing the IDMS/SQL Environment

Before starting the server, it is necessary to perform the following pre-configuration procedures when preparing the environment on z/OS.

Customize the LKEDIDMS JCL

To relink the Adapter for IDMS/SQL with IDMS libraries, relink the load module DBTFOC by editing qualif.HOME.DATA(LKEDIDMS) and then submitting it. Editing instructions are provided in the same file.

//*        Job Card Goes Here                                         
//*                                                                   
//* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
//*Purpose: Linkedit IDMS API routines into IDMS Adapter              *
//*         This is required if you run applications that connect     * 
//*         to IDMS databases.                                        * 
//*                                                                   * 
//*Substitutions:                                                     * 
//*         In the SET statements for IDMSL, TARGET and HOME, replace * 
//*         bracketed descriptions with actual values.                * 
//*                                                                   * 
//*    TARGET library must be placed ahead of HOME library in         * 
//*    STEPLIB concatenation of IRUNJCL.                              * 
//* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
//        SET  IDMSL=<IDMS.PROD.EXP library>                   
//        SET  TARGET=<Library to receive relinked modules>             
//        SET  HOME=<Installation HOME.LOAD library>                  
//LKED    EXEC PGM=IEWL,PARM='DYNAM=DLL,CASE=MIXED,MAP,LIST=NOIMP'                               
//IDMSD   DD   DISP=SHR,DSN=&IDMSL                                    
//SYSLMIN DD   DISP=SHR,DSN=&HOME             
//SYSLMOD DD   DISP=SHR,DSN=&TARGET           
//SYSUT1   DD   UNIT=SYSDA,SPACE=(100,(50,50))
//SYSPRINT DD   SYSOUT=*                      
//SYSLIN   DD   *                             
  INCLUDE IDMSD(IDMSSQL)
  REPLACE IDMSSQL 
  INCLUDE SYSLMIN(IDQFOC)
  MODE AMODE(64),RMODE(ANY)
  ENTRY   CELQSTRT 
  NAME IDQFOC(R)                              
/*    

where: