Revision 43f9b1c5
Von G. Richardson vor etwa 13 Jahren hinzugefügt
| SL/InstanceConfiguration.pm | ||
|---|---|---|
| 34 | 34 |
return $self->{currencies} ? @{ $self->{currencies} } : ();
|
| 35 | 35 |
} |
| 36 | 36 |
|
| 37 |
sub get_accounting_method {
|
|
| 38 |
my ($self) = @_; |
|
| 39 |
return $self->{data}->{accounting_method};
|
|
| 40 |
} |
|
| 41 |
|
|
| 42 |
sub get_inventory_system {
|
|
| 43 |
my ($self) = @_; |
|
| 44 |
return $self->{data}->{inventory_system};
|
|
| 45 |
} |
|
| 46 |
|
|
| 47 |
sub get_profit_determination {
|
|
| 48 |
my ($self) = @_; |
|
| 49 |
return $self->{data}->{profit_determination};
|
|
| 50 |
} |
|
| 51 |
|
|
| 37 | 52 |
1; |
| 38 | 53 |
|
| 39 | 54 |
__END__ |
| ... | ... | |
| 74 | 89 |
Returns the default currency or undef if no currency has been |
| 75 | 90 |
configured. |
| 76 | 91 |
|
| 92 |
=item C<get_accounting_method> |
|
| 93 |
|
|
| 94 |
Returns the default accounting method, accrual or cash |
|
| 95 |
|
|
| 96 |
=item C<get_inventory_system> |
|
| 97 |
|
|
| 98 |
Returns the default inventory system, perpetual or periodic |
|
| 99 |
|
|
| 100 |
=item C<get_profit_determination> |
|
| 101 |
|
|
| 102 |
Returns the default profit determination method, balance or income |
|
| 103 |
|
|
| 77 | 104 |
=back |
| 78 | 105 |
|
| 79 | 106 |
=head1 BUGS |
Auch abrufbar als: Unified diff
Umstellung von eur zu 3 Variablen in defaults
accounting_method inventory_system profit_determination
Details siehe doc/umstellung_eur.txt