diff options
Diffstat (limited to 'httemplate/search/rt_transaction.html')
-rw-r--r-- | httemplate/search/rt_transaction.html | 96 |
1 files changed, 0 insertions, 96 deletions
diff --git a/httemplate/search/rt_transaction.html b/httemplate/search/rt_transaction.html deleted file mode 100644 index 651f2896d..000000000 --- a/httemplate/search/rt_transaction.html +++ /dev/null @@ -1,96 +0,0 @@ -<% include('elements/search.html', - 'title' => 'Time worked', - 'name_singular' => 'transaction', - 'query' => $query, - 'count_query' => $count_query, - 'count_addl' => [ $format_seconds_sub, ], - 'header' => [ 'Ticket #', - 'Ticket', - 'Date', - 'Time', - ], - 'fields' => [ 'ticketid', - sub { encode_entities(shift->get('subject')) }, - 'created', - sub { my $seconds = shift->get('transaction_time'); - &{ $format_seconds_sub }( $seconds ); - }, - ], - 'links' => [ - $link, - $link, - '', - '', - ], - ) -%> -<%once> - -my $format_seconds_sub = sub { - my $seconds = shift; - (($seconds < 0) ? '-' : '') . concise(duration($seconds)); -}; - -</%once> -<%init> - -die "access denied" - unless $FS::CurrentUser::CurrentUser->access_right('List rating data'); - -#some amount of false laziness w/timeworked.html... - -my $transactiontime = " - CASE transactions.type when 'Set' - THEN (to_number(newvalue,'999999')-to_number(oldvalue, '999999')) * 60 - ELSE timetaken*60 - END -"; - -my $join = 'JOIN Tickets ON Transactions.ObjectId = Tickets.Id '. - 'JOIN Users ON Transactions.Creator = Users.Id '; - -my $where = " - WHERE objecttype='RT::Ticket' - AND ( ( Transactions.Type = 'Set' - AND Transactions.Field = 'TimeWorked' - AND Transactions.NewValue != Transactions.OldValue ) - OR ( ( Transactions.Type='Create' OR Transactions.Type='Comment' OR Transactions.Type='Correspond' ) - AND Transactions.TimeTaken > 0 - ) - ) -"; -#AND transaction_time != 0 -#AND $wheretimeleft - -my($beginning, $ending) = FS::UI::Web::parse_beginning_ending($cgi); -# TIMESTAMP is Pg-specific... ? -if ( $beginning > 0 ) { - $beginning = "TIMESTAMP '". time2str('%Y-%m-%d %X', $beginning). "'"; - $where .= " AND Transactions.Created >= $beginning "; -} -if ( $ending < 4294967295 ) { - $ending = "TIMESTAMP '". time2str('%Y-%m-%d %X', $ending). "'"; - $where .= " AND Transactions.Created <= $ending "; -} - -if ( $cgi->param('otaker') && $cgi->param('otaker') =~ /^([\w\.\-]+)$/ ) { - $where .= " AND Users.name = '$1' "; -} - -my $query = { - 'select' => "Transactions.*, Tickets.Id AS ticketid, Tickets.Subject, Users.name as otaker, $transactiontime AS transaction_time", - #'table' => 'Transactions', - 'table' => 'transactions', - 'addl_from' => $join. - 'LEFT JOIN acct_rt_transaction '. - ' ON Transactions.Id = acct_rt_transaction.transaction_id', - 'extra_sql' => $where, - 'order by' => 'ORDER BY Created', -}; - -my $count_query = - "SELECT COUNT(*), SUM($transactiontime) FROM Transactions $join $where"; - -my $link = [ "${p}rt/Ticket/Display.html?id=", sub { shift->get('id'); } ]; - -</%init> |