cust_pay => 'CHEK', #this is a customer type only, payments are CHEK...
realtime => 1,
},
- 'LECB' => {
- tinyname => 'phone bill',
- shortname => 'Phone bill billing',
- longname => 'Phone bill billing',
- realtime => 1,
- },
+ #'LECB' => {
+ # tinyname => 'phone bill',
+ # shortname => 'Phone bill billing',
+ # longname => 'Phone bill billing',
+ # realtime => 1,
+ #},
'BILL' => {
tinyname => 'billing',
shortname => 'Billing',
payname => 'Check',
longname => 'Billing',
},
+ 'PPAL' => {
+ tinyname => 'PayPal',
+ shortname => 'PayPal',
+ longname => 'PayPal',
+ cust_main => '', #not yet a customer type, but could be once we can do
+ # invoice presentment via paypal
+ },
'PREP' => {
tinyname => 'prepaid card',
shortname => 'Prepaid card',
longname => 'Manual credit card',
cust_main => 'BILL', #this is a payment type only, customers go to BILL...
},
+ 'APPL' => {
+ tinyname => 'apple store',
+ shortname => 'Apple Store',
+ longname => 'Apple Store',
+ cust_main => 'BILL', #this is a payment type only, customers go to BILL...
+ },
+ 'ANRD' => {
+ tinyname => 'android market',
+ shortname => 'Android Market',
+ longname => 'Android Market',
+ cust_main => 'BILL', #this is a payment type only, customers go to BILL...
+ },
+ 'EDI' => {
+ tinyname => 'EDI',
+ shortname => 'Electronic Debit (EDI)',
+ longname => 'Electronic Debit (EDI)',
+ cust_main => '', #not a customer type
+ },
+ 'WIRE' => {
+ tinyname => 'Wire',
+ shortname => 'Wire transfer',
+ longname => 'Wire transfer',
+ cust_main => '', #not a customer type
+ },
'COMP' => {
tinyname => 'comp',
shortname => 'Complimentary',
return $hash{$payby}->{realtime};
}
+sub payby2shortname {
+ my $self = shift;
+ map { $_ => $hash{$_}->{shortname} } $self->payby;
+}
+
sub payby2longname {
my $self = shift;
map { $_ => $hash{$_}->{longname} } $self->payby;
'CARD' => 'CC',
'CHEK' => 'ECHECK',
'MCRD' => 'CC',
+ 'PPAL' => 'PAYPAL',
);
sub payby2bop {