X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=httemplate%2Fedit%2Fcust_pay.cgi;h=f9f99de7e0d47f7f209fd3fcdf5d5c7bcb8146aa;hb=aad287228dfbe5ef01be73ebaaa9a06dfbe11226;hp=83e4e82ea7d420b10fb09ac662f140ad5eb02233;hpb=3ce7691203a7737406bf2d4442f7fd84b81f847e;p=freeside.git
diff --git a/httemplate/edit/cust_pay.cgi b/httemplate/edit/cust_pay.cgi
index 83e4e82ea..f9f99de7e 100755
--- a/httemplate/edit/cust_pay.cgi
+++ b/httemplate/edit/cust_pay.cgi
@@ -1,141 +1,176 @@
-%
-%
-%my $conf = new FS::Conf;
-%
-%my %payby = (
-% 'BILL' => 'Check',
-% 'CASH' => 'Cash',
-% 'WEST' => 'Western Union',
-% 'MCRD' => 'Manual credit card',
-%);
-%
-%my($link, $linknum, $paid, $payby, $payinfo, $_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');
-% $_date = $cgi->param('_date') ? str2time($cgi->param('_date')) : time;
-%} elsif ( $cgi->param('custnum') =~ /^(\d+)$/ ) {
-% $link = $cgi->param('popup') ? 'popup' : 'custnum';
-% $linknum = $1;
-% $paid = '';
-% $payby = $cgi->param('payby') || 'BILL';
-% $payinfo = '';
-% $_date = time;
-%} elsif ( $cgi->param('invnum') =~ /^(\d+)$/ ) {
-% $link = 'invnum';
-% $linknum = $1;
-% $paid = '';
-% $payby = $cgi->param('payby') || 'BILL';
-% $payinfo = "";
-% $_date = time;
-%} else {
-% die "illegal query ". $cgi->keywords;
-%}
-%
-%my $paybatch = "webui-$_date-$$-". rand() * 2**32;
-%
-%my $title = 'Post '. $payby{$payby}. ' payment';
-%$title .= " against Invoice #$linknum" if $link eq 'invnum';
-%
-%if ( $link eq 'popup' ) {
-%
-%
-<% include('/elements/header-popup.html', $title ) %>
+% if ( $link eq 'popup' ) {
+ <& /elements/header-popup.html, $title &>
% } else {
-
-
-<% include("/elements/header.html", $title, '') %>
-% }
-% if ( $cgi->param('error') ) {
-
-Error: <% $cgi->param('error') %>
-
+ <& /elements/header-cust_main.html, view=>'payment_history', custnum=>$custnum &>
+