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 |
- |
|
|