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_PUB dependencies on FND_API

Line 634: P_Commit IN Varchar2 Default Fnd_Api.G_False,

630: *
631: * *******************************************************************************************
632: */
633: Procedure Create_Rbs (
634: P_Commit IN Varchar2 Default Fnd_Api.G_False,
635: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
636: P_API_Version_Number IN Number,
637: P_Header_Rec IN Pa_Rbs_Pub.Rbs_Header_Rec_Typ,
638: P_Version_Rec IN Pa_Rbs_Pub.Rbs_Version_Rec_Typ Default G_Empty_Rbs_Ver_Rec,

Line 635: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,

631: * *******************************************************************************************
632: */
633: Procedure Create_Rbs (
634: P_Commit IN Varchar2 Default Fnd_Api.G_False,
635: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
636: P_API_Version_Number IN Number,
637: P_Header_Rec IN Pa_Rbs_Pub.Rbs_Header_Rec_Typ,
638: P_Version_Rec IN Pa_Rbs_Pub.Rbs_Version_Rec_Typ Default G_Empty_Rbs_Ver_Rec,
639: P_Elements_Tbl IN Rbs_Elements_Tbl_Typ Default G_Empty_Rbs_Elements_Tbl,

Line 719: If Not Fnd_Api.Compatible_API_Call (

715: Pa_Debug.G_Stage := 'Entering Create_Rbs().';
716: Pa_Debug.TrackPath('ADD','Create_Rbs');
717:
718: Pa_Debug.G_Stage := 'Call Compatibility API.';
719: If Not Fnd_Api.Compatible_API_Call (
720: Pa_Rbs_Pub.G_Api_Version_Number,
721: P_Api_Version_Number,
722: l_Api_Name,
723: Pa_Rbs_Pub.G_Pkg_Name) Then

Line 725: Raise Fnd_Api.G_Exc_Unexpected_Error;

721: P_Api_Version_Number,
722: l_Api_Name,
723: Pa_Rbs_Pub.G_Pkg_Name) Then
724:
725: Raise Fnd_Api.G_Exc_Unexpected_Error;
726:
727: End If;
728:
729: Pa_Debug.G_Stage := 'Check if need to initialize the message stack(T-True,F-False) - ' || P_Init_Msg_List;

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

726:
727: End If;
728:
729: Pa_Debug.G_Stage := 'Check if need to initialize the message stack(T-True,F-False) - ' || P_Init_Msg_List;
730: If Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True)) Then
731:
732: Pa_Debug.G_Stage := 'Initializing message stack by calling Fnd_Msg_Pub.Initialize().';
733: Fnd_Msg_Pub.Initialize;
734:

Line 740: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

736:
737: Pa_Debug.G_Stage := 'Initialize error handling variables.';
738: X_Error_Msg_Data := Null;
739: X_Msg_Count := 0;
740: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
741:
742: /***********************************
743: call to covert missing
744: *************************************/

Line 773: P_Commit => Fnd_Api.G_False,

