X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fedit%2Fprocess%2Fpart_pkg.cgi;fp=httemplate%2Fedit%2Fprocess%2Fpart_pkg.cgi;h=27f07e617a4e93f02c973f8878ef37aae31616ae;hp=72488019010ab7e5ece0f1b267381e2e25c6fc02;hb=19f2731dbceb444c5dd45f57fb0a785dcaf9aa65;hpb=df2bf964527e0b5596af471b1b7d84d14305b2a2 diff --git a/httemplate/edit/process/part_pkg.cgi b/httemplate/edit/process/part_pkg.cgi index 724880190..27f07e617 100755 --- a/httemplate/edit/process/part_pkg.cgi +++ b/httemplate/edit/process/part_pkg.cgi @@ -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;