diff options
author | ivan <ivan> | 2004-10-05 13:35:41 +0000 |
---|---|---|
committer | ivan <ivan> | 2004-10-05 13:35:41 +0000 |
commit | 97c0616b60819a23dbc6d7d6ebf2ff1dc3446e91 (patch) | |
tree | 185a1b69000193064ba3542ffaa622013a440072 /httemplate/view/cust_bill-ps.cgi | |
parent | 0247c39288b477060509240ef23a5e7b6bfcd8f8 (diff) |
links to show alternate invoices also
Diffstat (limited to 'httemplate/view/cust_bill-ps.cgi')
-rwxr-xr-x | httemplate/view/cust_bill-ps.cgi | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/httemplate/view/cust_bill-ps.cgi b/httemplate/view/cust_bill-ps.cgi index 03340a16f..bbf63ced9 100755 --- a/httemplate/view/cust_bill-ps.cgi +++ b/httemplate/view/cust_bill-ps.cgi @@ -2,12 +2,13 @@ #untaint invnum my($query) = $cgi->keywords; -$query =~ /^(\d+)$/; -my $invnum = $1; +$query =~ /^((.+)-)?(\d+)$/; +my $templatename = $1; +my $invnum = $3; my $cust_bill = qsearchs('cust_bill',{'invnum'=>$invnum}); die "Invoice #$invnum not found!" unless $cust_bill; http_header('Content-Type' => 'application/postscript' ); %> -<%= $cust_bill->print_ps %> +<%= $cust_bill->print_ps( '', $templatename) %> |