[Home] [Help]
PACKAGE: APPS.PA_RBS_ELEMENTS_PVT
Source
1 Package Pa_Rbs_Elements_Pvt AUTHID CURRENT_USER AS
2 /* $Header: PARELEVS.pls 120.0.12020000.3 2013/03/27 13:02:43 bpottipa ship $*/
3
4 -- Standard Who
5 G_Last_Updated_By Number(15) := Fnd_Global.User_Id;
6 G_Last_Update_Date Date := SysDate;
7 G_Creation_Date Date := SysDate;
8 G_Created_By Number(15) := Fnd_Global.User_Id;
9 G_Last_Update_Login Number(15) := Fnd_Global.Login_Id;
10
11 /* -------------------------------------------------------------------------------
12 * Procedure: Process_RBS_Elements
13 * Function: Entry point for the insert/update/delete of elements/nodes
14 * ------------------------------------------------------------------------------- */
15
16 Procedure Process_RBS_Element (
17 P_RBS_Version_Id IN Number,
18 P_Parent_Element_Id IN Number,
19 P_Element_Id IN Number,
20 P_Resource_Type_Id IN Number,
21 P_Resource_Source_Id IN Number,
22 P_Order_Number IN Number,
23 P_Process_Type IN Varchar2,
24 P_Level_Code IN VARCHAR2 default null,--15834912
25 P_COST_CODE IN VARCHAR2 default null,--15834912
26 P_COST_CODE_NAME IN VARCHAR2 default null,--16430696
27 X_RBS_Element_id OUT NOCOPY Number,
28 X_Error_Msg_Data OUT NOCOPY Varchar2);
29
30 Procedure DeleteRbsElement(
31 P_RBS_Version_Id IN Number,
32 P_Element_Id IN Number,
33 X_Error_Msg_Data OUT NOCOPY Varchar2);
34
35 Procedure UpdateExisingRbsElement(
36 P_Rbs_Version_Id IN Number,
37 P_Parent_Element_Id IN Number,
38 P_Rbs_Element_Id IN Number,
39 P_Resource_Type_Id IN Number,
40 P_Resource_Source_Id IN Number,
41 P_Order_Number IN Number,
42 P_Level_Code IN VARCHAR2 default null,--15834912
43 P_COST_CODE IN VARCHAR2 default null,--15834912
44 P_COST_CODE_NAME IN VARCHAR2 default null,--16430696
45 X_Error_Msg_Data OUT NOCOPY Varchar2);
46
47 Procedure CreateNewRbsElement(
48 P_Rbs_Version_Id IN Number,
49 P_Parent_Element_Id IN Number,
50 P_Rbs_Element_Id IN Number,
51 P_Resource_Type_Id IN Number,
52 P_Resource_Source_Id IN Number,
53 P_Order_Number IN Number,
54 P_Level_Code IN VARCHAR2 default null,--15834912
55 P_COST_CODE IN VARCHAR2 default null,--15834912
56 P_COST_CODE_NAME IN VARCHAR2 default null,--16430696
57 X_RBS_Element_id OUT NOCOPY Number,
58 X_Error_Msg_Data OUT NOCOPY Varchar2);
59
60 Procedure ValidateAndBuildElement(
61 P_Mode IN Varchar2,
62 P_Rbs_Version_Id IN Number,
63 P_Parent_Element_Id IN Number,
64 P_Rbs_Element_Id IN Number,
65 P_Resource_Type_Id IN Number,
66 P_Resource_Source_Id IN Number,
67 P_Order_Number IN Number,
68 X_Person_Id OUT NOCOPY Number,
69 X_Job_Id OUT NOCOPY Number,
70 X_Organization_Id OUT NOCOPY Number,
71 X_Exp_Type_Id OUT NOCOPY Number,
72 X_Event_Type_Id OUT NOCOPY Number,
73 X_Exp_Cat_Id OUT NOCOPY Number,
74 X_Rev_Cat_Id OUT NOCOPY Number,
75 X_Inv_Item_Id OUT NOCOPY Number,
76 X_Item_Cat_Id OUT NOCOPY Number,
77 X_BOM_Labor_Id OUT NOCOPY Number,
78 X_BOM_Equip_Id OUT NOCOPY Number,
79 X_Non_Labor_Res_Id OUT NOCOPY Number,
80 X_Role_Id OUT NOCOPY Number,
81 X_Person_Type_Id OUT NOCOPY Number,
82 X_User_Def_Custom1_Id OUT NOCOPY Number,
83 X_User_Def_Custom2_Id OUT NOCOPY Number,
84 X_User_Def_Custom3_Id OUT NOCOPY Number,
85 X_User_Def_Custom4_Id OUT NOCOPY Number,
86 X_User_Def_Custom5_Id OUT NOCOPY Number,
87 X_Res_Class_Id OUT NOCOPY Number,
88 X_Supplier_Id OUT NOCOPY Number,
89 X_Rbs_Level OUT NOCOPY Number,
90 X_Rule_Based_Flag OUT NOCOPY Varchar2,
91 X_Rbs_Element_Name_Id OUT NOCOPY Number,
92 X_Order_Number OUT NOCOPY Number,
93 X_Element_Identifier OUT NOCOPY Number,
94 X_Outline_Number OUT NOCOPY Varchar2,
95 X_Error_Msg_Data OUT NOCOPY Varchar2);
96
97 Procedure ValidateRbsElement(
98 P_Mode IN Varchar2,
99 P_Rbs_Version_Id IN Number,
100 P_Parent_Element_Id IN Number,
101 P_Rbs_Element_Id IN Number,
102 P_Old_Resource_Type_Id IN Number,
103 P_Old_Resource_Source_Id IN Number,
104 P_Resource_Type_Id IN Number,
105 P_Resource_Source_Id IN Number,
106 X_Resource_Type OUT NOCOPY Varchar2,
107 X_Error_Msg_Data OUT NOCOPY Varchar2);
108
109 Procedure ValidateResource(
110 P_Resource_Type_Id IN Number,
111 P_Resource_Source_Id IN Number,
112 P_Resource_Type IN Varchar2,
113 X_Error_Msg_Data OUT NOCOPY Varchar2);
114
115 Procedure GetParentRbsData(
116 P_Parent_Element_Id IN Number,
117 X_Person_Id OUT NOCOPY Number,
118 X_Job_Id OUT NOCOPY Number,
119 X_Organization_Id OUT NOCOPY Number,
120 X_Exp_Type_Id OUT NOCOPY Number,
121 X_Event_Type_Id OUT NOCOPY Number,
122 X_Exp_Cat_Id OUT NOCOPY Number,
123 X_Rev_Cat_Id OUT NOCOPY Number,
124 X_Inv_Item_Id OUT NOCOPY Number,
125 X_Item_Cat_Id OUT NOCOPY Number,
126 X_BOM_Labor_Id OUT NOCOPY Number,
127 X_BOM_Equip_Id OUT NOCOPY Number,
128 X_Non_Labor_Res_Id OUT NOCOPY Number,
129 X_Role_Id OUT NOCOPY Number,
130 X_Person_Type_Id OUT NOCOPY Number,
131 X_User_Def_Custom1_Id OUT NOCOPY Number,
132 X_User_Def_Custom2_Id OUT NOCOPY Number,
133 X_User_Def_Custom3_Id OUT NOCOPY Number,
134 X_User_Def_Custom4_Id OUT NOCOPY Number,
135 X_User_Def_Custom5_Id OUT NOCOPY Number,
136 X_Res_Class_Id OUT NOCOPY Number,
137 X_Supplier_Id OUT NOCOPY Number,
138 X_Rbs_Level OUT NOCOPY Number,
139 X_Outline_Number OUT NOCOPY Varchar2);
140
141 Procedure UpdateOrderOutlineNumber(
142 P_Parent_Element_Id_Tbl IN System.Pa_Num_Tbl_Type,
143 X_Error_Msg_Data OUT NOCOPY Varchar2 );
144
145 Procedure Update_Children_Data(
146 P_Rbs_Element_Id IN Number,
147 X_Error_Msg_Data OUT NOCOPY Varchar2);
148
149 /*
150 This procedure disable the cbs cost attributes
151 Bug15834912 : CBS phase 2 changes.
152 */
153 procedure disableCostAttributes(
154 P_RBS_Version_Id IN Number,
155 P_Element_Id_Tbl IN System.Pa_Num_Tbl_Type,
156 X_Return_Status OUT NOCOPY Varchar2,
157 X_Msg_Count OUT NOCOPY Number,
158 X_Error_Msg_Data OUT NOCOPY Varchar2);
159
160
161
162 END Pa_Rbs_Elements_Pvt;