X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fsearch%2Ftimeworked.html;h=12c7da043683c861b0f0272d7ad3e486b621754c;hp=18af7464196deca2b6e11485deebe65db3cfee35;hb=3f2a7b01b59902faed5767d81e2959e131bdbdfd;hpb=1293d137b061f097190eda53e4e78214e18832e6 diff --git a/httemplate/search/timeworked.html b/httemplate/search/timeworked.html index 18af74641..12c7da043 100644 --- a/httemplate/search/timeworked.html +++ b/httemplate/search/timeworked.html @@ -1,8 +1,7 @@ -<% include( 'elements/search.html', +<& elements/search.html, 'title' => 'Time Worked', - 'menubar' => [ 'Main menu' => $p, ], 'name' => 'time', - 'html_form' => qq!
!, + 'html_form' => $html_form, 'query' => $query, 'count_query' => $count_query, 'header' => [ '#', @@ -12,7 +11,7 @@ '', # checkbox column ], 'fields' => [ sub { shift->[0] }, - sub { shift->[1] }, + sub { encode_entities(shift->[1]) }, sub { shift->[2] }, sub { my $seconds = shift->[3]; (($seconds < 0) ? '-' : '') . @@ -26,22 +25,16 @@ qq!!; }, ], - 'html_foot' => sub { - '
'. - ''. - '

'. - ''; - }, - ) - -%> + 'links' => [ + $link, + $link, + '', + '', + '', + ], + 'html_foot' => $html_foot, + +&> <%init> die "access denied" @@ -49,26 +42,111 @@ die "access denied" my @groupby = (); -my $transactiontime = "CASE transactions.type when 'Set' THEN (to_number(newvalue,'999999')-to_number(oldvalue, '999999')) * 60 ELSE timetaken*60 END"; -push @groupby, "transactions.type"; -push @groupby, "newvalue"; -push @groupby, "oldvalue"; -push @groupby, "timetaken"; +my $transactiontime = " + CASE Transactions.Type WHEN 'Set' + THEN ( CASE WHEN NewValue = '' THEN 0 ELSE TO_NUMBER(NewValue,'999999') END + -TO_NUMBER(OldValue, '999999') + ) * 60 + ELSE TimeTaken*60 + END +"; -my $appliedtimeclause = "coalesce (sum(svc_acct_rt_transaction.seconds), 0)"; +push @groupby, qw( Transactions.Type NewValue OldValue TimeTaken ); -my $appliedtimeselect = "SELECT sum(seconds) FROM svc_acct_rt_transaction where transaction_id = transactions.id"; -push @groupby, "transactions.id"; +my $appliedtimeclause = "COALESCE (SUM(acct_rt_transaction.seconds), 0)"; -my $wheretimeleft = "($transactiontime != ($appliedtimeselect) OR ($appliedtimeselect) is NULL)"; +my $appliedtimeselect = " + COALESCE( + ( SELECT SUM(seconds) FROM acct_rt_transaction + WHERE transaction_id = Transactions.id + ), + 0 + ) +"; -push @groupby, "tickets.id"; -push @groupby, "tickets.subject"; -push @groupby, "transactions.created"; +push @groupby, "Transactions.id"; + +my $wheretimeleft = "$transactiontime != $appliedtimeselect"; + +push @groupby, "Tickets.id"; +push @groupby, "Tickets.Subject"; +push @groupby, "Transactions.Created"; my $groupby = join(',', @groupby); -my $query = "SELECT tickets.id,tickets.subject,to_char(transactions.created, 'Dy Mon DD HH24:MI:SS YYYY'),$transactiontime-$appliedtimeclause,transactions.id FROM transactions JOIN tickets ON transactions.objectid = tickets.id LEFT JOIN svc_acct_rt_transaction on transactions.id = svc_acct_rt_transaction.transaction_id WHERE objecttype='RT::Ticket' AND ((transactions.type='Set' AND field='TimeWorked') OR transactions.type='Comment' OR transactions.type='Correspond') AND ($wheretimeleft) GROUP BY $groupby ORDER BY transactions.created"; -my $count_query = "SELECT count(*) FROM transactions WHERE objecttype='RT::Ticket' AND ((transactions.type='Set' AND field='TimeWorked') OR transactions.type='Comment' OR transactions.type='Correspond') AND ($wheretimeleft)"; +my $where = " + WHERE ObjectType='RT::Ticket' + AND ( ( Transactions.Type='Set' AND Field='TimeWorked' ) + OR Transactions.Type IN ( 'Create', 'Comment', 'Correspond', 'Touch' ) + ) + AND $wheretimeleft +"; + #AND $wheretimeleft + +my $str2time_sql = str2time_sql; +my $closing = str2time_sql_closing; + + +my($begin, $end) = FS::UI::Web::parse_beginning_ending($cgi); +$where .= " AND $str2time_sql Transactions.Created $closing >= $begin ". + " AND $str2time_sql Transactions.Created $closing <= $end "; + +my $html_form = + qq( ); +if ($cgi->param('category') =~ /^(\w+)$/) { + $where .= " AND ocfv_TimeType.Content = '$1'"; + $html_form .= qq( ); +} + +my $from = " + FROM Transactions + JOIN Tickets ON Transactions.ObjectId = Tickets.id + LEFT JOIN acct_rt_transaction + ON Transactions.id = acct_rt_transaction.transaction_id + LEFT JOIN ( + SELECT DISTINCT ON (ObjectId) + ObjectId, Content + FROM ObjectCustomFieldValues + JOIN CustomFields + ON (ObjectCustomFieldValues.CustomField = CustomFields.Id) + WHERE CustomFields.Name = 'TimeType' + AND ObjectCustomFieldValues.ObjectType = 'RT::Ticket' + AND ObjectCustomFieldValues.Disabled = 0 + ORDER BY ObjectId ASC, ObjectCustomFieldValues.LastUpdated DESC + ) AS ocfv_TimeType ON (Tickets.Id = ocfv_TimeType.ObjectId) +"; + +my $query = " + SELECT Tickets.id, Tickets.Subject, + TO_CHAR(Transactions.Created, 'Dy Mon DD HH24:MI:SS YYYY'), + $transactiontime-$appliedtimeclause, + Transactions.id + $from + $where + GROUP BY $groupby + ORDER BY Transactions.Created +"; + +my $count_query = "SELECT COUNT(*) $from $where"; + +my $link = [ "${p}rt/Ticket/Display.html?id=", sub { shift->[0]; } ]; + +my $html_foot = qq' + + +
+ + +
+
+ +';