diff options
Diffstat (limited to 'httemplate/search/report_rt_transaction.html')
-rw-r--r-- | httemplate/search/report_rt_transaction.html | 56 |
1 files changed, 56 insertions, 0 deletions
diff --git a/httemplate/search/report_rt_transaction.html b/httemplate/search/report_rt_transaction.html new file mode 100644 index 0000000..61445bd --- /dev/null +++ b/httemplate/search/report_rt_transaction.html @@ -0,0 +1,56 @@ +<% include('/elements/header.html', 'Time worked report criteria' ) %> + +<FORM ACTION="rt_transaction.html" METHOD="GET"> + +<TABLE> + + <% include ( '/elements/tr-input-beginning_ending.html' ) %> + + <% include ( '/elements/tr-select-otaker.html' ) %> + + <% include ( '/elements/tr-input-text.html', + 'label' => 'Ticket #', + 'field' => 'ticketid', + ) + %> + + <TR> + <TD>Account</TD> + <TD> + <SELECT NAME="svcnum"> + <OPTION VALUE="">(all) +% foreach my $svc_acct (@svc_acct) { + <OPTION VALUE="<% $svc_acct->svcnum %>"><% $svc_acct->username %></OPTION> +% } + </SELECT> + </TD> + </TR> + +</TABLE> + +<BR> +<INPUT TYPE="submit" VALUE="Search"> + +</FORM> + +<% include('/elements/footer.html') %> +<%init> + +die "access denied" + unless $FS::CurrentUser::CurrentUser->access_right('List rating data'); + +my $conf = new FS::Conf; + +my @pkgparts = $conf->config('support_packages'); + +my @svc_acct = (); +if ( @pkgparts ) { + @svc_acct = qsearch({ + 'table' => 'svc_acct', + 'addl_from' => ' LEFT JOIN cust_svc USING ( svcnum ) '. + ' LEFT JOIN cust_pkg USING ( pkgnum ) ', + 'extra_sql' => 'WHERE pkgpart IN ('. join(',', @pkgparts). ')', + }); +} + +</%init> |