diff options
author | ivan <ivan> | 2004-01-11 23:37:08 +0000 |
---|---|---|
committer | ivan <ivan> | 2004-01-11 23:37:08 +0000 |
commit | 01c33bcdfa27576bee4ab922095749794a6b9f57 (patch) | |
tree | 09c73cdecde1abed2b45f3257da6e95cebff5d9a /httemplate/view | |
parent | e09c90ae3aa34e1e5a98bf024d99fbd07a50c3e4 (diff) |
adding
Diffstat (limited to 'httemplate/view')
-rwxr-xr-x | httemplate/view/cust_bill-pdf.cgi | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/httemplate/view/cust_bill-pdf.cgi b/httemplate/view/cust_bill-pdf.cgi new file mode 100755 index 000000000..03340a16f --- /dev/null +++ b/httemplate/view/cust_bill-pdf.cgi @@ -0,0 +1,13 @@ +<% + +#untaint invnum +my($query) = $cgi->keywords; +$query =~ /^(\d+)$/; +my $invnum = $1; + +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 %> |