Revision bcdeb6ec
Von Tamino Steinert vor mehr als 2 Jahren hinzugefügt
SL/DB/PurchaseInvoice.pm | ||
---|---|---|
join ' ', grep $_, map $_[0]->$_, qw(displayable_type record_number);
|
||
};
|
||
|
||
sub convert_to_reclamation {
|
||
my ($self, %params) = @_;
|
||
$params{destination_type} = $self->is_sales ? 'sales_reclamation'
|
||
: 'purchase_reclamation';
|
||
|
||
require SL::DB::Reclamation;
|
||
my $reclamation = SL::DB::Reclamation->new_from($self, %params);
|
||
|
||
return $reclamation;
|
||
}
|
||
|
||
sub create_ap_row {
|
||
my ($self, %params) = @_;
|
||
# needs chart as param
|
Auch abrufbar als: Unified diff
Workflow: (sales/purchase) invoice → reclamation