or die 'Guru Meditation #69'; #??? should have been passed in
my @taxnum = split(',', $1);
or die 'Guru Meditation #69'; #??? should have been passed in
my @taxnum = split(',', $1);
my $error = '';
foreach my $taxnum ( @taxnum ) {
my $cust_main_county = qsearchs('cust_main_county', { 'taxnum' => $taxnum } )
or die "unknown taxnum: $taxnum";
my $error = '';
foreach my $taxnum ( @taxnum ) {
my $cust_main_county = qsearchs('cust_main_county', { 'taxnum' => $taxnum } )
or die "unknown taxnum: $taxnum";
foreach (qw( taxname tax exempt_amount setuptax recurtax )) {
$cust_main_county->set( $_ => scalar($cgi->param($_)) )
foreach (qw( taxname tax exempt_amount setuptax recurtax )) {
$cust_main_county->set( $_ => scalar($cgi->param($_)) )