Revision c45403f9
Von Tamino Steinert vor 3 Monaten hinzugefügt
| SL/DB/Invoice.pm | ||
|---|---|---|
|
return $self->netamount; # already matches base currency
|
||
|
}
|
||
|
|
||
|
sub type_data {
|
||
|
SL::DB::Helper::TypeDataProxy->new(ref $_[0], $_[0]->type);
|
||
|
}
|
||
|
|
||
|
1;
|
||
|
|
||
|
__END__
|
||
| SL/DB/Invoice/TypeData.pm | ||
|---|---|---|
|
CREDIT_NOTE_STORNO_TYPE => 'credit_note_storno',
|
||
|
};
|
||
|
|
||
|
my @export_types = qw(PURCHASE_INVOICE_TYPE PURCHASE_CREDIT_NOTE_TYPE);
|
||
|
my @export_types = qw(
|
||
|
INVOICE_TYPE INVOICE_FOR_ADVANCE_PAYMENT_TYPE
|
||
|
INVOICE_FOR_ADVANCE_PAYMENT_STORNO_TYPE FINAL_INVOICE_TYPE
|
||
|
INVOICE_STORNO_TYPE CREDIT_NOTE_TYPE CREDIT_NOTE_STORNO_TYPE
|
||
|
);
|
||
|
|
||
|
my @export_subs = qw(valid_types validate_type is_valid_type get get3);
|
||
|
|
||
|
our @EXPORT_OK = (@export_types, @export_subs);
|
||
Auch abrufbar als: Unified diff
FIX: TypeData Invoice