At 14:28 -0600 on 11/12/2008, Eric Spencer wrote about Re: Access
STIMER(M) from COBOL program?:
If your "key" is formatted (i.e. mmddyyyyhhmmss) and not just a stck
value then just convert it to STCK format before the add (in this case
you have to add a second, or you'll end up with the same key) then back
to mmddyy... after... probably still way more efficient than a STIMER.
No need to go to that much trouble. Map the time so you can access
each part and then just add 1 to ss. If it goes to 60 then make it 0
and bump mm/etc until you get a valid value and then test the new
value. You can also just allow ss to go to 60+ if you want (ie:
Create your own Leap Seconds) to avoid the need to fix the rest of
the time stamp.
----------------------------------------------------------------------
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