'process_o2m' => {
'table' => 'did_order_item',
'fields' => [ qw( msanum npa latanum ratecenternum state
- quantity ) ],
+ quantity custnum ) ],
},
)
%>
my @params = $cgi->param;
foreach my $param ( @params ) {
- next unless $param =~ /^(orderitemnum[0-9]+)_rc_new$/;
- my $prefix = $1;
- my $value = $cgi->param($param);
- next unless $value =~ /^[A-Za-z0-9\- ]+$/;
- my $rc = new FS::rate_center({ description => $value });
- my $error = $rc->insert;
- die "error inserting new rate center: $error" if $error;
- $cgi->param("${prefix}_ratecenternum",$rc->ratecenternum);
+ if ( $param =~ /^(orderitemnum[0-9]+)_rc_new$/ ) {
+ my $prefix = $1;
+ my $value = $cgi->param($param);
+ if( $value =~ /^[A-Za-z0-9:\- ]+$/ ) {
+ my $rc = new FS::rate_center({ description => $value });
+ my $error = $rc->insert;
+ die "error inserting new rate center: $error" if $error;
+ $cgi->param("${prefix}_ratecenternum",$rc->ratecenternum);
+ }
+ }
+ elsif ( $param =~ /^(orderitemnum[0-9]+)_custnum$/ ) {
+ my $prefix = $1;
+ my $value = $cgi->param($param);
+ if ( $value =~ /^\d+$/ ) {
+ $cgi->param("custnum",'');
+ }
+ }
}
</%init>