DBA Data[Home] [Help]

APPS.PA_RBS_ELEMENTS_PVT dependencies on PA_RBS_ELEMENTS_PVT

Line 1: Package Body Pa_Rbs_Elements_Pvt As

1: Package Body Pa_Rbs_Elements_Pvt As
2: /* $Header: PARELEVB.pls 120.1 2008/01/16 20:22:11 amehrotr ship $*/
3:
4: Procedure Process_RBS_Element (
5: P_RBS_Version_Id IN Number,

Line 48: Pa_Rbs_Elements_Pvt.DeleteRbsElement(

44: X_Error_Msg_Data := 'PA_RBS_ELE_USED_IN_ALLOC';
45: Return;
46: END IF;
47:
48: Pa_Rbs_Elements_Pvt.DeleteRbsElement(
49: P_RBS_Version_Id => P_RBS_Version_Id,
50: P_Element_Id => P_Element_Id,
51: X_Error_Msg_Data => X_Error_Msg_Data);
52:

Line 58: Pa_Rbs_Elements_Pvt.UpdateExisingRbsElement(

54:
55: ElsIf P_Process_Type = 'U' Then
56:
57: Pa_Debug.G_Stage := 'Call UpdateExistingRbsElement() procedure.';
58: Pa_Rbs_Elements_Pvt.UpdateExisingRbsElement(
59: P_Rbs_Version_Id => P_Rbs_Version_Id,
60: P_Parent_Element_Id => P_Parent_Element_Id,
61: P_Rbs_Element_Id => P_Element_Id,
62: P_Resource_Type_Id => P_Resource_Type_Id,

Line 73: Pa_Rbs_Elements_Pvt.CreateNewRbsElement(

69:
70: Else
71:
72: Pa_Debug.G_Stage := 'Call CreateNewRbsElement() procedure.';
73: Pa_Rbs_Elements_Pvt.CreateNewRbsElement(
74: P_Rbs_Version_Id => P_Rbs_Version_Id,
75: P_Parent_Element_Id => P_Parent_Element_Id,
76: P_Rbs_Element_Id => P_Element_Id,
77: P_Resource_Type_Id => P_Resource_Type_Id,

Line 304: Pa_Rbs_Elements_Pvt.ValidateAndBuildElement(

300: If Pa_Rbs_Elements_Utils.RbsElementExists( P_Element_Id => P_Parent_Element_Id ) = 'Y' Then
301:
302:
303: Pa_Debug.G_Stage := 'Call ValidateAndBuildElement() procedure.';
304: Pa_Rbs_Elements_Pvt.ValidateAndBuildElement(
305: P_Mode => l_Mode,
306: P_Rbs_Version_Id => P_Rbs_Version_Id,
307: P_Parent_Element_Id => P_Parent_Element_Id,
308: P_Rbs_Element_Id => P_Rbs_Element_Id,

Line 380: P_Last_Update_Date => Pa_Rbs_Elements_Pvt.G_Last_Update_Date,

376: P_User_Defined_Custom2_Id => l_User_Def_Custom2_Id,
377: P_User_Defined_Custom3_Id => l_User_Def_Custom3_Id,
378: P_User_Defined_Custom4_Id => l_User_Def_Custom4_Id,
379: P_User_Defined_Custom5_Id => l_User_Def_Custom5_Id,
380: P_Last_Update_Date => Pa_Rbs_Elements_Pvt.G_Last_Update_Date,
381: P_Last_Updated_By => Pa_Rbs_Elements_Pvt.G_Last_Updated_By,
382: P_Last_Update_Login => Pa_Rbs_Elements_Pvt.G_Last_Update_Login,
383: X_Error_Msg_Data => X_Error_Msg_Data);
384:

Line 381: P_Last_Updated_By => Pa_Rbs_Elements_Pvt.G_Last_Updated_By,

377: P_User_Defined_Custom3_Id => l_User_Def_Custom3_Id,
378: P_User_Defined_Custom4_Id => l_User_Def_Custom4_Id,
379: P_User_Defined_Custom5_Id => l_User_Def_Custom5_Id,
380: P_Last_Update_Date => Pa_Rbs_Elements_Pvt.G_Last_Update_Date,
381: P_Last_Updated_By => Pa_Rbs_Elements_Pvt.G_Last_Updated_By,
382: P_Last_Update_Login => Pa_Rbs_Elements_Pvt.G_Last_Update_Login,
383: X_Error_Msg_Data => X_Error_Msg_Data);
384:
385:

Line 382: P_Last_Update_Login => Pa_Rbs_Elements_Pvt.G_Last_Update_Login,

378: P_User_Defined_Custom4_Id => l_User_Def_Custom4_Id,
379: P_User_Defined_Custom5_Id => l_User_Def_Custom5_Id,
380: P_Last_Update_Date => Pa_Rbs_Elements_Pvt.G_Last_Update_Date,
381: P_Last_Updated_By => Pa_Rbs_Elements_Pvt.G_Last_Updated_By,
382: P_Last_Update_Login => Pa_Rbs_Elements_Pvt.G_Last_Update_Login,
383: X_Error_Msg_Data => X_Error_Msg_Data);
384:
385:
386: If X_Error_Msg_Data Is Null Then

Line 423: PA_Debug.G_Stage := 'Call Pa_Rbs_Elements_Pvt.Update_Children_Data() procedure.';

419:
420: -- Bug 3636175
421: -- This call is to update the elements below the one just updated with the changes made
422: -- so that the mapping for the rbs does not become broken.
423: PA_Debug.G_Stage := 'Call Pa_Rbs_Elements_Pvt.Update_Children_Data() procedure.';
424: Pa_Rbs_Elements_Pvt.Update_Children_Data(
425: P_Rbs_Element_Id => P_Rbs_Element_Id,
426: X_Error_Msg_Data => X_Error_Msg_Data);
427:

Line 424: Pa_Rbs_Elements_Pvt.Update_Children_Data(

420: -- Bug 3636175
421: -- This call is to update the elements below the one just updated with the changes made
422: -- so that the mapping for the rbs does not become broken.
423: PA_Debug.G_Stage := 'Call Pa_Rbs_Elements_Pvt.Update_Children_Data() procedure.';
424: Pa_Rbs_Elements_Pvt.Update_Children_Data(
425: P_Rbs_Element_Id => P_Rbs_Element_Id,
426: X_Error_Msg_Data => X_Error_Msg_Data);
427:
428: End If;

Line 502: Pa_Rbs_Elements_Pvt.ValidateAndBuildElement(

498: Pa_Debug.G_Stage := 'Check to see if parent element/node exists.';
499: If Pa_Rbs_Elements_Utils.RbsElementExists( P_Element_Id => P_Parent_Element_Id ) = 'Y' Then
500:
501: Pa_Debug.G_Stage := 'Call ValidateAndBuildElement() procedure.';
502: Pa_Rbs_Elements_Pvt.ValidateAndBuildElement(
503: P_Mode => l_Mode,
504: P_Rbs_Version_Id => P_Rbs_Version_Id,
505: P_Parent_Element_Id => P_Parent_Element_Id,
506: P_Rbs_Element_Id => P_Rbs_Element_Id,

Line 576: P_Last_Update_Date => Pa_Rbs_Elements_Pvt.G_Last_Update_Date,

572: P_User_Defined_Custom2_Id => l_User_Def_Custom2_Id,
573: P_User_Defined_Custom3_Id => l_User_Def_Custom3_Id,
574: P_User_Defined_Custom4_Id => l_User_Def_Custom4_Id,
575: P_User_Defined_Custom5_Id => l_User_Def_Custom5_Id,
576: P_Last_Update_Date => Pa_Rbs_Elements_Pvt.G_Last_Update_Date,
577: P_Last_Updated_By => Pa_Rbs_Elements_Pvt.G_Last_Updated_By,
578: P_Last_Update_Login => Pa_Rbs_Elements_Pvt.G_Last_Update_Login,
579: P_Creation_Date => Pa_Rbs_Elements_Pvt.G_Creation_Date,
580: P_Created_By => Pa_Rbs_Elements_Pvt.G_Created_By,

Line 577: P_Last_Updated_By => Pa_Rbs_Elements_Pvt.G_Last_Updated_By,

573: P_User_Defined_Custom3_Id => l_User_Def_Custom3_Id,
574: P_User_Defined_Custom4_Id => l_User_Def_Custom4_Id,
575: P_User_Defined_Custom5_Id => l_User_Def_Custom5_Id,
576: P_Last_Update_Date => Pa_Rbs_Elements_Pvt.G_Last_Update_Date,
577: P_Last_Updated_By => Pa_Rbs_Elements_Pvt.G_Last_Updated_By,
578: P_Last_Update_Login => Pa_Rbs_Elements_Pvt.G_Last_Update_Login,
579: P_Creation_Date => Pa_Rbs_Elements_Pvt.G_Creation_Date,
580: P_Created_By => Pa_Rbs_Elements_Pvt.G_Created_By,
581: X_Rbs_Element_Id => X_Rbs_Element_Id,

Line 578: P_Last_Update_Login => Pa_Rbs_Elements_Pvt.G_Last_Update_Login,

574: P_User_Defined_Custom4_Id => l_User_Def_Custom4_Id,
575: P_User_Defined_Custom5_Id => l_User_Def_Custom5_Id,
576: P_Last_Update_Date => Pa_Rbs_Elements_Pvt.G_Last_Update_Date,
577: P_Last_Updated_By => Pa_Rbs_Elements_Pvt.G_Last_Updated_By,
578: P_Last_Update_Login => Pa_Rbs_Elements_Pvt.G_Last_Update_Login,
579: P_Creation_Date => Pa_Rbs_Elements_Pvt.G_Creation_Date,
580: P_Created_By => Pa_Rbs_Elements_Pvt.G_Created_By,
581: X_Rbs_Element_Id => X_Rbs_Element_Id,
582: X_Error_Msg_Data => X_Error_Msg_Data);

Line 579: P_Creation_Date => Pa_Rbs_Elements_Pvt.G_Creation_Date,

575: P_User_Defined_Custom5_Id => l_User_Def_Custom5_Id,
576: P_Last_Update_Date => Pa_Rbs_Elements_Pvt.G_Last_Update_Date,
577: P_Last_Updated_By => Pa_Rbs_Elements_Pvt.G_Last_Updated_By,
578: P_Last_Update_Login => Pa_Rbs_Elements_Pvt.G_Last_Update_Login,
579: P_Creation_Date => Pa_Rbs_Elements_Pvt.G_Creation_Date,
580: P_Created_By => Pa_Rbs_Elements_Pvt.G_Created_By,
581: X_Rbs_Element_Id => X_Rbs_Element_Id,
582: X_Error_Msg_Data => X_Error_Msg_Data);
583:

Line 580: P_Created_By => Pa_Rbs_Elements_Pvt.G_Created_By,

576: P_Last_Update_Date => Pa_Rbs_Elements_Pvt.G_Last_Update_Date,
577: P_Last_Updated_By => Pa_Rbs_Elements_Pvt.G_Last_Updated_By,
578: P_Last_Update_Login => Pa_Rbs_Elements_Pvt.G_Last_Update_Login,
579: P_Creation_Date => Pa_Rbs_Elements_Pvt.G_Creation_Date,
580: P_Created_By => Pa_Rbs_Elements_Pvt.G_Created_By,
581: X_Rbs_Element_Id => X_Rbs_Element_Id,
582: X_Error_Msg_Data => X_Error_Msg_Data);
583:
584: End If; -- error returned from ResourceNameCheck() procedure

Line 704: Pa_Rbs_Elements_Pvt.ValidateRbsElement(

700: END IF;
701:
702: Pa_Debug.G_Stage := 'Call ValidateRbsElement() procedure.';
703: --dbms_output.put_line('before ValidateRbsElement');
704: Pa_Rbs_Elements_Pvt.ValidateRbsElement(
705: P_Mode => P_Mode,
706: P_Rbs_Version_Id => P_Rbs_Version_Id,
707: P_Parent_Element_Id => P_Parent_Element_Id,
708: P_Rbs_Element_Id => P_Rbs_Element_Id,

Line 721: Pa_Rbs_Elements_Pvt.GetParentRbsData(

717: If X_Error_Msg_Data is Null Then
718:
719: Pa_Debug.G_Stage := 'Call GetParentRbsData() procedure.';
720: --dbms_output.put_line('before GetParentRbsData');
721: Pa_Rbs_Elements_Pvt.GetParentRbsData(
722: P_Parent_Element_Id => P_Parent_Element_Id,
723: X_Person_Id => X_Person_Id,
724: X_Job_Id => X_Job_Id,
725: X_Organization_Id => X_Organization_Id,

Line 1317: Pa_Rbs_Elements_Pvt.ValidateResource(

1313:
1314: -- 3. If the element is not rule based, and resource_type is not user-defined,
1315: -- validate the resource_source_id.
1316: Pa_Debug.G_Stage := 'Validate the resource by calling the ValidateResource() procedure.';
1317: Pa_Rbs_Elements_Pvt.ValidateResource(
1318: P_Resource_Type_Id => P_Resource_Type_Id,
1319: P_Resource_Source_Id => P_Resource_Source_Id,
1320: P_Resource_Type => X_Resource_Type,
1321: X_Error_Msg_Data => X_Error_Msg_Data);

Line 2264: Pa_Rbs_Elements_Pvt.GetParentRbsData(

2260: Fetch c1 Into l_Child_Rec;
2261: Exit When c1%NotFound;
2262:
2263: Pa_Debug.G_Stage := 'Call GetParentRbsData() procedure.';
2264: Pa_Rbs_Elements_Pvt.GetParentRbsData(
2265: P_Parent_Element_Id => l_Child_Rec.Parent_Element_Id,
2266: X_Person_Id => l_Person_Id,
2267: X_Job_Id => l_Job_Id,
2268: X_Organization_Id => l_Organization_Id,

Line 2453: End Pa_Rbs_Elements_Pvt;

2449: Raise;
2450:
2451: End Update_Children_Data;
2452:
2453: End Pa_Rbs_Elements_Pvt;