The @time variable…

I have a tcl proc that concats the @date and @time together to get a 12 digit date field.  My problem is our servers are located on East coast time, so when I am sending records the time is a hour ahead of my actual time.  Is there a way to subtract an hour from the time.

Here is my proc, don’t laugh too hard, I am new at this who TCL stuff.

lassign $xlateInVals date time

#Format the current date and time

set date12

%Y%m%d]]

set time4

0 4]]

set time4

]

#Append current time to the 8 digit date field

append date12 $time4

set xlateOutVals $date12