769: ***********************************/
770:
771: Pa_Debug.G_Stage := 'Create Header Record by calling Pa_Rbs_Header_Pvt.Insert_Header() procedure.';
772: Pa_Rbs_Header_Pub.Insert_Header(
773: P_Commit => Fnd_Api.G_False,
774: P_Init_Msg_List => Fnd_Api.G_False,
775: P_API_Version_Number => P_API_Version_Number,
776: P_Name => l_Header_Rec.Name,
777: P_Description => Nvl(l_Header_Rec.Description,l_Header_Rec.Name),

Line 774: P_Init_Msg_List => Fnd_Api.G_False,

770:
771: Pa_Debug.G_Stage := 'Create Header Record by calling Pa_Rbs_Header_Pvt.Insert_Header() procedure.';
772: Pa_Rbs_Header_Pub.Insert_Header(
773: P_Commit => Fnd_Api.G_False,
774: P_Init_Msg_List => Fnd_Api.G_False,
775: P_API_Version_Number => P_API_Version_Number,
776: P_Name => l_Header_Rec.Name,
777: P_Description => Nvl(l_Header_Rec.Description,l_Header_Rec.Name),
778: P_EffectiveFrom => l_Header_Rec.Effective_From_Date,

Line 796: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Success;

792: Else
793:
794: G_Rbs_Hdr_Out_Rec.Rbs_Header_Id := l_Rbs_Header_Id;
795: X_Rbs_Header_Id := l_Rbs_Header_Id;
796: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Success;
797:
798: G_Rbs_Ver_Out_Rec.Rbs_Version_Id := l_Rbs_Version_Id;
799: X_Rbs_Version_Id := l_Rbs_Version_Id;
800: -- G_Rbs_Ver_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Success;

Line 800: -- G_Rbs_Ver_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Success;

796: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Success;
797:
798: G_Rbs_Ver_Out_Rec.Rbs_Version_Id := l_Rbs_Version_Id;
799: X_Rbs_Version_Id := l_Rbs_Version_Id;
800: -- G_Rbs_Ver_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Success;
801:
802: End If;
803:
804: /***************************

Line 818: P_Commit => Fnd_Api.G_False,

814: l_Version_Rec.Description is Not Null Then
815:
816: Pa_Debug.G_Stage := 'Calling Pa_Rbs_Versions_Pub.Update_Working_Version() API.';
817: Pa_Rbs_Versions_Pub.Update_Working_Version(
818: P_Commit => Fnd_Api.G_False,
819: P_Init_Msg_List => Fnd_Api.G_False,
820: P_API_Version_Number => P_Api_Version_Number,
821: P_RBS_Version_Id => l_Rbs_Version_Id,
822: P_Name => Nvl(l_Version_Rec.Name,l_Header_Rec.Name),

Line 819: P_Init_Msg_List => Fnd_Api.G_False,

815:
816: Pa_Debug.G_Stage := 'Calling Pa_Rbs_Versions_Pub.Update_Working_Version() API.';
817: Pa_Rbs_Versions_Pub.Update_Working_Version(
818: P_Commit => Fnd_Api.G_False,
819: P_Init_Msg_List => Fnd_Api.G_False,
820: P_API_Version_Number => P_Api_Version_Number,
821: P_RBS_Version_Id => l_Rbs_Version_Id,
822: P_Name => Nvl(l_Version_Rec.Name,l_Header_Rec.Name),
823: P_Description => Nvl(l_Version_Rec.Description,Nvl(l_Header_Rec.Description,l_Header_Rec.Name)),

Line 945: -- G_Rbs_Elements_Out_Tbl(i).Return_Status := Fnd_Api.G_Ret_Sts_Success;

941: -- The root element/node is not process beyond this point.
942: -- It is created once for a RBS and is never touched again.
943: -- Default values are used for the element/node and is already created.
944: G_Rbs_Elements_Out_Tbl(i).Rbs_Element_Id := l_Rbs_Element_Id;
945: -- G_Rbs_Elements_Out_Tbl(i).Return_Status := Fnd_Api.G_Ret_Sts_Success;
946:
947: X_Elements_Tbl(i).Rbs_Element_Id := l_Rbs_Element_Id;
948: X_Elements_Tbl(i).Resource_Type_Id := -1;
949: X_Elements_Tbl(i).Resource_Source_Id := l_Rbs_Version_Id;

Line 1072: -- G_Rbs_Elements_Out_Tbl(Element_Rec.Record_Index).Return_Status := Fnd_Api.G_Ret_Sts_Success;

1068:
1069: -- The Fetch_Rbs_Element() procedure needs this done.
1070: Pa_Debug.G_Stage := 'Assign the rbs_element_id and status to global elements out table.';
1071: G_Rbs_Elements_Out_Tbl(Element_Rec.Record_Index).Rbs_Element_Id := l_Rbs_Element_Id;
1072: -- G_Rbs_Elements_Out_Tbl(Element_Rec.Record_Index).Return_Status := Fnd_Api.G_Ret_Sts_Success;
1073:
1074: Pa_Debug.G_Stage := 'Assign the rbs_element_id and parent_id to the x_element_tbl out parameter.';
1075: X_Elements_Tbl(Element_Rec.Record_Index).Rbs_Element_Id := l_Rbs_Element_Id;
1076: X_Elements_Tbl(Element_Rec.Record_Index).Parent_Element_Id := Element_Rec.Parent_Element_Id;

Line 1086: If Fnd_Api.To_Boolean(Nvl(P_Commit,Fnd_Api.G_True)) Then

1082:
1083: End If; -- l_Elements_Tbl.Count > 0
1084:
1085: Pa_Debug.G_Stage := 'Check to do commit(T-True,F-False) - ' || P_Commit;
1086: If Fnd_Api.To_Boolean(Nvl(P_Commit,Fnd_Api.G_True)) Then
1087:
1088: Commit;
1089:
1090: End If;

Line 1100: P_Encoded => Fnd_Api.G_True,

1096: When l_ERROR Then
1097: l_Msg_Count := Fnd_Msg_Pub.Count_Msg;
1098: If l_Msg_Count = 1 Then
1099: Pa_Interface_Utils_Pub.Get_Messages(
1100: P_Encoded => Fnd_Api.G_True,
1101: P_Msg_Index => 1,
1102: P_Msg_Count => l_Msg_Count,
1103: P_Msg_Data => l_Msg_Data,
1104: P_Data => l_Data,

Line 1111: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;

1107: X_Msg_Count := l_Msg_Count;
1108: Else
1109: X_Msg_Count := l_Msg_Count;
1110: End If;
1111: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;
1112: G_Rbs_Ver_Out_Rec := G_Empty_Rbs_Ver_Out_Rec;
1113: G_Rbs_Elements_Out_Tbl.Delete;
1114: G_Rbs_Hdr_Out_Rec.Rbs_Header_Id := l_Rbs_Header_Id;
1115: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Error;

Line 1115: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Error;

1111: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;
1112: G_Rbs_Ver_Out_Rec := G_Empty_Rbs_Ver_Out_Rec;
1113: G_Rbs_Elements_Out_Tbl.Delete;
1114: G_Rbs_Hdr_Out_Rec.Rbs_Header_Id := l_Rbs_Header_Id;
1115: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Error;
1116: G_Rbs_Elements_Count := 0;
1117: Rollback;
1118: When Others Then
1119: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

Line 1119: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

1115: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Error;
1116: G_Rbs_Elements_Count := 0;
1117: Rollback;
1118: When Others Then
1119: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
1120: X_Msg_Count := 1;
1121: X_Error_Msg_Data := Pa_Debug.G_Path || '::' || Pa_Debug.G_Stage || ':' || SqlErrm;
1122: G_Rbs_Ver_Out_Rec := G_Empty_Rbs_Ver_Out_Rec;
1123: G_Rbs_Elements_Out_Tbl.Delete;

Line 1125: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

1121: X_Error_Msg_Data := Pa_Debug.G_Path || '::' || Pa_Debug.G_Stage || ':' || SqlErrm;
1122: G_Rbs_Ver_Out_Rec := G_Empty_Rbs_Ver_Out_Rec;
1123: G_Rbs_Elements_Out_Tbl.Delete;
1124: G_Rbs_Hdr_Out_Rec.Rbs_Header_Id := l_Rbs_Header_Id;
1125: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
1126: G_Rbs_Elements_Count := 0;
1127: Rollback;
1128:
1129: End Create_Rbs;

Line 1141: P_Commit IN Varchar2 Default Fnd_Api.G_False,

1137: *
1138: * ********************************************************************************
1139: */
1140: Procedure Update_Rbs(
1141: P_Commit IN Varchar2 Default Fnd_Api.G_False,
1142: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
1143: P_API_Version_Number IN Number,
1144: P_Header_Rec IN Pa_Rbs_Pub.Rbs_Header_Rec_Typ,
1145: P_Version_Rec IN Pa_Rbs_Pub.Rbs_Version_Rec_Typ,

Line 1142: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,

1138: * ********************************************************************************
1139: */
1140: Procedure Update_Rbs(
1141: P_Commit IN Varchar2 Default Fnd_Api.G_False,
1142: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
1143: P_API_Version_Number IN Number,
1144: P_Header_Rec IN Pa_Rbs_Pub.Rbs_Header_Rec_Typ,
1145: P_Version_Rec IN Pa_Rbs_Pub.Rbs_Version_Rec_Typ,
1146: P_Elements_Tbl IN Rbs_Elements_Tbl_Typ,

Line 1264: If Not Fnd_Api.Compatible_API_Call (

1260: Pa_Debug.G_Stage := 'Entering Update_Rbs().';
1261: Pa_Debug.TrackPath('ADD','Update_Rbs');
1262:
1263: Pa_Debug.G_Stage := 'Call Compatibility API.';
1264: If Not Fnd_Api.Compatible_API_Call (
1265: Pa_Rbs_Pub.G_Api_Version_Number,
1266: P_Api_Version_Number,
1267: l_Api_Name,
1268: Pa_Rbs_Pub.G_Pkg_Name) Then

Line 1270: Raise Fnd_Api.G_Exc_Unexpected_Error;

1266: P_Api_Version_Number,
1267: l_Api_Name,
1268: Pa_Rbs_Pub.G_Pkg_Name) Then
1269:
1270: Raise Fnd_Api.G_Exc_Unexpected_Error;
1271:
1272: End If;
1273:
1274: Pa_Debug.G_Stage := 'Check if need to initialize the message stack(T-True,F-False) - ' || P_Init_Msg_List;

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

1271:
1272: End If;
1273:
1274: Pa_Debug.G_Stage := 'Check if need to initialize the message stack(T-True,F-False) - ' || P_Init_Msg_List;
1275: If Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True)) Then
1276:
1277: Pa_Debug.G_Stage := 'Initializing message stack by calling Fnd_Msg_Pub.Initialize().';
1278: Fnd_Msg_Pub.Initialize;
1279:

Line 1284: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

1280: End If;
1281:
1282: Pa_Debug.G_Stage := 'Initialize error handling variables.';
1283: X_Error_Msg_Data := Null;
1284: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
1285:
1286:
1287: /***********************************
1288: call to covert missing

Line 1352: P_Commit => Fnd_Api.G_False,

1348: END IF;
1349:
1350: Pa_Debug.G_Stage := 'Update Header Record by calling Pa_Rbs_Header_Pub.Update_Header() procedure.';
1351: Pa_Rbs_Header_Pub.Update_Header(
1352: P_Commit => Fnd_Api.G_False,
1353: P_Init_Msg_List => Fnd_Api.G_False,
1354: P_API_Version_Number => P_Api_Version_Number,
1355: P_RbsHeaderId => l_Header_Rec.Rbs_Header_Id,
1356: P_Name => l_Header_Rec.Name,

Line 1353: P_Init_Msg_List => Fnd_Api.G_False,

1349:
1350: Pa_Debug.G_Stage := 'Update Header Record by calling Pa_Rbs_Header_Pub.Update_Header() procedure.';
1351: Pa_Rbs_Header_Pub.Update_Header(
1352: P_Commit => Fnd_Api.G_False,
1353: P_Init_Msg_List => Fnd_Api.G_False,
1354: P_API_Version_Number => P_Api_Version_Number,
1355: P_RbsHeaderId => l_Header_Rec.Rbs_Header_Id,
1356: P_Name => l_Header_Rec.Name,
1357: P_Description => l_Header_Rec.Description,

Line 1361: P_Process_Version => Fnd_Api.G_False,

1357: P_Description => l_Header_Rec.Description,
1358: P_EffectiveFrom => l_Header_Rec.Effective_From_Date,
1359: P_EffectiveTo => l_Header_Rec.Effective_To_Date,
1360: P_RecordVersionNumber => l_Header_Rec.Record_Version_Number,
1361: P_Process_Version => Fnd_Api.G_False,
1362: X_Return_Status => X_Return_Status,
1363: X_Msg_Data => X_Error_Msg_Data,
1364: X_Msg_Count => l_Msg_Count);
1365:

Line 1374: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Success;

1370:
1371: Else
1372:
1373: G_Rbs_Hdr_Out_Rec.Rbs_Header_Id := l_Header_Rec.Rbs_Header_Id;
1374: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Success;
1375:
1376: End If;
1377:
1378: End If; -- Has the header record been passed in.

Line 1446: P_Commit => Fnd_Api.G_False,

1442: END IF;
1443:
1444: Pa_Debug.G_Stage := 'Update Version Record by calling Pa_Rbs_Versions_Pub.Update_Working_Version() procedure.';
1445: Pa_Rbs_Versions_Pub.Update_Working_Version(
1446: P_Commit => Fnd_Api.G_False,
1447: P_Init_Msg_List => Fnd_Api.G_False,
1448: P_API_Version_Number => P_Api_Version_Number,
1449: P_RBS_Version_Id => l_Version_Rec.Rbs_Version_Id,
1450: P_Name => l_Version_Rec.Name,

Line 1447: P_Init_Msg_List => Fnd_Api.G_False,

1443:
1444: Pa_Debug.G_Stage := 'Update Version Record by calling Pa_Rbs_Versions_Pub.Update_Working_Version() procedure.';
1445: Pa_Rbs_Versions_Pub.Update_Working_Version(
1446: P_Commit => Fnd_Api.G_False,
1447: P_Init_Msg_List => Fnd_Api.G_False,
1448: P_API_Version_Number => P_Api_Version_Number,
1449: P_RBS_Version_Id => l_Version_Rec.Rbs_Version_Id,
1450: P_Name => l_Version_Rec.Name,
1451: P_Description => l_Version_Rec.Description,

Line 1461: If X_Return_Status <> Fnd_Api.G_Ret_Sts_Success Then

1457: X_Return_Status => X_Return_Status,
1458: X_Msg_Count => l_Msg_Count,
1459: X_Error_Msg_Data => X_Error_Msg_Data);
1460:
1461: If X_Return_Status <> Fnd_Api.G_Ret_Sts_Success Then
1462:
1463: Pa_Debug.G_Stage := 'The Pa_Rbs_Versions_Pub.Update_Working_Version() procedure returned status of error.';
1464: Raise l_ERROR;
1465:

Line 1469: -- G_Rbs_Ver_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Success;

1465:
1466: Else
1467:
1468: G_Rbs_Ver_Out_Rec.Rbs_Version_Id := l_Version_Rec.Rbs_Version_Id;
1469: -- G_Rbs_Ver_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Success;
1470:
1471: End If;
1472:
1473: End If;

Line 1735: --G_Rbs_Elements_Out_Tbl(i).Return_Status := Fnd_Api.G_Ret_Sts_Success;

1731: -- Rbs Level 1 is the root element/node for the structure.
1732: -- It is not processed but is created with a default structure,
1733: -- so it is not looked at further into the process elements part of the proedure.
1734: G_Rbs_Elements_Out_Tbl(i).Rbs_Element_Id := l_Elements_Tbl(i).Rbs_Element_Id;
1735: --G_Rbs_Elements_Out_Tbl(i).Return_Status := Fnd_Api.G_Ret_Sts_Success;
1736:
1737: End If;
1738:
1739: End Loop;

Line 1900: -- G_Rbs_Elements_Out_Tbl(Element_Rec.Record_Index).Return_Status := Fnd_Api.G_Ret_Sts_Success;

1896: G_Rbs_Elements_Out_Tbl(Element_Rec.Record_Index).Rbs_Element_Id := l_Rbs_Element_Id;
1897: Else
1898: G_Rbs_Elements_Out_Tbl(Element_Rec.Record_Index).Rbs_Element_Id := Element_Rec.Rbs_Element_Id;
1899: End If;
1900: -- G_Rbs_Elements_Out_Tbl(Element_Rec.Record_Index).Return_Status := Fnd_Api.G_Ret_Sts_Success;
1901:
1902: Pa_Debug.G_Stage := 'Update the out parameter x_element_tbl with rbs_element_id and parent id.';
1903: If Element_Rec.Process_Type = 'A' Then
1904:

Line 1924: If Fnd_Api.To_Boolean(Nvl(P_Commit,Fnd_Api.G_True)) Then

1920:
1921: End If; -- l_Elements_Tbl.Count > 0
1922:
1923: Pa_Debug.G_Stage := 'Check to do commit(T-True,F-False) - ' || P_Commit;
1924: If Fnd_Api.To_Boolean(Nvl(P_Commit,Fnd_Api.G_True)) Then
1925:
1926: Commit;
1927:
1928: End If;

Line 1940: P_Encoded => Fnd_Api.G_True,

1936:
1937: If l_Msg_Count = 1 Then
1938:
1939: Pa_Interface_Utils_Pub.Get_Messages(
1940: P_Encoded => Fnd_Api.G_True,
1941: P_Msg_Index => 1,
1942: P_Msg_Count => l_Msg_Count,
1943: P_Msg_Data => l_Msg_Data,
1944: P_Data => l_Data,

Line 1955: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;

1951:
1952: X_Msg_Count := l_Msg_Count;
1953:
1954: End If;
1955: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;
1956: G_Rbs_Ver_Out_Rec := G_Empty_Rbs_Ver_Out_Rec;
1957: G_Rbs_Elements_Out_Tbl.Delete;
1958: G_Rbs_Hdr_Out_Rec.Rbs_Header_Id := l_Rbs_Header_Id;
1959: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Error;

Line 1959: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Error;

1955: X_Return_Status := Fnd_Api.G_Ret_Sts_Error;
1956: G_Rbs_Ver_Out_Rec := G_Empty_Rbs_Ver_Out_Rec;
1957: G_Rbs_Elements_Out_Tbl.Delete;
1958: G_Rbs_Hdr_Out_Rec.Rbs_Header_Id := l_Rbs_Header_Id;
1959: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_Error;
1960: G_Rbs_Elements_Count := 0;
1961: Rollback;
1962:
1963: When Others Then

Line 1964: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

1960: G_Rbs_Elements_Count := 0;
1961: Rollback;
1962:
1963: When Others Then
1964: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
1965: X_Msg_Count := 1;
1966: X_Error_Msg_Data := Pa_Debug.G_Path || '::' || Pa_Debug.G_Stage || ':' || SqlErrm;
1967: G_Rbs_Ver_Out_Rec := G_Empty_Rbs_Ver_Out_Rec;
1968: G_Rbs_Elements_Out_Tbl.Delete;

Line 1970: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

1966: X_Error_Msg_Data := Pa_Debug.G_Path || '::' || Pa_Debug.G_Stage || ':' || SqlErrm;
1967: G_Rbs_Ver_Out_Rec := G_Empty_Rbs_Ver_Out_Rec;
1968: G_Rbs_Elements_Out_Tbl.Delete;
1969: G_Rbs_Hdr_Out_Rec.Rbs_Header_Id := l_Rbs_Header_Id;
1970: -- G_Rbs_Hdr_Out_Rec.Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
1971: G_Rbs_Elements_Count := 0;
1972: Rollback;
1973:
1974: End Update_Rbs;

Line 2003: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

1999: l_Api_Name CONSTANT Varchar2(30) := 'Load_Rbs_Header';
2000:
2001: BEGIN
2002:
2003: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2004:
2005: -- Standard Api compatibility call
2006: If Not Fnd_Api.Compatible_API_Call ( l_Api_Version_Number ,
2007: P_Api_Version_Number ,

Line 2006: If Not Fnd_Api.Compatible_API_Call ( l_Api_Version_Number ,

2002:
2003: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2004:
2005: -- Standard Api compatibility call
2006: If Not Fnd_Api.Compatible_API_Call ( l_Api_Version_Number ,
2007: P_Api_Version_Number ,
2008: l_Api_Name ,
2009: G_Pkg_Name ) Then
2010:

Line 2011: Raise Fnd_Api.G_Exc_UnExpected_Error;

2007: P_Api_Version_Number ,
2008: l_Api_Name ,
2009: G_Pkg_Name ) Then
2010:
2011: Raise Fnd_Api.G_Exc_UnExpected_Error;
2012:
2013: End If;
2014:
2015: G_Rbs_Hdr_Rec.Rbs_Header_Id := P_Rbs_Header_Id;

Line 2023: When Fnd_Api.G_Exc_UnExpected_Error Then

2019: G_Rbs_Hdr_Rec.Effective_To_Date := P_Effective_To_Date;
2020: G_Rbs_Hdr_Rec.Record_Version_Number := P_Record_Version_Number;
2021:
2022: Exception
2023: When Fnd_Api.G_Exc_UnExpected_Error Then
2024: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2025: Rollback;
2026: When Others Then
2027: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;

Line 2024: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;

2020: G_Rbs_Hdr_Rec.Record_Version_Number := P_Record_Version_Number;
2021:
2022: Exception
2023: When Fnd_Api.G_Exc_UnExpected_Error Then
2024: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2025: Rollback;
2026: When Others Then
2027: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2028:

Line 2027: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;

2023: When Fnd_Api.G_Exc_UnExpected_Error Then
2024: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2025: Rollback;
2026: When Others Then
2027: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2028:
2029: If Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_Msg_Lvl_UnExp_Error) Then
2030:
2031: Fnd_Msg_Pub.Add_Exc_Msg(

Line 2066: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

2062: l_Api_Name CONSTANT Varchar2(30) := 'Load_Rbs_Version';
2063:
2064: BEGIN
2065:
2066: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2067:
2068: -- Standard Api compatibility call
2069: If Not Fnd_Api.Compatible_API_Call ( l_Api_Version_Number ,
2070: P_Api_Version_Number ,

Line 2069: If Not Fnd_Api.Compatible_API_Call ( l_Api_Version_Number ,

2065:
2066: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2067:
2068: -- Standard Api compatibility call
2069: If Not Fnd_Api.Compatible_API_Call ( l_Api_Version_Number ,
2070: P_Api_Version_Number ,
2071: l_Api_Name ,
2072: G_Pkg_Name ) Then
2073:

Line 2074: Raise Fnd_Api.G_Exc_UnExpected_Error;

2070: P_Api_Version_Number ,
2071: l_Api_Name ,
2072: G_Pkg_Name ) Then
2073:
2074: Raise Fnd_Api.G_Exc_UnExpected_Error;
2075:
2076: End If;
2077:
2078: G_Rbs_Ver_Rec.Rbs_Version_Id := P_Rbs_Version_Id;

Line 2086: When Fnd_Api.G_Exc_UnExpected_Error Then

2082: G_Rbs_Ver_Rec.Version_Start_Date := P_Version_Start_Date;
2083: G_Rbs_Ver_Rec.Record_Version_Number := P_Record_Version_Number;
2084:
2085: Exception
2086: When Fnd_Api.G_Exc_UnExpected_Error Then
2087: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2088: Rollback;
2089: When Others Then
2090: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

Line 2087: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

2083: G_Rbs_Ver_Rec.Record_Version_Number := P_Record_Version_Number;
2084:
2085: Exception
2086: When Fnd_Api.G_Exc_UnExpected_Error Then
2087: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2088: Rollback;
2089: When Others Then
2090: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2091:

Line 2090: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

2086: When Fnd_Api.G_Exc_UnExpected_Error Then
2087: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2088: Rollback;
2089: When Others Then
2090: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2091:
2092: If Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_Msg_Lvl_UnExp_Error) Then
2093:
2094: Fnd_Msg_Pub.Add_Exc_Msg(

Line 2133: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

2129: l_Api_Name CONSTANT Varchar2(30) := 'Load_Rbs_Elements';
2130:
2131: BEGIN
2132:
2133: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2134:
2135: -- Standard Api compatibility call
2136: If Not Fnd_Api.Compatible_API_Call ( l_Api_Version_Number ,
2137: P_Api_Version_Number ,

Line 2136: If Not Fnd_Api.Compatible_API_Call ( l_Api_Version_Number ,

2132:
2133: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2134:
2135: -- Standard Api compatibility call
2136: If Not Fnd_Api.Compatible_API_Call ( l_Api_Version_Number ,
2137: P_Api_Version_Number ,
2138: l_Api_Name ,
2139: G_Pkg_Name ) Then
2140:

Line 2141: Raise Fnd_Api.G_Exc_UnExpected_Error;

2137: P_Api_Version_Number ,
2138: l_Api_Name ,
2139: G_Pkg_Name ) Then
2140:
2141: Raise Fnd_Api.G_Exc_UnExpected_Error;
2142:
2143: End If;
2144:
2145: G_Rbs_Elements_Count := G_Rbs_Elements_Count + 1;

Line 2161: When Fnd_Api.G_Exc_UnExpected_Error Then

2157: G_Rbs_Elements_Tbl(G_Rbs_Elements_Count).Rbs_Ref_Element_Id := P_Rbs_Ref_Element_Id;
2158: G_Rbs_Elements_Tbl(G_Rbs_Elements_Count).Record_Version_Number := P_Record_Version_Number;
2159:
2160: Exception
2161: When Fnd_Api.G_Exc_UnExpected_Error Then
2162: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2163: Rollback;
2164: When Others Then
2165: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

Line 2162: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

2158: G_Rbs_Elements_Tbl(G_Rbs_Elements_Count).Record_Version_Number := P_Record_Version_Number;
2159:
2160: Exception
2161: When Fnd_Api.G_Exc_UnExpected_Error Then
2162: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2163: Rollback;
2164: When Others Then
2165: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2166:

Line 2165: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

2161: When Fnd_Api.G_Exc_UnExpected_Error Then
2162: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2163: Rollback;
2164: When Others Then
2165: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2166:
2167: If Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_Msg_Lvl_UnExp_Error) Then
2168:
2169: Fnd_Msg_Pub.Add_Exc_Msg(

Line 2204: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

2200: l_Api_Name CONSTANT Varchar2(30) := 'Fetch_Rbs_Header';
2201:
2202: Begin
2203:
2204: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2205:
2206: If Not Fnd_Api.Compatible_Api_Call(
2207: l_Api_Version_Number,
2208: P_Api_Version_Number,

Line 2206: If Not Fnd_Api.Compatible_Api_Call(

2202: Begin
2203:
2204: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2205:
2206: If Not Fnd_Api.Compatible_Api_Call(
2207: l_Api_Version_Number,
2208: P_Api_Version_Number,
2209: l_Api_Name,
2210: G_Pkg_Name) Then

Line 2212: Raise Fnd_Api.G_Exc_UnExpected_Error;

2208: P_Api_Version_Number,
2209: l_Api_Name,
2210: G_Pkg_Name) Then
2211:
2212: Raise Fnd_Api.G_Exc_UnExpected_Error;
2213:
2214: End If;
2215:
2216: X_Rbs_Header_Id := G_Rbs_Hdr_Out_Rec.Rbs_Header_Id;

Line 2220: When Fnd_Api.G_Exc_UnExpected_Error Then

2216: X_Rbs_Header_Id := G_Rbs_Hdr_Out_Rec.Rbs_Header_Id;
2217: -- X_Rbs_Hdr_Return_Status := G_Rbs_Hdr_Out_Rec.Return_Status;
2218:
2219: Exception
2220: When Fnd_Api.G_Exc_UnExpected_Error Then
2221:
2222: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2223: Rollback;
2224: When Others Then

Line 2222: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error ;

2218:
2219: Exception
2220: When Fnd_Api.G_Exc_UnExpected_Error Then
2221:
2222: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2223: Rollback;
2224: When Others Then
2225: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2226:

Line 2225: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;

2221:
2222: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2223: Rollback;
2224: When Others Then
2225: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2226:
2227: If Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_Msg_Lvl_UnExp_Error) Then
2228:
2229: Fnd_Msg_Pub.Add_Exc_Msg(

Line 2265: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

2261: l_Api_Name CONSTANT Varchar2(30) := 'Fetch_Rbs_Version';
2262:
2263: Begin
2264:
2265: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2266:
2267: If Not Fnd_Api.Compatible_Api_Call(
2268: l_Api_Version_Number,
2269: P_Api_Version_Number,

Line 2267: If Not Fnd_Api.Compatible_Api_Call(

2263: Begin
2264:
2265: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2266:
2267: If Not Fnd_Api.Compatible_Api_Call(
2268: l_Api_Version_Number,
2269: P_Api_Version_Number,
2270: l_Api_Name,
2271: G_Pkg_Name) Then

Line 2273: Raise Fnd_Api.G_Exc_UnExpected_Error;

2269: P_Api_Version_Number,
2270: l_Api_Name,
2271: G_Pkg_Name) Then
2272:
2273: Raise Fnd_Api.G_Exc_UnExpected_Error;
2274:
2275: End If;
2276:
2277: X_Rbs_Version_Id := G_Rbs_Ver_Out_Rec.Rbs_Version_Id;

Line 2281: When Fnd_Api.G_Exc_UnExpected_Error Then

2277: X_Rbs_Version_Id := G_Rbs_Ver_Out_Rec.Rbs_Version_Id;
2278: -- X_Rbs_Ver_Return_Status := G_Rbs_Ver_Out_Rec.Return_Status;
2279:
2280: Exception
2281: When Fnd_Api.G_Exc_UnExpected_Error Then
2282:
2283: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2284: Rollback;
2285: When Others Then

Line 2283: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error ;

2279:
2280: Exception
2281: When Fnd_Api.G_Exc_UnExpected_Error Then
2282:
2283: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2284: Rollback;
2285: When Others Then
2286: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2287:

Line 2286: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;

2282:
2283: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2284: Rollback;
2285: When Others Then
2286: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2287:
2288: If Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_Msg_Lvl_UnExp_Error) Then
2289:
2290: Fnd_Msg_Pub.Add_Exc_Msg(

Line 2332: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

2328: l_Index NUMBER;
2329:
2330: Begin
2331:
2332: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2333:
2334: If Not Fnd_Api.Compatible_Api_Call(
2335: l_Api_Version_Number,
2336: P_Api_Version_Number,

Line 2334: If Not Fnd_Api.Compatible_Api_Call(

2330: Begin
2331:
2332: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2333:
2334: If Not Fnd_Api.Compatible_Api_Call(
2335: l_Api_Version_Number,
2336: P_Api_Version_Number,
2337: l_Api_Name,
2338: G_Pkg_Name) Then

Line 2340: Raise Fnd_Api.G_Exc_UnExpected_Error;

2336: P_Api_Version_Number,
2337: l_Api_Name,
2338: G_Pkg_Name) Then
2339:
2340: Raise Fnd_Api.G_Exc_UnExpected_Error;
2341:
2342: End If;
2343:
2344: -- Check Line index value

Line 2370: When Fnd_Api.G_Exc_UnExpected_Error Then

2366:
2367: End If;
2368:
2369: Exception
2370: When Fnd_Api.G_Exc_UnExpected_Error Then
2371:
2372: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2373: Rollback;
2374: When Others Then

Line 2372: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;

2368:
2369: Exception
2370: When Fnd_Api.G_Exc_UnExpected_Error Then
2371:
2372: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2373: Rollback;
2374: When Others Then
2375: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2376:

Line 2375: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;

2371:
2372: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2373: Rollback;
2374: When Others Then
2375: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error ;
2376:
2377: If Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_Msg_Lvl_UnExp_Error) Then
2378:
2379: Fnd_Msg_Pub.Add_Exc_Msg(

Line 2399: P_Commit IN Varchar2 := Fnd_Api.G_False,

2395: * Create_Rbs() API.
2396: ****************************************************************************
2397: */
2398: Procedure Exec_Create_Rbs(
2399: P_Commit IN Varchar2 := Fnd_Api.G_False,
2400: P_Init_Msg_List IN Varchar2 := Fnd_Api.G_True,
2401: P_Api_Version_Number IN Number,
2402: X_Return_Status OUT NOCOPY Varchar2,
2403: X_Msg_Count OUT NOCOPY Number,

Line 2400: P_Init_Msg_List IN Varchar2 := Fnd_Api.G_True,

2396: ****************************************************************************
2397: */
2398: Procedure Exec_Create_Rbs(
2399: P_Commit IN Varchar2 := Fnd_Api.G_False,
2400: P_Init_Msg_List IN Varchar2 := Fnd_Api.G_True,
2401: P_Api_Version_Number IN Number,
2402: X_Return_Status OUT NOCOPY Varchar2,
2403: X_Msg_Count OUT NOCOPY Number,
2404: X_Msg_Data OUT NOCOPY Varchar2)

Line 2418: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

2414: l_Dummy_Elements_Tbl Rbs_Elements_Tbl_Typ;
2415:
2416: BEGIN
2417:
2418: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2419:
2420: -- Standard Api compatibility call
2421: If Not Fnd_Api.Compatible_Api_Call(
2422: l_Api_Version_Number,

Line 2421: If Not Fnd_Api.Compatible_Api_Call(

2417:
2418: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2419:
2420: -- Standard Api compatibility call
2421: If Not Fnd_Api.Compatible_Api_Call(
2422: l_Api_Version_Number,
2423: P_Api_Version_Number,
2424: l_Api_Name,
2425: G_Pkg_Name) Then

Line 2427: Raise Fnd_Api.G_Exc_UnExpected_Error;

2423: P_Api_Version_Number,
2424: l_Api_Name,
2425: G_Pkg_Name) Then
2426:
2427: Raise Fnd_Api.G_Exc_UnExpected_Error;
2428:
2429: End If;
2430:
2431: Pa_Rbs_Pub.Create_Rbs(

Line 2446: When Fnd_Api.G_Exc_UnExpected_Error Then

2442: X_Msg_Count => X_Msg_Count,
2443: X_Error_Msg_Data => X_Msg_Data);
2444:
2445: Exception
2446: When Fnd_Api.G_Exc_UnExpected_Error Then
2447: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2448: Rollback;
2449: When Others Then
2450: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error;

Line 2447: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

2443: X_Error_Msg_Data => X_Msg_Data);
2444:
2445: Exception
2446: When Fnd_Api.G_Exc_UnExpected_Error Then
2447: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2448: Rollback;
2449: When Others Then
2450: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2451:

Line 2450: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error;

2446: When Fnd_Api.G_Exc_UnExpected_Error Then
2447: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2448: Rollback;
2449: When Others Then
2450: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2451:
2452: If Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_Msg_Lvl_UnExp_Error) Then
2453: Fnd_Msg_Pub.Add_Exc_Msg(
2454: P_Pkg_Name => G_Pkg_Name,

Line 2478: P_Commit IN Varchar2 := Fnd_Api.G_False,

2474: * Update_Rbs() API.
2475: * *************************************************************************************
2476: */
2477: Procedure Exec_Update_Rbs(
2478: P_Commit IN Varchar2 := Fnd_Api.G_False,
2479: P_Init_Msg_List IN Varchar2 := Fnd_Api.G_True,
2480: P_Api_Version_Number IN Number,
2481: X_Return_Status OUT NOCOPY Varchar2,
2482: X_Msg_Count OUT NOCOPY Number,

Line 2479: P_Init_Msg_List IN Varchar2 := Fnd_Api.G_True,

2475: * *************************************************************************************
2476: */
2477: Procedure Exec_Update_Rbs(
2478: P_Commit IN Varchar2 := Fnd_Api.G_False,
2479: P_Init_Msg_List IN Varchar2 := Fnd_Api.G_True,
2480: P_Api_Version_Number IN Number,
2481: X_Return_Status OUT NOCOPY Varchar2,
2482: X_Msg_Count OUT NOCOPY Number,
2483: X_Msg_Data OUT NOCOPY Varchar2)

Line 2494: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

2490: l_Dummy_Elements_Tbl Rbs_Elements_Tbl_Typ;
2491:
2492: BEGIN
2493:
2494: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2495:
2496: -- Standard Api compatibility call
2497: If Not Fnd_Api.Compatible_Api_Call(
2498: l_Api_Version_Number,

Line 2497: If Not Fnd_Api.Compatible_Api_Call(

2493:
2494: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2495:
2496: -- Standard Api compatibility call
2497: If Not Fnd_Api.Compatible_Api_Call(
2498: l_Api_Version_Number,
2499: P_Api_Version_Number,
2500: l_Api_Name,
2501: G_Pkg_Name) Then

Line 2503: Raise Fnd_Api.G_Exc_UnExpected_Error;

2499: P_Api_Version_Number,
2500: l_Api_Name,
2501: G_Pkg_Name) Then
2502:
2503: Raise Fnd_Api.G_Exc_UnExpected_Error;
2504:
2505: End If;
2506:
2507: Pa_Rbs_Pub.Update_Rbs(

Line 2520: When Fnd_Api.G_Exc_UnExpected_Error Then

2516: X_Msg_Count => X_Msg_Count,
2517: X_Error_Msg_Data => X_Msg_Data);
2518:
2519: Exception
2520: When Fnd_Api.G_Exc_UnExpected_Error Then
2521: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2522:
2523: When Others Then
2524: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error;

Line 2521: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

2517: X_Error_Msg_Data => X_Msg_Data);
2518:
2519: Exception
2520: When Fnd_Api.G_Exc_UnExpected_Error Then
2521: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2522:
2523: When Others Then
2524: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2525:

Line 2524: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error;

2520: When Fnd_Api.G_Exc_UnExpected_Error Then
2521: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2522:
2523: When Others Then
2524: X_return_status := Fnd_Api.G_Ret_Sts_UnExp_Error;
2525:
2526: If Fnd_Msg_Pub.Check_Msg_Level(Fnd_Msg_Pub.G_Msg_Lvl_UnExp_Error) Then
2527: Fnd_Msg_Pub.Add_Exc_Msg(
2528: P_Pkg_Name => G_Pkg_Name,

Line 2552: P_Commit IN Varchar2 Default Fnd_Api.G_False,

2548: * P_Rbs_Version_Number - the rbs versions version number
2549: *****************************************************************************************************
2550: */
2551: Procedure Copy_Rbs_Working_Version(
2552: P_Commit IN Varchar2 Default Fnd_Api.G_False,
2553: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
2554: P_Api_Version_Number IN Number,
2555: P_RBS_Version_Id IN Number Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
2556: P_Rbs_Header_Id IN Number Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,

Line 2553: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,

2549: *****************************************************************************************************
2550: */
2551: Procedure Copy_Rbs_Working_Version(
2552: P_Commit IN Varchar2 Default Fnd_Api.G_False,
2553: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
2554: P_Api_Version_Number IN Number,
2555: P_RBS_Version_Id IN Number Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
2556: P_Rbs_Header_Id IN Number Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
2557: P_Rbs_Header_Name IN Varchar2 Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,

Line 2617: If Not Fnd_Api.Compatible_API_Call (

2613: Pa_Debug.G_Stage := 'Entering Copy_Rbs_Working_Version().';
2614: Pa_Debug.TrackPath('ADD','Copy_Rbs_Working_Version');
2615:
2616: Pa_Debug.G_Stage := 'Call Compatibility API.';
2617: If Not Fnd_Api.Compatible_API_Call (
2618: Pa_Rbs_Pub.G_Api_Version_Number,
2619: P_Api_Version_Number,
2620: l_Api_Name,
2621: Pa_Rbs_Pub.G_Pkg_Name) Then

Line 2623: Raise Fnd_Api.G_Exc_Unexpected_Error;

2619: P_Api_Version_Number,
2620: l_Api_Name,
2621: Pa_Rbs_Pub.G_Pkg_Name) Then
2622:
2623: Raise Fnd_Api.G_Exc_Unexpected_Error;
2624:
2625: End If;
2626:
2627:

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

2625: End If;
2626:
2627:
2628: Pa_Debug.G_Stage := 'Check if need to initialize the message stack(T-True,F-False) - ' || P_Init_Msg_List;
2629: If Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True)) Then
2630:
2631: Pa_Debug.G_Stage := 'Initializing message stack by calling Fnd_Msg_Pub.Initialize().';
2632: Fnd_Msg_Pub.Initialize;
2633:

Line 2639: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

2635:
2636: Pa_Debug.G_Stage := 'Initialize error handling variables.';
2637: X_Error_Msg_Data := Null;
2638: X_Msg_Count := 0;
2639: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2640:
2641:
2642: l_Rbs_Version_Id:=P_Rbs_Version_Id;
2643:

Line 2737: P_Commit IN Varchar2 Default Fnd_Api.G_False,

2733: * working version.
2734: ****************************************************************************************************
2735: */
2736: PROCEDURE Freeze_Rbs_Version(
2737: P_Commit IN Varchar2 Default Fnd_Api.G_False,
2738: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
2739: P_API_Version_Number IN Number,
2740: P_Rbs_Version_Id IN Number Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
2741: P_Rbs_Header_Name IN Varchar2 Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,

Line 2738: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,

2734: ****************************************************************************************************
2735: */
2736: PROCEDURE Freeze_Rbs_Version(
2737: P_Commit IN Varchar2 Default Fnd_Api.G_False,
2738: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
2739: P_API_Version_Number IN Number,
2740: P_Rbs_Version_Id IN Number Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
2741: P_Rbs_Header_Name IN Varchar2 Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_CHAR,
2742: P_Rbs_Header_Id IN Number Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,

Line 2785: If Not Fnd_Api.Compatible_API_Call (

2781: Pa_Debug.G_Stage := 'Entering Freeze_Rbs_Version().';
2782: Pa_Debug.TrackPath('ADD','Freeze_Rbs_Version');
2783:
2784: Pa_Debug.G_Stage := 'Call Compatibility API.';
2785: If Not Fnd_Api.Compatible_API_Call (
2786: Pa_Rbs_Pub.G_Api_Version_Number,
2787: P_Api_Version_Number,
2788: l_Api_Name,
2789: Pa_Rbs_Pub.G_Pkg_Name) Then

Line 2791: Raise Fnd_Api.G_Exc_Unexpected_Error;

2787: P_Api_Version_Number,
2788: l_Api_Name,
2789: Pa_Rbs_Pub.G_Pkg_Name) Then
2790:
2791: Raise Fnd_Api.G_Exc_Unexpected_Error;
2792:
2793: End If;
2794:
2795: --For bug 4061935.

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

2793: End If;
2794:
2795: --For bug 4061935.
2796: Pa_Debug.G_Stage := 'Check if need to initialize the message stack(T-True,F-False) - ' || P_Init_Msg_List;
2797: If Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True)) Then
2798:
2799: Pa_Debug.G_Stage := 'Initializing message stack by calling Fnd_Msg_Pub.Initialize().';
2800: Fnd_Msg_Pub.Initialize;
2801:

Line 2807: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

2803:
2804: Pa_Debug.G_Stage := 'Initialize error handling variables.';
2805: X_Error_Msg_Data := Null;
2806: X_Msg_Count := 0;
2807: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2808:
2809:
2810: l_Rbs_Version_Id:=P_Rbs_Version_Id;
2811:

Line 2896: P_Commit IN Varchar2 Default Fnd_Api.G_False,

2892:
2893: *******************************************************************************
2894: */
2895: Procedure Assign_Rbs_To_Project(
2896: P_Commit IN Varchar2 Default Fnd_Api.G_False,
2897: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
2898: P_API_Version_Number IN Number,
2899: P_Rbs_Header_Id IN Number Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
2900: P_Rbs_Version_Id IN Number Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM, --Not used

Line 2897: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,

2893: *******************************************************************************
2894: */
2895: Procedure Assign_Rbs_To_Project(
2896: P_Commit IN Varchar2 Default Fnd_Api.G_False,
2897: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
2898: P_API_Version_Number IN Number,
2899: P_Rbs_Header_Id IN Number Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,
2900: P_Rbs_Version_Id IN Number Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM, --Not used
2901: P_Project_Id IN Number Default PA_INTERFACE_UTILS_PUB.G_PA_MISS_NUM,

Line 2951: If Not Fnd_Api.Compatible_API_Call (

2947: Pa_Debug.G_Stage := 'Entering Assign_Rbs_To_Project().';
2948: Pa_Debug.TrackPath('ADD','Assign_Rbs_To_Project');
2949:
2950: Pa_Debug.G_Stage := 'Call Compatibility API.';
2951: If Not Fnd_Api.Compatible_API_Call (
2952: Pa_Rbs_Pub.G_Api_Version_Number,
2953: P_Api_Version_Number,
2954: l_Api_Name,
2955: Pa_Rbs_Pub.G_Pkg_Name) Then

Line 2957: Raise Fnd_Api.G_Exc_Unexpected_Error;

2953: P_Api_Version_Number,
2954: l_Api_Name,
2955: Pa_Rbs_Pub.G_Pkg_Name) Then
2956:
2957: Raise Fnd_Api.G_Exc_Unexpected_Error;
2958:
2959: End If;
2960:
2961: --For bug 4061935.

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

2959: End If;
2960:
2961: --For bug 4061935.
2962: Pa_Debug.G_Stage := 'Check if need to initialize the message stack(T-True,F-False) - ' || P_Init_Msg_List;
2963: If Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True)) Then
2964:
2965: Pa_Debug.G_Stage := 'Initializing message stack by calling Fnd_Msg_Pub.Initialize().';
2966: Fnd_Msg_Pub.Initialize;
2967:

Line 2973: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

2969:
2970: Pa_Debug.G_Stage := 'Initialize error handling variables.';
2971: X_Error_Msg_Data := Null;
2972: X_Msg_Count := 0;
2973: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
2974:
2975:
2976: l_project_id := P_Project_Id;
2977:

Line 3073: P_Commit => Fnd_Api.G_False,

3069: END IF;
3070:
3071: Pa_Debug.G_Stage := 'Call Pa_Rbs_Asgmt_Pub.Create_RBS_Assignment() procedure.';
3072: Pa_Rbs_Asgmt_Pub.Create_RBS_Assignment(
3073: P_Commit => Fnd_Api.G_False,
3074: P_Init_Msg_List => Fnd_Api.G_False,
3075: P_Rbs_Header_Id => l_Rbs_Header_Id,
3076: P_Rbs_Version_Id => l_Rbs_Version_Id,
3077: P_Project_Id => l_Project_Id,

Line 3074: P_Init_Msg_List => Fnd_Api.G_False,

3070:
3071: Pa_Debug.G_Stage := 'Call Pa_Rbs_Asgmt_Pub.Create_RBS_Assignment() procedure.';
3072: Pa_Rbs_Asgmt_Pub.Create_RBS_Assignment(
3073: P_Commit => Fnd_Api.G_False,
3074: P_Init_Msg_List => Fnd_Api.G_False,
3075: P_Rbs_Header_Id => l_Rbs_Header_Id,
3076: P_Rbs_Version_Id => l_Rbs_Version_Id,
3077: P_Project_Id => l_Project_Id,
3078: P_Prog_Rep_Usage_Flag => P_Prog_Rep_Usage_Flag,