Lines 138-148
elsif ($op=~/edit/) {
Link Here
|
138 |
$op ='save'; |
138 |
$op ='save'; |
139 |
} |
139 |
} |
140 |
elsif ($op eq "change" ) { |
140 |
elsif ($op eq "change" ) { |
|
|
141 |
# set accepted/rejected/managed informations if applicable |
142 |
# ie= if the librarian has choosen some action on the suggestions |
143 |
if ($$suggestion_ref{"STATUS"} eq "ACCEPTED"){ |
144 |
$$suggestion_ref{"accepteddate"}=C4::Dates->today; |
145 |
$$suggestion_ref{"acceptedby"}=C4::Context->userenv->{number}; |
146 |
} elsif ($$suggestion_ref{"STATUS"} eq "REJECTED"){ |
147 |
$$suggestion_ref{"rejecteddate"}=C4::Dates->today; |
148 |
$$suggestion_ref{"rejectedby"}=C4::Context->userenv->{number}; |
149 |
} |
141 |
if ($$suggestion_ref{"STATUS"}){ |
150 |
if ($$suggestion_ref{"STATUS"}){ |
142 |
if (my $tmpstatus=lc($$suggestion_ref{"STATUS"}) =~/ACCEPTED|REJECTED/i){ |
|
|
143 |
$$suggestion_ref{"$tmpstatus"."date"}=C4::Dates->today; |
144 |
$$suggestion_ref{"$tmpstatus"."by"}=C4::Context->userenv->{number}; |
145 |
} |
146 |
$$suggestion_ref{"manageddate"}=C4::Dates->today; |
151 |
$$suggestion_ref{"manageddate"}=C4::Dates->today; |
147 |
$$suggestion_ref{"managedby"}=C4::Context->userenv->{number}; |
152 |
$$suggestion_ref{"managedby"}=C4::Context->userenv->{number}; |
148 |
} |
153 |
} |
149 |
- |
|
|