1011: begin
1012:
1013: ltype := 'CP_PHASE_CODE';
1014: select meaning into ret_value
1015: from fnd_lookups
1016: where lookup_type = ltype
1017: and lookup_code = pcode;
1018:
1019: return ret_value;
1038: begin
1039:
1040: ltype := 'CP_STATUS_CODE';
1041: select meaning into ret_value
1042: from fnd_lookups
1043: where lookup_type = ltype
1044: and lookup_code = scode;
1045:
1046: return ret_value;