1566: ELSIF p_res_type_code = 'PERSON_TYPE' THEN
1567: BEGIN
1568: SELECT lookup_code
1569: INTO x_person_type_code
1570: FROM pa_lookups
1571: WHERE lookup_type = 'PA_PERSON_TYPE'
1572: AND lookup_code = p_resource_code;
1573: EXCEPTION
1574: WHEN OTHERS THEN
2989: Cursor c_PersonType (P_Person_Type IN Varchar2) Is
2990: Select
2991: Meaning
2992: From
2993: pa_lookups
2994: Where
2995: Lookup_Type = 'PA_PERSON_TYPE'
2996: And Lookup_Code = P_Person_Type;
2997:
3668: BEGIN
3669:
3670: SELECT lk.Meaning
3671: INTO l_Fin_Cat_Displayed
3672: FROM PA_LOOKUPS lk
3673: WHERE lk.Lookup_Type = 'REVENUE CATEGORY'
3674: and lk.lookup_code = l_revenue_category_code;
3675:
3676: EXCEPTION
5081: Cursor c_Rev_Cat_Code ( P_Fin_Cat_Code IN Varchar2) Is
5082: Select
5083: Meaning
5084: From
5085: Pa_Lookups
5086: Where
5087: Lookup_Code = P_Fin_Cat_Code
5088: And Lookup_Type = 'REVENUE CATEGORY';
5089:
5090: Cursor c_Rev_Cat_Meaning ( P_Fin_Cat_Meaning IN Varchar2) Is
5091: Select
5092: lookup_code
5093: From
5094: Pa_Lookups
5095: Where
5096: Meaning = P_Fin_Cat_Meaning
5097: And Lookup_Type = 'REVENUE CATEGORY';
5098: