Actually, I'm going to need this to work back to z/OS 1.2 and maybe
earlier.  The goal is to calculate a doubleword retention-in-seconds 
(from the current moment) value for a special NAS device.  For dates
beyond 2042, I'm currently looking at a comparatively simple, rather 
linear way of factoring in the leap year adjustment that will get me
very close to the target expiration date/time.  

I'll write the code so it only does the above when CONVTOD returns an
RC=20 (which is what I see now with years beyond 2042).  That way, 
whenever CONVTOD begins to support the higher years, it'll use the
STCKE-format-based calculation.

Thanks to all for their responses.


At 06:18 PM 9/12/2005, Edward E. Jaffe wrote:
  
>Art Celestini wrote:
>
>>I'm testing some code on z/OS 1.5 and find that CONVTOD will not accept
>>a year greater than 2042, even though an ETOD is requested.  Does anyone
>>know if there is an APAR that extends this limit?  I'm trying to use it
>>for date calculations that could, potentially, involve dates that are 100 
>>years into the future.
>> 
>
>That's not surprising. When CONVTOD was updated to accept STCKE input/output, 
>more than likely the changes were minimal -- i.e., an 8-bit shift of the 
>64-bit value. We've done the same here for most of our TOD value handling 
>routines as well. (No attempt to actually work with values longer than 64 
>bits.)
>
>Things will probably stay that way until somebody complains. Have you tried 
>getting an APAR opened?
>
>-- 



==================================================
Art Celestini       Celestini Development Services
Phone: 201-670-1674                    Wyckoff, NJ
=============  http://celestini.com  =============
Mail sent to the "From" address  used in this post
will be rejected by our server.   Please send off-
list email to:  ibmmain<at-sign>celestini<dot>com.
==================================================

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to