Lines 67-72
if ( $op eq 'update' ) {
Link Here
|
67 |
my @condition_fields = $cgi->multi_param("condition_field_$unique_id"); |
67 |
my @condition_fields = $cgi->multi_param("condition_field_$unique_id"); |
68 |
my @condition_values = $cgi->multi_param("condition_value_$unique_id"); |
68 |
my @condition_values = $cgi->multi_param("condition_value_$unique_id"); |
69 |
my @age_fields = $cgi->multi_param("agefield_$unique_id"); |
69 |
my @age_fields = $cgi->multi_param("agefield_$unique_id"); |
|
|
70 |
my @age_units = $cgi->multi_param("ageunit_$unique_id"); |
70 |
my $rule = { |
71 |
my $rule = { |
71 |
substitutions => [], |
72 |
substitutions => [], |
72 |
conditions => [], |
73 |
conditions => [], |
Lines 90-95
if ( $op eq 'update' ) {
Link Here
|
90 |
for my $age_field ( @age_fields ) { |
91 |
for my $age_field ( @age_fields ) { |
91 |
$rule->{agefield} = $age_field ? $age_field : "items.dateaccessioned"; |
92 |
$rule->{agefield} = $age_field ? $age_field : "items.dateaccessioned"; |
92 |
} |
93 |
} |
|
|
94 |
|
95 |
for my $age_unit ( @age_units ) { |
96 |
if ($rule->{agefield} ne 'items.damaged_on' |
97 |
&& $rule->{agefield} ne 'items.itemlost_on' |
98 |
&& $rule->{agefield} ne 'items.withdrawn_on') { |
99 |
$rule->{ageunit} = "Days"; |
100 |
} else { |
101 |
$rule->{ageunit} = $age_unit ? $age_unit : "Days"; |
102 |
} |
103 |
} |
104 |
|
93 |
push @rules, $rule; |
105 |
push @rules, $rule; |
94 |
} |
106 |
} |
95 |
my $syspref_content = to_json( \@rules ); |
107 |
my $syspref_content = to_json( \@rules ); |
Lines 116-124
if ( $@ ) {
Link Here
|
116 |
my @item_fields = map { "items.$_" } Koha::Items->columns; |
128 |
my @item_fields = map { "items.$_" } Koha::Items->columns; |
117 |
my @biblioitem_fields = map { "biblioitems.$_" } Koha::Biblioitems->columns; |
129 |
my @biblioitem_fields = map { "biblioitems.$_" } Koha::Biblioitems->columns; |
118 |
my @age_fields = ('items.dateaccessioned', 'items.replacementpricedate', 'items.datelastborrowed', 'items.datelastseen', 'items.damaged_on', 'items.itemlost_on', 'items.withdrawn_on'); |
130 |
my @age_fields = ('items.dateaccessioned', 'items.replacementpricedate', 'items.datelastborrowed', 'items.datelastseen', 'items.damaged_on', 'items.itemlost_on', 'items.withdrawn_on'); |
|
|
131 |
my @age_units = ('Hours', 'Days'); |
119 |
$template->param( |
132 |
$template->param( |
120 |
op => $op, |
133 |
op => $op, |
121 |
messages => \@messages, |
134 |
messages => \@messages, |
|
|
135 |
ageunits => [ @age_units ], |
122 |
agefields => [ @age_fields ], |
136 |
agefields => [ @age_fields ], |
123 |
condition_fields => [ @item_fields, @biblioitem_fields ], |
137 |
condition_fields => [ @item_fields, @biblioitem_fields ], |
124 |
substitution_fields => \@item_fields, |
138 |
substitution_fields => \@item_fields, |
125 |
- |
|
|