A fix is available
APAR status
Closed as new function.
Error description
HFPMAIN0 needs to detect an IMSID (as we do with FABCUR1) so that the randomizer specific to and used by that IMS system can be invoked for use.
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: All users of HPFPU Fast Path Advanced Tools * * in Fast Path Solution Pack Version 1 * * Release 2 (FMID: HAHQ120) * **************************************************************** * PROBLEM DESCRIPTION: This APAR supports the following * * new functions: * * Allow IMSID keyword on the EXEC * * statement in HFPMAIN0 to pass * * an information of IMSID to randomizer. * **************************************************************** * RECOMMENDATION: Apply the maintenance for this APAR. * **************************************************************** Add a new parameter (IMSID=) on to EXEC statement in HFPMAIN0 to pass an information of IMSID to randmoizer. The randomizer called by HFPMAIN0 can get IMSID with the same register interface as IMS online environment. New format of the EXEC control statement is as follows, //UNLOAD EXEC PGM=HFPMAIN0,REGION=rrrrM, // PARM='DBRCGRP=dbrcgrp,GSGNAME=gsgname,IMSPLEX=imsplex, // IMSID=imsid' When a randomizer is called by FPA, Register 10 and 11 are set to -1 and 0. When a randomizer is called by IMS online environment, register 10 and 11 contain the address of EPST and ESCD. There is a pointer to SCD in ESCD (ESCDSCD), and SCD contains information of IMSID (SSCDIMID). If IMSID parameter is specified, HFPMAIN0 makes the buffers for temporary ESCD and SCD. Register 11 contains the address of temporary ESCD when HFPMAIN0 issues a call to a randomizing module. HFPMAIN0 sets only the field ESCDSCD that contains the address of SCD into temporary ESCD. HFPMAIN0 also sets only the field SSCDIMID that contains IMS subsystem ID into temporary SCD. Other fields of temporary ESCD and temporary SCD cannot be referred. When the IMSID parameter is specified other than ANALYZE, CHANGE,INDEXBLD,UNLOAD,RELOAD commands, it is ignored.
Problem conclusion
Temporary fix
Comments
======================== = DOCUMENTATION CHANGE = ======================== The IMS Fast Path Solution Pack for z/OS Version 1 Release 2 IMS High Performance Fast Path Utilities User's Guide (SC19-3287-00). > Part 2. IMS Fast Path Advanced Tool >> Chapter 2. Overview of IMS Fast Path Advanced Tool >>> Restriction of FPA Add the following description: However, If the IMSID parameter is specified in the EXEC statement, FPA generates the buffers for temporary ESCD and SCD. Register 11 contains the address of the temporary ESCD when FPA issues a call to a randomizing module. FPA sets only the ESCDSCD field, which contains the address of SCD, in the temporary ESCD. FPA also sets only field SSCDIMID, which contains the IMS subsystem ID, in the temporary SCD. Other fields of temporary ESCD and temporary SCD cannot be referred to. >> Chapter 3. Unloading a DEDB offline with FPA >>> Running the Unload function Add the new EXEC parameter IMSID Procedure 1. Estimate the region size required to run the function. 2. Specify the EXEC statement in the following format: Modify the following format as follows: Before: //UNLOAD EXEC PGM=HFPMAIN0,REGION=rrrrM, // PARM='DBRCGRP=dbrcgrp,GSGNAME=gsgname,IMSPLEX=imsplex' After: //UNLOAD EXEC PGM=HFPMAIN0,REGION=rrrrM, // PARM='DBRCGRP=dbrcgrp,GSGNAME=gsgname,IMSPLEX=imsplex, // IMSID=imsid' Add the new EXEC parameter IMSID to following table: ________________ ______________________________________________ | Parameter | Description | |________________|_____________________________________________| | IMSID= |IMSID is an optional 1- to 8-character | | |parameter that specifies an IMS subsystem | | |identification name. If the IMSID parameter | | |is specified, FPA generates the buffers for | | |temporary ESCD and SCD. Register 11 contains | | |the address of the temporary ESCD when FPA | | |issues a call to a randomizing module. FPA | | |sets only the ESCDSCD field, which contains | | |the address of SCD, in the temporary ESCD. | | |FPA also sets only field SSCDIMID, which | | |contains the IMS subsystem ID, in the | | |temporary SCD. Other fields of temporary | | |ESCD and temporary SCD cannot be referred to.| |________________|_____________________________________________| >> Chapter 4. Reloading a DEDB offline with FPA >>> Running the Reload function Add the new EXEC parameter IMSID Procedure 1. Estimate the region size required to run the function. 2. Specify the EXEC statement in the following format: Modify the following format as follows: Before: //RELOAD EXEC PGM=HFPMAIN0,REGION=rrrrM, // PARM='DBRCGRP=dbrcgrp,GSGNAME=gsgname,IMSPLEX=imsplex' After: //RELOAD EXEC PGM=HFPMAIN0,REGION=rrrrM, // PARM='DBRCGRP=dbrcgrp,GSGNAME=gsgname,IMSPLEX=imsplex, // IMSID=imsid' Add the new EXEC parameter IMSID to following table: ________________ _____________________________________________ | Parameter | Description | |________________|_____________________________________________| | IMSID= |IMSID is an optional 1- to 8-character | | |parameter that specifies an IMS subsystem | | |identification name. If the IMSID parameter | | |is specified, FPA generates the buffers for | | |temporary ESCD and SCD. Register 11 contains | | |the address of the temporary ESCD when FPA | | |issues a call to a randomizing module. FPA | | |sets only the ESCDSCD field, which contains | | |the address of SCD, in the temporary ESCD. | | |FPA also sets only field SSCDIMID, which | | |contains the IMS subsystem ID, in the | | |temporary SCD. Other fields of temporary | | |ESCD and temporary SCD cannot be referred to.| |________________|_____________________________________________| >> Chapter 5. Changing a DEDB offline with FPA >>> Running the Change function Add the new EXEC parameter IMSID Procedure 1. Estimate the region size required to run the function. 2. Specify the EXEC statement in the following format: Modify the following format as follows: Before: //CHANGE EXEC PGM=HFPMAIN0,REGION=rrrrM, // PARM='DBRCGRP=dbrcgrp,GSGNAME=gsgname,IMSPLEX=imsplex' After: //CHANGE EXEC PGM=HFPMAIN0,REGION=rrrrM, // PARM='DBRCGRP=dbrcgrp,GSGNAME=gsgname,IMSPLEX=imsplex, // IMSID=imsid' Add the new EXEC parameter IMSID to following table: ________________ _____________________________________________ | Parameter | Description | |________________|_____________________________________________| | IMSID= |IMSID is an optional 1- to 8-character | | |parameter that specifies an IMS subsystem | | |identification name. If the IMSID parameter | | |is specified, FPA generates the buffers for | | |temporary ESCD and SCD. Register 11 contains | | |the address of the temporary ESCD when FPA | | |issues a call to a randomizing module. FPA | | |sets only the ESCDSCD field, which contains | | |the address of SCD, in the temporary ESCD. | | |FPA also sets only field SSCDIMID, which | | |contains the IMS subsystem ID, in the | | |temporary SCD. Other fields of temporary | | |ESCD and temporary SCD cannot be referred to.| |________________|_____________________________________________| >> Chapter 7. Analyzing a DEDB offline with FPA >>> Running the Analyze function Add the new EXEC parameter IMSID Procedure 1. Estimate the region size required to run the function. 2. Specify the EXEC statement in the following format: Modify the following format as follows: Before: //ANALYZE EXEC PGM=HFPMAIN0,REGION=rrrrM, // PARM='DBRCGRP=dbrcgrp,GSGNAME=gsgname,IMSPLEX=imsplex' After: //ANALYZE EXEC PGM=HFPMAIN0,REGION=rrrrM, // PARM='DBRCGRP=dbrcgrp,GSGNAME=gsgname,IMSPLEX=imsplex, // IMSID=imsid' Add the new EXEC parameter IMSID to following table: ________________ _____________________________________________ | Parameter | Description | |________________|_____________________________________________| | IMSID= |IMSID is an optional 1- to 8-character | | |parameter that specifies an IMS subsystem | | |identification name. If the IMSID parameter | | |is specified, FPA generates the buffers for | | |temporary ESCD and SCD. Register 11 contains | | |the address of the temporary ESCD when FPA | | |issues a call to a randomizing module. FPA | | |sets only the ESCDSCD field, which contains | | |the address of SCD, in the temporary ESCD. | | |FPA also sets only field SSCDIMID, which | | |contains the IMS subsystem ID, in the | | |temporary SCD. Other fields of temporary | | |ESCD and temporary SCD cannot be referred to.| |________________|_____________________________________________| >> Chapter 10. Building secondary index database for a DEDB >> offline with FPA >>> Running the Build index function Add the new EXEC parameter IMSID Procedure 1. Estimate the region size required to run the function. 2. Specify the EXEC statement in the following format: Modify the following format as follows: Before: //INDEXBLD EXEC PGM=HFPMAIN0,REGION=rrrrM, // PARM='DBRCGRP=dbrcgrp,GSGNAME=gsgname,IMSPLEX=imsplex' After: //INDEXBLD EXEC PGM=HFPMAIN0,REGION=rrrrM, // PARM='DBRCGRP=dbrcgrp,GSGNAME=gsgname,IMSPLEX=imsplex, // IMSID=imsid' Add the new EXEC parameter IMSID to following table: ________________ _____________________________________________ | Parameter | Description | |________________|_____________________________________________| | IMSID= |IMSID is an optional 1- to 8-character | | |parameter that specifies an IMS subsystem | | |identification name. If the IMSID parameter | | |is specified, FPA generates the buffers for | | |temporary ESCD and SCD. Register 11 contains | | |the address of the temporary ESCD when FPA | | |issues a call to a randomizing module. FPA | | |sets only the ESCDSCD field, which contains | | |the address of SCD, in the temporary ESCD. | | |FPA also sets only field SSCDIMID, which | | |contains the IMS subsystem ID, in the | | |temporary SCD. Other fields of temporary | | |ESCD and temporary SCD cannot be referred to.| |________________|_____________________________________________|
APAR Information
APAR number
PM96394
Reported component name
IMS FP SOLUTION
Reported component ID
5655W1400
Reported release
120
Status
CLOSED UR1
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2013-09-04
Closed date
2013-10-24
Last modified date
2013-11-04
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UI11629
Modules/Macros
HAHQ120J HFPLINI0 HFPMCCC0 HFPMEXC0 HFPMIDVA HFPMIDVB HFPMIDVC HFPMIDVD HFPTRCL0 HFPUMVT0
| SC19328700 |
Fix information
Fixed component name
IMS FP SOLUTION
Fixed component ID
5655W1400
Applicable component levels
R120 PSY UI11629
UP13/10/27 P F310
Fix is available
Select the PTF appropriate for your component level. You will be required to sign in. Distribution on physical media is not available in all countries.
[{"Business Unit":{"code":"BU054","label":"Systems w\/TPS"},"Product":{"code":"SG19M","label":"APARs - z\/OS environment"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"1.2.0","Edition":"","Line of Business":{"code":"","label":""}},{"Business Unit":{"code":"BU048","label":"IBM Software"},"Product":{"code":"SSCV35A","label":"IMS Fast Path Solution Pack"},"Component":"","ARM Category":[],"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"1.2.0","Edition":"","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
04 November 2013