Hi Kevin, Thanks for the Quick response. Is there any good documentation anywhere on the RT:Date functions? A quick search of the wiki resulted in nothing more or less, so for the time being, I believe the solution should be something along the lines of:
my $CF_Obj = RT::CustomField->new($self->CurrentUser); my $cf_name = 'Ticket_resolveDate'; my ( $sec, $min, $hour, $day, $mon, $year ) = localtime( time ); my $cf_value = sprintf( '%d-%02d-%02d %02d:%02d:%02d', $year + 1900, $mon + 1, $day, $hour, $min, $sec ); $CF_Obj->LoadByName( Name => $cf_name,); $RT::Logger->debug( "Loaded \$CF_Obj->Name = ". $CF_Obj->Name() ."\n" ); $CF_Obj->AddValueForObject( Object => $self->TicketObj, Content => $cf_value, ); 1; Thanks, Bill G. On Tue, Sep 1, 2009 at 11:35 AM, Kevin Falcone <falc...@bestpractical.com>wrote: > On Tue, Sep 01, 2009 at 11:29:36AM -0700, William Graboyes wrote: > > Hi all, > > > > I am having a strange issue with a script, I was wondering if those > who are a bit more > > proficient than myself can give me a couple of pointers. > > > > The issue is that sometimes, quite regularly actually, it is printing > a date that is 1 month > > behind the current date. this has me very confused, there are a few > that wrote the date > > properly, (about 17 out of 330). So with out further complications, > here is a copy of the > > scrip. > > You may want to read > $ perldoc -f localtime > > which explains that $mon is not 1-12 > > Also, you may want one of the functions from RT::Date rather than > doing it by hand. > > -kevin > > > > > my $CF_Obj = RT::CustomField->new($self->CurrentUser); > > my $cf_name = 'Ticket_resolveDate'; > > my ( $sec, $min, $hour, $day, $mon, $year ) = localtime( time ); > > my $cf_value = sprintf( '%d-%02d-%02d %02d:%02d:%02d', $year + 1900, > $mon, $day, $hour, > > $min, $sec ); > > $CF_Obj->LoadByName( Name => $cf_name,); > > $RT::Logger->debug( "Loaded \$CF_Obj->Name = ". $CF_Obj->Name() > ."\n" ); > > > > $CF_Obj->AddValueForObject( Object => $self->TicketObj, > > Content => $cf_value, ); > > 1; > _______________________________________________ > http://lists.bestpractical.com/cgi-bin/mailman/listinfo/rt-users > > Community help: http://wiki.bestpractical.com > Commercial support: sa...@bestpractical.com > > > Discover RT's hidden secrets with RT Essentials from O'Reilly Media. > Buy a copy at http://rtbook.bestpractical.com > -- Bill Graboyes On Assignment At: Toyota Motor Sales, USA, Inc. Consumer Portal Delivery Office: (310) 468-6754 Cell: (714) 515-8312
_______________________________________________ http://lists.bestpractical.com/cgi-bin/mailman/listinfo/rt-users Community help: http://wiki.bestpractical.com Commercial support: sa...@bestpractical.com Discover RT's hidden secrets with RT Essentials from O'Reilly Media. Buy a copy at http://rtbook.bestpractical.com