+
+ # we don't yet have export_relocate hooks in here, so there's no old/new
+ # cust_location. do cust_location before cust_main, since cust_main has
+ # a bunch of empty fields with the same names.
+
+ foreach my $field ( $location->fields ) {
+ my $curr_val = $location->get($field);
+ $value =~ s/\$$field/$curr_val/g;
+ }
+
+ foreach my $field ( $cust_main->fields ) {
+ my $curr_val = $cust_main->get($field);
+ $value =~ s/\$$field/$curr_val/g;
+ }
+