|
Lines 168-174
sub GetMemberDetails {
Link Here
|
| 168 |
SELECT borrowers.*, |
168 |
SELECT borrowers.*, |
| 169 |
category_type, |
169 |
category_type, |
| 170 |
categories.description, |
170 |
categories.description, |
| 171 |
categories.BlockExpiredPatronOpacActions, |
|
|
| 172 |
reservefee, |
171 |
reservefee, |
| 173 |
enrolmentperiod |
172 |
enrolmentperiod |
| 174 |
FROM borrowers |
173 |
FROM borrowers |
|
Lines 182-188
sub GetMemberDetails {
Link Here
|
| 182 |
SELECT borrowers.*, |
181 |
SELECT borrowers.*, |
| 183 |
category_type, |
182 |
category_type, |
| 184 |
categories.description, |
183 |
categories.description, |
| 185 |
categories.BlockExpiredPatronOpacActions, |
|
|
| 186 |
reservefee, |
184 |
reservefee, |
| 187 |
enrolmentperiod |
185 |
enrolmentperiod |
| 188 |
FROM borrowers |
186 |
FROM borrowers |
|
Lines 212-222
sub GetMemberDetails {
Link Here
|
| 212 |
$borrower->{'flags'} = $flags; |
210 |
$borrower->{'flags'} = $flags; |
| 213 |
$borrower->{'authflags'} = $accessflagshash; |
211 |
$borrower->{'authflags'} = $accessflagshash; |
| 214 |
|
212 |
|
| 215 |
# Handle setting the true behavior for BlockExpiredPatronOpacActions |
|
|
| 216 |
$borrower->{'BlockExpiredPatronOpacActions'} = |
| 217 |
C4::Context->preference('BlockExpiredPatronOpacActions') |
| 218 |
if ( $borrower->{'BlockExpiredPatronOpacActions'} == -1 ); |
| 219 |
|
| 220 |
$borrower->{'is_expired'} = 0; |
213 |
$borrower->{'is_expired'} = 0; |
| 221 |
$borrower->{'is_expired'} = 1 if |
214 |
$borrower->{'is_expired'} = 1 if |
| 222 |
defined($borrower->{dateexpiry}) && |
215 |
defined($borrower->{dateexpiry}) && |