PM45509: LTP EXTEND TYPE W MAY END ON A FREE DAY IN YEARS 2012, 2013, 2040, 2041. PROBLEMS ALSO FOR ANY LATER LEAP YEAR(2016, 2020)

Obtain the fix for this APAR.

APAR status

• Closed as program error.

Error description

• A problem was reported with CP LTP processing when TYPE W is
  specified, and the generated end date is a FREE DAY. Sometimes,
  instead of extending the plan until the next WORK day, the plan
  is generated for exactly the specified number of hours and ends
  on a FREE DAY. The symptom described below occurs when using
  dates that fall in the year 2012, 2013, 2040, 2041, 2068, 2069.
  .
  The cause is the special case of a leapyear where January first
  occurs on a Sunday.  This causes the year to both start and end
  on a Sunday, and thus it will have days in 54 different weeks.
  According to ISO standard 8601, this is a 53-week year, but the
  TWSz logic does not recognize this special case.
  .
  The problem can be reproduced as follows:
  .
  1. Set the z/OS SYSTEM DATE to one of the affected
     years 2012,2013,2040,2041,2068,2069.  The problem
     will not occur in any other years even without the
     APAR being applied.
  2. Create an LTP with NO FREE DAYS.
  3. Add free days to the CALENDAR and do an LTMOA.
  4. Create a DEFAULT CALENDAR where Mon-Sun are work days, and
     there are NO free days at all.
  5. Refresh the CP and create an LTP using this calendar.
  6. Modify the calendar to add several explicit, consecutive FREE
     DAYS (NOTE: Mon-Sun still all work days)
  7. Do an LTP MODIFY ALL to add the new FREE DAYS to the LTP
  8. Create a CP using TYPE=W and setting the END DATE to the
     first defined FREE DAY.
  The generated CP will end ON THE FREE DAY.
  .
  9. Now, EXTEND the CP for 24 hours (again type=W)
  Again the generated CP will end on a FREE DAY.
  week54
  In addition a wrong number of weeks is calculated in the
  calendar of 2013.
  The current apar completes the code change of PM14244 to the
  future years
  
  Obviously if this APAR was not previously
  applied there would also be problems in
  any subsequent leap year such as 2016
  due to a wrong calculation of free days.
  .
  

Local fix

Problem summary

• ****************************************************************
  * USERS AFFECTED: ALL TWS for z/OS USERs.                      *
  *                 FUNCTION=LTP/CP.                             *
  ****************************************************************
  * PROBLEM DESCRIPTION: LTP/CP extend type W may end on a free  *
  *                      day in years 2012, 2013, 2040, 2041.    *
  ****************************************************************
  * RECOMMENDATION: APPLY THE PTF FIXING THIS APAR               *
  ****************************************************************
  The root of the issue it is that 2012 and 2040 are 2 leap years
  that have 53 weeks, but the TWSz for they calculated 52 weeks
  only, this error was propagated in the 2013, 2041 year too.
  

Problem conclusion

• Now the TWSz calculate 53 weeks for the 2012 and 2040 years.
  302Y
  502Y
  512Y
  602Y
  EQQHCYEP
  

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:

  UK71529 UK71530 UK71531 PM73032

Modules/Macros

• EQQHCYEP
  

Fix information

• Fixed component name

  TIV WRKLD SCHD

• Fixed component ID

  5697WSZ01

Applicable component levels

• R302 PSY UK71529

     UP11/09/17 P F109

• R502 PSY UK71530

     UP11/09/17 P F109

• R512 PSY UK71531

     UP11/09/17 P F109

• R602 PSY UK71532

     UP11/09/22 P F109

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.