OA60725: ARCGS004 RECALL STATISTICS REPORT FAILS WITH RC16 AFTER OA59466 21/02/03 PTF PECHANGE

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• ARCGS004 Recall statistics report fails with RC16 after
  installing PTFs for OA59466.
  There are syntax errors in the SORT generated JCL.  The code
  supplied by OA59466 itself is not in error.
  
  **See the LOCAL FIX for the changes required to the
  SORT statements and the job will run without error.
  
  Details of error description:
  In the joblog output, the failing step is in
  ARCGFSRC when it converts FSR to FSR2.  The syntax error is
  within the SORT statements and IEC005A is issued.
  IFTHEN=(WHEN=(383,1,BI,EQ,B'....1...'),
       OVERLAY=(289:80Z),HIT=NEXT)
  IFTHEN=(WHEN=(383,1,BI,EQ,B'......0.'),
  $
  ICE005A 0 BLANK NEEDED IN COLUMN 1 OR OPERATION NOT DEFINED
    CORRECTLY
  and
  OVERLAY=(393:Z),HIT=NEXT),
  $
  ICE005A 0 BLANK NEEDED IN COLUMN 1 OR OPERATION NOT DEFINED
    CORRECTLY
  IFTHEN=(WHEN=(383,1,BI,EQ,B'......1.'),
  $
  ICE005A 0 BLANK NEEDED IN COLUMN 1 OR OPERATION NOT DEFINED
    CORRECTLY
  OVERLAY=(289:80Z),HIT=NEXT),
  $
  ICE005A 0 BLANK NEEDED IN COLUMN 1 OR OPERATION NOT DEFINED
    CORRECTLY
  SORT FIELDS=COPY
      END
  The top IFTHEN statement followed by OVERLAY statement is
  missing a command at the end.
  The last IFTHEN followed by OVERLAY statement contains a
  comma at the end which should be removed.
  
  If using SYNCSORT, it notates the same syntax errors as well as
  the following message:
  WER275A  NO KEYWORDS FOUND ON CONTROL STATEMENT
  The real reason for the failure is the syntax errors.
  ADDITIONAL SYMPTOMS:
  Each of the HSM reports fail with this error.
  ARCGS00A, ARCGS001, ARCGS002, ARCGS003, ARCGS004
  ARCGS005, ARCGS006, ARCGS007, ARCGS008, ARCGS009
  ARCGS010, ARCGS011
  

Local fix

• Modify the JCL prior to submission to add a comma where it
  was missing and remove the comma on the last statement
  where it should be removed.
   IFTHEN=(WHEN=(383,1,BI,EQ,B'...1....'),
        OVERLAY=(289:80Z),HIT=NEXT),
   IFTHEN=(WHEN=(383,1,BI,EQ,B'....1...'),
        OVERLAY=(289:80Z),HIT=NEXT),  <<< added comma
   IFTHEN=(WHEN=(383,1,BI,EQ,B'......0.'),
        OVERLAY=(393:Z),HIT=NEXT),
   IFTHEN=(WHEN=(383,1,BI,EQ,B'......1.'),
        OVERLAY=(289:80Z),HIT=NEXT)   <<< removed comma
  SORT FIELDS=COPY
  

Problem summary

• ****************************************************************
  * USERS AFFECTED:                                              *
  * Users of DFSMShsm V2R3 and up that use                       *
  * report generator JCL.                                        *
  ****************************************************************
  * PROBLEM DESCRIPTION:                                         *
  * Report generator JCL may fail with                           *
  * RC=16 when an extract step is included.                      *
  ****************************************************************
  * RECOMMENDATION:                                              *
  ****************************************************************
  

Problem conclusion

• DFSMShsm has been modified to correct this problem.
  

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:

  UJ04838 UJ04839

Modules/Macros

• ARCGFSRC
  

Fix information

• Fixed component name

  DFSMSHSM, ISMF

• Fixed component ID

  5695DF170

Applicable component levels

• R230 PSY UJ04838

     UP21/02/16 P F102 {

• R240 PSY UJ04839

     UP21/02/16 P F102 {

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.