CA IDMS IUA EIUA

CA Tuesday Tip: (CA IDMS) Creating the UCF front-end system table RHDCFSTB

  • 1.  CA Tuesday Tip: (CA IDMS) Creating the UCF front-end system table RHDCFSTB

    Posted 06-02-2014 07:26 PM
    CA IDMS Tuesday Tip by Ian Hill, Principal Support Engineer for June 3, 2014
     
    There are a number of errors and omissions in the System Operations Guide section UCF Back-End on how to create a UCF front-end system table, and there is no example in the install libraries. A technical document, TEC611398 has recently been published to clarify what is required. Below is a sample job to create the UCF front-end system table.
    Note the following differences from the System Operations Guide sections Sample System Table Definition and System Table JCL
    • There should be a line #MOPT CSECT=RHDCFSTB,ENV=USER at the beginning.
    • The value of CNT= should match exactly the number of #FESTENT entries.
    • There should be an ENTRY equal to the label on the #FESTDEF clause (in this example, FESTABLE).
    • The NAME in the link-edit should match the label on the CSECT and ideally should be RHDCFSTB.
    //ASMCL     EXEC HLASMCL                                     
    //C.SYSLIB  DD DISP=SHR,DSN=<your.zOS.maclib>                     
    //          DD DISP=SHR,DSN=<your.IDMS.maclib> 
    //C.SYSIN   DD *                                             
             #MOPT CSECT=RHDCFSTB,ENV=USER                       
             COPY #UCFDS                                         
    RHDCFSTB CSECT                                               
    FESTABLE #FESTDEF CNT=5                                      
             #FESTENT FESID=BATCH                                
             #FESTENT FESID=TSO                                  
             #FESTENT FESID=CICS                                 
             #FESTENT FESID=BATCBULK,BLKSIZ=12000                
             #FESTENT FESID=CICPBULK,BLKSIZ=2000                 
             END FESTABLE                                        
    //L.SYSLMOD  DD DISP=SHR,DSN=<your.IDMS.custom.loadlib>           
    //L.SYSIN   DD *                                             
     ENTRY FESTABLE                                              
     NAME RHDCFSTB(R)                                            
    /*