X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=FS%2FFS%2FAPI.pm;fp=FS%2FFS%2FAPI.pm;h=9d0ef251544a262b98914beafac89733bebdb9a1;hp=1c4cbd9af5e7190d2df51c0c8d34a01429349d21;hb=2aa7cfda6c3936e1850d845e25ed88cf0a09330f;hpb=c8758c049e81f88d086a42c92a56a91815dbbb26 diff --git a/FS/FS/API.pm b/FS/FS/API.pm index 1c4cbd9af..9d0ef2515 100644 --- a/FS/FS/API.pm +++ b/FS/FS/API.pm @@ -568,6 +568,8 @@ secret locationnum - pass this, or the following keys (don't pass both) +locationname + address1 address2 @@ -580,8 +582,22 @@ state zip +addr_clean + country +censustract + +censusyear + +location_type + +location_number + +location_kind + +incorporated + On error, returns a hashref with an 'error' key. On success, returns a hashref with 'pkgnum' and 'locationnum' keys, containing the new values. @@ -598,7 +614,24 @@ sub change_package_location { my %changeopt; - foreach my $field ('locationnum',FS::cust_location::API::API_editable_fields()) { + foreach my $field ( qw( + locationnum + locationname + address1 + address2 + city + county + state + zip + addr_clean + country + censustract + censusyear + location_type + location_number + location_kind + incorporated + )) { $changeopt{$field} = $opt{$field} if $opt{$field}; }