X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fedit%2Fprocess%2Fquick-cust_pkg.cgi;fp=httemplate%2Fedit%2Fprocess%2Fquick-cust_pkg.cgi;h=95c92432e4ce893b0583518a476cb1f1d4b132e3;hp=7dcd232bcf2966b98ea112945a32f73da9687d60;hb=8861d46820af163c7de7839178b6120c9b32ab2c;hpb=49809d3653e7ac4951d36716dce3cd25ba9c3728 diff --git a/httemplate/edit/process/quick-cust_pkg.cgi b/httemplate/edit/process/quick-cust_pkg.cgi index 7dcd232bc..95c92432e 100644 --- a/httemplate/edit/process/quick-cust_pkg.cgi +++ b/httemplate/edit/process/quick-cust_pkg.cgi @@ -133,6 +133,21 @@ my %hash = ( ); $hash{'custnum'} = $cust_main->custnum if $cust_main; +my @cust_pkg_usageprice = (); +foreach my $quantity_param ( grep ( $cgi->param($_) && $cgi->param($_) > 0 ), + grep /^usagepricenum(\d+)_quantity$/, + $cgi->param + ) +{ + $quantity_param =~ /^usagepricenum(\d+)_quantity$/ or die 'unpossible'; + my $num = $1; + push @cust_pkg_usageprice, new FS::cust_pkg_usageprice { + usagepricepart => scalar($cgi->param("usagepricenum${num}_usagepricepart")), + quantity => scalar($cgi->param($quantity_param)), + }; +} +$hash{cust_pkg_usageprice} = \@cust_pkg_usageprice; + if ( $quotationnum ) { $quotation_pkg = new FS::quotation_pkg \%hash;