email_form  => $email_form,
                                   show_bcc    => $::auth->assert('email_bcc', 'may fail'),
                                   FILES       => \%files,
-                                  is_customer => $self->cv eq 'customer',
+                                  is_customer => $self->type_data->is_customer,
                                   ALL_EMPLOYEES => $self->{all_employees},
   );
 
                                                 } } @all_objects;
   }
 
-  $self->{template_args}{inout} = $self->type_data->properties('transfer');
+  $self->{template_args}{in_out} = $self->type_data->transfer;
 
   $self->get_item_cvpartnumber($_) for @{$self->order->items_sorted};
 
 
   return "" if !$item->part || !$item->part->unit || !$item->unit;
 
-  my $in_out   = $self->type_data->properties("transfer");
+  my $in_out   = $self->type_data->transfer;
 
   my $do_qty   = $item->qty;
   my $sum      = sum0 map {
 
   get3($_[0]->c->type, "properties", "nr_key");
 }
 
+sub transfer {
+  get3($_[0]->c->type, "properties", "transfer");
+}
+
 sub part_classification_query {
   my ($self, $string) = @_;
   get($self->c->type, "part_classification_query");
 
                 [%- END -%]
                 <th id="qty_header_id"          class="listheading" nowrap width="5" ><a href='#' onClick='javascript:kivi.DeliveryOrder.reorder_items("qty")'>        [%- 'Qty'         | $T8 %]</a></th>
                 <th class="listheading" nowrap width="5" >[%- 'Unit'         | $T8 %] </th>
-                [% IF inout == 'in' %]
+                [% IF in_out == 'in' %]
                 <th class="listheading" nowrap width="5" >[%- 'Transfer To Stock' | $T8 %] </th>
                 [% END %]
-                [% IF inout == 'out' %]
+                [% IF in_out == 'out' %]
                 <th class="listheading" nowrap width="5" >[%- 'Release From Stock' | $T8 %] </th>
                 [% END %]
               </tr>