DBA Data[Home] [Help]

APPS.PA_RBS_ELEMENTS_PUB dependencies on FND_API

Line 33: P_Commit IN Varchar2 Default Fnd_Api.G_False,

29: * ------------------------------------------------------------------------------- */
30:
31: Procedure Process_Rbs_Elements (
32: P_Calling_Page IN Varchar2,
33: P_Commit IN Varchar2 Default Fnd_Api.G_False,
34: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
35: P_API_Version_Number IN Number,
36: P_RBS_Version_Id IN Number,
37: P_Rbs_Version_Rec_Num IN Number,

Line 34: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,

30:
31: Procedure Process_Rbs_Elements (
32: P_Calling_Page IN Varchar2,
33: P_Commit IN Varchar2 Default Fnd_Api.G_False,
34: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
35: P_API_Version_Number IN Number,
36: P_RBS_Version_Id IN Number,
37: P_Rbs_Version_Rec_Num IN Number,
38: P_Parent_Element_Id_Tbl IN System.Pa_Num_Tbl_Type,

Line 85: If Not Fnd_Api.Compatible_API_Call (

81: Pa_Debug.G_Stage := 'Entering Process_Rbs_Elements() Pub.';
82: Pa_Debug.TrackPath('ADD','Process_Rbs_Elements Pub');
83:
84: Pa_Debug.G_Stage := 'Call Compatibility API.';
85: If Not Fnd_Api.Compatible_API_Call (
86: Pa_Rbs_Elements_Pub.G_Api_Version_Number,
87: P_Api_Version_Number,
88: l_Api_Name,
89: Pa_Rbs_Elements_Pub.G_Pkg_Name) Then

Line 91: Raise Fnd_Api.G_Exc_Unexpected_Error;

87: P_Api_Version_Number,
88: l_Api_Name,
89: Pa_Rbs_Elements_Pub.G_Pkg_Name) Then
90:
91: Raise Fnd_Api.G_Exc_Unexpected_Error;
92:
93: End If;
94:
95: Pa_Debug.G_Stage := 'Check if need to initialize the message stack(T-True,F-False) - ' || P_Init_Msg_List;

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

92:
93: End If;
94:
95: Pa_Debug.G_Stage := 'Check if need to initialize the message stack(T-True,F-False) - ' || P_Init_Msg_List;
96: If Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True)) Then
97:
98: Fnd_Msg_Pub.Initialize;
99:
100: End If;

Line 105: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

101:
102: Pa_Debug.G_Stage := 'Initialize error handling variables.';
103: X_Msg_Count := 0;
104: X_Error_Msg_Data := Null;
105: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
106:
107: -- Lock the rbs_version record.
108: Pa_Debug.G_Stage := 'Opening cursor which locks the Rbs Version.';
109: Open cLockVersionRec(P_Id => P_RBS_Version_Id);

Line 155: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;

151: P_Resource_Source_Id => l_Resource_Source_Id,
152: P_Error_Msg_Data => X_Error_Msg_Data);
153:
154: X_Msg_Count := X_Msg_Count + 1;
155: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;
156:
157: End If;
158:
159: END IF; -- process type is DELETE

Line 225: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;

221: P_Resource_Source_Id => l_Resource_Source_Id,
222: P_Error_Msg_Data => X_Error_Msg_Data);
223:
224: X_Msg_Count := X_Msg_Count + 1;
225: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;
226: else
227: if(P_LEVEL_CODE_TBL is not null) then
228: cbs_generate_cost_code(P_RBS_Version_Id => P_RBS_Version_Id,
229: P_Element_Id =>P_Element_Id_Tbl(i),

Line 300: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;

296: P_Resource_Source_Id => l_Resource_Source_Id,
297: P_Error_Msg_Data => X_Error_Msg_Data);
298:
299: X_Msg_Count := X_Msg_Count + 1;
300: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;
301: return;
302:
303: End If;
304:

Line 327: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

323: P_Resource_Type_Id => P_Resource_Type_Id_Tbl(i),
324: P_Resource_Source_Id => l_Resource_Source_Id,
325: P_Error_Msg_Data => X_Error_Msg_Data);
326: X_Msg_Count := X_Msg_Count + 1;
327: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
328:
329: End If;
330:
331: Pa_Debug.G_Stage := 'Check to do commit(T-True,F-False) - ' || P_Commit;

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

