|
Lines 84-90
sub UpdateStats {
Link Here
|
| 84 |
return () if ! defined $params; |
84 |
return () if ! defined $params; |
| 85 |
# change these arrays if new types of transaction or new parameters are allowed |
85 |
# change these arrays if new types of transaction or new parameters are allowed |
| 86 |
my @allowed_keys = qw (type branch amount other itemnumber itemtype borrowernumber ccode location categorycode); |
86 |
my @allowed_keys = qw (type branch amount other itemnumber itemtype borrowernumber ccode location categorycode); |
| 87 |
my @allowed_circulation_types = qw (renew issue localuse return onsite_checkout recall); |
87 |
my @allowed_circulation_types = qw (renew issue localuse return onsite_checkout recall item_found item_lost); |
| 88 |
my @allowed_accounts_types = qw (writeoff payment); |
88 |
my @allowed_accounts_types = qw (writeoff payment); |
| 89 |
my @circulation_mandatory_keys = qw (type branch borrowernumber itemnumber ccode itemtype); |
89 |
my @circulation_mandatory_keys = qw (type branch borrowernumber itemnumber ccode itemtype); |
| 90 |
my @accounts_mandatory_keys = qw (type branch borrowernumber amount); |
90 |
my @accounts_mandatory_keys = qw (type branch borrowernumber amount); |
| 91 |
- |
|
|