A fix is available
APAR status
Closed as program error.
Error description
This APAR accumulate fixes of ICE V2 APARs: - PQ79753 - PQ78880 - PQ79869 - PQ80792 - PQ80503 - PQ80508
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: All IMS High Performance Image Copy for z/OS * * Version 3 users (FMID=H1J0310) * **************************************************************** * PROBLEM DESCRIPTION: This APAR includes following APAR fixes * * from IMS Image Copy Extensions for z/OS * * Version 2: * * * * - PQ78880 * * The Create Image Copy function * * terminates with U3835 ( ABENDU3835 ) * * in NOTIFY.IC process, when the length * * of IC data set is 44 bytes or the * * length of UNIT name is 8 bytes. * * * * - PQ79753 * * The Recovery function does not care * * about the number of space extension * * for OSAM data set, even if it * * exceeds 60 that is IMS allows as * * MAXIMUM. * * * * - PQ79869 * * The Recovery function terminates with * * ABEND S0C4 ( ABEND0C4 ). Because IMS * * corresponding APAR PQ72562 for IMS * * V7 are not included. * * * * Following IMS corresponding APARs are * * included: * * - IMS V7 : PQ68472 * * - IMS V8 : PQ73887 * * * * - PQ80503 * * 1.The CRC function always sets number * * 1 into FILESEQ parameter of the * * DBRC NOTIFY.IC command when using * * ICOUT=ddname. * * 2.The Recovery function runs as an * * endless loop, when DSN= keyword * * is specified in a Site Default * * Table. * * * * - PQ80508 * * The CRC function terminates with * * ABEND * * S0C4 ( ABEND0C4 ) when LBL=1 is * * specified for output STACK IC data * * set * * on JCL . * * * * - PQ80792 * * The Recovery function terminates with * * RC=8 and message DFS2804A * * * * This APAR also fixes the following * * problems: * * * * 1.The Image Copy function terminates * * with ABEND S0C4 ( ABENDS0C4 ) when * * running in the APF authorized state * * and issues EDTINFO, DEQ, or WTO * * macro. * * 2.The Recovery function terminates with * * ABEND S0C4 ( ABENDS0C4 ) when it is * * invoked by IMS-compatible JCLs. * **************************************************************** * RECOMMENDATION: Apply the maintenance for this APAR. * **************************************************************** This APAR includes following APAR fixes from IMS Image Copy Extensions for z/OS Version 2: PQ78880 : The Create Image Copy function terminate with ABEND U3835 ( ABENDU3835 ) during NOTIFY.IC, if the IC data set name is 44 byte long or the IC UNIT name is 8 byte long. Because the Create Image copy searches IC data set name and UNIT name until blank field, when issuing NOTIFY.IC. But when the length of data set name and UNIT name is maximum, next fields of these are not blank and HPIC uses longer data than real data set name and UNIT name. PQ79869 : The following IMS corresponding APARs are included: - PQ72562 (IMS V7) During GENJCL.RECOV or the Recovery utility execution, DBRC is called to determine what data sets need to be processed. DSPURVIN will scan the RECON for all associated records and save these records in local storage for use throughout the process. All of this local storage was acquired from below the line. When the RECON was quite large and many records were required to complete the process an ABEND80A terminated the process when the private storage area was exhausted. - PQ68472 (IMS V7) and PQ73887 (IMS V8) When DFSURDB0 calls DFSDLOC0 to open the database data set being recovered, DFSDLOC0 calls DFSDDUI0 to process the request. In the DFSDDUI0 call to DBRC, the DBD name passed in is saved in the GETMAINed memory. At the end of DFSDDUI0, the memory is FREEMAINed. Later when DFSURDB0 calls DBRC, it references address of the DBD name that has been freed by DFSDDUI0 and results in ABENDS0C4. - PQ79753 The Recovery function does not care about the number of space extension for OSAM data set, even if it exceeds 60 that is IMS allows as MAXIMUM. The Recovery function should check the number of space extension of OSAM data set and terminate by RC=16 with error message, when the space extension number of OSAM is exceed the number that is specified in new key word EXTENT=. - PQ80792 The Recovery function compares the timestamp data in the header record of the input image copy data set with the DBRC record even if TIMECHK=N keyword is specified with TIMESTAMP=LASTIC. - PQ80503 1. The CRC function always sets number 1 into FILESEQ parameter of the DBRC NOTIFY.IC command when the ICOUT=ddname is specified in a ICEIN statement. Therefore, the wrong number of FILESEQ is registered into DBRC. The CRC function sets the correct number of FILESEQ according to the contents of the JFCB. 2. The RCV function runs as an endless loop, when DSN= keyword specified in a Site Default Table. The RCV function tried to check and build the output IC data set name that is not necessary, and caused to not exit a loop in the check the module. The output IC check module should not be called by the RCV function. - PQ80508 The CRC function terminates with ABEND S0C4 ( ABEND0C4 ) when LBL=1 is specified for output STACK image copy data set on JCL Because the CRC attempts to OPEN the output IC data set by using file sequence number 2 ,even if LBL=1 is specified on DD card. Following problems of HPIC V3 are fixed by this APAR: 1. When issuing WTO, EDTINFO, or DEQ macro in the Image Copy function that is running in an APF authorized state, the Image Copy function terminates with ABEND S0C4 ( ABENDS0C4 ) Because HPIC program that is RENT option uses own storage for parameter area of these macros and the macros modify the its storage. 2. When Recovery function recovers OSAM data set by IMS IMS compatible JCL, Recovery function attempts to compare the number of space extension for OSAM data set to HPIC control block. But that blocks are not exist in FABJRDB7 or FABJRDB8, then Recovery function terminates with ABEND S0C4 ( ABENDS0C4 ).
Problem conclusion
FABJMAIN has been modified - Not to call the FABJACQG from RCV function. FABJCRC1 has been modified - To search the IC data set name and unit name by blank field and maximum length when HPIC issues NOTIFY.IC. - To set the FILESEQ as same number of JFCB. FABJRDB7 has been modified - To include following IMS fixes: - PQ68472 - PQ72562 - To check the number of extension for OSAM file. FABJRDB8 has been modified - To include following IMS fix: - PQ73887 - To check the number of extension for OSAM file. - Not to compare the timestamp data in the header record of the input image copy data set with the DBRC record when TIMECHK=N keyword is specified with TIMESTAMP=LASTIC. FABJICDD has been modified - To use correct file sequence number when the STACK output data set is defined on JCL DD statement. FABJPARM FABJTGEN FABJSTMD - Have been modified to support the new keyword EXTENT=. FABJDALO FABJDOPN FABJMDPN FABJMSGP FABUCHG - has been modified to issue WTO macro using inline text. FABJDOPN has been modified - to issue EDTINFO macro as the execute form. FABJDPSN has been modified - to issue DEQ(RET=HAVE) macro and WTO macro as the execute form A New module FABJFIG1 checks the number of space extension. A New module FABJXLIM checks if the number of space extension for OSAM exceeds allowed number. FABJXLIM has been modified to set the default max number of spac extension for OSAM data set when recovery function is invoked by IMS compatible JCLs. << Documentation Change >> IMS High Performance Image Copy for z/OS Version 3 Release 1 User's Guide (Document Number: SC18-7617-00) should be changed as follows: ============================================================== Chapter 2. Operating Instructions Input | EXTENT= | The EXTENT keyword specifies the maximum extension number. | +---------------------------------------------------+ | | EXTENT=nnn | | +---------------------------------------------------+ | | where: | | nnn specifies the maximum extension number of OSAM data | set. ICE Recovery function checks extension number | of a OSAM data set after data set is recovered. When | When the extension number is larger than your | specification of EXTENT KEYWORD, ICE Recovery | function terminates with RC=16. | | This keyword can be used in the following control statements: | GLOBAL,RCV Appendix A. Return Codes, Abend Codes, and Messages MSG FABJ0170E added. | FABJ0172E THE EXTENT NUMBER OF OSAM EXCEEDS THE LIMIT NUMBER | | Explanation: The extension number of a OSAM data set is | larger than your specification of EXTENT=. | | System Action: FABJMAIN stop processing with a return code of | 16. | | Programmer Response: Check the SPACE parameter in the | allocation information of the OSAM data set, and increase the | allocation size of the secondary definition. Rerun the job.
Temporary fix
Comments
APAR Information
APAR number
PQ81672
Reported component name
IMS HP IMAGE CO
Reported component ID
5655K9600
Reported release
310
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
YesSpecatt / New Function / Serviceability /
Xsystem
Submitted date
2003-12-03
Closed date
2003-12-16
Last modified date
2004-01-03
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UQ83176
Modules/Macros
FABJACQG FABJBLKD FABJBUF1 FABJCRC0 FABJCRC1 FABJCTCV FABJCZCV FABJDALC FABJDALO FABJDBCM FABJDBC1 FABJDBF0 FABJDBLK FABJDMP0 FABJDOPN FABJDPSN FABJDPS7 FABJDPS8 FABJFIG1 FABJICDD FABJLINK FABJMAIN FABJMDPN FABJMDP7 FABJMDP8 FABJMRGE FABJMSGC FABJMSGP FABJPARM FABJRDB7 FABJRDB8 FABJRPT0 FABJSTMD FABJTGEN FABJXLIM FABUCHG FABUFIG1 H1J0310J
| SC18761700 |
Fix information
Fixed component name
IMS HP IMAGE CO
Fixed component ID
5655K9600
Applicable component levels
R310 PSY UQ83176
UP03/12/25 P F312
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"},"Platform":[{"code":"PF054","label":"z Systems"}],"Version":"310","Line of Business":{"code":"","label":""}}]
Document Information
Modified date:
14 July 2020