% }
<%init>
-my $params = { 'closetext' => 'Close' };
+my $params = { 'closetext' => emt('Close') };
if (ref($_[0]) eq 'HASH') {
$params = { %$params, %{ $_[0] } };
( $params->{'action'} =~ /\?/ ? ';' : '?' ).
'custnum='. $params->{'cust_main'}->custnum;
-$params->{'action'} .= ';pkgpart='.$params->{'pkgpart'} if $params->{'pkgpart'};
-$params->{'action'} .= ';locationnum='.$params->{'locationnum'} if $params->{'locationnum'};
-$params->{'action'} .= ';svcpart='.$params->{'svcpart'} if $params->{'svcpart'};
+$params->{'action'} .= ";$_=".$params->{$_}
+ foreach grep $params->{$_},
+ qw( lock_pkgpart lock_locationnum qualnum svcpart );
</%init>