Need to add a load module to Endevor and the C1BM3000 job is not working correctly.
search cancel

Need to add a load module to Endevor and the C1BM3000 job is not working correctly.

book

Article ID: 13015

calendar_today

Updated On:

Products

Endevor Endevor Natural Integration Endevor - ECLIPSE Plugin Endevor - Enterprise Workbench

Issue/Introduction

When I try to add a load module to Endevor the utility C1BM3000 is not doing what I need.

What has to be modified/added to Endevor to allow me to add a load module?

Environment

Release: All Supported Releases

Resolution

There is no direct utility to allow you to add a load module to Endevor.  To do this multiple pieces that have to be modified:  the type definition, processor group definition and the processor that is called.  

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 

This is an example of a loadonly type definition.  Remember that this must be done for both stage 1 and 2.

 

DISPLAY ----------------------  TYPE DEFINITION  ------------------------------

COMMAND ===>                                                                  

CURRENT ENV:  environ    STAGE ID:  1   SYSTEM:  system    TYPE:  LOADONLY    

NEXT ENV   :  environ       STAGE ID:  2   SYSTEM:  system    TYPE:  LOADONLY                                                                                  

DESCRIPTION:  ===> INCLUDE TESTING                                             

UPDATED:           28JUL06 13:57 BY ########                                    

             -----------------  ELEMENT OPTIONS  -------------------           

DELTA FORMAT(F/R/I/L) ===> F        SOURCE LEN   ===> 80         ELE RECFM(N/F/V) ===> N

COMPRESS/ENCRYPT(Y/N) ===> Y     COMPARE FROM ===> 1        DFLT PROC  ===> LOADONLY

AUTO CONSOL (Y/N)     ===> Y         COMPARE TO   ===> 80         LANGUAGE   ===> DATA    

CONSOL AT LVL  ===> 96                 REGRESSION   ===> 50         PV/LB LANG ===> DATA    

LVLS TO CONSOL ===> 50                REG SEV(I/W/C/E)  ===> I    DATA FORMAT(T/B) ===> T

HFS RECFM(COMP/CR/CRLF/CRNL/F/LF/NL/V)     ===> NL     FILE EXT   ===>         

         -----------------  COMPONENT LIST OPTIONS  ------------------         

FWD/REV DELTA(F/R)    ===> F  AUTO CONSOL (Y/N)      Y    CONSOL AT LVL       96  

                                                                                           LVLS TO CONSOL      50  

         -------------------------  LIBRARIES  -----------------------         

  BASE/IMAGE LIBRARY ===> iprfx.iqual.TEST.BASE1                               

  DELTA LIBRARY          ===> iprfx.iqual.TEST.DELTA1                              

  INCLUDE LIBRARY       ===>                                                      

  SOURCE O/P LIBRARY ===> iprfx.iqual.SOL1                                     

    EXPAND INCLUDES(Y/N)  ===> N                          

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 

 

Define the processor group defintion:

CURRENT ENV:  environ       STAGE ID:  1   SYSTEM:  system    TYPE:  LOADONLY

NEXT    ENV:  environ       STAGE ID:  2   SYSTEM:  system    TYPE:  LOADONLY

                                                                           

PROCESSOR GROUP:     LOADONLY      PROCESSOR O/P TYPE: LOADONLYLOADONLY    

DESCRIPTION:         TESTCASE PROCESSOR                                    

NEXT PRCS GROUP:     LOADONLY                                              

                                                                           

UPDATED:             28JUL06 13:12 BY ########                              

                                                                           

-----------------------  OUTPUT MANAGEMENT INFORMATION  -------------------

                                                                           

PROCESSOR TO USE FOR MOVE           ACTION:     M (M/G)                          

PROCESSOR TO USE FOR TRANSFER    ACTION:     G (M/G)                          

                                                                           

       S - Browse Symbolics                    L - List Processor          

                                                                           

                                     FOREGROUND EXECUTION                  

   GENERATE PROCESSOR:     LOADONLY     :     Y (Y/N)                      

   DELETE PROCESSOR:         *NOPROC*     :     Y (Y/N)                      

   MOVE PROCESSOR:            LOADONLY     :     Y (Y/N)                      

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - 

This is the processor that will be used in both the add and move processors.

********************************* Top of Data *******************

//***************************************************************

//**   LOAD MODULE PROCESSOR FOR THE GENERATE                  **
//***************************************************************

//LOADONLY  PROC  LOADSRC='iprfx.iqual.LOAD',               

//                LOADTGT='iprfx.iqual.LOADLIB1',               

//                LISTSRC='iprfx.iqual.LISTING',                

//                LISTTGT='iprfx.iqual.LISTING1',               

//                PGM=BSTCOPY                                    

//*                                                              

//***************************************************************

//INIT  EXEC  PGM=BC1PDSIN                                       

//C1INIT01    DD  DISP=(,PASS),DSN=&&COPYOUT,                    

//            UNIT=SYSDA,SPACE=(TRK,(1,1)),                      

//            DCB=(RECFM=FBA,LRECL=121,BLKSIZE=6171,DSORG=PS)    

//SYSPRINT    DD  SYSOUT=*                                       

//SYSOUT      DD  SYSOUT=*                                       

//*                                                              

//***************************************************************

//IF1   IF  ((&C1ACTION=ADD) OR (&C1ACTION=UPDTE)) THEN          

//ADD     EXEC PGM=&PGM                                          

//SYSPRINT    DD  SYSOUT=*                                       

//SYSOUT      DD  SYSOUT=*                                       

//SYSUT3      DD  UNIT=SYSDA,SPACE=(TRK,(1,5))                   

//SYSUT4      DD  UNIT=SYSDA,SPACE=(TRK,(1,5))                   

//INDD        DD  DSN=&LOADSRC,DISP=SHR                          

//OUTDD       DD  DSN=&LOADTGT,DISP=SHR                          

//SYSIN       DD  *                                              

  COPY O=OUTDD,I=INDD                                            

  SELECT MEMBER=((&C1USRMBR,&C1ELEMENT,R))                       

//END1  ENDIF                                                    

//*                                                              

//***************************************************************

//IF2  IF ((&C1ACTION=TRANSFER) OR (&C1ACTION=MOVE)) THEN        

//TRANSFER EXEC PGM=&PGM                        

//SYSPRINT    DD  DSN=&&COPYOUT,DISP=(OLD,PASS) 

//SYSOUT      DD  SYSOUT=*                      

//SYSUT3      DD  UNIT=SYSDA,SPACE=(TRK,(1,5))  

//SYSUT4      DD  UNIT=SYSDA,SPACE=(TRK,(1,5))  

//INDD        DD  DSN=&LOADSRC,DISP=SHR         

//OUTDD       DD  DSN=&LOADTGT,DISP=SHR         

//SYSIN       DD  *                             

  COPY O=OUTDD,I=INDD                           

  SELECT MEMBER=((&C1USRMBR,&C1ELEMENT,R))      

//END1  ENDIF                                   

//*        

The way this works is the load library member is analyzed and the information

from that member  is then added into Endevor Base/delta as the source code.

After the source has been added the processor is then run to move or add

the loadmodule into a controlled Endevor load library.                                

Additional Information

To find more information for defining a type definition:
https://techdocs.broadcom.com/us/en/ca-mainframe-software/devops/ca-endevor-software-change-manager/19-0/installing/implementation-and-customization/defining-maps-and-inventory-structures/defining-inventory-structures/defining-types.html

To find more information for add / move / delete processors:
https://techdocs.broadcom.com/us/en/ca-mainframe-software/devops/ca-endevor-software-change-manager/19-0/administrating/processors/sample-processors.html