diff options
Diffstat (limited to 'httemplate/view/cust_main/payment_history/invoice.html')
-rw-r--r-- | httemplate/view/cust_main/payment_history/invoice.html | 45 |
1 files changed, 45 insertions, 0 deletions
diff --git a/httemplate/view/cust_main/payment_history/invoice.html b/httemplate/view/cust_main/payment_history/invoice.html new file mode 100644 index 0000000..c0d32df --- /dev/null +++ b/httemplate/view/cust_main/payment_history/invoice.html @@ -0,0 +1,45 @@ +<% $link %><% $pre %>Invoice #<% $cust_bill->display_invnum %> +(Balance $ <% $cust_bill->owed %>)<% $post %><% $link ? '</A>' : '' %><% $delete %><% $events %> +<%init> + +my( $cust_bill, %opt ) = @_; + +my $conf = new FS::Conf; + +my $curuser = $FS::CurrentUser::CurrentUser; + +my($pre, $post) = ('', ''); +if ( $cust_bill->owed > 0 ) { + $pre = '<B><FONT SIZE="+1" COLOR="#FF0000">Open '; + $post = '</FONT></B>'; +} + +my $invnum = $cust_bill->invnum; + +my $link = $curuser->access_right('View invoices') + ? qq!<A HREF="${p}view/cust_bill.cgi?$invnum">! + : ''; + +my $delete = ''; +if ( $opt{'deleteinvoices'} && $curuser->access_right('Delete invoices') ) { + $delete = qq! (<A HREF="javascript:areyousure('!. + qq!${p}misc/delete-cust_bill.html?$invnum',!. + qq!'Are you sure you want to delete this invoice?')"!. + qq! TITLE="Delete this invoice from the database completely"!. + qq!>delete</A>)!; +} + +my $events = ''; +#1.9 +if ( $cust_bill->num_cust_event + && ( $curuser->access_right('Billing event reports') + || $curuser->access_right('View customer billing events') + ) + ) { + $events = + qq!<BR><FONT SIZE="-1"><A HREF="${p}search/cust_event.html?invnum=$invnum!. + '">( View invoice events )</A></FONT>'; +} +# + +</%init> |