diff options
| -rw-r--r-- | FS/FS/API.pm | 6 | ||||
| -rw-r--r-- | FS/FS/ClientAPI/Signup.pm | 4 | ||||
| -rw-r--r-- | FS/FS/cust_main/API.pm | 2 |
3 files changed, 9 insertions, 3 deletions
diff --git a/FS/FS/API.pm b/FS/FS/API.pm index 99e04774f..62a97d8f0 100644 --- a/FS/FS/API.pm +++ b/FS/FS/API.pm @@ -384,7 +384,11 @@ Exact name on credit card for CARD/DCRD, bank name for CHEK/DCHK =item referral_custnum -referring customer number +Referring customer number + +=item salesnum + +Sales person number =item agentnum diff --git a/FS/FS/ClientAPI/Signup.pm b/FS/FS/ClientAPI/Signup.pm index 6116609c8..9d0bcf322 100644 --- a/FS/FS/ClientAPI/Signup.pm +++ b/FS/FS/ClientAPI/Signup.pm @@ -530,6 +530,7 @@ sub new_customer { 'tagnum' => [ FS::part_tag->default_tags ], ( map { $_ => $packet->{$_} } qw( + salesnum ss stateid stateid_state payby @@ -624,7 +625,7 @@ sub new_customer { ); } - $cust_main->payby('BILL') # MCRD better? + $cust_main->payby('BILL') # MCRD better? no, that's for something else if $gw && $gw->gateway_namespace eq 'Business::OnlineThirdPartyPayment'; } @@ -933,6 +934,7 @@ sub new_customer_minimal { 'payby' => 'BILL', map { $_ => $packet->{$_} } qw( + salesnum last first company daytime night fax mobile ss ), diff --git a/FS/FS/cust_main/API.pm b/FS/FS/cust_main/API.pm index 440560029..283683b8a 100644 --- a/FS/FS/cust_main/API.pm +++ b/FS/FS/cust_main/API.pm @@ -109,7 +109,7 @@ sub API_insert { 'tagnum' => [ FS::part_tag->default_tags ], map { $_ => $opt{$_} } qw( - agentnum refnum agent_custid referral_custnum + agentnum salesnum refnum agent_custid referral_custnum last first company daytime night fax mobile payby payinfo paydate paycvv payname |