diff options
| author | ivan <ivan> | 2002-10-22 08:13:03 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2002-10-22 08:13:03 +0000 |
| commit | a1319845c0a89d220e787358cf67f4dd6eabbe8c (patch) | |
| tree | c304f413ef8d72569a6bd642fa75f38774231c47 | |
| parent | a8b5b65b1c338cbaa0226d78e9d1b8a88a51e5eb (diff) | |
ACH fixes from s5
| -rw-r--r-- | FS/FS/part_bill_event.pm | 4 | ||||
| -rwxr-xr-x | httemplate/edit/part_bill_event.cgi | 6 |
2 files changed, 8 insertions, 2 deletions
diff --git a/FS/FS/part_bill_event.pm b/FS/FS/part_bill_event.pm index 991616bb8..e86b5c1fb 100644 --- a/FS/FS/part_bill_event.pm +++ b/FS/FS/part_bill_event.pm @@ -37,7 +37,7 @@ FS::Record. The following fields are currently supported: =item eventpart - primary key -=item payby - CARD, BILL, or COMP +=item payby - CARD, CHEK, BILL, or COMP =item event - event name @@ -140,7 +140,7 @@ sub check { } my $error = $self->ut_numbern('eventpart') - || $self->ut_enum('payby', [qw( CARD BILL COMP )] ) + || $self->ut_enum('payby', [qw( CARD CHEK BILL COMP )] ) || $self->ut_text('event') || $self->ut_anything('eventcode') || $self->ut_number('seconds') diff --git a/httemplate/edit/part_bill_event.cgi b/httemplate/edit/part_bill_event.cgi index 6960a3824..de0d61c05 100755 --- a/httemplate/edit/part_bill_event.cgi +++ b/httemplate/edit/part_bill_event.cgi @@ -108,6 +108,12 @@ tie my %events, 'Tie::IxHash', 'weight' => 30, }, + 'realtime-check' => { + 'name' => 'Run check with a <a href="http://search.cpan.org/search?mode=module&query=Business%3A%3AOnlinePayment">Business::OnlinePayment</a> realtime gateway', + 'code' => '$cust_bill->realtime_ach();', + 'weight' => 30, + }, + 'realtime-card-cybercash' => { 'name' => '(<b>deprecated</b>) Run card with <a href="http://www.cybercash.com/cashregister">CyberCash CashRegister</a> realtime gateway', 'code' => '$cust_bill->realtime_card_cybercash();', |