9 FS::payby - Object methods for payment type records
17 my @payby = FS::payby->payby;
19 tie my %payby, 'Tie::IxHash', FS::payby->payby2longname
21 my @cust_payby = FS::payby->cust_payby;
23 tie my %payby, 'Tie::IxHash', FS::payby->cust_payby2longname
37 tie %hash, 'Tie::IxHash',
40 shortname => 'Credit card',
41 longname => 'Credit card (automatic)',
45 shortname => 'Credit card',
46 longname => 'Credit card (on-demand)',
47 cust_pay => 'CARD', #this is a customer type only, payments are CARD...
51 shortname => 'Electronic check',
52 longname => 'Electronic check (automatic)',
56 shortname => 'Electronic check',
57 longname => 'Electronic check (on-demand)',
58 cust_pay => 'CHEK', #this is a customer type only, payments are CHEK...
61 tinyname => 'phone bill',
62 shortname => 'Phone bill billing',
63 longname => 'Phone bill billing',
66 tinyname => 'billing',
67 shortname => 'Billing',
68 longname => 'Billing',
72 shortname => 'Cash', # initial payment, then billing
74 cust_main => 'BILL', #this is a payment type only, customers go to BILL...
77 tinyname => 'western union',
78 shortname => 'Western Union', # initial payment, then billing
79 longname => 'Western Union',
80 cust_main => 'BILL', #this is a payment type only, customers go to BILL...
82 'MCRD' => { #not the same as DCRD
84 shortname => 'Manual credit card', # initial payment, then billing
85 longname => 'Manual credit card',
86 cust_main => 'BILL', #this is a payment type only, customers go to BILL...
90 shortname => 'Complimentary',
91 longname => 'Complimentary',
101 map { $_ => $hash{$_}->{longname} } $self->payby;
106 grep { ! exists $hash{$_}->{cust_main} } $self->payby;
109 sub cust_payby2longname {
111 map { $_ => $hash{$_}->{longname} } $self->cust_payby;
118 This should eventually be an actual database table.