httemplate/edit/process/did_order.html

   1 <% include( 'elements/process.html',
   2                'table'       => 'did_order',
   3                'viewall_dir' => 'browse',
   4                'value_callback' => $value_callback,
   5                'process_o2m' => {
   6                     'table'  => 'did_order_item',
   7                     'fields' => \@item_fields,
   8                 },
   9            )
  10 %>
  11 <%init>
  12
  13 die "access denied"
  14   unless $FS::CurrentUser::CurrentUser->access_right('Import');
  15
  16 unless($cgi->param('submitted')) {
  17     $cgi->param('submitted',time);
  18 }
  19
  20 my $value_callback = sub {
  21      my ($field, $value) = @_;
  22      ($field =~ /ed$/ && $value !~ /^\d+$/) ? parse_datetime($value) : $value;
  23 };
  24
  25 my @item_fields = qw( msa npa latanum ratecenter state quantity );
  26
  27 </%init>