From: G. Richardson Date: Tue, 30 May 2017 13:01:19 +0000 (+0200) Subject: neue Methode parsed_snumber in SL::DB::History X-Git-Tag: release-3.5.4~1059 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=bc7f45666f262ea425b14494669627a4e268bb46;p=kivitendo-erp.git neue Methode parsed_snumber in SL::DB::History --- diff --git a/SL/DB/History.pm b/SL/DB/History.pm index 7528b73f1..98c465ade 100644 --- a/SL/DB/History.pm +++ b/SL/DB/History.pm @@ -12,4 +12,49 @@ __PACKAGE__->meta->initialize; # Creates get_all, get_all_count, get_all_iterator, delete_all and update_all. __PACKAGE__->meta->make_manager_class; +sub parsed_snumber { + my ($self) = @_; + + my ($snumber) = $self->snumbers =~ /^.*?_(.*)/; + return $snumber ? $snumber : $self->snumbers; +} + +1 + +__END__ + +=pod + +=encoding utf-8 + +=head1 NAME + +SL::DB::History: Model for the 'history_erp' table + +=head1 SYNOPSIS + +This is a standard Rose::DB::Object based model and can be used as one. + +=head1 METHODS + +=over 4 + +=item C + +The column snumbers contains entries such as "partnumber_3" or +"customernumber_23". + +To be able to print only the number, parsed_snumber returns only the part of +the string following the first "_". + +Returns the whole string if the regex doesn't match anything. + +=back + +=head1 AUTHORS + +G. Richardson Egrichardson@kivitendo-premium.deE + +=cut + 1;