$form->{vc} anstelle von $self->{vc} setzen
authorMoritz Bunkus <m.bunkus@linet-services.de>
Tue, 23 Nov 2010 09:31:55 +0000 (10:31 +0100)
committerMoritz Bunkus <m.bunkus@linet-services.de>
Wed, 12 Jan 2011 15:37:05 +0000 (16:37 +0100)
SL/DB/Helper/FlattenToForm.pm

index edd3018..b79f4fb 100644 (file)
@@ -26,7 +26,7 @@ sub flatten_to_form {
     $form->{$transdate_idx} = $self->transdate->to_lxoffice;
   }
 
-  $self->{vc} = $vc if ref($self) =~ /^SL::DB::.*Invoice/;
+  $form->{vc} = $vc if ref($self) =~ /^SL::DB::.*Invoice/;
 
   my @vc_fields          = (qw(account_number bank bank_code bic business city contact country creditlimit discount
                                email fax homepage iban language name payment_terms phone street taxnumber zipcode),