-%
-%
%my $pkgnum = $cgi->param('pkgnum') or die;
%my $old = qsearchs('cust_pkg',{'pkgnum'=>$pkgnum});
%my %hash = $old->hash;
%$hash{'bill'} = $cgi->param('bill') ? str2time($cgi->param('bill')) : '';
%$hash{'last_bill'} =
% $cgi->param('last_bill') ? str2time($cgi->param('last_bill')) : '';
+%$hash{'adjourn'} = $cgi->param('adjourn') ? str2time($cgi->param('adjourn')) : '';
%$hash{'expire'} = $cgi->param('expire') ? str2time($cgi->param('expire')) : '';
%
%my $new;
% print $cgi->redirect(popurl(3). "view/cust_main.cgi?$custnum".
% "#cust_pkg$pkgnum" );
%}
-%
-%
-