1 PACKAGE PA_RBS_ELEMENTS_PUB AUTHID CURRENT_USER AS
2 /* $Header: PARELEPS.pls 120.0.12020000.3 2013/03/27 14:06:45 bpottipa ship $*/
3
4
5 --Package constant used for package version validation
6 G_API_VERSION_NUMBER CONSTANT NUMBER := 1;
7 G_PKG_NAME CONSTANT VARCHAR2(30) := 'PA_RBS_ELEMENTS_PUB';
8
9 TYPE Rbs_Elements_Rec_Typ IS RECORD (
10 Rbs_Element_Id Pa_Rbs_Elements.Rbs_Element_Id%TYPE,
11 Parent_Element_Id Pa_Rbs_Elements.Parent_Element_Id%TYPE,
12 Resource_Type_Id Pa_Rbs_Elements.Resource_Type_Id%TYPE,
13 Resource_Source_Id Number(15),
14 Resource_Source_Code Varchar2(240),
15 Order_Number Pa_Rbs_Elements.Order_Number%TYPE,
16 Process_Type Varchar2(1));
17
18 TYPE Rbs_Elements_Tbl_Typ IS TABLE OF Rbs_Elements_Rec_Typ
19 INDEX BY BINARY_INTEGER;
20
21
22 -- =======================================================================
23 -- Start of Comments
24 -- API Name : Process_RBS_Elements
25 -- Type : Public
26 -- Pre-Reqs : None
27 -- Type : Procedure
28 -- Function : This is the overall starting point to insert, update, and delete
29 -- elements/nodes for a specific Resource Breakdown Structure Working Version.
30 -- If cannot lock the Rbs Working Version then no processing will be done.
31 -- The procedure is used by the Self Service client pages only.
32 --
33 -- Parameters:
34 --
35 -- IN
36 -- P_Calling_Page - Varchar2(30)
37 -- P_Commit - Varchar2 Default 'F'
38 -- P_Init_Msg_List - Varchar2 Default 'T'
39 -- P_API_Version_Number - Number
40 -- P_RBS_Version_Id - Number(15)
41 -- P_Rbs_Version_Rec_Num - Number(15)
42 -- P_Parent_Element_Id_Tbl - System.Pa_Num_Tbl_Type
43 -- P_Element_Id_Tbl - System.Pa_Num_Tbl_Type
44 -- P_Resource_Type_Id_Tbl - System.Pa_Num_Tbl_Type
45 -- P_Resource_Source_Id_Tbl - System.Pa_Num_Tbl_Type
46 -- P_Resource_Source_Code_Tbl - System.Pa_Varchar2_240_Tbl_Type
47 -- P_Order_Number_Tbl - System.Pa_Num_Tbl_Type
48 -- P_Process_Type_Tbl - System.Pa_Varchar2_1_Tbl_Type
49 -- OUT
50 -- X_Return_Status - Varchar2(1)
51 -- X_Msg_Count - Number
52 -- X_Error_Msg_Data - Varchar2(30)
53 --
54 /*-------------------------------------------------------------------------*/
55
56 Procedure Process_Rbs_Elements (
57 P_Calling_Page IN Varchar2,
58 P_Commit IN Varchar2 Default Fnd_Api.G_False,
59 P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
60 P_API_Version_Number IN Number,
61 P_RBS_Version_Id IN Number,
62 P_Rbs_Version_Rec_Num IN Number,
63 P_Parent_Element_Id_Tbl IN System.Pa_Num_Tbl_Type,
64 P_Element_Id_Tbl IN System.Pa_Num_Tbl_Type,
65 P_Resource_Type_Id_Tbl IN System.Pa_Num_Tbl_Type,
66 P_Resource_Source_Id_Tbl IN System.Pa_Num_Tbl_Type,
67 P_Resource_Source_Code_Tbl IN System.Pa_Varchar2_240_Tbl_Type,
68 P_Order_Number_Tbl IN System.Pa_Num_Tbl_Type,
69 P_Process_Type_Tbl IN System.Pa_Varchar2_1_Tbl_Type,
70 P_LEVEL_CODE_TBL IN System.Pa_Varchar2_240_Tbl_Type default null,--15834912
71 P_COST_CODE_TBL IN System.Pa_Varchar2_240_Tbl_Type default null,--15834912
72 P_COST_CODE_NAME_TBL IN System.Pa_Varchar2_240_Tbl_Type default null,--16430696
73 X_Return_Status OUT NOCOPY Varchar2,
74 X_Msg_Count OUT NOCOPY Number,
75 X_Error_Msg_Data OUT NOCOPY Varchar2);
76
77 -- =======================================================================
78 -- Start of Comments
79 -- API Name : Process_RBS_Elements
80 -- Type : Public
81 -- Pre-Reqs : None
82 -- Type : Procedure
83 -- Function : This is the overall starting point to insert, update, and delete
84 -- elements/nodes for a specific Resource Breakdown Structure Working Version.
85 -- If cannot lock the Rbs Working Version then no processing will be done.
86 -- The procedure is used by AMG only.
87 --
88 -- Parameters:
89 --
90 -- IN
91 -- P_Commit - Varchar2 Default 'F'
92 -- P_Init_Msg_List - Varchar2 Default 'T'
93 -- P_API_Version_Number - Number
94 -- P_RBS_Version_Id - Number(15)
95 -- P_Rbs_Version_Rec_Num - Number(15)
96 -- P_Rbs_Elements_Tbl - Pa_Rbs_Elements_Pub.Rbs_Elements_Tbl_Typ
97 -- OUT
98 -- X_Return_Status - Varchar2(1)
99 -- X_Msg_Count - Number
100 -- X_Error_Msg_Data - Varchar2(30)
101 --
102 /*-------------------------------------------------------------------------*/
103
104 Procedure Process_Rbs_Elements(
105 P_Commit IN Varchar2 Default Fnd_Api.G_False,
106 P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
107 P_API_Version_Number IN Number,
108 P_RBS_Version_Id IN Number,
109 P_Rbs_Version_Rec_Num IN Number,
110 P_Rbs_Elements_Tbl IN Pa_Rbs_Elements_Pub.Rbs_Elements_Tbl_Typ,
111 X_Return_Status OUT NOCOPY Varchar2,
112 X_Msg_Count OUT NOCOPY Number,
113 X_Error_Msg_Data OUT NOCOPY Varchar2);
114
115
116 -- =======================================================================
117 -- Start of Comments
118 -- API Name : PopulateErrorStack
119 -- Type : Private
120 -- Pre-Reqs : None
121 -- Type : Procedure
122 -- Function : This procedure is used to build the error message.
123 -- This means determining the token value that will
124 -- will be passed in with the message. The token
125 -- value is dynamic and must consider translation.
126 --
127 -- Parameters:
128 --
129 -- IN
130 -- P_Calling_Page - VARCHAR2(10) Values: VERSION_ELEMENTS or CHILD_ELEMENTS
131 -- P__Element_Id - Number
132 -- P_Resource_Type_Id - Number
133 -- P_Resource_Source_Id - Number
134 -- P_Error_Msg_Data - VARCHAR2(30)
135 --
136 /*-------------------------------------------------------------------------*/
137
138 Procedure PopulateErrorStack(
139 P_Calling_Page IN Varchar2 Default 'VERSION_ELEMENTS',
140 P_Element_Id IN Number,
141 P_Resource_Type_Id IN Number,
142 P_Resource_Source_Id IN Number,
143 P_Error_Msg_Data IN Varchar2);
144
145 END PA_RBS_ELEMENTS_PUB;