X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fview%2Fcust_bill.cgi;h=5dd8a8d71ecdf5a0857f33210256460f71e97294;hp=7c2af06a77755da1ffff16751e3549c2cadab1e8;hb=3081639bd119c6d281ef23139649b2e73ba62754;hpb=a4c96748eb6eab29a70f3a944c6520283a635c78
diff --git a/httemplate/view/cust_bill.cgi b/httemplate/view/cust_bill.cgi
index 7c2af06a7..5dd8a8d71 100755
--- a/httemplate/view/cust_bill.cgi
+++ b/httemplate/view/cust_bill.cgi
@@ -3,8 +3,11 @@
#untaint invnum
my($query) = $cgi->keywords;
-$query =~ /^(\d+)$/;
-my $invnum = $1;
+$query =~ /^((.+)-)?(\d+)$/;
+my $templatename = $2;
+my $invnum = $3;
+
+my $conf = new FS::Conf;
my $cust_bill = qsearchs('cust_bill',{'invnum'=>$invnum});
die "Invoice #$invnum not found!" unless $cust_bill;
@@ -20,21 +23,66 @@ print header('Invoice View', menubar(
print qq!Enter payments (check/cash) against this invoice | !
if $cust_bill->owed > 0;
-print qq!Reprint this invoice!. '
';
+print qq!Reprint this invoice!;
+if ( grep { $_ ne 'POST' } $cust_bill->cust_main->invoicing_list ) {
+ print qq! | !.
+ qq!Re-email this invoice!;
+}
+
+print qq! | Refax this invoice!
+ if ($conf->exists('hylafax'));
+
+print '
';
-foreach my $cust_bill_event (
- sort { $a->_date <=> $b->_date } $cust_bill->cust_bill_event
-) {
- print time2str("%a %b %e %T %Y", $cust_bill_event->_date). ' - '.
- $cust_bill_event->part_bill_event->event. '
';
+if ( $conf->exists('invoice_latex') ) {
+ my $link = "${p}view/cust_bill-pdf.cgi?";
+ $link .= "$templatename-" if $templatename;
+ $link .= "$invnum.pdf";
+ print menubar(
+ 'View typeset invoice' => $link,
+ ), '
';
}
-print '
'; -print $cust_bill->print_text; +#false laziness with search/cust_bill_event.cgi + +unless ( $templatename ) { + print table(). ''; + foreach my $cust_bill_event ( + sort { $a->_date <=> $b->_date } $cust_bill->cust_bill_event + ) { + my $status = $cust_bill_event->status; + $status .= ': '. encode_entities($cust_bill_event->statustext) + if $cust_bill_event->statustext; + my $part_bill_event = $cust_bill_event->part_bill_event; + print ' Event Date Status '; + } + print ' '. $part_bill_event->event; + + if ( + $part_bill_event->plan eq 'send_alternate' + && $part_bill_event->plandata =~ /^templatename (.*)$/m + ) { + my $templatename = $1; + print qq! ( !. + 'view | '. + qq!!. + 'view typeset )'; + } + + print ' '. + time2str("%a %b %e %T %Y", $cust_bill_event->_date). ' '. + $status. '
'; +} + +if ( $conf->exists('invoice_html') ) { + print $cust_bill->print_html('', $templatename); +} else { + print '', $cust_bill->print_text('', $templatename), ''; +} #formatting print <+