152: SELECT CASE WHEN BitAnd(l_value , 7) = 7 THEN 'PS'
153: WHEN BitAnd(l_value , 5) = 5 THEN 'S'
154: WHEN BitAnd(l_value , 3) = 3 THEN 'P'
155: END INTO l_global_cur_type
156: FROM DUAL;
157: EXCEPTION
158: WHEN OTHERS THEN
159: l_global_cur_type := p_global_cur_type;
160: END;