|
Lines 166-172
elsif ($op=~/edit/) {
Link Here
|
| 166 |
} |
166 |
} |
| 167 |
elsif ($op eq "change" ) { |
167 |
elsif ($op eq "change" ) { |
| 168 |
# set accepted/rejected/managed informations if applicable |
168 |
# set accepted/rejected/managed informations if applicable |
| 169 |
# ie= if the librarian has choosen some action on the suggestions |
169 |
# ie= if the librarian has chosen some action on the suggestions |
| 170 |
if ($suggestion_only->{"STATUS"} eq "ACCEPTED"){ |
170 |
if ($suggestion_only->{"STATUS"} eq "ACCEPTED"){ |
| 171 |
$suggestion_only->{accepteddate} = dt_from_string; |
171 |
$suggestion_only->{accepteddate} = dt_from_string; |
| 172 |
$suggestion_only->{"acceptedby"}=C4::Context->userenv->{number}; |
172 |
$suggestion_only->{"acceptedby"}=C4::Context->userenv->{number}; |
|
Lines 232-238
if ($op=~/else/) {
Link Here
|
| 232 |
$criteria_has_empty = 1; |
232 |
$criteria_has_empty = 1; |
| 233 |
} |
233 |
} |
| 234 |
} |
234 |
} |
| 235 |
# agregate null and empty values under empty value |
235 |
# aggregate null and empty values under empty value |
| 236 |
push @criteria_dv, '' if $criteria_has_empty; |
236 |
push @criteria_dv, '' if $criteria_has_empty; |
| 237 |
|
237 |
|
| 238 |
my @allsuggestions; |
238 |
my @allsuggestions; |
| 239 |
- |
|
|