httemplate/edit/process/svc_circuit.html

   1 <& elements/svc_Common.html,
   2     table       => 'svc_circuit',
   3     edit_ext    => 'html',
   4     redirect    => popurl(3)."view/svc_circuit.cgi?",
   5     precheck_callback => $precheck,
   6 &>
   7 <%init>
   8
   9 die "access denied"
  10   unless $FS::CurrentUser::CurrentUser->access_right('Provision customer service'); #something else more specific?
  11
  12 my $precheck = sub {
  13   my $cgi = shift;
  14   foreach ('desired_due_date', 'due_date') {
  15     if ( length $cgi->param($_) ) {
  16       my $date = parse_datetime( $cgi->param($_) );
  17       $cgi->param($_, $date);
  18     }
  19   }
  20   return;
  21 };
  22
  23 </%init>