A fix is available
APAR status
Closed as new function.
Error description
FABHURG1 provides the JCL compatibility with IMS HD Reorganization Unload Utility (DFSURGU0).
Local fix
Problem summary
**************************************************************** * USERS AFFECTED: All users of IBM IMS High Performance * * Unload for OS/390 Release 1 (FMID=H1IN110) * **************************************************************** * PROBLEM DESCRIPTION: This APAR enables run of FABHURG1 * * utility by using a JCL that was * * written for IMS HD Reorganization * * Unload Utility (DFSURGU0). * **************************************************************** * RECOMMENDATION: Apply the maintenance for this APAR. * **************************************************************** This APAR provides the JCL compatibility with IMS HD Reorganization Unload Utility (DFSURGU0). To run FABHURG1 by using a JCL that was written for IMS HD Reorganization Unload utility, you must prepare DFSISVI0 exit of IMS. To use the exit, the following level of IMS is required: - APAR PK03282 for IMS Version 7 - APAR PK03616 for IMS Version 8 - APAR PK03617 for IMS Version 9 A copy of the load module FABHSVI0 must be created with the name DFSISVI0 in a library concatenated to STEPLIB DD. For the details of the JCL compatibility, see the documentation change below.
Problem conclusion
Temporary fix
Comments
======================== = DOCUMENTATION CHANGE = ======================== IMS High Performance Unload for OS/390 User's Guide (SC27093603) should be changed as follows: (The new chapter 1.14 is added.) ================================================================ |1.14 Using JCL for IMS HD Reorganization Unload to Run FABHURG1 | | You can use a JCL that is written for IMS HD Reorganization | Unload (DFSURGU0) to run FABHURG1, by adding the High | Performance Unload's SHPSLMD0 library ahead of the IMS RESLIB | in the STEPLIB concatenation, and using DFSISVI0 exit of IMS. ================================================================ |1.14.1 Preparing the DFSISVI0 Exit | | To run FABHURG1 by using a JCL that was written for IMS HD | Reorganization Unload utility, you must prepare DFSISVI0 | exit of IMS. | To use the exit, the following level of IMS is required: | - APAR PK03282 for IMS Version 7 | - APAR PK03616 for IMS Version 8 | - APAR PK03617 for IMS Version 9 | | And you must create a copy of the load module FABHSVI0 | with the name DFSISVI0 in a library concatenated to STEPLIB | DD. ================================================================ |1.14.2 JCL compatibility with IMS HD Reorganization Unload | | Once the DFSISVI0 exit for FABHURG1 is prepared, you can use | essentially the same JCL as that is used for the IMS HD | Reorganization Unload utility (DFSURGU0) to run FABHURG1. | | EXEC Statement | The parameters ULU and DFSURGU0 must be specified, | otherwise the DFSISVI0 exit does not invoke FABHURG1. | | DD Statements | STEPLIB DD | Add the SHPSLMD0 library of IMS High Performance Unload | to this DD statements ahead of the IMS.SDFSRESL data set. | The DFSISVI0 member must be placed in a library. | SYSIN DD | This data set can contain control statements for either | DFSURGU0 or FABHURG1, but not both. | Table 56 lists the supported control statements | for DFSURGU0. | The control statement for HSSR Engine can be specified | in the HSSROPT data set. | SYSPRINT DD | This data set contains the statistics reports produced | by FABHURG1. The LRECL is 121. | The statistics which are produced by HSSR Engine are | printed in the HSSRSTAT DD and the HSSRTRAC DD | if these DDs are specified. | DFSURGU1 DD | This required statement defines the primary output data set | instead of SYSUT2 DD. | DFSURGU2 DD | This optional statement defines the secondary output data | set instead of SYSUT3 DD. | database DD | The DD statements for database data sets are optional. | If the DD statements are not present for a non-partitioned | database, dynamic allocation will be done by using the | DFSMDA member if one is present in STEPLIB or IMSDALIB. | | The other DD statements are described in IMS Utilities | Reference. | | Table 56. Supported control statements for DFSURGU0 | +-----------------------------+------------------------------+ | |Control statement |Interpreted control statement | | |for DFSURGU0 |for FABHURG1 | | +-----------------------------+------------------------------+ | |PARTITION=partname |PARTITION partname nnn | | | ,NUMBER=nnn |SEGSTAT PART (for STAT=DET) | | | ,STAT=ccc | | | |------------------------------------------------------------| | |MIGRATE=YES |MIGRATE | | |------------------------------------------------------------| | |FALLBACK=YES |FALLBACK | | +-----------------------------+------------------------------+ | | Restrictions: | 1. The restrictions in listed in "1.4.3 Restrictions" | apply to this processing. | | 2. If any of the following options are specified, | IMS HD Reorganization unload (DFSURGU0) is forced | to run instead of FABHURG1. | - IMS batch region type other than ULU | - DFSUCKPT DD for checkpoint function | - DFSURSRT DD for restart function | - The control statements for DFSURGU0 other than | PARTITION, MIGRATE, and FALLBACK. | - MIGRATE=YES for HISAM databases | - MIGRATE=YES for secondary indexes | - MIGRATX=YES | - FALLBACK=YES for PSINDEX databases | - Running under IMS Utility Control Facility (DFSUCF00) | | 3. SB(sequential buffering) is not used even if | it specifies the following: | - DFSCTL DD statement | - The PCB SB= statement in the PSBGEN | - DFSSBUX0 (Exit Routine) | ================================================================ 4.0 Messages and Codes 4.3 Return Codes | 4.3.5 JCL for IMS HD Reorganization Unload to run FABHURG1 | | The FABHURG1 utility issues one of the following return | codes if FABHURG1 is executed by using a JCL that is | described in "Using JCL for IMS HD Reorganization Unload to | Run FABHURG1" in topic 1.14. | | Code Meaning | - 00 Successful completion. | - 04 Any of the following conditions were detected: | - 0001 No segment was retrieved from the database. | - 0002 Some segments have been skipped in accordance with | the logic of a user's exit routine. | - 0004 A sensitive logical child segment type has a | logical parent's concatenated key defined as | "virtual.," but the BLDLPCK control statement is | not specified. | - 0008 A database error was detected, and the SKERROR | option might have skipped the unloading of one or | more database segments. | | HSSR Engine abend with the user completion code of 4013 for | errors to which IMS HD Reorganization Unload utility would | return the return code of 8, ================================================================ 4.4 Messages 4.4.2 Message Variables 4.4.2.1 FABH Messages ---------------------------------------------------------------- | FABH0256E BLKSIZE OR LRECL OF ddname IS TOO SMALL | FABH0257E OPEN OF ddname HAS FAILED | FABH0259E USER PROGRAMMING ERROR: LENGTH OF CURRENT ddname RECORD IS TOO LARGE | FABH0262E RECORDS OF ddname ARE NOT EQUAL | FABH0263E SYSUT1 CONTAINS MORE DATA RECORDS THAN ddname | FABH0264E SYSUT1 CONTAINS LESS DATA RECORDS THAN ddname | FABH0265W SIZE OF STATISTIC TABLES ARE NOT THE SAME IN SYSUT1 | AND ddname | FABH0266W COMPARE OF SYSUT1 AND ddname STOPPED ---------------------------------------------------------------- FABH0269W WARNING: SOME SEGMENTS HAVE BEEN SKIPPED BY USER ROUTINES Explanation: FABHURG1 detected that a user routine has set a nonzero return code, indicating that some segment occurrences | should be skipped and should not be written to any unload data | set. System Action: FABHURG1 continues processing. Programmer Response: Check whether the user routines should really set a nonzero return code. Save compilation listings of the user routines. ---------------------------------------------------------------- FABH0291E AN ERROR IS FOUND IN A 'PARTITION' CONTROL STATEMENT: reason Explanation: A PARTITION statement is coded incorrectly. The string reason indicates the reason for the error: reason Description : NUMBER TOO LARGE The numeric value specified as the second operand of the PARTITION statement is greater than 1001. | NUMBER IS ZERO | The numeric value specified as the second operand of the | PARTITION statement is 0. System Action: FABHURG1 ends abnormally. Programmer Response: Correct the error in the PARTITION statement. ---------------------------------------------------------------- | FABH0299I UNLOAD FUNCTION ENDED, HIGHEST RETURN CODE IS xxx | (REASON CODE: yyyy) | Explanation: FABHURG1 that had been invoked by using a JCL | that is compatible with IMS HD Reorganization Unload utility | ended with the decimal return code xxx. For the meaning of | hexadecimal reason code yyyy for the return code of 4, see | "Return Codes" in topic 4.3.5. | System Action: FABHURG1 ends its processing. | Programmer Response: Check the return code. If the return | code is 4, check the reason code too. Check the accompanying | FABHxxxxx messages. |--------------------------------------------------------------- | FABH0300E ERROR IN OPENING SYSIN | Explanation: The run-time initializer of High Performance | Unload called from the DFSISVI0 exit failed in opening SYSIN | data set. | System Action: High Performance Unlaod's run-time initializer | ends abnormally. | Programmer Response: Find the cause of the open error. |--------------------------------------------------------------- | FABH0313E SYNTAX ERROR IN SYSIN CONTROL STATEMENTS | Explanation: Both a control statement for IMS HD | Reorganization Unload utility (DFSURGU0) and a control | statement for FABHURG1 are specified in the SYSIN data set. | You must specify control statements for one, but not both, of | these utilities. | System Action: High Performance Unload's run-time initializer | ends abnormally. | Programmer Response: Correct the SYSIN control statements. |--------------------------------------------------------------- | FABH0314E HSSR INITIALIZATION FAILED | Explanation: HSSR engine detected an error,which is described | in a previous error message. | System Action: HSSR Engine ends abnormally. | Programmer Response: Remove the cause of the error referring | to the message being issued before this message.If the cause | is not clear, collect the dump and call the IBM Support | Center. |--------------------------------------------------------------- | FABH1000I DFSISVI0 EXIT IS CALLED BUT FABHURG1 CANNOT BE | INVOKED | Explanation: This message notifies the user that the IMS exit | DFSISVI0 is called but FABHURG1 unload utility cannot be | invoked because of the error indicated in the prior message. | System Action: IMS continues the processing and | DFSURGU0 will be invoked. | Programmer Response: None. |--------------------------------------------------------------- | FABH1001I DFSISVI0 EXIT IS CALLED AND FABHURG1 IS BEING | INVOKED | Explanation: This message notifies the user that the IMS exit | DFSISVI0 is called, and FABHURG1 unload utility will be | invoked by IMS batch region controller as the unload program. | System Action: IMS continues the processing. Unload function | is provided by FABHURG1 unload utility. | Programmer Response: None. |--------------------------------------------------------------- ======================= End of Doc-Change ======================
APAR Information
APAR number
PK11209
Reported component name
IMS HIGHPERF UN
Reported component ID
5655E0600
Reported release
110
Status
CLOSED UR1
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2005-08-30
Closed date
2005-09-20
Last modified date
2005-10-04
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UK07443
Modules/Macros
FABHINI0 FABHLINK FABHRPTH FABHSVI0 FABHTCB FABHTCBU FABHURG7 FABHURG8 FABHURG9 FABHX034 FABH001 FABH012 H1IN110J
| SC27093603 |
Fix information
Fixed component name
IMS HIGHPERF UN
Fixed component ID
5655E0600
Applicable component levels
R110 PSY UK07443
UP05/09/27 P F509
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.
[{"Line of Business":{"code":"LOB10"},"Business Unit":{"code":"BU029","label":"Software"},"Product":{"code":"SSCX89K","label":"IMS Tools"},"Platform":[{"code":"PF025","label":"Platform Independent"}],"Version":"110"}]
Document Information
Modified date:
20 October 2020