Defining CICS® resources

About this task

You must define one transaction, one profile, one map, and two programs to CICS®.
Remember: You must define a profile to use with the SAPI transaction in order to turn off upper case translation

Procedure

To define the resources appropriately, do the following steps:

  1. Use RDO to define the SAPI transaction to CICS.
    For example: 
    DEFINE TRANSACTION(SAPI) GROUP(ODSAPI)                                  
DESCRIPTION(ONDEMAND CICS DRIVER TRANSACTION)                  
       PROGRAM(ARSZDAPC) TWASIZE(0) PROFILE(ARSPNOUC) STATUS(ENABLED)  
       TASKDATALOC(ANY) TASKDATAKEY(USER) STORAGECLEAR(NO)             
       RUNAWAY(SYSTEM) SHUTDOWN(DISABLED) ISOLATE(YES) DYNAMIC(NO)     
       PRIORITY(1) TRANCLASS(DFHTCL00) DTIMOUT(NO) INDOUBT(BACKOUT)    
       RESTART(NO) SPURGE(NO) TPURGE(NO) DUMP(YES) TRACE(YES)          
       CONFDATA(NO) RESSEC(NO) CMDSEC(NO)
  2. Use RDO to define the SAPI profile to CICS.
    For example: 
    DEFINE PROFILE(ARSPNOUC) GROUP(ODSAPI)                     
DESCRIPTION(ONDEMAND PROFILE)
      UCTRAN(NO)
  3. Use RDO to define the stub and CICS Driver program to CICS.
    For example: 
    DEFINE PROGRAM(ARSAPIIC) GROUP(ODSAPI)                                  
DESCRIPTION(ONDEMAND C STUB) LANGUAGE(C) RELOAD(NO) RESIDENT(NO) USAGE(NORMAL) 
  USELPACOPY(NO) STATUS(ENABLED) CEDF(YES) DATALOCATION(ANY) EXECKEY(USER) 
  EXECUTIONSET(FULLAPI) 
*                                                                  
DEFINE PROGRAM(ARSZDAPC) GROUP(ODSAPI)                             
DESCRIPTION(ONDEMAND CICS DRIVER) LANGUAGE(COBOL) RELOAD(NO) RESIDENT(NO) 
  USAGE(NORMAL) USELPACOPY(NO) STATUS(ENABLED) CEDF(YES) DATALOCATION(ANY)  
  EXECKEY(USER) EXECUTIONSET(FULLAPI)                         
*
  4. Use RDO to define the map to CICS.
    For example: 
    DEFINE MAPSET(ARSZMP1M) GROUP(ODSAPI)                            
DESCRIPTION(ONDEMAND DRIVER MAP)                 
       RESIDENT(NO) USAGE(NORMAL) USELPACOPY(NO) STATUS(ENABLED)