Running the Unload function

FPA runs the Unload function as a standard z/OS® batch job. You must specify an EXEC statement and DD statements that define the input and output data sets in your JCL.

Procedure

  1. Optional: Estimate the region size that is required to run the job.
  2. Specify the EXEC statement in the following format:
    //UNLOAD   EXEC PGM=HFPMAIN0,REGION=rrrrM,
    //         PARM='DBRCGRP=dbrcgrp,GSGNAME=gsgname,IMSPLEX=imsplex,
               IMSID=imsid'
    
    Parameter Description
    DBRCGRP= DBRCGRP is an optional 1- to 3-character parameter that specifies the identifier assigned to a group of DBRC instances (DBRC sharing group) that access the same RECON data set in the IMSplex.
    GSGNAME= GSGNAME is an optional 1- to 8-character parameter that specifies the global service group.
    IMSPLEX= IMSPLEX is an optional 1- to 5-character parameter that specifies the names of the IMSplex groups that share databases or message queues.
    IMSID= IMSID is an optional 1- to 8-character parameter that specifies the IMS system identification name.

    If you specify this parameter, FPA generates the buffers for temporary ESCD and SCD. When FPA issues a call to a randomizing module, register 11 contains the address of the temporary ESCD. FPA sets only the ESCDSCD field, which contains the address of SCD, in the temporary ESCD. Also, FPA sets only the SSCDIMID field, which contains the IMS system ID, in the temporary SCD. Other fields of temporary ESCD and temporary SCD cannot be referred to.

  3. Specify the DD statements to define input data sets and output data sets.
  4. Optional step. If you want to create an RDE during the FPA process, follow these steps:
    1. Activate Integrity Checker.

      To create a new RDE by using the Integrity Checker utility of IMS Library Integrity Utilities, follow the instructions in "Activating Integrity Checker" in the IMS Library Integrity Utilities User's Guide.

    2. Request that FPA creates an RDE by using the Integrity Checker utility of IMS Library Integrity Utilities.
      1. If you are to use a specific LIU global option module, specify the name of the LIU global option module in the LIUGOPT parameter of the FPA control statement (HFPSYSIN). You also need to specify DBRC=YES in the FPA JCL because Integrity Checker requires that DBRC be active.
      2. In the JOBLIB/STEPLIB DD statement, concatenate the following load module libraries.
        • The IMS Library Integrity Utilities load module library
        • The LIU global option modules (LIU@INST, LIU@imsi, or both)
  5. Run the JCL job.

Example

The following figure shows a JCL example for the UNLOAD command.

Figure 1. JCL example for the UNLOAD command
//******************************                                 
//**  UNLOAD THE AREA(S)      **                                 
//******************************                                 
//UNLOAD   EXEC PGM=HFPMAIN0
//*                                                              
//STEPLIB  DD DISP=SHR,DSN=HPFP.SHFPLMD0                         
//         DD DISP=SHR,DSN=IMSVS.SDFSRESL                        
//         DD DISP=SHR,DSN=IMSVS.PGMLIB                          
//IMSACB   DD DISP=SHR,DSN=IMSVS.ACBLIB                          
//IMSRESLB DD DISP=SHR,DSN=IMSVS.SDFSRESL                        
//HFPPRINT DD SYSOUT=A                                           
//HFPRPTS  DD SYSOUT=A                                           
//*                                                              
//HFPSYSIN DD *                                                  
  GLOBAL DBRC=NO                                                 
  UNLOAD                                                         
      DBD=IVPDB3                                             
/*                                                               
//DFSIVD3A  DD DISP=OLD,DSN=IMSVS.DFSIVD31      
//DFSIVD3B  DD DISP=OLD,DSN=IMSVS.DFSIVD33      
//OAREA001  DD DISP=(NEW,PASS),DSN=&OAREA001,                    
//             UNIT=SYSDA,SPACE=(CYL,(7,2),RLSE)                 
//OAREA002  DD DISP=(NEW,PASS),DSN=&OAREA002,                    
//             UNIT=SYSDA,SPACE=(CYL,(7,2),RLSE)                 
//*