PH63384: THE FUNCTION SECONDS-FROM-FORMATTED-TIME IS MISSING FROM THE FUNCTION ALL INTRINSIC LIST

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• The REPOSITORY paragraph's FUNCTION ALL INTRINSIC phrase should
  allow all intrinsic functions (save WHEN-COMPILED) to be used
  without the FUNCTION keyword, but SECONDS-FROM-FORMATTED-TIME is
  
  missing from the list of all intrinsic functions.
  
  If it is used without the FUNCTION keyword, the compiler
  generates the diagnostic
  
  IGYPS2121-S "SECONDS-FROM-FORMATTED-TIME" was not defined as a
             data-name. The statement was discarded.
  

Local fix

• Use syntax FUNCTION SECONDS-FROM-FORMATTED-TIME()
  

Problem summary

• ****************************************************************
  * USERS AFFECTED: All users of the Enterprise COBOL V6.4       *
  *                 compiler who are compiling source programs   *
  *                 that contain a REPOSITORY paragraph that     *
  *                 specifies FUNCTION ALL INTRINSIC, and are    *
  *                 invoking the intrinsic function              *
  *                 SECONDS-FROM-FORMATTED-TIME without          *
  *                 preceding it with the FUNCTION keyword.      *
  ****************************************************************
  * PROBLEM DESCRIPTION: Incorrect output. When the REPOSITORY   *
  *                      paragraph is specified and it contains  *
  *                      the FUNCTION ALL INTRINSIC phrase, the  *
  *                      compiler lists all available intrinsic  *
  *                      functions that the compiler             *
  *                      supports in the XREF section of the     *
  *                      listing,                                *
  *                      as long as the default compiler         *
  *                      option XREF(FULL) is in effect.         *
  *                      The problem that occurs is              *
  *                      that the SECONDS-FROM-FORMATTED-TIME    *
  *                      intrinsic function is missing from the  *
  *                      FUNCTION ALL INTRINSIC list. It is also *
  *                      the case that a user program cannot     *
  *                      invoke the                              *
  *                      SECONDS-FROM-FORMATTED-TIME intrinsic   *
  *                      without preceding it with the FUNCTION  *
  *                      keyword, even though the REPOSITORY     *
  *                      paragraph is specified and it contains  *
  *                      the FUNCTION ALL INTRINSIC phrase.      *
  ****************************************************************
  * RECOMMENDATION: Apply the IBM provided PTF and rerun the     *
  *                 compile.                                     *
  ****************************************************************
  The compiler was recently updated to add a new intrinsic
  function CONTENT-OF. There is an index variable that tracks the
  total number of intrinsic functions defined in the compiler, and
  the index was not properly incremented when the CONTENT-OF
  intrinsic function was added. Since SECONDS-FROM-FORMATTED-TIME
  is the last intrinsic function tracked in the array of all
  compiler defined intrinsic functions, it didn't get included in
  the list of intrinsic functions in the listing file.
  

Problem conclusion

• The maximum array index for the array of intrinsic functions has
  been incremented to account for the addition of the
  CONTENT-OF intrinsic function. This allows the names of all
  of the intrinsic functions to be properly displayed in the XREF
  section of the listing file when the  REPOSITORY paragraph
  is specified and it contains the
  FUNCTION  ALL INTRINSIC phrase, and the default setting
  of the compiler  option XREF(FULL) is in effect.  It also
  allows the
  SECONDS-FROM-FORMATTED-TIME intrinsic function to be called
  without the FUNCTION keyword in front of it, when the source
  program contains a REPOSITORY paragraph that specifies
  FUNCTION ALL INTRINSIC .
  

Temporary fix

Comments

APAR Information

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

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

Modules/Macros

• IGY8RWTU IGYCASMB IGYCCBE  IGYCCCRT IGYCCICS IGYCCSRV IGYCDGEN
  IGYCDIAG IGYCDMAP IGYCEN$0 IGYCEN$1 IGYCEN$2 IGYCEN$3 IGYCEN$4
  IGYCEN$5 IGYCEN$8 IGYCEN$D IGYCEN$R IGYCFGEN IGYCFREE IGYCINIT
  IGYCJA$0 IGYCJA$1 IGYCJA$2 IGYCJA$3 IGYCJA$4 IGYCJA$5 IGYCJA$8
  IGYCJA$D IGYCJA$R IGYCJBLD IGYCJGEN IGYCLIBR IGYCLSTR IGYCLVL0
  IGYCLVL1 IGYCLVL2 IGYCLVL3 IGYCLVL8 IGYCMALL IGYCOSCN IGYCPGEN
  IGYCRCTL IGYCRDPR IGYCRDSC IGYCREAL IGYCRWT  IGYCSCAN IGYCSIMD
  IGYCUE$0 IGYCUE$1 IGYCUE$2 IGYCUE$3 IGYCUE$4 IGYCUE$5 IGYCUE$8
  IGYCUE$D IGYCUE$R IGYCXREF IGYDRV   IGYEQCWI IGYMSGE  IGYMSGK
  IGYMSGT  IGYQCBE  IGYQSPLT IGYZQEN6 IGYZQENU IGYZQJP6 IGYZQJPN
  

Fix information

• Fixed component name

  ENT COBOL FOR Z

• Fixed component ID

  5655EC600

Applicable component levels

• R640 PSY UI98832

     UP24/10/31 P F410

• R641 PSY UI98833

     UP24/10/31 P F410

• R642 PSY UI98834

     UP24/10/31 P F410

• R64H PSY UI98835

     UP24/10/31 P F410

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.