X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fcust_pay.cgi;h=855fbfcf125f4492a9030d2545e0d677ac86cd5e;hb=9509e5bfb7f9331303153cac24d7bfecbe2ea9f1;hp=90f1f00261b8c5d2ae4b1704e3bd591c0de1924e;hpb=328223d69a72ceaf25597410f581d006351222cb;p=freeside.git
diff --git a/httemplate/edit/cust_pay.cgi b/httemplate/edit/cust_pay.cgi
index 90f1f0026..855fbfcf1 100755
--- a/httemplate/edit/cust_pay.cgi
+++ b/httemplate/edit/cust_pay.cgi
@@ -1,126 +1,41 @@
-
-<%
+% if ( $link eq 'popup' ) {
+ <% include('/elements/header-popup.html', $title ) %>
+% } else {
+ <% include("/elements/header.html", $title, '') %>
+% }
-my $conf = new FS::Conf;
-
-my($link, $linknum, $paid, $payby, $payinfo, $quickpay, $_date);
-if ( $cgi->param('error') ) {
- $link = $cgi->param('link');
- $linknum = $cgi->param('linknum');
- $paid = $cgi->param('paid');
- $payby = $cgi->param('payby');
- $payinfo = $cgi->param('payinfo');
- $quickpay = $cgi->param('quickpay');
- $_date = $cgi->param('_date') ? str2time($cgi->param('_date')) : time;
-} elsif ($cgi->keywords) {
- my($query) = $cgi->keywords;
- $query =~ /^(\d+)$/;
- $link = 'invnum';
- $linknum = $1;
- $paid = '';
- $payby = 'BILL';
- $payinfo = "";
- $quickpay = '';
- $_date = time;
-} elsif ( $cgi->param('custnum') =~ /^(\d+)$/ ) {
- $link = 'custnum';
- $linknum = $1;
- $paid = '';
- $payby = 'BILL';
- $payinfo = '';
- $quickpay = $cgi->param('quickpay');
- $_date = time;
-} else {
- die "illegal query ". $cgi->keywords;
-}
-
-my $paybatch = "webui-$_date-$$-". rand() * 2**32;
-
-%>
-
-<%= header("Post payment", '') %>
-
-<% if ( $cgi->param('error') ) { %>
-Error: <%= $cgi->param('error') %>
-
-<% } %>
-
-<%= ntable("#cccccc",2) %>
+% if ( $cgi->param('error') ) {
+ Error: <% $cgi->param('error') %>
+
+% }
-