|
Lines 56-62
sub GetCriteriumDesc{
Link Here
|
| 56 |
return ($criteriumvalue eq 'ASKED'?"Pending":ucfirst(lc( $criteriumvalue))) if ($displayby =~/status/i); |
56 |
return ($criteriumvalue eq 'ASKED'?"Pending":ucfirst(lc( $criteriumvalue))) if ($displayby =~/status/i); |
| 57 |
return (GetBranchName($criteriumvalue)) if ($displayby =~/branchcode/); |
57 |
return (GetBranchName($criteriumvalue)) if ($displayby =~/branchcode/); |
| 58 |
return (GetSupportName($criteriumvalue)) if ($displayby =~/itemtype/); |
58 |
return (GetSupportName($criteriumvalue)) if ($displayby =~/itemtype/); |
| 59 |
if ($displayby =~/managedby/||$displayby =~/acceptedby/){ |
59 |
if ($displayby =~/suggestedby/||$displayby =~/managedby/||$displayby =~/acceptedby/){ |
| 60 |
my $borr=C4::Members::GetMember(borrowernumber=>$criteriumvalue); |
60 |
my $borr=C4::Members::GetMember(borrowernumber=>$criteriumvalue); |
| 61 |
return "" unless $borr; |
61 |
return "" unless $borr; |
| 62 |
return $$borr{firstname} . ", " . $$borr{surname}; |
62 |
return $$borr{firstname} . ", " . $$borr{surname}; |
| 63 |
- |
|
|