eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_RBS_ELEMENTS_PUB dependencies on PA_RBS_ELEMENTS

Line 1: Package Body Pa_Rbs_Elements_Pub AS

1: Package Body Pa_Rbs_Elements_Pub AS
2: /* $Header: PARELEPB.pls 120.0 2005/05/30 20:47:47 appldev noship $*/
3:
4: /* -------------------------------------------------------------------------------
5: * Procedure: Process_RBS_Elements

Line 59: Pa_Rbs_Elements_Pub.G_Api_Version_Number,

55: Pa_Debug.TrackPath('ADD','Process_Rbs_Elements Pub');
56:
57: Pa_Debug.G_Stage := 'Call Compatibility API.';
58: If Not Fnd_Api.Compatible_API_Call (
59: Pa_Rbs_Elements_Pub.G_Api_Version_Number,
60: P_Api_Version_Number,
61: l_Api_Name,
62: Pa_Rbs_Elements_Pub.G_Pkg_Name) Then
63:

Line 62: Pa_Rbs_Elements_Pub.G_Pkg_Name) Then

58: If Not Fnd_Api.Compatible_API_Call (
59: Pa_Rbs_Elements_Pub.G_Api_Version_Number,
60: P_Api_Version_Number,
61: l_Api_Name,
62: Pa_Rbs_Elements_Pub.G_Pkg_Name) Then
63:
64: Raise Fnd_Api.G_Exc_Unexpected_Error;
65:
66: End If;

Line 103: From pa_rbs_elements

99: -- When it is a delete, the resource source ID is not passed in
100: -- Need to get it for the error message token
101: Select Resource_Source_Id
102: Into l_Resource_Source_Id
103: From pa_rbs_elements
104: Where rbs_element_id = P_Element_Id_Tbl(i);
105:
106: Pa_Rbs_Elements_Pvt.Process_Rbs_Element(
107: P_RBS_Version_Id => P_RBS_Version_Id,

Line 106: Pa_Rbs_Elements_Pvt.Process_Rbs_Element(

102: Into l_Resource_Source_Id
103: From pa_rbs_elements
104: Where rbs_element_id = P_Element_Id_Tbl(i);
105:
106: Pa_Rbs_Elements_Pvt.Process_Rbs_Element(
107: P_RBS_Version_Id => P_RBS_Version_Id,
108: P_Parent_Element_Id => P_Parent_Element_Id_Tbl(i),
109: P_Element_Id => P_Element_Id_Tbl(i),
110: P_Resource_Type_Id => P_Resource_Type_Id_Tbl(i),

Line 120: Pa_Rbs_Elements_Pub.PopulateErrorStack(

116:
117: If X_Error_Msg_Data is not null Then
118:
119: Pa_Debug.G_Stage := 'Assign error message - 1.';
120: Pa_Rbs_Elements_Pub.PopulateErrorStack(
121: P_Calling_Page => P_Calling_Page,
122: P_Element_Id => P_Element_Id_Tbl(i),
123: P_Resource_Type_Id => P_Resource_Type_Id_Tbl(i),
124: P_Resource_Source_Id => l_Resource_Source_Id,

Line 147: Pa_Rbs_Elements_Utils.GetResSourceId(

143:
144: If P_Resource_Source_Id_Tbl(i) is Null Then
145:
146: Pa_Debug.G_Stage := 'Get Resource Source Id using code - 2.';
147: Pa_Rbs_Elements_Utils.GetResSourceId(
148: P_Resource_Type_Id => P_Resource_Type_Id_Tbl(i),
149: P_Resource_Source_Code => P_Resource_Source_Code_Tbl(i),
150: X_Resource_Source_Id => l_Resource_Source_Id);
151:

Line 161: Pa_Rbs_Elements_Pvt.Process_Rbs_Element(

157: End If;
158:
159: Pa_Debug.G_Stage := 'Call Process_Rbs_Elements() Pvt - 2.';
160:
161: Pa_Rbs_Elements_Pvt.Process_Rbs_Element(
162: P_RBS_Version_Id => P_RBS_Version_Id,
163: P_Parent_Element_Id => P_Parent_Element_Id_Tbl(i),
164: P_Element_Id => P_Element_Id_Tbl(i),
165: P_Resource_Type_Id => P_Resource_Type_Id_Tbl(i),

Line 175: Pa_Rbs_Elements_Pub.PopulateErrorStack(

171:
172: If X_Error_Msg_Data is not null Then
173:
174: Pa_Debug.G_Stage := 'Assign error message - 2.';
175: Pa_Rbs_Elements_Pub.PopulateErrorStack(
176: P_Calling_Page => P_Calling_Page,
177: P_Element_Id => P_Element_Id_Tbl(i),
178: P_Resource_Type_Id => P_Resource_Type_Id_Tbl(i),
179: P_Resource_Source_Id => l_Resource_Source_Id,

Line 202: Pa_Rbs_Elements_Utils.GetResSourceId(

198: If P_Resource_Source_Id_Tbl(i) is Null Then
199:
200: Pa_Debug.G_Stage := 'Get Resource Source Id using code - 3.';
201:
202: Pa_Rbs_Elements_Utils.GetResSourceId(
203: P_Resource_Type_Id => P_Resource_Type_Id_Tbl(i),
204: P_Resource_Source_Code => P_Resource_Source_Code_Tbl(i),
205: X_Resource_Source_Id => l_Resource_Source_Id);
206:

Line 215: Pa_Rbs_Elements_Pvt.Process_Rbs_Element(

211:
212: End If;
213:
214: Pa_Debug.G_Stage := 'Call Process_Rbs_Elements() Pvt - 3.';
215: Pa_Rbs_Elements_Pvt.Process_Rbs_Element(
216: P_RBS_Version_Id => P_RBS_Version_Id,
217: P_Parent_Element_Id => P_Parent_Element_Id_Tbl(i),
218: P_Element_Id => P_Element_Id_Tbl(i),
219: P_Resource_Type_Id => P_Resource_Type_Id_Tbl(i),

Line 229: Pa_Rbs_Elements_Pub.PopulateErrorStack(

225:
226: If X_Error_Msg_Data is not null Then
227:
228: Pa_Debug.G_Stage := 'Assign error message - 3.';
229: Pa_Rbs_Elements_Pub.PopulateErrorStack(
230: P_Calling_Page => P_Calling_Page,
231: P_Element_Id => P_Element_Id_Tbl(i),
232: P_Resource_Type_Id => P_Resource_Type_Id_Tbl(i),
233: P_Resource_Source_Id => l_Resource_Source_Id,

Line 257: Pa_Rbs_Elements_Pub.PopulateErrorStack(

253:
254: If X_Error_Msg_Data is not null Then
255:
256: Pa_Debug.G_Stage := 'Assign error message - 4.';
257: Pa_Rbs_Elements_Pub.PopulateErrorStack(
258: P_Calling_Page => P_Calling_Page,
259: P_Element_Id => P_Element_Id_Tbl(i),
260: P_Resource_Type_Id => P_Resource_Type_Id_Tbl(i),
261: P_Resource_Source_Id => l_Resource_Source_Id,

Line 308: P_Rbs_Elements_Tbl IN Pa_Rbs_Elements_Pub.Rbs_Elements_Tbl_Typ,

304: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
305: P_API_Version_Number IN Number,
306: P_RBS_Version_Id IN Number,
307: P_Rbs_Version_Rec_Num IN Number,
308: P_Rbs_Elements_Tbl IN Pa_Rbs_Elements_Pub.Rbs_Elements_Tbl_Typ,
309: X_Return_Status OUT NOCOPY Varchar2,
310: X_Msg_Count OUT NOCOPY Number,
311: X_Error_Msg_Data OUT NOCOPY Varchar2 )
312:

Line 346: Pa_Rbs_Elements_Pub.G_Api_Version_Number,

342:
343: Pa_Debug.G_Stage := 'Call Compatibility API.';
344:
345: If Not Fnd_Api.Compatible_API_Call (
346: Pa_Rbs_Elements_Pub.G_Api_Version_Number,
347: P_Api_Version_Number,
348: l_Api_Name,
349: Pa_Rbs_Elements_Pub.G_Pkg_Name)
350: THEN

Line 349: Pa_Rbs_Elements_Pub.G_Pkg_Name)

345: If Not Fnd_Api.Compatible_API_Call (
346: Pa_Rbs_Elements_Pub.G_Api_Version_Number,
347: P_Api_Version_Number,
348: l_Api_Name,
349: Pa_Rbs_Elements_Pub.G_Pkg_Name)
350: THEN
351: Raise Fnd_Api.G_Exc_Unexpected_Error;
352: END IF;
353:

Line 384: Pa_Rbs_Elements_Utils.GetResSourceId(

380:
381: If P_Rbs_Elements_Tbl(i).Resource_Source_Id is Null Then
382:
383: Pa_Debug.G_Stage := 'Get Resource Source Id using code - 1.';
384: Pa_Rbs_Elements_Utils.GetResSourceId(
385: P_Resource_Type_Id => P_Rbs_Elements_Tbl(i).Resource_Type_Id,
386: P_Resource_Source_Code => P_Rbs_Elements_Tbl(i).Resource_Source_Code,
387: X_Resource_Source_Id => l_Resource_Source_Id);
388:

Line 397: Pa_Rbs_Elements_Pvt.Process_Rbs_Element(

393:
394: End If;
395:
396: Pa_Debug.G_Stage := 'Call Process_Rbs_Elements() Pvt - 1.';
397: Pa_Rbs_Elements_Pvt.Process_Rbs_Element(
398: P_RBS_Version_Id => P_RBS_Version_Id,
399: P_Parent_Element_Id => P_Rbs_Elements_Tbl(i).Parent_Element_Id,
400: P_Element_Id => P_Rbs_Elements_Tbl(i).Rbs_Element_Id,
401: P_Resource_Type_Id => P_Rbs_Elements_Tbl(i).Resource_Type_Id,

Line 411: Pa_Rbs_Elements_Pub.PopulateErrorStack(

407:
408: If X_Error_Msg_Data is not null Then
409:
410: Pa_Debug.G_Stage := 'Assign error message - 1.';
411: Pa_Rbs_Elements_Pub.PopulateErrorStack(
412: P_Element_Id => P_Rbs_Elements_Tbl(i).Rbs_Element_Id,
413: P_Resource_Type_Id => P_Rbs_Elements_Tbl(i).Resource_Type_Id,
414: P_Resource_Source_Id => l_Resource_Source_Id,
415: P_Error_Msg_Data => X_Error_Msg_Data);

Line 435: Pa_Rbs_Elements_Utils.GetResSourceId(

431:
432: If P_Rbs_Elements_Tbl(i).Resource_Source_Id is Null Then
433:
434: Pa_Debug.G_Stage := 'Get Resource Source Id using code - 2.';
435: Pa_Rbs_Elements_Utils.GetResSourceId(
436: P_Resource_Type_Id => P_Rbs_Elements_Tbl(i).Resource_Type_Id,
437: P_Resource_Source_Code => P_Rbs_Elements_Tbl(i).Resource_Source_Code,
438: X_Resource_Source_Id => l_Resource_Source_Id);
439:

Line 448: Pa_Rbs_Elements_Pvt.Process_Rbs_Element(

444:
445: End If;
446:
447: Pa_Debug.G_Stage := 'Call Process_Rbs_Element() Pvt - 2.';
448: Pa_Rbs_Elements_Pvt.Process_Rbs_Element(
449: P_RBS_Version_Id => P_RBS_Version_Id,
450: P_Parent_Element_Id => P_Rbs_Elements_Tbl(i).Parent_Element_Id,
451: P_Element_Id => P_Rbs_Elements_Tbl(i).Rbs_Element_Id,
452: P_Resource_Type_Id => P_Rbs_Elements_Tbl(i).Resource_Type_Id,

Line 462: Pa_Rbs_Elements_Pub.PopulateErrorStack(

458:
459: If X_Error_Msg_Data is not null Then
460:
461: Pa_Debug.G_Stage := 'Assign error message - 2.';
462: Pa_Rbs_Elements_Pub.PopulateErrorStack(
463: P_Element_Id => P_Rbs_Elements_Tbl(i).Rbs_Element_Id,
464: P_Resource_Type_Id => P_Rbs_Elements_Tbl(i).Resource_Type_Id,
465: P_Resource_Source_Id => l_Resource_Source_Id,
466: P_Error_Msg_Data => X_Error_Msg_Data);

Line 486: Pa_Rbs_Elements_Utils.GetResSourceId(

482:
483: If P_Rbs_Elements_Tbl(i).Resource_Source_Id is Null Then
484:
485: Pa_Debug.G_Stage := 'Get Resource Source Id using code - 3.';
486: Pa_Rbs_Elements_Utils.GetResSourceId(
487: P_Resource_Type_Id => P_Rbs_Elements_Tbl(i).Resource_Type_Id,
488: P_Resource_Source_Code => P_Rbs_Elements_Tbl(i).Resource_Source_Code,
489: X_Resource_Source_Id => l_Resource_Source_Id);
490:

Line 499: Pa_Rbs_Elements_Pvt.Process_Rbs_Element(

495:
496: End If;
497:
498: Pa_Debug.G_Stage := 'Call Process_Rbs_Element() Pvt - 3.';
499: Pa_Rbs_Elements_Pvt.Process_Rbs_Element(
500: P_RBS_Version_Id => P_RBS_Version_Id,
501: P_Parent_Element_Id => P_Rbs_Elements_Tbl(i).Parent_Element_Id,
502: P_Element_Id => P_Rbs_Elements_Tbl(i).Rbs_Element_Id,
503: P_Resource_Type_Id => P_Rbs_Elements_Tbl(i).Resource_Type_Id,

Line 513: Pa_Rbs_Elements_Pub.PopulateErrorStack(

509:
510: If X_Error_Msg_Data is not null Then
511:
512: Pa_Debug.G_Stage := 'Assign error message - 3.';
513: Pa_Rbs_Elements_Pub.PopulateErrorStack(
514: P_Element_Id => P_Rbs_Elements_Tbl(i).Rbs_Element_Id,
515: P_Resource_Type_Id => P_Rbs_Elements_Tbl(i).Resource_Type_Id,
516: P_Resource_Source_Id => l_Resource_Source_Id,
517: P_Error_Msg_Data => X_Error_Msg_Data);

Line 609: Pa_Rbs_Elements

605: Cursor c2(P_Id IN Number) Is
606: Select
607: Outline_Number
608: From
609: Pa_Rbs_Elements
610: Where
611: Rbs_Element_Id = P_Id;
612:
613: Cursor c3(P_Id IN Number) Is

Line 649: P_Resource_Type_Code => Pa_Rbs_Elements_Utils.GetResTypeCode(P_Resource_Type_Id));

645: If P_Resource_Source_Id <> -1 Then
646:
647: l_res_name := Pa_Rbs_Utils.Get_Element_Name(
648: P_Resource_Source_Id => P_Resource_Source_Id,
649: P_Resource_Type_Code => Pa_Rbs_Elements_Utils.GetResTypeCode(P_Resource_Type_Id));
650: --hr_utility.trace('In If l_res_name IS : ' || l_res_name);
651:
652: Else
653:

Line 707: End Pa_Rbs_Elements_Pub;

703: Raise;
704:
705: End PopulateErrorStack;
706:
707: End Pa_Rbs_Elements_Pub;