X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS%2FFS%2FAPI.pm;h=beadbb8483a7ac061e1a76015876e8e237f7f0b3;hb=5858921f5ec8555fcaacf379f35899cc2d2dd0f3;hp=98c1a938d5e5b42c29946bdf863b9f3d4d723f22;hpb=f3853d3ed85d993f6bc058747d338fcbf344cb61;p=freeside.git diff --git a/FS/FS/API.pm b/FS/FS/API.pm index 98c1a938d..beadbb848 100644 --- a/FS/FS/API.pm +++ b/FS/FS/API.pm @@ -270,11 +270,25 @@ sub customer_info { 'error' => '', 'display_custnum' => $cust_main->display_custnum, 'name' => $cust_main->first. ' '. $cust_main->get('last'), + 'balance' => $cust_main->balance, ); $return{$_} = $cust_main->get($_) foreach @cust_main_editable_fields; + for (@location_editable_fields) { + $return{$_} = $cust_main->bill_location->get($_) + if $cust_main->bill_locationnum; + $return{'ship_'.$_} = $cust_main->ship_location->get($_) + if $cust_main->ship_locationnum; + } + + my @invoicing_list = $cust_main->invoicing_list; + $return{'invoicing_list'} = + join(', ', grep { $_ !~ /^(POST|FAX)$/ } @invoicing_list ); + $return{'postal_invoicing'} = + 0 < ( grep { $_ eq 'POST' } @invoicing_list ); + return \%return; }