Previous Topic: Step 2: Define Transaction and Programs to CICS

Next Topic: PLT Start-up List


Sample Job to Define CA View Transactions and Programs to CICS:
//EXAMPLE JOB .....                                                   
//*********************************************************************
//*     SAMPLE CICS JCL TO DEFINE PROGRAMS AND SAMPLE TRANSACTIONS    *
//*     FOR CA VIEW XMS INTERFACE                                     *
//*                                                                   *
//*  NOTE:                                                            *
//*    UPDATE PROCEDURE SUBSTITUTIONAL PARAMETERS FOR                 *
//*    'CICSLOAD' AND 'CICSCSD' ACCORDING TO SITE STANDARDS.          *
//*                                                                   *
//*    MANUAL CHANGES ARE REQUIRED IN THIS JOB STREAM                 *
//*    TO UPDATE SYSIN PORTIONS BEYOND THE CONTROL                    *
//*    OF THE PROCEDURE'S SUBSTITUTIONAL PARAMETERS.                  *
//*                                                                   *
//*    EDIT GROUP(GGGGGG) WHERE GGGGGG IS THE CICS DEFINED GROUP      *
//*    FOR YOUR CA VIEW CICS DEFINITIONS.                             *
//*                                                                   *
//*********************************************************************
//*                                                                   
//CICSXMS  PROC CICSLOAD='CICS.SDFHLOAD',                             
//             CICSCSD='CICS.DFHCSD'                                  
//*********************************************************************
//*    DEFINE SAMPLE VIEW TRANSACTION: VW1                            *
//*    DEFINE SERVICE TRANSACTION:     XMC0                           *
//*    DEFINE OPTIONAL STARTUP TRANSATION:   VWI                      *
//*    DEFINE OPTIONAL TERMINATE TRANSATION: VWX                      *
//*    DEFINE CA VIEW CICS RETRIEVAL PROGRAMS:                        *
//*        EC0CICUX                                                   *
//*        EC0XMCIC                                                   *
//*        EC0CINIT                                                   *
//*        EC0CISRV                                                   *
//*        EC0CIEND                                                   *
//*        EC0C0620                                                   *
//*        EC0C0621                                                   *
//*        EC0C0622                                                   *
//*        EC0C0630                                                   *
//*        EC0C0640                                                   *
//*        EC0C0650                                                   *
//*        EC0C0660                                                   *
//*        EC0C0670                                                   *
//*        EC0C0680                                                   *
//*                                                                   *
//*    ** OPTIONAL **                                                 *
//*    DEFINE YOUR SITE SPECIFIC VIEW TRANSACTION. USE THE DEFINE     *
//*    STATEMENTS FOR THE SAMPLE VW1 TRANSACTION AS YOUR MODEL.       *
//*                                                                   *
//*    THE FOLLOWING PARAMETERS DEFINE VIEW TRANSACTION ID: VWC0      *
//*                                                                   *
//*    DEFINE TRANS(VWC0) GROUP(GGGGGG) PROG(EC0XMCIC)                *
//*      TASKDATAL(ANY) TASKDATAK(CICS)                               *
//*                                                                   *
//*    WHERE GGGGGG IS THE CICS DEFINED GROUP FOR YOUR                *
//*    CA VIEW CICS DEFINITIONS.                                      *
//*********************************************************************
//STEP1  EXEC PGM=DFHCSDUP,REGION=1024K                               
//STEPLIB  DD DSN=&CICSLOAD,DISP=SHR                                  
//DFHCSD   DD DSN=&CICSCSD,DISP=SHR                                   
//SYSPRINT DD SYSOUT=*                                                
//SYSIN    DD DUMMY                                                   
//*                                                                   
//  PEND                                                              
//CICSXMS EXEC CICSXMS                                                
//STEP1.SYSIN DD *                                                    
DEFINE TRANS(VW1) GROUP(GGGGGG) PROG(EC0XMCIC)                        
  TASKDATAL(ANY) TASKDATAK(CICS)                                      
DEFINE TRANS(XMC0) GROUP(GGGGGG) PROG(EC0CISRV)                       
  TASKDATAL(ANY) TASKDATAK(CICS)                                      
DEFINE TRANS(VWI) GROUP(GGGGGG) PROG(EC0CINIT)                        
  TASKDATAL(ANY) TASKDATAK(CICS)                                      
DEFINE TRANS(VWT) GROUP(GGGGGG) PROG(EC0CIEND)                        
  TASKDATAL(ANY) TASKDATAK(CICS)         
DEFINE PROG(EC0CICUX) GROUP(GGGGGG) LANGUAGE(ASSEMBLER)               
  DATALOCATION(ANY) EXECKEY(CICS)                                     
DEFINE PROG(EC0XMCIC) GROUP(GGGGGG) LANGUAGE(ASSEMBLER)               
  DATALOCATION(ANY) EXECKEY(CICS)                                     
DEFINE PROG(EC0CISRV) GROUP(GGGGGG) LANGUAGE(ASSEMBLER)               
  DATALOCATION(ANY) EXECKEY(CICS)                                     
DEFINE PROG(EC0CINIT) GROUP(GGGGGG) LANGUAGE(ASSEMBLER)               
  DATALOCATION(ANY) EXECKEY(CICS)                                     
DEFINE PROG(EC0CIEND) GROUP(GGGGGG) LANGUAGE(ASSEMBLER)               
  DATALOCATION(ANY) EXECKEY(CICS)                           
DEFINE PROG(EC0C0620) GROUP(GGGGGG) LANGUAGE(ASSEMBLER)               
  DATALOCATION(ANY) EXECKEY(CICS)                                     
DEFINE PROG(EC0C0621) GROUP(GGGGGG) LANGUAGE(ASSEMBLER)               
  DATALOCATION(ANY) EXECKEY(CICS)                                     
DEFINE PROG(EC0C0622) GROUP(GGGGGG) LANGUAGE(ASSEMBLER)               
  DATALOCATION(ANY) EXECKEY(CICS)                                     
DEFINE PROG(EC0C0630) GROUP(GGGGGG) LANGUAGE(ASSEMBLER)               
  DATALOCATION(ANY) EXECKEY(CICS)                                     
DEFINE PROG(EC0C0640) GROUP(GGGGGG) LANGUAGE(ASSEMBLER)               
  DATALOCATION(ANY) EXECKEY(CICS)                                     
DEFINE PROG(EC0C0650) GROUP(GGGGGG) LANGUAGE(ASSEMBLER)               
  DATALOCATION(ANY) EXECKEY(CICS)  
DEFINE PROG(EC0C0660) GROUP(GGGGGG) LANGUAGE(ASSEMBLER)               
  DATALOCATION(ANY) EXECKEY(CICS)                                     
DEFINE PROG(EC0C0670) GROUP(GGGGGG) LANGUAGE(ASSEMBLER)               
  DATALOCATION(ANY) EXECKEY(CICS)                                     
DEFINE PROG(EC0C0680) GROUP(GGGGGG) LANGUAGE(ASSEMBLER)               
  DATALOCATION(ANY) EXECKEY(CICS)                                     
/*                                                                    
CICS Resource Definition Online Storage Protection

If you have CICS storage protection activated, the following resource definition online settings are required: