X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=httemplate%2Fedit%2FREAL_cust_pkg.cgi;h=d9b7579f68200941a4ebe86ca936d08adf017fa8;hp=0d2f1c23804e5155aecc15e5024dc9059b01c263;hb=f4247c22a77543afa76f4bc81281bdda71f776cf;hpb=1f8d7610c245ecb21667aa656ce083420e5bb797 diff --git a/httemplate/edit/REAL_cust_pkg.cgi b/httemplate/edit/REAL_cust_pkg.cgi index 0d2f1c238..d9b7579f6 100755 --- a/httemplate/edit/REAL_cust_pkg.cgi +++ b/httemplate/edit/REAL_cust_pkg.cgi @@ -1,6 +1,6 @@ <% -# +# my $error =''; my $pkgnum = ''; @@ -30,6 +30,15 @@ print header('Package Edit'); #, menubar( # 'Main Menu' => popurl(2) #)); +%> + + + + + + +<% + #print info my($susp,$cancel,$expire)=( $cust_pkg->getfield('susp'), @@ -45,6 +54,9 @@ print '
', print qq!Error: $error! if $error; +#my $format = "%c %z (%Z)"; +my $format = "%m/%d/%Y %T %z (%Z)"; + print ntable("#cccccc",2), 'Package number', $pkgnum, '', @@ -55,15 +67,29 @@ print ntable("#cccccc",2), 'Order taker', $otaker, '', 'Setup date'. - '', - 'Next bill date', - '', -; + ''. + ' '. + ''; + +print 'Last bill date', + ''. + ' '. + '' + if $cust_pkg->dbdef_table->column('last_bill'); + +print 'Next bill date', + ''. + ' '. + ''; print 'Suspension date', - time2str("%D",$susp), '' + time2str($format, $susp), '' if $susp; #print 'Expiration date', @@ -71,18 +97,34 @@ print 'Suspension date', # if $expire; print 'Expiration date'. '', - ''. + ''. + ' '. '
(will cancel this package'. ' when the date is reached)'. ''; print 'Cancellation date', - time2str("%D",$cancel), '' + time2str($format, $cancel), '' if $cancel; %> +