Revision 8522a85e
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