diff options
Diffstat (limited to 'FS')
| -rw-r--r-- | FS/FS/API.pm | 8 | ||||
| -rw-r--r-- | FS/FS/ClientAPI/Signup.pm | 3 |
2 files changed, 8 insertions, 3 deletions
diff --git a/FS/FS/API.pm b/FS/FS/API.pm index 2463e8b0a..609008b05 100644 --- a/FS/FS/API.pm +++ b/FS/FS/API.pm @@ -383,7 +383,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 @@ -422,7 +426,7 @@ sub new_customer { '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 diff --git a/FS/FS/ClientAPI/Signup.pm b/FS/FS/ClientAPI/Signup.pm index d507b8ea4..1c62f61f4 100644 --- a/FS/FS/ClientAPI/Signup.pm +++ b/FS/FS/ClientAPI/Signup.pm @@ -529,6 +529,7 @@ sub new_customer { 'tagnum' => [ FS::part_tag->default_tags ], ( map { $_ => $packet->{$_} } qw( + salesnum ss stateid stateid_state payby @@ -623,7 +624,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'; } |