diff options
| author | jeff <jeff> | 2007-07-11 04:23:32 +0000 | 
|---|---|---|
| committer | jeff <jeff> | 2007-07-11 04:23:32 +0000 | 
| commit | f89dfe02a0471e3b7ddd45d444dd1258e17f9434 (patch) | |
| tree | ff7a762082cdbae0976b4f6224a0cc78f75e0a6b | |
| parent | 49f06ef162f67e5856c6160fc7e18e225706722f (diff) | |
honor bop_realtime options for paystate, paytype, stateid, and stateid_state for CHEK transactions (#1718)
| -rw-r--r-- | FS/FS/cust_main.pm | 16 | 
1 files changed, 12 insertions, 4 deletions
| diff --git a/FS/FS/cust_main.pm b/FS/FS/cust_main.pm index 51aa4d5d4..a2dffbaeb 100644 --- a/FS/FS/cust_main.pm +++ b/FS/FS/cust_main.pm @@ -2614,12 +2614,20 @@ sub realtime_bop {      ( $content{account_number}, $content{routing_code} ) =        split('@', $payinfo);      $content{bank_name} = $o_payname; -    $content{bank_state} = $self->getfield('paystate'); -    $content{account_type} = uc($self->getfield('paytype')) || 'CHECKING'; +    $content{bank_state} = exists($options{'paystate'}) +                             ? $options{'paystate'} +                             : $self->getfield('paystate'); +    $content{account_type} = exists($options{'paytype'}) +                               ? uc($options{'paytype'}) || 'CHECKING' +                               : uc($self->getfield('paytype')) || 'CHECKING';      $content{account_name} = $payname;      $content{customer_org} = $self->company ? 'B' : 'I'; -    $content{state_id}       = $self->getfield('stateid'); -    $content{state_id_state} = $self->getfield('stateid_state'); +    $content{state_id}       = exists($options{'stateid'}) +                                 ? $options{'stateid'} +                                 : $self->getfield('stateid'); +    $content{state_id_state} = exists($options{'stateid_state'}) +                                 ? $options{'stateid_state'} +                                 : $self->getfield('stateid_state');      $content{customer_ssn} = exists($options{'ss'})                                 ? $options{'ss'}                                 : $self->ss; | 
