Subtracting one minute

[David Harrison]

I need to subtract one minute from the time and date if it is midnight. The datetime is presented as CCYYMMDDHHMM. I found the following code but it only works if there is a space between the date and time:

Code:

sset time “20110419 0000”
set format “%Y%m%d%H%M”
set time [clock format [clock scan “-1 minute” -base [clock scan $time]] -format $format]
puts $time

201104182359

If I remove the space I get:

Code:

set time “201104190000”
set format “%Y%m%d%H%M”
set time [clock format [clock scan “-1 minute” -base [clock scan $time]] -format $format]
puts $time

7393106182359

Any clues welcome.

Topic

[Ron Ridley]

Have you tried passing in -format $format in your clock scan call?

Code:

set time [clock format [clock scan “-1 minute” -base [clock scan $time -format $format]] -format $format]

[David Harrison]

That did it. Thank you.

[Gene Salay]

This code doesn’t seem to work in 5.8 on AIX with TCL 8.4.    

Did the -format option for clock scan pass away at some point?

[Bakha Nurzhanov]

I believe clock scan -format option gets introduced in Tcl 8.5

[Gene Salay]

What version of Cloverleaf began support for TCL 8.5?

[Gene Salay]

Also, why can’t I search for “8.5” on Clovertech?

[Peter Heggie]

My release notes for v5.8.5 states that Tcl 8.4.12 is supported/included.

Peter Heggie

[John Mercogliano]

David,

 Here is a link that discusses your issue with the clock command in detail.

<a href="http://clovertech.infor.com/viewtopic.php?t=2613&highlight=&#8221; class=”bbcode_url”>http://clovertech.infor.com/viewtopic.php?t=2613&highlight=

Hopefully, in 6.0 they go to 8.5 where clock uses 64 bit int and we don’t have to worry about running out of dates.  We occasionally have people fat finger future dates that are out of bounds of tcls range.  It would be nice not to have to worry about that.

John Mercogliano
Sentara Healthcare
Hampton Roads, VA

[Gene Salay]

Ok, I’m feeling like the dunce in the room.   Can anyone answer this: How, back on Tuesday April 19, 2011, were Ron Ridley and David Harrison using TCL 8.5 to get the -format option to work for the clock command if, on Saturday, November 3, 2012, TCL 8.5 is still not included in Cloverleaf?

[David Harrison]

Gene,

Yes I was a bit confused as well. I

[Gene Salay]

Thanks David, but not entirely.     Apparently it WAS working for Ron?

Is it possible to install a later TCL on your CIS box?

And again, can anyone answer why searching for 8.5 in Clovertech fails?

Thanks!

[Author]

Replies