|
Lines 36-41
Account offsets are used to track the changes in account lines
Link Here
|
| 36 |
|
36 |
|
| 37 |
=cut |
37 |
=cut |
| 38 |
|
38 |
|
|
|
39 |
=head3 new |
| 40 |
|
| 41 |
=cut |
| 42 |
|
| 43 |
sub new { |
| 44 |
my ($class, $params) = @_; |
| 45 |
|
| 46 |
$params->{transaction_library} //= |
| 47 |
defined C4::Context->userenv ? C4::Context->userenv->{branch} : undef; |
| 48 |
|
| 49 |
return $class->SUPER::new($params); |
| 50 |
} |
| 51 |
|
| 39 |
=head3 debit |
52 |
=head3 debit |
| 40 |
|
53 |
|
| 41 |
my $debit = $account_offset->debit; |
54 |
my $debit = $account_offset->debit; |
| 42 |
- |
|
|