PM85873: NEW COMPILE-TIME OPTION

Obtain the fix for this APAR.

APAR status

• Closed as new function.

Error description

• A new COBOL compiler option FLAGMIG4 will be added.
  

Local fix

• x
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of Enterprise COBOL V4.2 who want      *
  *                 to migrate to Enterprise COBOL V5.1.         *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Enterprise COBOL V4.2 users need a way  *
  *                      to determine which language elements    *
  *                      and compiler options used by their      *
  *                      applications need changing when they    *
  *                      migrate the programs to Enterprise      *
  *                      COBOL V5.1.                             *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTFs.                     *
  *                                                              *
  ****************************************************************
  Customers need help migrating their applications from Enterprise
  COBOL V4.2 to Enterprise COBOL V5.1.  The new FLAGMIG4 compiler
  option helps address this requirement.
  

Problem conclusion

Temporary fix

Comments

• The new FLAGMIG4 compiler option for Enterprise COBOL V4.2
  issues warning messages for any compiler option or language
  element that is not supported in Enterprise COBOL V5.1.  Warning
  messages are also issued for language elements that behave
  differently in Enterprise COBOL V5.1 than in Enterprise COBOL
  V4.2.
  
  +--------------------------------------------------------------+
  | Start of changes for:                                        |
  | Enterprise COBOL Programming Guide, SC23-8529-01             |
  
    Preface, Summary of changes
    Version 4 release 2 add:
  
  | A new compiler option, FLAGMIG4, which enables users to
  | identify Enterprise COBOL V4.2 language elements that are
  | either not supported by or that behave differently in
  | Enterprise COBOL V5.1. FLAGMIG4 also identifies Enterprise
  | COBOL V4.2 compiler options that are not supported or are not
  | accepted by Enterprise COBOL V5.1.
  
  (( Add one line to Table 46 in Chapter 17: ))
  
    Chapter 17. Compiler options - Table 46. Mutually exclusive
                compiler options
    -----------------------------------------------------------
    |Specified     |Ignored               |Forced on          |
  
  |  FLAGSTD        FLAGMIG4               NOFLAGMIG4
  
  (( Add a new compiler option to Chapter 17: ))
  
    Chapter 17. Compiler options
  
  | FLAGMIG4
  |
  | Use the FLAGMIG4 option to help you migrate to Enterprise
  | COBOL V5.1, programs supported by Enterprise COBOL V4.2.
  |
  | FLAGMIG4 option syntax
  |
  |     ______________________________________
  |    |                                      |
  |    | >>__ _FLAGMIG4___ _________________><|
  |    |     |_NOFLAGMIG4_|                   |
  |    |______________________________________|
  |
  | Default is:  NOFLAGMIG4
  |
  | Abbreviations are:  None
  |
  | FLAGMIG4 identifies Enterprise COBOL V4.2 language elements
  | that are not supported by or behave differently in Enterprise
  | COBOL V5.1.  FLAGMIG4 also identifies compiler options that
  | are not supported or not accepted by Enterprise COBOL V5.1.
  |
  | FLAGMIG4 flags the following language elements that are not
  | supported by Enterprise COBOL V5.1:
  |
  |   - DATE FORMAT clause
  |   - GO TO MORE-LABELS statement
  |   - USE AFTER LABEL declarative
  |   - Intrinsic functions:  DATEVAL, UNDATE, YEARWINDOW
  |
  | FLAGMIG4 flags the following language elements that have
  | behavior changes from Enterprise COBOL V4.2.  In Enterprise
  | COBOL V5.1:
  |
  |   - The linkage convention for returning double-word binary
  |     items is changed to be compatible with the linkage
  |     convention used for such items by C and C++
  |
  |   - A successful read of a file might return file status 04
  |     instead of 00, if the minimum and maximum record sizes
  |     do not match the bounds specified in the RECORD VARYING
  |     clause
  |
  | FLAGMIG4 flags the following compiler options and suboptions
  |
  |   - Options that are not supported by Enterprise COBOL V5.1:
  |        o DATEPROC
  |        o NOLIB
  |        o SIZE(MAX)
  |        o TEST(HOOK, NOHOOK, SEPARATE, NOSEPARATE)
  |        o XMLPARSE
  |        o YEARWINDOW
  |
  |   - Options that are not accepted by Enterprise COBOL V5.1:
  |        o EVENTS
  |        o FDUMP
  |        o FLAGSAA
  |        o PFDSGN
  |        o RESIDENT
  |        o TEST(ALL, BLOCK, PATH, STMT, NONE, SYM, NOSYM)
  |
  | For more information about Enterprise COBOL V5.1, see the
  | documentation available from the library page at:
  | http://www-01.ibm.com/support/docview.wss?uid=swg27036733
  |
  | End of changes for:                                          |
  | Enterprise COBOL Programming Guide, SC23-8529-01             |
  +--------------------------------------------------------------+
  
  PUBS CLOSING CODE: DEVCHNG
  

APAR Information

• APAR is sysrouted FROM one or more of the following:

• APAR is sysrouted TO one or more of the following:

  UK95907 UK95908 UK95917

Modules/Macros

• IGYCDOPT IGYCLVL2 IGYCOPI  IGYCOPT  IGYDPR05 IGYEEN$2 IGYEJA$2
  IGYEUE$2 IGYKCNFL IGYKCNTL IGYKSTAT IGYNLINK IGYQPR08 IGYQPR10
  IGYQPR14 IGYSCNTL
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655S7100

Applicable component levels

• R420 PSY UK95907

     UP13/07/25 P F307

• R421 PSY UK95908

     UP13/07/25 P F307

• R422 PSY UK95917

     UP13/07/25 P F307

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.