X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2Fcust_main%2FAPI.pm;h=f9ba1409f318229df004513f4e1fb8e89edd0889;hp=158b5cf58e6ef1db92ed6cf37cc22b953cd23a63;hb=b7f8a7cfd566881a6d89117d17e391ceb58097d4;hpb=0238fd7aa7a92887970507346ac7e6ad8ed5492c diff --git a/FS/FS/cust_main/API.pm b/FS/FS/cust_main/API.pm index 158b5cf58..f9ba1409f 100644 --- a/FS/FS/cust_main/API.pm +++ b/FS/FS/cust_main/API.pm @@ -4,6 +4,7 @@ use strict; use FS::Conf; use FS::part_tag; use FS::Record qw( qsearchs ); +use FS::cust_location::API; =item API_getinfo FIELD => VALUE, ... @@ -21,11 +22,8 @@ use vars qw( first last company daytime night fax mobile ); # locale -# payby payinfo payname paystart_month paystart_year payissue payip -# ss paytype paystate stateid stateid_state -@location_editable_fields = qw( - address1 address2 city county state zip country -); +# ss stateid stateid_state +@location_editable_fields = FS::cust_location::API::API_editable_fields(); sub API_getinfo { my( $self, %opt ) = @_; @@ -106,14 +104,12 @@ sub API_insert { #same for refnum like signup_server-default_refnum? my $cust_main = new FS::cust_main ( { # $class->new( { - 'payby' => 'BILL', 'tagnum' => [ FS::part_tag->default_tags ], map { $_ => $opt{$_} } qw( agentnum salesnum refnum agent_custid referral_custnum last first company daytime night fax mobile - payby payinfo paydate paycvv payname ), } ); @@ -176,7 +172,6 @@ sub API_update { agentnum salesnum refnum agent_custid referral_custnum last first company daytime night fax mobile - payby payinfo paydate paycvv payname ), my @invoicing_list;