From 23ec9b00410224868d6be1e47a0d72a6c8b3f6f5 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Sat, 29 Nov 2003 08:08:36 +0000
Subject: postscript invoice redux

---
 httemplate/view/cust_bill-ps.cgi | 13 +++++++++++++
 1 file changed, 13 insertions(+)
 create mode 100755 httemplate/view/cust_bill-ps.cgi

(limited to 'httemplate/view/cust_bill-ps.cgi')

diff --git a/httemplate/view/cust_bill-ps.cgi b/httemplate/view/cust_bill-ps.cgi
new file mode 100755
index 000000000..03340a16f
--- /dev/null
+++ b/httemplate/view/cust_bill-ps.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 %>
-- 
cgit v1.2.1