X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=httemplate%2Fedit%2Fprocess%2Fpart_pkg.cgi;h=c388676df3f7c484e01b333017d879ed718cf4b8;hb=1c71ab4b81802a8ee9074917306d35a582349766;hp=97ae4e7ee0ae5975bfe52c573d329d3313a713c2;hpb=666ad2bb4d43e212e1a7832b16640d0f613b125e;p=freeside.git diff --git a/httemplate/edit/process/part_pkg.cgi b/httemplate/edit/process/part_pkg.cgi index 97ae4e7ee..c388676df 100755 --- a/httemplate/edit/process/part_pkg.cgi +++ b/httemplate/edit/process/part_pkg.cgi @@ -109,7 +109,7 @@ my $args_callback = sub { } $options{$_} = scalar( $cgi->param($_) ) - for (qw( setup_fee recur_fee )); + for (qw( setup_fee recur_fee disable_line_item_date_ranges )); push @args, 'options' => \%options; @@ -117,11 +117,11 @@ my $args_callback = sub { #pkg_svc ### - my %pkg_svc = map { $_ => scalar($cgi->param("pkg_svc$_")) } - map { $_->svcpart } - qsearch('part_svc', {} ); + my @svcparts = map { $_->svcpart } qsearch('part_svc', {}); + my %pkg_svc = map { $_ => scalar($cgi->param("pkg_svc$_")) } @svcparts; + my %hidden_svc = map { $_ => scalar($cgi->param("hidden$_")) } @svcparts; - push @args, 'pkg_svc' => \%pkg_svc; + push @args, 'pkg_svc' => \%pkg_svc, 'hidden_svc' => \%hidden_svc; ### # cust_pkg and custnum_ref (inserts only) @@ -131,6 +131,16 @@ my $args_callback = sub { 'custnum_ref' => \$custnum; } + my %part_pkg_vendor; + foreach my $param ( $cgi->param ) { + if ( $param =~ /^export(\d+)$/ && length($cgi->param($param)) > 0 ) { + $part_pkg_vendor{$1} = $cgi->param($param); + } + } + if ( keys %part_pkg_vendor > 0 ) { + push @args, 'part_pkg_vendor' => \%part_pkg_vendor; + } + #warn "args: ".join('/', @args). "\n"; @args;