PH62965: ALLOW COBOL VERSION OF ARSUTBL TO BE CALLED AMODE(31).

Obtain the fix for this APAR.

APAR status

• Closed as unreproducible in next release.

Error description

• Attempts to use a COBOL ARSUTBL exit results in the following
  error:
  
  ARS0160E ARSLOAD Unable to load module
  >/usr/lpp/ars/V10R5M0/bin/exits/arsutbl<
  
          The return code is 253  Srvr->te01<-
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: All Content Manager OnDemand for z/OS 10.5   *
  *                 customers.                                   *
  ****************************************************************
  * PROBLEM DESCRIPTION: This APAR add support to allow running  *
  *                      31-bit arsutbl exits.  This also adds   *
  *                      some additional parameter checking to   *
  *                      the 390 indexer.                        *
  ****************************************************************
  This APAR supports the following enhancements:
  1. The arsutbl exit is now able to be called in AMODE 31.  The
  ARSMVS_EXIT31_DB2_SECPERM parameter is also enhanced to include
  controlling if arsutbl is entered with a DB2 connection in
  addition to arsusec and arsuperm being entered with a connection
  2.The 390 indexer is enhanced when the INDEXSTYLE is not AFP to
  do some additional checking of some cases where a FILEFORMAT is
  required.  In the case where ANYEXIT is specified, a message
  will be generated and the load will be allowed to proceed.  If
  ANYEXIT is omitted, a message will be generated and the load
  will be failed.  For the case where ANYEXIT is specified, a
  missing FILEFORMAT for linedata documents will prevent page
  counts from being calculated.  The 390 indexer will also check
  for a missing NEWLINE keyword.
  

Problem conclusion

Temporary fix

Comments

• This APAR supports the following enhancements:
  1. The arsutbl exit is now able to be called in AMODE 31.  The
  ARSMVS_EXIT31_DB2_SECPERM parameter is also enhanced to include
  controlling if arsutbl is entered with a DB2 connection in
  addition to arsusec and arsuperm being entered with a connection
  2.The 390 indexer is enhanced when the INDEXSTYLE is not AFP to
  do some additional checking of some cases where a FILEFORMAT is
  required.  In the case where ANYEXIT is specified, a message
  will be generated and the load will be allowed to proceed.  If
  ANYEXIT is omitted, a message will be generated and the load
  will be failed.  For the case where ANYEXIT is specified, a
  missing FILEFORMAT for linedata documents will prevent page
  counts from being calculated.  The 390 indexer will also check
  for a missing NEWLINE keyword.
  

APAR Information

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

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

  UI98521

Modules/Macros

• ARGL390C ARGZ31OS ARSZ31OS
  

Fix information

• Fixed component name

  CM OD Z/OS, OD/

• Fixed component ID

  5655H3900

Applicable component levels

• RA50 PSY UI98521

     UP24/09/27 P F409

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.