1: Package Body Pa_Rbs_Elements_Utils AS
2: /* $Header: PARELEUB.pls 120.0 2005/05/30 02:23:48 appldev noship $*/
3:
4: -- When checking that parent element exists for element you are working to udpate/add
5: -- Returns 'Y' for exists and 'N' for not exists
16: 'Y'
17: Into
18: l_dummy
19: From
20: Pa_Rbs_Elements
21: Where
22: Rbs_Element_Id = P_Element_Id;
23:
24:
73:
74: Begin
75:
76: -- Make sure the type is in user-defined, named_role, revenue_cat
77: l_Res_Type_Code := Pa_Rbs_Elements_Utils.GetResTypeCode(P_Resource_Type_Id);
78:
79: If l_Res_Type_Code is Null Then
80:
81: Raise No_Data_Found;
141: Raise;
142:
143: End GetResTypeCode;
144:
145: END Pa_Rbs_Elements_Utils;