|
Lines 59-68
sub Init{
Link Here
|
| 59 |
|
59 |
|
| 60 |
sub GetCriteriumDesc{ |
60 |
sub GetCriteriumDesc{ |
| 61 |
my ($criteriumvalue,$displayby)=@_; |
61 |
my ($criteriumvalue,$displayby)=@_; |
| 62 |
unless ( grep { /$criteriumvalue/ } qw(ASKED ACCEPTED REJECTED CHECKED) ) { |
62 |
if ($displayby =~ /status/i) { |
| 63 |
return GetAuthorisedValueByCode('SUGGEST_STATUS', $criteriumvalue ) || "Unknown"; |
63 |
if ( grep { /^($criteriumvalue)$/ } qw(ASKED ACCEPTED REJECTED CHECKED ORDERED AVAILABLE) ) { |
|
|
64 |
return ($criteriumvalue eq 'ASKED'?"Pending":ucfirst(lc( $criteriumvalue))); |
| 65 |
} else { |
| 66 |
return GetAuthorisedValueByCode('SUGGEST_STATUS', $criteriumvalue) || $criteriumvalue; |
| 67 |
} |
| 64 |
} |
68 |
} |
| 65 |
return ($criteriumvalue eq 'ASKED'?"Pending":ucfirst(lc( $criteriumvalue))) if ($displayby =~/status/i); |
|
|
| 66 |
return (GetBranchName($criteriumvalue)) if ($displayby =~/branchcode/); |
69 |
return (GetBranchName($criteriumvalue)) if ($displayby =~/branchcode/); |
| 67 |
return (GetSupportName($criteriumvalue)) if ($displayby =~/itemtype/); |
70 |
return (GetSupportName($criteriumvalue)) if ($displayby =~/itemtype/); |
| 68 |
if ($displayby =~/suggestedby/||$displayby =~/managedby/||$displayby =~/acceptedby/){ |
71 |
if ($displayby =~/suggestedby/||$displayby =~/managedby/||$displayby =~/acceptedby/){ |
| 69 |
- |
|
|