X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;ds=sidebyside;f=httemplate%2Fedit%2Fprocess%2Fpart_pkg.cgi;h=27f07e617a4e93f02c973f8878ef37aae31616ae;hb=31f2e890b5b3e1b0ad29a877ff67bc641ea1fc40;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..27f07e617 100755 --- a/httemplate/edit/process/part_pkg.cgi +++ b/httemplate/edit/process/part_pkg.cgi @@ -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;