httemplate/edit/reason_type.html

   1 %
   2 %$cgi->param('class') =~ /^(\w)$/;
   3 %my $class = $1;
   4 %
   5 %my %classmap = ( 'C' => 'Cancel',
   6 %                 'S' => 'Suspend',
   7 %               );
   8 %
   9 %my $classname = $classmap{$class};
  10 %
  11 <% include( 'elements/edit.html',
  12                  'name'   => $classname . ' Reason Type',
  13                  'table'  => 'reason_type',
  14                  'labels' => {
  15                                'typenum'  => $classname . ' reason type',
  16                                'type'     => $classname . ' reason type name',
  17                                'class'    => '',
  18                              },
  19                  'fields' => [
  20                                'type',
  21                                { 'field' => 'class',
  22                                  'type'  => 'hidden',
  23                                },
  24                              ],
  25                  'viewall_url' => $p . "browse/reason_type.html?class=$class",
  26                  'new_hashref_callback' => sub {{ 'class' => $class }},
  27            )
  28 %>