1 PACKAGE PA_RBS_ELEMENTS_PUB AS
2 /* $Header: PARELEPS.pls 120.0 2005/05/30 21:46:52 appldev noship $*/
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 X_Return_Status OUT NOCOPY Varchar2,
71 X_Msg_Count OUT NOCOPY Number,
72 X_Error_Msg_Data OUT NOCOPY Varchar2);
73
74 -- =======================================================================
75 -- Start of Comments
76 -- API Name : Process_RBS_Elements
77 -- Type : Public
78 -- Pre-Reqs : None
79 -- Type : Procedure
80 -- Function : This is the overall starting point to insert, update, and delete
81 -- elements/nodes for a specific Resource Breakdown Structure Working Version.
82 -- If cannot lock the Rbs Working Version then no processing will be done.
83 -- The procedure is used by AMG only.
84 --
85 -- Parameters:
86 --
87 -- IN
88 -- P_Commit - Varchar2 Default 'F'
89 -- P_Init_Msg_List - Varchar2 Default 'T'
90 -- P_API_Version_Number - Number
91 -- P_RBS_Version_Id - Number(15)
92 -- P_Rbs_Version_Rec_Num - Number(15)
93 -- P_Rbs_Elements_Tbl - Pa_Rbs_Elements_Pub.Rbs_Elements_Tbl_Typ
94 -- OUT
95 -- X_Return_Status - Varchar2(1)
96 -- X_Msg_Count - Number
97 -- X_Error_Msg_Data - Varchar2(30)
98 --
99 /*-------------------------------------------------------------------------*/
100
101 Procedure Process_Rbs_Elements(
102 P_Commit IN Varchar2 Default Fnd_Api.G_False,
103 P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
104 P_API_Version_Number IN Number,
105 P_RBS_Version_Id IN Number,
106 P_Rbs_Version_Rec_Num IN Number,
107 P_Rbs_Elements_Tbl IN Pa_Rbs_Elements_Pub.Rbs_Elements_Tbl_Typ,
108 X_Return_Status OUT NOCOPY Varchar2,
109 X_Msg_Count OUT NOCOPY Number,
110 X_Error_Msg_Data OUT NOCOPY Varchar2);
111
112
113 -- =======================================================================
114 -- Start of Comments
115 -- API Name : PopulateErrorStack
116 -- Type : Private
117 -- Pre-Reqs : None
118 -- Type : Procedure
119 -- Function : This procedure is used to build the error message.
120 -- This means determining the token value that will
121 -- will be passed in with the message. The token
122 -- value is dynamic and must consider translation.
123 --
124 -- Parameters:
125 --
126 -- IN
127 -- P_Calling_Page - VARCHAR2(10) Values: VERSION_ELEMENTS or CHILD_ELEMENTS
128 -- P__Element_Id - Number
129 -- P_Resource_Type_Id - Number
130 -- P_Resource_Source_Id - Number
131 -- P_Error_Msg_Data - VARCHAR2(30)
132 --
133 /*-------------------------------------------------------------------------*/
134
135 Procedure PopulateErrorStack(
136 P_Calling_Page IN Varchar2 Default 'VERSION_ELEMENTS',
137 P_Element_Id IN Number,
138 P_Resource_Type_Id IN Number,
139 P_Resource_Source_Id IN Number,
140 P_Error_Msg_Data IN Varchar2);
141
142 END PA_RBS_ELEMENTS_PUB;