X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDB%2FCustomVariable.pm;h=144acef00395cb83a325f77e0bc9c20e75568b32;hb=e90048c8180f32f52f3f12ee52eb7269c4b27fcf;hp=60955e40fa3274c9c6a56baacf047f81d1484db7;hpb=6ac47be4e3e318ea212ca595195b0b55a9c386a3;p=kivitendo-erp.git diff --git a/SL/DB/CustomVariable.pm b/SL/DB/CustomVariable.pm index 60955e40f..144acef00 100644 --- a/SL/DB/CustomVariable.pm +++ b/SL/DB/CustomVariable.pm @@ -18,18 +18,29 @@ sub value { goto &bool_value if $type eq 'boolean'; goto ×tamp_value if $type eq 'timestamp'; goto &number_value if $type eq 'number'; + + if ( $_[1] && ($type eq 'customer' || $type eq 'vendor' || $type eq 'part') ) { + $self->number_value($_[1]); + } + if ( $type eq 'customer' ) { - if ( defined($_[1]) && $_[1] ) { - goto &number_value; - } - else { - require SL::DB::Customer; - - my $id = int($self->number_value); - return $id ? SL::DB::Customer->new(id => $id)->load() : 0; - } + require SL::DB::Customer; + + my $id = int($self->number_value); + return $id ? SL::DB::Customer->new(id => $id)->load() : 0; + } elsif ( $type eq 'vendor' ) { + require SL::DB::Vendor; + + my $id = int($self->number_value); + return $id ? SL::DB::Vendor->new(id => $id)->load() : 0; + } elsif ( $type eq 'part' ) { + require SL::DB::Part; + + my $id = int($self->number_value); + return $id ? SL::DB::Part->new(id => $id)->load() : 0; } - goto &text_value; # text and select + + goto &text_value; # text, textfield, date and select } sub is_valid {