projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
38406 Net 7 Terms
[freeside.git]
/
FS
/
FS
/
payby.pm
diff --git
a/FS/FS/payby.pm
b/FS/FS/payby.pm
index
5b4559d
..
443a130
100644
(file)
--- a/
FS/FS/payby.pm
+++ b/
FS/FS/payby.pm
@@
-68,6
+68,13
@@
tie %hash, 'Tie::IxHash',
cust_pay => 'CHEK', #this is a customer type only, payments are CHEK...
realtime => 1,
},
cust_pay => 'CHEK', #this is a customer type only, payments are CHEK...
realtime => 1,
},
+ 'BILL' => {
+ tinyname => 'billing',
+ shortname => 'Billing',
+ payname => 'Check',
+ longname => 'Billing',
+ cust_main => '', #no longer a customer type
+ },
'PPAL' => {
tinyname => 'PayPal',
shortname => 'PayPal',
'PPAL' => {
tinyname => 'PayPal',
shortname => 'PayPal',
@@
-79,43
+86,43
@@
tie %hash, 'Tie::IxHash',
tinyname => 'prepaid card',
shortname => 'Prepaid card',
longname => 'Prepaid card',
tinyname => 'prepaid card',
shortname => 'Prepaid card',
longname => 'Prepaid card',
- cust_main => '
BILL', #this is a payment type only, customers go to BILL...
+ cust_main => '
', #this is a payment type only
},
'CASH' => {
tinyname => 'cash',
shortname => 'Cash', # initial payment, then billing
longname => 'Cash',
},
'CASH' => {
tinyname => 'cash',
shortname => 'Cash', # initial payment, then billing
longname => 'Cash',
- cust_main => '
BILL', #this is a payment type only, customers go to BILL...
+ cust_main => '
', #this is a payment type only
},
'WEST' => {
tinyname => 'western union',
shortname => 'Western Union', # initial payment, then billing
longname => 'Western Union',
},
'WEST' => {
tinyname => 'western union',
shortname => 'Western Union', # initial payment, then billing
longname => 'Western Union',
- cust_main => '
BILL', #this is a payment type only, customers go to BILL...
+ cust_main => '
', #this is a payment type only
},
'MCRD' => { #not the same as DCRD
tinyname => 'card',
shortname => 'Manual credit card', # initial payment, then billing
longname => 'Manual credit card',
},
'MCRD' => { #not the same as DCRD
tinyname => 'card',
shortname => 'Manual credit card', # initial payment, then billing
longname => 'Manual credit card',
- cust_main => '
BILL', #this is a payment type only, customers go to BILL...
+ cust_main => '
', #this is a payment type only
},
'MCHK' => { #not the same as DCHK
tinyname => 'card',
shortname => 'Manual electronic check', # initial payment, then billing
longname => 'Manual electronic check',
},
'MCHK' => { #not the same as DCHK
tinyname => 'card',
shortname => 'Manual electronic check', # initial payment, then billing
longname => 'Manual electronic check',
- cust_main => '
BILL', #this is a payment type only, customers go to BILL...
+ cust_main => '
', #this is a payment type only
},
'APPL' => {
tinyname => 'apple store',
shortname => 'Apple Store',
longname => 'Apple Store',
},
'APPL' => {
tinyname => 'apple store',
shortname => 'Apple Store',
longname => 'Apple Store',
- cust_main => '
BILL', #this is a payment type only, customers go to BILL...
+ cust_main => '
', #this is a payment type only
},
'ANRD' => {
tinyname => 'android market',
shortname => 'Android Market',
longname => 'Android Market',
},
'ANRD' => {
tinyname => 'android market',
shortname => 'Android Market',
longname => 'Android Market',
- cust_main => '
BILL', #this is a payment type only, customers go to BILL...
+ cust_main => '
', #this is a payment type only
},
'EDI' => {
tinyname => 'EDI',
},
'EDI' => {
tinyname => 'EDI',
@@
-246,6
+253,17
@@
sub payment_payby2longname {
map { $_ => $hash{$_}->{longname} } $self->payment_payby;
}
map { $_ => $hash{$_}->{longname} } $self->payment_payby;
}
+=item payment_payby2payname
+
+Returns hash, keys are L</payment_payby> types, values are payby payname.
+
+=cut
+
+sub payment_payby2payname {
+ my $self = shift;
+ map { $_ => $self->payname($_) } $self->payment_payby;
+}
+
=back
=head1 BUGS
=back
=head1 BUGS