PM86742: DIAGNOSE THE USE OF AN OS/VS COBOL PROGRAM RUNNING UNDER LANGUAGE ENVIRONMENT

Obtain the fix for this APAR.

APAR status

• Closed as new function.

Error description

• Provide a diagnostic message so customers can identify the use
  of OS/VS COBOL programs in their applications.
  NOTE:  Linking or relinking an OS/VS COBOL application with
  this PTF applied will require the resultant load module to be
  run on a system with this PTF applied.
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: Users of COBOL programs running under        *
  *                 Language Environment.                        *
  *                                                              *
  ****************************************************************
  * PROBLEM DESCRIPTION: Users need to know if they are          *
  *                      running OS/VS COBOL programs in their   *
  *                      applications.                           *
  *                                                              *
  ****************************************************************
  * RECOMMENDATION: Apply the provided PTF.                      *
  *                                                              *
  ****************************************************************
  Users may have OS/VS COBOL programs running in their
  applications without knowing it and they would like to be able
  to identify those programs since they will not be able to
  interoperate with Enterprise COBOL V5 programs and since IBM
  may remove support for OS/VS COBOL programs from LE in the
  future.
  

Problem conclusion

Temporary fix

Comments

• Change the COBOL run-time library to diagnose the use of OS/VS
  COBOL programs with a warning-level message which will be
  written to the CEEMSG data set which uses the ddname specified
  by the LE MSGFILE run-time option. The message can be suppressed
  or converted to an abend by using an LE user condition handler
  which is also being supplied as an example. The following
  condition handler sample programs are supplied in the SCEESAMP
  data set:
  * IGZWUXOI - to ignore the condition
  * IGZWUXOA - to convert the condition to an immediate abend
  To enable the condition handler, you can use the Language
  Environment run-time option USRHDLR(IGZWUXOI) to ignore the
  condition or USRHDLR(IGZWUXOA) to cause an immediate abend.
  +--------------------------------------------------------------+
  | Start of changes to Language Environment Run-Time Messages,  |
  | SA22-7566-12                                                 |
    Add the following new messages to Chapter 7 COBOL Run-time
    messages:
    IGZ0268W An invocation was made of OS/VS COBOL program
    "program-name".
    Explanation: An invocation of an OS/VS COBOL program was made.
    OS/VS COBOL programs cannot interoperate with Enterprise COBOL
    V5 programs. In addition, IBM may remove support for OS/VS
    COBOL programs from Language Environment in the future, so
    users need to know if they are using OS/VS COBOL programs and
    what the program names are.
    Programmer Response: Recompile the OS/VS COBOL program with a
    newer compiler.
    System Action: No system action was taken.
    Symbolic feedback code: IGZ08C
    IGZ0269W "program-lang" version "program-version" program
    "program-name" made a call to OS/VS COBOL program
    "program-name".
    Explanation: A COBOL program made a call to an OS/VS COBOL
    program with the CALL statement. Using the CALL statement to
    perform calls between Enterprise COBOL V5 programs and OS/VS
    COBOL programs is not supported. In addition, IBM may remove
    support for OS/VS COBOL programs from Language Environment
    in the future, so users need to know if they are using OS/VS
    COBOL programs and what the program names are.
    Programmer Response: Recompile the OS/VS COBOL program with a
    newer compiler.
    System Action: No system action was taken.
    Symbolic feedback code: IGZ08D
  | End of changes to Language Environment Run-Time Messages,    |
  | SA22-7566-12                                                 |
  +--------------------------------------------------------------+
  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:

  UI13039 UI13040 UI13041 UI13042 UI13043 UI13044

Modules/Macros

• IGZBALCT IGZCLDL  IGZCMGEN IGZCMGJA IGZCMGUE IGZCPCO  IGZCPSU
  IGZEDCCT IGZEDCM  IGZEINI  IGZIBMCT IGZIGZCT IGZWUXOA IGZWUXOI
  ILBONTR  ILBOSRV
  

Fix information

• Fixed component name

  LE COBOL LIB

• Fixed component ID

  568819802

Applicable component levels

• R77J PSY UI13040

     UP13/12/05 P F312  

• R770 PSY UI13039

     UP13/12/05 P F312  

• R78J PSY UI13042

     UP13/12/05 P F312  

• R780 PSY UI13041

     UP13/12/05 P F312  

• R79J PSY UI13044

     UP13/12/05 P F312  

• R790 PSY UI13043

     UP13/12/05 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.