DBA Data[Home] [Help]

APPS.PA_RBS_ELEMENTS_PUB dependencies on FND_API

Line 12: P_Commit IN Varchar2 Default Fnd_Api.G_False,

8: * ------------------------------------------------------------------------------- */
9:
10: Procedure Process_Rbs_Elements (
11: P_Calling_Page IN Varchar2,
12: P_Commit IN Varchar2 Default Fnd_Api.G_False,
13: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
14: P_API_Version_Number IN Number,
15: P_RBS_Version_Id IN Number,
16: P_Rbs_Version_Rec_Num IN Number,

Line 13: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,

9:
10: Procedure Process_Rbs_Elements (
11: P_Calling_Page IN Varchar2,
12: P_Commit IN Varchar2 Default Fnd_Api.G_False,
13: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
14: P_API_Version_Number IN Number,
15: P_RBS_Version_Id IN Number,
16: P_Rbs_Version_Rec_Num IN Number,
17: P_Parent_Element_Id_Tbl IN System.Pa_Num_Tbl_Type,

Line 58: If Not Fnd_Api.Compatible_API_Call (

54: Pa_Debug.G_Stage := 'Entering Process_Rbs_Elements() Pub.';
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

Line 64: Raise Fnd_Api.G_Exc_Unexpected_Error;

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;
67:
68: Pa_Debug.G_Stage := 'Check if need to initialize the message stack(T-True,F-False) - ' || P_Init_Msg_List;

Line 69: If Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True)) Then

65:
66: End If;
67:
68: Pa_Debug.G_Stage := 'Check if need to initialize the message stack(T-True,F-False) - ' || P_Init_Msg_List;
69: If Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True)) Then
70:
71: Fnd_Msg_Pub.Initialize;
72:
73: End If;

Line 78: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

74:
75: Pa_Debug.G_Stage := 'Initialize error handling variables.';
76: X_Msg_Count := 0;
77: X_Error_Msg_Data := Null;
78: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
79:
80: -- Lock the rbs_version record.
81: Pa_Debug.G_Stage := 'Opening cursor which locks the Rbs Version.';
82: Open cLockVersionRec(P_Id => P_RBS_Version_Id);

Line 128: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;

124: P_Resource_Source_Id => l_Resource_Source_Id,
125: P_Error_Msg_Data => X_Error_Msg_Data);
126:
127: X_Msg_Count := X_Msg_Count + 1;
128: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;
129:
130: End If;
131:
132: END IF; -- process type is DELETE

Line 183: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;

179: P_Resource_Source_Id => l_Resource_Source_Id,
180: P_Error_Msg_Data => X_Error_Msg_Data);
181:
182: X_Msg_Count := X_Msg_Count + 1;
183: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;
184:
185: End If;
186:
187: End If; -- process type is UPDATE

Line 237: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;

233: P_Resource_Source_Id => l_Resource_Source_Id,
234: P_Error_Msg_Data => X_Error_Msg_Data);
235:
236: X_Msg_Count := X_Msg_Count + 1;
237: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;
238: return;
239:
240: End If;
241:

Line 264: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

260: P_Resource_Type_Id => P_Resource_Type_Id_Tbl(i),
261: P_Resource_Source_Id => l_Resource_Source_Id,
262: P_Error_Msg_Data => X_Error_Msg_Data);
263: X_Msg_Count := X_Msg_Count + 1;
264: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
265:
266: End If;
267:
268: Pa_Debug.G_Stage := 'Check to do commit(T-True,F-False) - ' || P_Commit;

Line 269: If Fnd_Api.To_Boolean(Nvl(P_Commit,Fnd_Api.G_False)) Then

265:
266: End If;
267:
268: Pa_Debug.G_Stage := 'Check to do commit(T-True,F-False) - ' || P_Commit;
269: If Fnd_Api.To_Boolean(Nvl(P_Commit,Fnd_Api.G_False)) Then
270:
271: Commit;
272:
273: End If;

Line 303: P_Commit IN Varchar2 Default Fnd_Api.G_False,

299: * This procedure is used by AMG.
300: * ------------------------------------------------------------------------------- */
301:
302: Procedure Process_Rbs_Elements(
303: P_Commit IN Varchar2 Default Fnd_Api.G_False,
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,

Line 304: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,

300: * ------------------------------------------------------------------------------- */
301:
302: Procedure Process_Rbs_Elements(
303: P_Commit IN Varchar2 Default Fnd_Api.G_False,
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,

Line 345: If Not Fnd_Api.Compatible_API_Call (

341: Pa_Debug.TrackPath('ADD','Process_Rbs_Elements Pub-AMG');
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)

Line 351: Raise Fnd_Api.G_Exc_Unexpected_Error;

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:
354: IF Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True))
355: THEN

Line 354: IF Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True))

350: THEN
351: Raise Fnd_Api.G_Exc_Unexpected_Error;
352: END IF;
353:
354: IF Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True))
355: THEN
356: Fnd_Msg_Pub.Initialize;
357: END IF;
358:

Line 362: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

358:
359: Pa_Debug.G_Stage := 'Initialize error handling variables.';
360: X_Msg_Count := 0;
361: X_Error_Msg_Data := Null;
362: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
363:
364: -- Lock the rbs_version record.
365: Pa_Debug.G_Stage := 'Opening cursor which locks the Rbs Version.';
366: Open cLockVersionRec(P_Id => P_RBS_Version_Id);

Line 417: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

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);
416: X_Msg_Count := X_Msg_Count + 1;
417: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
418:
419: End If;
420:
421: End If; -- procedure type id DELETE

Line 468: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

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);
467: X_Msg_Count := X_Msg_Count + 1;
468: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
469:
470: End If;
471:
472: End If; -- process type is UPDATE

Line 519: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

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);
518: X_Msg_Count := X_Msg_Count + 1;
519: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
520:
521: End If;
522:
523: End If; -- process type is ADD

Line 530: If Fnd_Api.To_Boolean(Nvl(P_Commit,Fnd_Api.G_False)) Then

526:
527: End Loop; -- third time thru the loop for add records.
528:
529: Pa_Debug.G_Stage := 'Check to do commit(T-True,F-False) - '|| P_Commit;
530: If Fnd_Api.To_Boolean(Nvl(P_Commit,Fnd_Api.G_False)) Then
531:
532: Commit;
533:
534: End If;