A fix is available
APAR status
Closed as program error.
Error description
The problem occurs in some cases when a COPY statement follows code that contains EXEC CICS ..... END-EXEC statements. The message IGYPS2072-S "COPY" was invalid. Skipped to the next verb, period or procedure-name definition. The EXEC CICS statements may be in a previous copybook or in the main source for the program. The reported failure involved EXEC CICS and COPY in the PROCEDURE DIVISION although this type of failure could also occur in the DATA DIVISION. Additional error messages were produced because statements involving code in the copybook could not be resolved.
Local fix
None. Use CICS Preprocessor, then COBOL compiler. *** *** ADDITIONAL SEARCHWORDS: MSGIGYPS2072-S MSGIGYPS2072 iGYPS2072
Problem summary
**************************************************************** * USERS AFFECTED: Users of Enterprise COBOL V3R1 and CICS * * compiler option, with COPY statements * * following EXEC CICS statements * * * **************************************************************** * PROBLEM DESCRIPTION: The COPY statement is rejected with a * * msg: IGYPS2072-S "COPY" was invalid. * * Skipped to the next verb, period or * * procedure-name definition. * * * **************************************************************** * RECOMMENDATION: Apply the provided PTF * * * **************************************************************** The compiler was not recovering properly from EXEC CICS statement processing when it encountered the COPY statement and therefore was not able to process the COPY statement.
Problem conclusion
IGYLCOPY was changed to not process the following COPY statement as part of the CICS statement, and to process it as a COPY statement by itself.
Temporary fix
Comments
APAR Information
APAR number
PQ62995
Reported component name
ENT COBOL FOR Z
Reported component ID
5655G5300
Reported release
310
Status
CLOSED PER
PE
NoPE
HIPER
NoHIPER
Special Attention
NoSpecatt / Xsystem
Submitted date
2002-07-09
Closed date
2002-08-30
Last modified date
2002-10-02
APAR is sysrouted FROM one or more of the following:
APAR is sysrouted TO one or more of the following:
UQ69488 PQ65928
Modules/Macros
IGYLCOPY
Fix information
Fixed component name
ENT COBOL FOR Z
Fixed component ID
5655G5300
Applicable component levels
R310 PSY UQ69488
UP02/09/09 P F209
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":"BU048","label":"IBM Software"},"Product":{"code":"SS6SG3","label":"Enterprise COBOL for z\/OS"},"Platform":[{"code":"PF054","label":"z Systems"}],"Version":"310","Line of Business":{"code":"LOB70","label":"Z TPS"}}]
Document Information
Modified date:
07 August 2024