[Home] [Help]
205: END IF; -- end of if:l_risk_id
206:
207: AMW_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
208:
209: -- Standard call to get message count and if count is 1, get message info.
210: FND_MSG_PUB.Count_And_Get(
211: p_count => x_msg_count,
212: p_data => x_msg_data);
213:
215:
216: WHEN FND_API.G_EXC_ERROR THEN
217:
218: x_return_status := G_RET_STS_ERROR;
219: -- Standard call to get message count and if count=1, get the message
220: FND_MSG_PUB.Count_And_Get (
221: p_encoded => G_FALSE,
222: p_count => x_msg_count,
223: p_data => x_msg_data);
224:
225: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
226:
227: x_return_status := G_RET_STS_UNEXP_ERROR;
228: -- Standard call to get message count and if count=1, get the message
229: FND_MSG_PUB.Count_And_Get (
230: p_encoded => G_FALSE,
231: p_count => x_msg_count,
232: p_data => x_msg_data);
237: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
238: THEN
239: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
240: END IF;
241: -- Standard call to get message count and if count=1, get the message
242: FND_MSG_PUB.Count_And_Get (
243: p_encoded => G_FALSE,
244: p_count => x_msg_count,
245: p_data => x_msg_data);
459: END IF;
460:
461: AMW_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
462:
463: -- Standard call to get message count and if count is 1, get message info.
464: FND_MSG_PUB.Count_And_Get
465: (p_count => x_msg_count,
466: p_data => x_msg_data);
467:
468: EXCEPTION
469:
470: WHEN FND_API.G_EXC_ERROR THEN
471: x_return_status := G_RET_STS_ERROR;
472: -- Standard call to get message count and if count=1, get the message
473: FND_MSG_PUB.Count_And_Get (
474: p_encoded => G_FALSE,
475: p_count => x_msg_count,
476: p_data => x_msg_data
477: );
478:
479: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
480: x_return_status := G_RET_STS_UNEXP_ERROR;
481: -- Standard call to get message count and if count=1, get the message
482: FND_MSG_PUB.Count_And_Get (
483: p_encoded => G_FALSE,
484: p_count => x_msg_count,
485: p_data => x_msg_data);
489: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
490: THEN
491: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
492: END IF;
493: -- Standard call to get message count and if count=1, get the message
494: FND_MSG_PUB.Count_And_Get (
495: p_encoded => G_FALSE,
496: p_count => x_msg_count,
497: p_data => x_msg_data);
554: FROM AMW_RISKS_B
555: WHERE RISK_ID = l_id;
556:
557: BEGIN
558: -- Standard Start of API savepoint
559: SAVEPOINT CREATE_Risk_PVT;
560:
561: -- Standard call to check for call compatibility.
562: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
557: BEGIN
558: -- Standard Start of API savepoint
559: SAVEPOINT CREATE_Risk_PVT;
560:
561: -- Standard call to check for call compatibility.
562: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
563: p_api_version_number,
564: l_api_name,
565: G_PKG_NAME)
701: p_token_value => G_OBJ_TYPE);
702: RAISE FND_API.G_EXC_ERROR;
703: END IF;
704:
705: -- Standard check for p_commit
706: IF FND_API.to_Boolean( p_commit )
707: THEN
708: COMMIT WORK;
709: END IF;
710:
711:
712: AMW_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
713:
714: -- Standard call to get message count and if count is 1, get message info.
715: FND_MSG_PUB.Count_And_Get
716: (p_count => x_msg_count,
717: p_data => x_msg_data);
718:
723:
724: WHEN FND_API.G_EXC_ERROR THEN
725: ROLLBACK TO CREATE_Risk_PVT;
726: x_return_status := G_RET_STS_ERROR;
727: -- Standard call to get message count and if count=1, get the message
728: FND_MSG_PUB.Count_And_Get (
729: p_encoded => G_FALSE,
730: p_count => x_msg_count,
731: p_data => x_msg_data);
732:
733: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
734: ROLLBACK TO CREATE_Risk_PVT;
735: x_return_status := G_RET_STS_UNEXP_ERROR;
736: -- Standard call to get message count and if count=1, get the message
737: FND_MSG_PUB.Count_And_Get (
738: p_encoded => G_FALSE,
739: p_count => x_msg_count,
740: p_data => x_msg_data);
745: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
746: THEN
747: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
748: END IF;
749: -- Standard call to get message count and if count=1, get the message
750: FND_MSG_PUB.Count_And_Get (
751: p_encoded => G_FALSE,
752: p_count => x_msg_count,
753: p_data => x_msg_data);
795: FROM amw_risks_b
796: WHERE risk_id = l_risk_id AND approval_status='D' AND latest_revision_flag='Y';
797:
798: BEGIN
799: -- Standard Start of API savepoint
800: SAVEPOINT UPDATE_Risk_PVT;
801:
802: -- Standard call to check for call compatibility.
803: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
798: BEGIN
799: -- Standard Start of API savepoint
800: SAVEPOINT UPDATE_Risk_PVT;
801:
802: -- Standard call to check for call compatibility.
803: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
804: p_api_version_number,
805: l_api_name,
806: G_PKG_NAME)
909: x_curr_approved_flag => l_dummy_risk_rec.curr_approved_flag,
910: X_MATERIAL => l_dummy_risk_rec.material,
911: X_CLASSIFICATION => l_dummy_risk_rec.classification);
912:
913: -- Standard check for p_commit
914: IF FND_API.to_Boolean( p_commit )
915: THEN
916: COMMIT WORK;
917: END IF;
918:
919:
920: AMW_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
921:
922: -- Standard call to get message count and if count is 1, get message info.
923: FND_MSG_PUB.Count_And_Get
924: (p_count => x_msg_count,
925: p_data => x_msg_data);
926:
932:
933: WHEN FND_API.G_EXC_ERROR THEN
934: ROLLBACK TO UPDATE_Risk_PVT;
935: x_return_status := G_RET_STS_ERROR;
936: -- Standard call to get message count and if count=1, get the message
937: FND_MSG_PUB.Count_And_Get (
938: p_encoded => G_FALSE,
939: p_count => x_msg_count,
940: p_data => x_msg_data);
941:
942: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
943: ROLLBACK TO UPDATE_Risk_PVT;
944: x_return_status := G_RET_STS_UNEXP_ERROR;
945: -- Standard call to get message count and if count=1, get the message
946: FND_MSG_PUB.Count_And_Get (
947: p_encoded => G_FALSE,
948: p_count => x_msg_count,
949: p_data => x_msg_data);
954: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
955: THEN
956: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
957: END IF;
958: -- Standard call to get message count and if count=1, get the message
959: FND_MSG_PUB.Count_And_Get (
960: p_encoded => G_FALSE,
961: p_count => x_msg_count,
962: p_data => x_msg_data);
988: L_API_NAME CONSTANT VARCHAR2(30) := 'Delete_Risk';
989: L_API_VERSION_NUMBER CONSTANT NUMBER := 1.0;
990:
991: BEGIN
992: -- Standard Start of API savepoint
993: SAVEPOINT DELETE_Risk_PVT;
994:
995: -- Standard call to check for call compatibility.
996: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
991: BEGIN
992: -- Standard Start of API savepoint
993: SAVEPOINT DELETE_Risk_PVT;
994:
995: -- Standard call to check for call compatibility.
996: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
997: p_api_version_number,
998: l_api_name,
999: G_PKG_NAME)
1019: AMW_RISKS_PKG.Delete_Row(
1020: x_RISK_REV_ID => p_RISK_REV_ID);
1021:
1022:
1023: -- Standard check for p_commit
1024: IF FND_API.to_Boolean( p_commit )
1025: THEN
1026: COMMIT WORK;
1027: END IF;
1028:
1029:
1030: AMW_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1031:
1032: -- Standard call to get message count and if count is 1, get message info.
1033: FND_MSG_PUB.Count_And_Get
1034: (p_count => x_msg_count,
1035: p_data => x_msg_data);
1036:
1042:
1043: WHEN FND_API.G_EXC_ERROR THEN
1044: ROLLBACK TO DELETE_Risk_PVT;
1045: x_return_status := G_RET_STS_ERROR;
1046: -- Standard call to get message count and if count=1, get the message
1047: FND_MSG_PUB.Count_And_Get (
1048: p_encoded => G_FALSE,
1049: p_count => x_msg_count,
1050: p_data => x_msg_data);
1051:
1052: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1053: ROLLBACK TO DELETE_Risk_PVT;
1054: x_return_status := G_RET_STS_UNEXP_ERROR;
1055: -- Standard call to get message count and if count=1, get the message
1056: FND_MSG_PUB.Count_And_Get (
1057: p_encoded => G_FALSE,
1058: p_count => x_msg_count,
1059: p_data => x_msg_data);
1064: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1065: THEN
1066: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1067: END IF;
1068: -- Standard call to get message count and if count=1, get the message
1069: FND_MSG_PUB.Count_And_Get (
1070: p_encoded => G_FALSE,
1071: p_count => x_msg_count,
1072: p_data => x_msg_data);
1121: WHERE risk_id = l_risk_id AND ( approval_status='A' OR approval_status='R') AND latest_revision_flag='Y';
1122: target_revision c_target_revision%ROWTYPE;
1123:
1124: BEGIN
1125: -- Standard Start of API savepoint
1126: SAVEPOINT REVISE_Risk_PVT;
1127:
1128: -- Initialize message list if p_init_msg_list is set to TRUE.
1129: IF FND_API.to_Boolean( p_init_msg_list )
1224: p_token_value => G_OBJ_TYPE);
1225: RAISE FND_API.G_EXC_ERROR;
1226: END IF;
1227:
1228: -- Standard check for p_commit
1229: IF FND_API.to_Boolean( p_commit )
1230: THEN
1231: COMMIT WORK;
1232: END IF;
1232: END IF;
1233:
1234: AMW_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1235:
1236: -- Standard call to get message count and if count is 1, get message info.
1237: FND_MSG_PUB.Count_And_Get
1238: (p_count => x_msg_count,
1239: p_data => x_msg_data);
1240:
1246:
1247: WHEN FND_API.G_EXC_ERROR THEN
1248: ROLLBACK TO REVISE_Risk_PVT;
1249: x_return_status := G_RET_STS_ERROR;
1250: -- Standard call to get message count and if count=1, get the message
1251: FND_MSG_PUB.Count_And_Get (
1252: p_encoded => G_FALSE,
1253: p_count => x_msg_count,
1254: p_data => x_msg_data);
1255:
1256: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1257: ROLLBACK TO REVISE_Risk_PVT;
1258: x_return_status := G_RET_STS_UNEXP_ERROR;
1259: -- Standard call to get message count and if count=1, get the message
1260: FND_MSG_PUB.Count_And_Get (
1261: p_encoded => G_FALSE,
1262: p_count => x_msg_count,
1263: p_data => x_msg_data);
1268: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1269: THEN
1270: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1271: END IF;
1272: -- Standard call to get message count and if count=1, get the message
1273: FND_MSG_PUB.Count_And_Get (
1274: p_encoded => G_FALSE,
1275: p_count => x_msg_count,
1276: p_data => x_msg_data);
1324: -- Purpose
1325: -- check the requireness of the items which have been marked
1326: -- as NOT NULL in table
1327: -- Note
1328: -- since the standard default with
1329: -- FND_API.G_MISS_XXX v.s. NULL has been changed to:
1330: -- if user want to update to Null, pass in G_MISS_XXX
1331: -- else if user want to update to some value, pass in value
1332: -- else if user doesn't want to update, pass in NULL.
1331: -- else if user want to update to some value, pass in value
1332: -- else if user doesn't want to update, pass in NULL.
1333: -- Reference
1334: -- http://www-apps.us.oracle.com/atg/performance/
1335: -- Standards and Templates>Business Object API Coding Standards
1336: -- 2.3.1 Differentiating between Missing parameters and Null parameters
1337: -- ===============================================================
1338: PROCEDURE check_risk_req_items(
1339: p_operate_mode IN VARCHAR2,
1833: l_object_version_number NUMBER;
1834: l_risk_rec risk_rec_type;
1835:
1836: BEGIN
1837: -- Standard Start of API savepoint
1838: SAVEPOINT VALIDATE_Risk_;
1839: AMW_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'start');
1840:
1841: -- Initialize API return status to SUCCESS
1840:
1841: -- Initialize API return status to SUCCESS
1842: x_return_status := G_RET_STS_SUCCESS;
1843:
1844: -- Standard call to check for call compatibility.
1845: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,
1846: p_api_version_number,
1847: l_api_name,
1848: G_PKG_NAME)
1899: x_risk_rec := l_risk_rec;
1900:
1901: AMW_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
1902:
1903: -- Standard call to get message count and if count is 1, get message info.
1904: FND_MSG_PUB.Count_And_Get
1905: (p_count => x_msg_count,
1906: p_data => x_msg_data);
1907:
1913:
1914: WHEN FND_API.G_EXC_ERROR THEN
1915: ROLLBACK TO VALIDATE_Risk_;
1916: x_return_status := G_RET_STS_ERROR;
1917: -- Standard call to get message count and if count=1, get the message
1918: FND_MSG_PUB.Count_And_Get (
1919: p_encoded => G_FALSE,
1920: p_count => x_msg_count,
1921: p_data => x_msg_data);
1922:
1923: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1924: ROLLBACK TO VALIDATE_Risk_;
1925: x_return_status := G_RET_STS_UNEXP_ERROR;
1926: -- Standard call to get message count and if count=1, get the message
1927: FND_MSG_PUB.Count_And_Get (
1928: p_encoded => G_FALSE,
1929: p_count => x_msg_count,
1930: p_data => x_msg_data);
1935: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1936: THEN
1937: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1938: END IF;
1939: -- Standard call to get message count and if count=1, get the message
1940: FND_MSG_PUB.Count_And_Get (
1941: p_encoded => G_FALSE,
1942: p_count => x_msg_count,
1943: p_data => x_msg_data);
2042:
2043:
2044: AMW_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2045:
2046: -- Standard call to get message count and if count is 1, get message info.
2047: FND_MSG_PUB.Count_And_Get
2048: (p_count => x_msg_count,
2049: p_data => x_msg_data);
2050:
2095: END IF;
2096:
2097: AMW_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2098:
2099: -- Standard call to get message count and if count is 1, get message info.
2100: FND_MSG_PUB.Count_And_Get
2101: (p_count => x_msg_count,
2102: p_data => x_msg_data);
2103:
2104: EXCEPTION
2105: WHEN FND_API.G_EXC_ERROR THEN
2106:
2107: x_return_status := G_RET_STS_ERROR;
2108: -- Standard call to get message count and if count=1, get the message
2109: FND_MSG_PUB.Count_And_Get (
2110: p_encoded => G_FALSE,
2111: p_count => x_msg_count,
2112: p_data => x_msg_data);
2113:
2114: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2115:
2116: x_return_status := G_RET_STS_UNEXP_ERROR;
2117: -- Standard call to get message count and if count=1, get the message
2118: FND_MSG_PUB.Count_And_Get (
2119: p_encoded => G_FALSE,
2120: p_count => x_msg_count,
2121: p_data => x_msg_data);
2126: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2127: THEN
2128: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2129: END IF;
2130: -- Standard call to get message count and if count=1, get the message
2131: FND_MSG_PUB.Count_And_Get (
2132: p_encoded => G_FALSE,
2133: p_count => x_msg_count,
2134: p_data => x_msg_data);
2197: END IF;
2198:
2199: AMW_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2200:
2201: -- Standard call to get message count and if count is 1, get message info.
2202: FND_MSG_PUB.Count_And_Get
2203: (p_count => x_msg_count,
2204: p_data => x_msg_data);
2205:
2207:
2208: WHEN FND_API.G_EXC_ERROR THEN
2209:
2210: x_return_status := G_RET_STS_ERROR;
2211: -- Standard call to get message count and if count=1, get the message
2212: FND_MSG_PUB.Count_And_Get (
2213: p_encoded => G_FALSE,
2214: p_count => x_msg_count,
2215: p_data => x_msg_data);
2216:
2217: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2218:
2219: x_return_status := G_RET_STS_UNEXP_ERROR;
2220: -- Standard call to get message count and if count=1, get the message
2221: FND_MSG_PUB.Count_And_Get (
2222: p_encoded => G_FALSE,
2223: p_count => x_msg_count,
2224: p_data => x_msg_data);
2229: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2230: THEN
2231: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2232: END IF;
2233: -- Standard call to get message count and if count=1, get the message
2234: FND_MSG_PUB.Count_And_Get (
2235: p_encoded => G_FALSE,
2236: p_count => x_msg_count,
2237: p_data => x_msg_data);
2289: END IF;
2290:
2291: AMW_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2292:
2293: -- Standard call to get message count and if count is 1, get message info.
2294: FND_MSG_PUB.Count_And_Get
2295: (p_count => x_msg_count,
2296: p_data => x_msg_data);
2297:
2299:
2300: WHEN FND_API.G_EXC_ERROR THEN
2301:
2302: x_return_status := G_RET_STS_ERROR;
2303: -- Standard call to get message count and if count=1, get the message
2304: FND_MSG_PUB.Count_And_Get (
2305: p_encoded => G_FALSE,
2306: p_count => x_msg_count,
2307: p_data => x_msg_data);
2308:
2309: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2310:
2311: x_return_status := G_RET_STS_UNEXP_ERROR;
2312: -- Standard call to get message count and if count=1, get the message
2313: FND_MSG_PUB.Count_And_Get (
2314: p_encoded => G_FALSE,
2315: p_count => x_msg_count,
2316: p_data => x_msg_data);
2321: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2322: THEN
2323: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2324: END IF;
2325: -- Standard call to get message count and if count=1, get the message
2326: FND_MSG_PUB.Count_And_Get (
2327: p_encoded => G_FALSE,
2328: p_count => x_msg_count,
2329: p_data => x_msg_data);
2375: END IF;
2376:
2377: AMW_UTILITY_PVT.debug_message('Private API: ' || l_api_name || 'end');
2378:
2379: -- Standard call to get message count and if count is 1, get message info.
2380: FND_MSG_PUB.Count_And_Get
2381: (p_count => x_msg_count,
2382: p_data => x_msg_data);
2383:
2385:
2386: WHEN FND_API.G_EXC_ERROR THEN
2387:
2388: x_return_status := G_RET_STS_ERROR;
2389: -- Standard call to get message count and if count=1, get the message
2390: FND_MSG_PUB.Count_And_Get (
2391: p_encoded => G_FALSE,
2392: p_count => x_msg_count,
2393: p_data => x_msg_data);
2394:
2395: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2396:
2397: x_return_status := G_RET_STS_UNEXP_ERROR;
2398: -- Standard call to get message count and if count=1, get the message
2399: FND_MSG_PUB.Count_And_Get (
2400: p_encoded => G_FALSE,
2401: p_count => x_msg_count,
2402: p_data => x_msg_data);
2407: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2408: THEN
2409: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2410: END IF;
2411: -- Standard call to get message count and if count=1, get the message
2412: FND_MSG_PUB.Count_And_Get (
2413: p_encoded => G_FALSE,
2414: p_count => x_msg_count,
2415: p_data => x_msg_data);