backoffice API: add new_customer, RT#22830

diff --git a/FS/FS/API.pm b/FS/FS/API.pm
index 3d10dce..60efd1d 100644 (file)
--- a/FS/FS/API.pm
+++ b/FS/FS/API.pm
@@ -72,7 +72,7 @@ sub new_customer {
       'payby'         => 'BILL',
 
       map { $_ => $opt{$_} } qw(
-        agentnum refnum agent_custid
+        agentnum refnum agent_custid referral_custnum
         last first company 
         address1 address2 city county state zip country
         latitude longitude