projects
/
freeside.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
self-service keepalives
[freeside.git]
/
httemplate
/
view
/
cust_bill-ps.cgi
1
<%
2
3
#untaint invnum
4
my($query) = $cgi->keywords;
5
$query =~ /^(\d+)$/;
6
my $invnum = $1;
7
8
my $cust_bill = qsearchs('cust_bill',{'invnum'=>$invnum});
9
die "Invoice #$invnum not found!" unless $cust_bill;
10
11
http_header('Content-Type' => 'application/postscript' );
12
%>
13
<%= $cust_bill->print_ps %>