MyAccount

<%= $url = "$selfurl?session=$session_id;action="; ''; %> <%= include('myaccount_menu') %> Support usage details for <%= Date::Format::time2str('%b %o %Y', $beginning) %> - <%= Date::Format::time2str('%b %o %Y', $ending) %>

<%= if ( $error ) { $OUT .= qq!$error

!; } ''; %>

<%= if ($previous < $beginning) { $OUT .= qq!Previous period!; }else{ ''; } %>

<%= if ($next > $ending) { $OUT .= qq!Next period!; }else{ ''; }%>

<%= my $total = 0; foreach my $usage ( @usage ) { $OUT .= ''; } my $h = int($total/3600); my $m = sprintf("%02d", int(($total % 3600) / 60)); my $s = sprintf("%02d", $total % 60); $OUT .= qq!!; $OUT .= qq!!; %>

Ticket	Subject	Staff	Date	Status	Time
'; $OUT .= $usage->{'ticketid'}; $OUT .= '	'; $OUT .= $usage->{'subject'}; $OUT .= '	'; $OUT .= $usage->{'creator'}; $OUT .= '	'; $OUT .= Date::Format::time2str('%T%P %a %b %o %Y', $usage->{'_date'}); $OUT .= '	'; $OUT .= $usage->{'status'}; $OUT .= '	'; my $duration = $usage->{'support'}; $total += $usage->{'support'}; my $h = int($duration/3600); my $m = sprintf("%02d", int(($duration % 3600) / 60)); my $s = sprintf("%02d", $duration % 60); $OUT .= $usage->{'support'} < 0 ? '-' : ''; $OUT .= "$h:$m:$s"; $OUT .= '
					$h:$m:$s

<%= include('footer') %>