projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
e58b9fa
)
non-breaking spaces in custoemr view field names
author
ivan
<ivan>
Sun, 14 Dec 2003 17:53:28 +0000
(17:53 +0000)
committer
ivan
<ivan>
Sun, 14 Dec 2003 17:53:28 +0000
(17:53 +0000)
httemplate/view/cust_main.cgi
patch
|
blob
|
history
diff --git
a/httemplate/view/cust_main.cgi
b/httemplate/view/cust_main.cgi
index
83f114e
..
fb01567
100755
(executable)
--- a/
httemplate/view/cust_main.cgi
+++ b/
httemplate/view/cust_main.cgi
@@
-76,7
+76,7
@@
print '<TD VALIGN="top">';
print "Billing address", &ntable("#cccccc"), "<TR><TD>",
&ntable("#cccccc",2),
print "Billing address", &ntable("#cccccc"), "<TR><TD>",
&ntable("#cccccc",2),
- '<TR><TD ALIGN="right">Contact
name</TD>',
+ '<TR><TD ALIGN="right">Contact
name</TD>',
'<TD COLSPAN=3 BGCOLOR="#ffffff">',
$cust_main->last, ', ', $cust_main->first,
'</TD>';
'<TD COLSPAN=3 BGCOLOR="#ffffff">',
$cust_main->last, ', ', $cust_main->first,
'</TD>';
@@
-105,8
+105,8
@@
print '</TR>',
$cust_main->country,
'</TD></TR>',
;
$cust_main->country,
'</TD></TR>',
;
- my $daytime_label = FS::Msgcat::_gettext('daytime') || 'Day
Phone';
- my $night_label = FS::Msgcat::_gettext('night') || 'Night
Phone';
+ my $daytime_label = FS::Msgcat::_gettext('daytime') || 'Day
Phone';
+ my $night_label = FS::Msgcat::_gettext('night') || 'Night
Phone';
print '<TR><TD ALIGN="right">'. $daytime_label.
'</TD><TD COLSPAN=5 BGCOLOR="#ffffff">',
$cust_main->daytime || ' ', '</TD></TR>',
print '<TR><TD ALIGN="right">'. $daytime_label.
'</TD><TD COLSPAN=5 BGCOLOR="#ffffff">',
$cust_main->daytime || ' ', '</TD></TR>',
@@
-166,7
+166,7
@@
print '</TD>';
print '<TD VALIGN="top">';
print &ntable("#cccccc"), "<TR><TD>", &ntable("#cccccc",2),
print '<TD VALIGN="top">';
print &ntable("#cccccc"), "<TR><TD>", &ntable("#cccccc",2),
- '<TR><TD ALIGN="right">Customer
number</TD><TD BGCOLOR="#ffffff">',
+ '<TR><TD ALIGN="right">Customer
number</TD><TD BGCOLOR="#ffffff">',
$custnum, '</TD></TR>',
;
$custnum, '</TD></TR>',
;
@@
-184,13
+184,13
@@
print '<TD VALIGN="top">';
my $referral = qsearchs('part_referral', {
'refnum' => $cust_main->refnum
} );
my $referral = qsearchs('part_referral', {
'refnum' => $cust_main->refnum
} );
- print '<TR><TD ALIGN="right">Advertising
source</TD><TD BGCOLOR="#ffffff">',
+ print '<TR><TD ALIGN="right">Advertising
source</TD><TD BGCOLOR="#ffffff">',
$referral->refnum, ": ", $referral->referral, '</TD></TR>';
}
print '<TR><TD ALIGN="right">Order taker</TD><TD BGCOLOR="#ffffff">',
$cust_main->otaker, '</TD></TR>';
$referral->refnum, ": ", $referral->referral, '</TD></TR>';
}
print '<TR><TD ALIGN="right">Order taker</TD><TD BGCOLOR="#ffffff">',
$cust_main->otaker, '</TD></TR>';
- print '<TR><TD ALIGN="right">Referring
Customer</TD><TD BGCOLOR="#ffffff">';
+ print '<TR><TD ALIGN="right">Referring
Customer</TD><TD BGCOLOR="#ffffff">';
my $referring_cust_main = '';
if ( $cust_main->referral_custnum
&& ( $referring_cust_main =
my $referring_cust_main = '';
if ( $cust_main->referral_custnum
&& ( $referring_cust_main =
@@
-220,22
+220,22
@@
if ( $conf->config('payby-default') ne 'HIDE' ) {
print "Billing information (",
qq!<A HREF="!, popurl(2), qq!misc/bill.cgi?$custnum">!, "Bill now</A>)",
&ntable("#cccccc"), "<TR><TD>", &ntable("#cccccc",2),
print "Billing information (",
qq!<A HREF="!, popurl(2), qq!misc/bill.cgi?$custnum">!, "Bill now</A>)",
&ntable("#cccccc"), "<TR><TD>", &ntable("#cccccc",2),
- '<TR><TD ALIGN="right">Tax
exempt</TD><TD BGCOLOR="#ffffff">',
+ '<TR><TD ALIGN="right">Tax
exempt</TD><TD BGCOLOR="#ffffff">',
$cust_main->tax ? 'yes' : 'no',
'</TD></TR>',
$cust_main->tax ? 'yes' : 'no',
'</TD></TR>',
- '<TR><TD ALIGN="right">Postal
invoices</TD><TD BGCOLOR="#ffffff">',
+ '<TR><TD ALIGN="right">Postal
invoices</TD><TD BGCOLOR="#ffffff">',
( grep { $_ eq 'POST' } @invoicing_list ) ? 'yes' : 'no',
'</TD></TR>',
( grep { $_ eq 'POST' } @invoicing_list ) ? 'yes' : 'no',
'</TD></TR>',
- '<TR><TD ALIGN="right">Email
invoices</TD><TD BGCOLOR="#ffffff">',
+ '<TR><TD ALIGN="right">Email
invoices</TD><TD BGCOLOR="#ffffff">',
join(', ', grep { $_ ne 'POST' } @invoicing_list ) || 'no',
'</TD></TR>',
join(', ', grep { $_ ne 'POST' } @invoicing_list ) || 'no',
'</TD></TR>',
- '<TR><TD ALIGN="right">Billing
type</TD><TD BGCOLOR="#ffffff">',
+ '<TR><TD ALIGN="right">Billing
type</TD><TD BGCOLOR="#ffffff">',
;
if ( $cust_main->payby eq 'CARD' || $cust_main->payby eq 'DCRD' ) {
my $payinfo = $cust_main->payinfo;
$payinfo = 'x'x(length($payinfo)-4). substr($payinfo,(length($payinfo)-4));
;
if ( $cust_main->payby eq 'CARD' || $cust_main->payby eq 'DCRD' ) {
my $payinfo = $cust_main->payinfo;
$payinfo = 'x'x(length($payinfo)-4). substr($payinfo,(length($payinfo)-4));
- print 'Credit
card
',
+ print 'Credit
card
',
( $cust_main->payby eq 'CARD' ? '(automatic)' : '(on-demand)' ),
'</TD></TR>',
'<TR><TD ALIGN="right">Card number</TD><TD BGCOLOR="#ffffff">',
( $cust_main->payby eq 'CARD' ? '(automatic)' : '(on-demand)' ),
'</TD></TR>',
'<TR><TD ALIGN="right">Card number</TD><TD BGCOLOR="#ffffff">',
@@
-247,7
+247,7
@@
if ( $conf->config('payby-default') ne 'HIDE' ) {
;
} elsif ( $cust_main->payby eq 'CHEK' || $cust_main->payby eq 'DCHK') {
my( $account, $aba ) = split('@', $cust_main->payinfo );
;
} elsif ( $cust_main->payby eq 'CHEK' || $cust_main->payby eq 'DCHK') {
my( $account, $aba ) = split('@', $cust_main->payinfo );
- print 'Electronic
check
',
+ print 'Electronic
check
',
( $cust_main->payby eq 'CHEK' ? '(automatic)' : '(on-demand)' ),
'</TD></TR>',
'<TR><TD ALIGN="right">Account number</TD><TD BGCOLOR="#ffffff">',
( $cust_main->payby eq 'CHEK' ? '(automatic)' : '(on-demand)' ),
'</TD></TR>',
'<TR><TD ALIGN="right">Account number</TD><TD BGCOLOR="#ffffff">',
@@
-260,7
+260,7
@@
if ( $conf->config('payby-default') ne 'HIDE' ) {
} elsif ( $cust_main->payby eq 'LECB' ) {
$cust_main->payinfo =~ /^(\d{3})(\d{3})(\d{4})$/;
my $payinfo = "$1-$2-$3";
} elsif ( $cust_main->payby eq 'LECB' ) {
$cust_main->payinfo =~ /^(\d{3})(\d{3})(\d{4})$/;
my $payinfo = "$1-$2-$3";
- print 'Phone
bill
billing</TD></TR>',
+ print 'Phone
bill
billing</TD></TR>',
'<TR><TD ALIGN="right">Phone number</TD><TD BGCOLOR="#ffffff">',
$payinfo, '</TD></TR>',
;
'<TR><TD ALIGN="right">Phone number</TD><TD BGCOLOR="#ffffff">',
$payinfo, '</TD></TR>',
;
@@
-276,7
+276,7
@@
if ( $conf->config('payby-default') ne 'HIDE' ) {
;
} elsif ( $cust_main->payby eq 'COMP' ) {
print 'Complimentary</TD></TR>',
;
} elsif ( $cust_main->payby eq 'COMP' ) {
print 'Complimentary</TD></TR>',
- '<TR><TD ALIGN="right">Authorized
by</TD><TD BGCOLOR="#ffffff">',
+ '<TR><TD ALIGN="right">Authorized
by</TD><TD BGCOLOR="#ffffff">',
$cust_main->payinfo, '</TD></TR>',
'<TR><TD ALIGN="right">Expiration</TD><TD BGCOLOR="#ffffff">',
$cust_main->paydate, '</TD></TR>',
$cust_main->payinfo, '</TD></TR>',
'<TR><TD ALIGN="right">Expiration</TD><TD BGCOLOR="#ffffff">',
$cust_main->paydate, '</TD></TR>',