328:
329: End If;
330:
331: Pa_Debug.G_Stage := 'Check to do commit(T-True,F-False) - ' || P_Commit;
332: If Fnd_Api.To_Boolean(Nvl(P_Commit,Fnd_Api.G_False)) Then
333:
334: Commit;
335:
336: End If;

Line 366: P_Commit IN Varchar2 Default Fnd_Api.G_False,

362: * This procedure is used by AMG.
363: * ------------------------------------------------------------------------------- */
364:
365: Procedure Process_Rbs_Elements(
366: P_Commit IN Varchar2 Default Fnd_Api.G_False,
367: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
368: P_API_Version_Number IN Number,
369: P_RBS_Version_Id IN Number,
370: P_Rbs_Version_Rec_Num IN Number,

Line 367: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,

363: * ------------------------------------------------------------------------------- */
364:
365: Procedure Process_Rbs_Elements(
366: P_Commit IN Varchar2 Default Fnd_Api.G_False,
367: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
368: P_API_Version_Number IN Number,
369: P_RBS_Version_Id IN Number,
370: P_Rbs_Version_Rec_Num IN Number,
371: P_Rbs_Elements_Tbl IN Pa_Rbs_Elements_Pub.Rbs_Elements_Tbl_Typ,

Line 408: If Not Fnd_Api.Compatible_API_Call (

404: Pa_Debug.TrackPath('ADD','Process_Rbs_Elements Pub-AMG');
405:
406: Pa_Debug.G_Stage := 'Call Compatibility API.';
407:
408: If Not Fnd_Api.Compatible_API_Call (
409: Pa_Rbs_Elements_Pub.G_Api_Version_Number,
410: P_Api_Version_Number,
411: l_Api_Name,
412: Pa_Rbs_Elements_Pub.G_Pkg_Name)

Line 414: Raise Fnd_Api.G_Exc_Unexpected_Error;

410: P_Api_Version_Number,
411: l_Api_Name,
412: Pa_Rbs_Elements_Pub.G_Pkg_Name)
413: THEN
414: Raise Fnd_Api.G_Exc_Unexpected_Error;
415: END IF;
416:
417: IF Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True))
418: THEN

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

413: THEN
414: Raise Fnd_Api.G_Exc_Unexpected_Error;
415: END IF;
416:
417: IF Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True))
418: THEN
419: Fnd_Msg_Pub.Initialize;
420: END IF;
421:

Line 425: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

421:
422: Pa_Debug.G_Stage := 'Initialize error handling variables.';
423: X_Msg_Count := 0;
424: X_Error_Msg_Data := Null;
425: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
426:
427: -- Lock the rbs_version record.
428: Pa_Debug.G_Stage := 'Opening cursor which locks the Rbs Version.';
429: Open cLockVersionRec(P_Id => P_RBS_Version_Id);

Line 480: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

476: P_Resource_Type_Id => P_Rbs_Elements_Tbl(i).Resource_Type_Id,
477: P_Resource_Source_Id => l_Resource_Source_Id,
478: P_Error_Msg_Data => X_Error_Msg_Data);
479: X_Msg_Count := X_Msg_Count + 1;
480: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
481:
482: End If;
483:
484: End If; -- procedure type id DELETE

Line 531: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

527: P_Resource_Type_Id => P_Rbs_Elements_Tbl(i).Resource_Type_Id,
528: P_Resource_Source_Id => l_Resource_Source_Id,
529: P_Error_Msg_Data => X_Error_Msg_Data);
530: X_Msg_Count := X_Msg_Count + 1;
531: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
532:
533: End If;
534:
535: End If; -- process type is UPDATE

Line 582: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

578: P_Resource_Type_Id => P_Rbs_Elements_Tbl(i).Resource_Type_Id,
579: P_Resource_Source_Id => l_Resource_Source_Id,
580: P_Error_Msg_Data => X_Error_Msg_Data);
581: X_Msg_Count := X_Msg_Count + 1;
582: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
583:
584: End If;
585:
586: End If; -- process type is ADD

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

589:
590: End Loop; -- third time thru the loop for add records.
591:
592: Pa_Debug.G_Stage := 'Check to do commit(T-True,F-False) - '|| P_Commit;
593: If Fnd_Api.To_Boolean(Nvl(P_Commit,Fnd_Api.G_False)) Then
594:
595: Commit;
596:
597: End If;