my $quantity = $cgi->param('pkg_svc'. $part_svc->svcpart) || 0;
my $old_pkg_svc = qsearchs('pkg_svc', {
'pkgpart' => $pkgpart,
my $quantity = $cgi->param('pkg_svc'. $part_svc->svcpart) || 0;
my $old_pkg_svc = qsearchs('pkg_svc', {
'pkgpart' => $pkgpart,