'agent_virt' => 1,
'process_o2m' => {
'table' => 'contact',
- 'fields' => [qw( first last title comment )],
+ 'fields' => \@contact_fields,
},
'redirect' => popurl(3). 'view/prospect_main.html?',
)
my $cust_location = new FS::cust_location {
map { $_ => scalar($cgi->param($_)) }
- qw( address1 address2 city county state zip country )
+ qw( address1 address2 city county state zip country
+ latitude longitude
+ location_kind location_type location_number
+ )
};
$cust_location->locationnum($locationnum) unless $locationnum == -1;
};
+my @contact_fields = qw( classnum first last title comment emailaddress );
+foreach my $phone_type ( qsearch({table=>'phone_type', order_by=>'weight'}) ) {
+ push @contact_fields, 'phonetypenum'.$phone_type->phonetypenum;
+}
+
</%init>