X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fview%2Fcust_main.cgi;h=624fe37d15607a0a4f6504e59ebea5e6aec56558;hp=cc36006417e5f9ce3c0263a1d1624f81be6c4b43;hb=8ed2714fc50607081d7ac4edf0b17e23902dabba;hpb=e3f327b2af9e6a591bae41d315fda731ec7f5128
diff --git a/httemplate/view/cust_main.cgi b/httemplate/view/cust_main.cgi
index cc3600641..624fe37d1 100755
--- a/httemplate/view/cust_main.cgi
+++ b/httemplate/view/cust_main.cgi
@@ -570,9 +570,12 @@ function cust_credit_areyousure(href) {
<% if ( $conf->config('payby-default') ne 'HIDE' ) { %>
-
Payment History
- (Post payment
- | Post credit)
+
Payment History
+ Post cash/check payment
+ | Process credit card payment
+ | Process electronic check (ACH) payment
+
Post credit
+
<%
#get payment history
@@ -710,10 +713,10 @@ function cust_credit_areyousure(href) {
}
}
if ( $cust_credit->credited > 0 ) {
- $desc .= ' - $'.
- $cust_credit->unapplied. ' unapplied'.
+ $desc .= ' $'.
+ $cust_credit->credited. ' unapplied'.
qq! (apply'.
+ $cust_credit->crednum. '">apply)'.
'
';
}
}
@@ -888,15 +891,8 @@ sub get_packages {
}
- foreach my $cust_svc (
- qsearch( 'cust_svc', {
- 'pkgnum' => $cust_pkg->pkgnum,
- #'svcpart' => $part_svc->svcpart,
- }
- )
- ) {
-
- warn "svcnum ". $cust_svc->svcnum. " / svcpart ". $cust_svc->svcpart. "\n";
+ foreach my $cust_svc ( $cust_pkg->cust_svc ) {
+ #warn "svcnum ". $cust_svc->svcnum. " / svcpart ". $cust_svc->svcpart. "\n";
my $svc = {
'svcnum' => $cust_svc->svcnum,
'label' => ($cust_svc->label)[1],