Implement an exit for the SCHEMA, SUBSCHEMA, IDD, or SYSGEN compilers.
search cancel

Implement an exit for the SCHEMA, SUBSCHEMA, IDD, or SYSGEN compilers.

book

Article ID: 53098

calendar_today

Updated On:

Products

IDMS IDMS - Database IDMS - ADS

Issue/Introduction

Description

The same exit (IDDUXIT) can be used by IDD as well as the SCHEMA,SUBSCHEMA,and SYSGEN compilers. This document provides the names of the modules that must be re-linked to implement this,along with link-edit statements to be used in re-linking the compilers.

Solution

The schema,subschema,sysgen & IDD compilers can all use exit IDDUXIT. Generally,implementing this should include link-editing the exit with both the batch & online versions of the compilers; the exit will not be loaded dynamically. This table lists the programs for each:

COMPILER      ONLINE         BATCH          
-----------    -----------   ----------
Schema         IDMSCHDC    IDMSCHEM 
Subschema      IDMSUBDC    IDMSUBSC
Sysgen         RHDCSGDC    RHDCSGEN
IDD            IDMSDDDC    IDMSDDDL

Following are the link-edit control statements to use in re-linking each of these.

IDMSCHDC:
   INCLUDE OBJLIB(IDMSFSED)
   INCLUDE OBJLIB(IDDSFEDC)
   INCLUDE OBJLIB(IDMSCHPT)
   INCLUDE OBJLIB(RHDCDATE)
   INCLUDE OBJLIB(IDDPRST)
   INCLUDE OBJLIB(IDDUXIT)
   ENTRY   IDMSFSED
   NAME    IDMSCHDC(R)
 
IDMSCHEM:
   INCLUDE OBJLIB(IDDSFEBT)
   INCLUDE OBJLIB(IDMSCHPT)
   INCLUDE OBJLIB(IDMSDATE)
   INCLUDE OBJLIB(IDMS)
   INCLUDE OBJLIB(IDDPRST)
   INCLUDE OBJLIB(IDDUXIT)
   ENTRY   IDMSENTR
   NAME    IDMSCHEM(R)
 
IDMSUBDC:
   INCLUDE OBJLIB(IDMSFSED)
   INCLUDE OBJLIB(IDDSFEDC)
   INCLUDE OBJLIB(IDMSUBPT)
   INCLUDE OBJLIB(RHDCDATE)
   INCLUDE OBJLIB(IDDUXIT)
   ENTRY   IDMSFSED
   NAME    IDMSUBDC(R)
 
IDMSUBSC:
   INCLUDE OBJLIB(IDDSFEBT)
   INCLUDE OBJLIB(IDMSUBPT)
   INCLUDE OBJLIB(IDMSDATE)
   INCLUDE OBJLIB(IDMS)
   INCLUDE OBJLIB(IDDUXIT)
   ENTRY   IDMSENTR
   NAME    IDMSUBSC(R)
 
RHDCSGDC:
   INCLUDE OBJLIB(IDMSFSED)
   INCLUDE OBJLIB(IDDSFEDC)
   INCLUDE OBJLIB(RHDCGNPM)
   INCLUDE OBJLIB(RHDCDATE)
   INCLUDE OBJLIB(IDDUXIT)
   ENTRY   IDMSFSED
   NAME    RHDCSGDC(R)
 
RHDCSGEN:
   INCLUDE OBJLIB(IDDSFEBT)
   INCLUDE OBJLIB(RHDCGNPM)
   INCLUDE OBJLIB(IDMSDATE)
   INCLUDE OBJLIB(IDMS)
   INCLUDE OBJLIB(IDDUXIT)
   ENTRY   IDMSENTR
   NAME    RHDCSGEN(R)
 
IDMSDDDC:
   INCLUDE OBJLIB(IDMSFSED)
   INCLUDE OBJLIB(IDDSFEDC)
   INCLUDE OBJLIB(IDDSPIDD)
   INCLUDE OBJLIB(RHDCDATE)
   INCLUDE OBJLIB(IDDUXIT)
   ENTRY   IDMSFSED
   NAME    IDMSDDDC(R)
 
IDMSDDDL:
   INCLUDE OBJLIB(IDDSFEBT)
   INCLUDE OBJLIB(IDDSPIDD)
   INCLUDE OBJLIB(IDMSDATE)
   INCLUDE OBJLIB(IDMS)
   INCLUDE OBJLIB(IDDUXIT)
   ENTRY   IDMSENTR
   NAME    IDMSDDDL(R)
 

Environment

Release:
Component: IDMS