77: --
78: -- End of Comments
79: -- ==============================================================================
80:
81: PV_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
82: PV_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
83: PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
84:
85: PROCEDURE Create_Gq_Elements(
78: -- End of Comments
79: -- ==============================================================================
80:
81: PV_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
82: PV_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
83: PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
84:
85: PROCEDURE Create_Gq_Elements(
86: p_api_version_number IN NUMBER,
79: -- ==============================================================================
80:
81: PV_DEBUG_HIGH_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_HIGH);
82: PV_DEBUG_LOW_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW);
83: PV_DEBUG_MEDIUM_ON CONSTANT boolean := FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_DEBUG_MEDIUM);
84:
85: PROCEDURE Create_Gq_Elements(
86: p_api_version_number IN NUMBER,
87: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
130:
131: -- Initialize message list if p_init_msg_list is set to TRUE.
132: IF FND_API.to_Boolean( p_init_msg_list )
133: THEN
134: FND_MSG_PUB.initialize;
135: END IF;
136:
137:
138:
259: END IF;
260:
261:
262: -- Standard call to get message count and if count is 1, get message info.
263: FND_MSG_PUB.Count_And_Get
264: (p_count => x_msg_count,
265: p_data => x_msg_data
266: );
267: EXCEPTION
273: WHEN FND_API.G_EXC_ERROR THEN
274: ROLLBACK TO CREATE_Gq_Elements_PVT;
275: x_return_status := FND_API.G_RET_STS_ERROR;
276: -- Standard call to get message count and if count=1, get the message
277: FND_MSG_PUB.Count_And_Get (
278: p_encoded => FND_API.G_FALSE,
279: p_count => x_msg_count,
280: p_data => x_msg_data
281: );
283: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
284: ROLLBACK TO CREATE_Gq_Elements_PVT;
285: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
286: -- Standard call to get message count and if count=1, get the message
287: FND_MSG_PUB.Count_And_Get (
288: p_encoded => FND_API.G_FALSE,
289: p_count => x_msg_count,
290: p_data => x_msg_data
291: );
292:
293: WHEN OTHERS THEN
294: ROLLBACK TO CREATE_Gq_Elements_PVT;
295: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
296: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
297: THEN
298: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
299: END IF;
300: -- Standard call to get message count and if count=1, get the message
294: ROLLBACK TO CREATE_Gq_Elements_PVT;
295: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
296: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
297: THEN
298: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
299: END IF;
300: -- Standard call to get message count and if count=1, get the message
301: FND_MSG_PUB.Count_And_Get (
302: p_encoded => FND_API.G_FALSE,
297: THEN
298: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
299: END IF;
300: -- Standard call to get message count and if count=1, get the message
301: FND_MSG_PUB.Count_And_Get (
302: p_encoded => FND_API.G_FALSE,
303: p_count => x_msg_count,
304: p_data => x_msg_data
305: );
411:
412: -- Initialize message list if p_init_msg_list is set to TRUE.
413: IF FND_API.to_Boolean( p_init_msg_list )
414: THEN
415: FND_MSG_PUB.initialize;
416: END IF;
417:
418: -- Initialize API return status to SUCCESS
419: x_return_status := FND_API.G_RET_STS_SUCCESS;
580: IF FND_API.to_boolean(p_commit) THEN
581: COMMIT;
582: END IF;
583:
584: FND_MSG_PUB.count_and_get(
585: p_encoded => FND_API.g_false
586: ,p_count => x_msg_count
587: ,p_data => x_msg_data
588: );
596: WHEN FND_API.G_EXC_ERROR THEN
597: ROLLBACK TO Copy_Row;
598: x_return_status := FND_API.G_RET_STS_ERROR;
599: -- Standard call to get message count and if count=1, get the message
600: FND_MSG_PUB.Count_And_Get (
601: p_encoded => FND_API.G_FALSE,
602: p_count => x_msg_count,
603: p_data => x_msg_data
604: );
606: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
607: ROLLBACK TO Copy_Row;
608: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
609: -- Standard call to get message count and if count=1, get the message
610: FND_MSG_PUB.Count_And_Get (
611: p_encoded => FND_API.G_FALSE,
612: p_count => x_msg_count,
613: p_data => x_msg_data
614: );
615:
616: WHEN OTHERS THEN
617: ROLLBACK TO Copy_Row;
618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
619: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
620: THEN
621: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
622: END IF;
623: -- Standard call to get message count and if count=1, get the message
617: ROLLBACK TO Copy_Row;
618: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
619: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
620: THEN
621: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
622: END IF;
623: -- Standard call to get message count and if count=1, get the message
624: FND_MSG_PUB.Count_And_Get (
625: p_encoded => FND_API.G_FALSE,
620: THEN
621: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
622: END IF;
623: -- Standard call to get message count and if count=1, get the message
624: FND_MSG_PUB.Count_And_Get (
625: p_encoded => FND_API.G_FALSE,
626: p_count => x_msg_count,
627: p_data => x_msg_data
628: );
714:
715: -- Initialize message list if p_init_msg_list is set to TRUE.
716: IF FND_API.to_Boolean( p_init_msg_list )
717: THEN
718: FND_MSG_PUB.initialize;
719: END IF;
720:
721:
722:
876: END IF;
877:
878:
879: -- Standard call to get message count and if count is 1, get message info.
880: FND_MSG_PUB.Count_And_Get
881: (p_count => x_msg_count,
882: p_data => x_msg_data
883: );
884: EXCEPTION
890: WHEN FND_API.G_EXC_ERROR THEN
891: ROLLBACK TO UPDATE_Gq_Elements_PVT;
892: x_return_status := FND_API.G_RET_STS_ERROR;
893: -- Standard call to get message count and if count=1, get the message
894: FND_MSG_PUB.Count_And_Get (
895: p_encoded => FND_API.G_FALSE,
896: p_count => x_msg_count,
897: p_data => x_msg_data
898: );
900: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
901: ROLLBACK TO UPDATE_Gq_Elements_PVT;
902: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
903: -- Standard call to get message count and if count=1, get the message
904: FND_MSG_PUB.Count_And_Get (
905: p_encoded => FND_API.G_FALSE,
906: p_count => x_msg_count,
907: p_data => x_msg_data
908: );
909:
910: WHEN OTHERS THEN
911: ROLLBACK TO UPDATE_Gq_Elements_PVT;
912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
913: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
914: THEN
915: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
916: END IF;
917: -- Standard call to get message count and if count=1, get the message
911: ROLLBACK TO UPDATE_Gq_Elements_PVT;
912: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
913: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
914: THEN
915: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
916: END IF;
917: -- Standard call to get message count and if count=1, get the message
918: FND_MSG_PUB.Count_And_Get (
919: p_encoded => FND_API.G_FALSE,
914: THEN
915: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
916: END IF;
917: -- Standard call to get message count and if count=1, get the message
918: FND_MSG_PUB.Count_And_Get (
919: p_encoded => FND_API.G_FALSE,
920: p_count => x_msg_count,
921: p_data => x_msg_data
922: );
1003:
1004: -- Initialize message list if p_init_msg_list is set to TRUE.
1005: IF FND_API.to_Boolean( p_init_msg_list )
1006: THEN
1007: FND_MSG_PUB.initialize;
1008: END IF;
1009:
1010:
1011:
1086: END IF;
1087:
1088:
1089: -- Standard call to get message count and if count is 1, get message info.
1090: FND_MSG_PUB.Count_And_Get
1091: (p_count => x_msg_count,
1092: p_data => x_msg_data
1093: );
1094: EXCEPTION
1100: WHEN FND_API.G_EXC_ERROR THEN
1101: ROLLBACK TO DELETE_Gq_Elements_PVT;
1102: x_return_status := FND_API.G_RET_STS_ERROR;
1103: -- Standard call to get message count and if count=1, get the message
1104: FND_MSG_PUB.Count_And_Get (
1105: p_encoded => FND_API.G_FALSE,
1106: p_count => x_msg_count,
1107: p_data => x_msg_data
1108: );
1110: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1111: ROLLBACK TO DELETE_Gq_Elements_PVT;
1112: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1113: -- Standard call to get message count and if count=1, get the message
1114: FND_MSG_PUB.Count_And_Get (
1115: p_encoded => FND_API.G_FALSE,
1116: p_count => x_msg_count,
1117: p_data => x_msg_data
1118: );
1119:
1120: WHEN OTHERS THEN
1121: ROLLBACK TO DELETE_Gq_Elements_PVT;
1122: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1123: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1124: THEN
1125: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1126: END IF;
1127: -- Standard call to get message count and if count=1, get the message
1121: ROLLBACK TO DELETE_Gq_Elements_PVT;
1122: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1123: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1124: THEN
1125: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1126: END IF;
1127: -- Standard call to get message count and if count=1, get the message
1128: FND_MSG_PUB.Count_And_Get (
1129: p_encoded => FND_API.G_FALSE,
1124: THEN
1125: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1126: END IF;
1127: -- Standard call to get message count and if count=1, get the message
1128: FND_MSG_PUB.Count_And_Get (
1129: p_encoded => FND_API.G_FALSE,
1130: p_count => x_msg_count,
1131: p_data => x_msg_data
1132: );
1213:
1214: -- Initialize message list if p_init_msg_list is set to TRUE.
1215: IF FND_API.to_Boolean( p_init_msg_list )
1216: THEN
1217: FND_MSG_PUB.initialize;
1218: END IF;
1219:
1220:
1221:
1314: END IF;
1315:
1316:
1317: -- Standard call to get message count and if count is 1, get message info.
1318: FND_MSG_PUB.Count_And_Get
1319: (p_count => x_msg_count,
1320: p_data => x_msg_data
1321: );
1322: EXCEPTION
1328: WHEN FND_API.G_EXC_ERROR THEN
1329: ROLLBACK TO Delete_Gq_PB_Elements_PVT;
1330: x_return_status := FND_API.G_RET_STS_ERROR;
1331: -- Standard call to get message count and if count=1, get the message
1332: FND_MSG_PUB.Count_And_Get (
1333: p_encoded => FND_API.G_FALSE,
1334: p_count => x_msg_count,
1335: p_data => x_msg_data
1336: );
1338: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1339: ROLLBACK TO Delete_Gq_PB_Elements_PVT;
1340: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1341: -- Standard call to get message count and if count=1, get the message
1342: FND_MSG_PUB.Count_And_Get (
1343: p_encoded => FND_API.G_FALSE,
1344: p_count => x_msg_count,
1345: p_data => x_msg_data
1346: );
1347:
1348: WHEN OTHERS THEN
1349: ROLLBACK TO Delete_Gq_PB_Elements_PVT;
1350: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1351: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1352: THEN
1353: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1354: END IF;
1355: -- Standard call to get message count and if count=1, get the message
1349: ROLLBACK TO Delete_Gq_PB_Elements_PVT;
1350: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1351: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1352: THEN
1353: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1354: END IF;
1355: -- Standard call to get message count and if count=1, get the message
1356: FND_MSG_PUB.Count_And_Get (
1357: p_encoded => FND_API.G_FALSE,
1352: THEN
1353: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1354: END IF;
1355: -- Standard call to get message count and if count=1, get the message
1356: FND_MSG_PUB.Count_And_Get (
1357: p_encoded => FND_API.G_FALSE,
1358: p_count => x_msg_count,
1359: p_data => x_msg_data
1360: );
1425:
1426: -- Initialize message list if p_init_msg_list is set to TRUE.
1427: IF FND_API.to_Boolean( p_init_msg_list )
1428: THEN
1429: FND_MSG_PUB.initialize;
1430: END IF;
1431:
1432:
1433:
1450: Pv_Gq_Elements_Pkg.Lock_Row(l_qsnr_element_id,p_object_version);
1451:
1452:
1453: -------------------- finish --------------------------
1454: FND_MSG_PUB.count_and_get(
1455: p_encoded => FND_API.g_false,
1456: p_count => x_msg_count,
1457: p_data => x_msg_data);
1458: IF (PV_DEBUG_HIGH_ON) THEN
1468: WHEN FND_API.G_EXC_ERROR THEN
1469: ROLLBACK TO LOCK_Gq_Elements_PVT;
1470: x_return_status := FND_API.G_RET_STS_ERROR;
1471: -- Standard call to get message count and if count=1, get the message
1472: FND_MSG_PUB.Count_And_Get (
1473: p_encoded => FND_API.G_FALSE,
1474: p_count => x_msg_count,
1475: p_data => x_msg_data
1476: );
1478: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1479: ROLLBACK TO LOCK_Gq_Elements_PVT;
1480: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1481: -- Standard call to get message count and if count=1, get the message
1482: FND_MSG_PUB.Count_And_Get (
1483: p_encoded => FND_API.G_FALSE,
1484: p_count => x_msg_count,
1485: p_data => x_msg_data
1486: );
1487:
1488: WHEN OTHERS THEN
1489: ROLLBACK TO LOCK_Gq_Elements_PVT;
1490: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1491: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1492: THEN
1493: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1494: END IF;
1495: -- Standard call to get message count and if count=1, get the message
1489: ROLLBACK TO LOCK_Gq_Elements_PVT;
1490: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1491: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1492: THEN
1493: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1494: END IF;
1495: -- Standard call to get message count and if count=1, get the message
1496: FND_MSG_PUB.Count_And_Get (
1497: p_encoded => FND_API.G_FALSE,
1492: THEN
1493: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1494: END IF;
1495: -- Standard call to get message count and if count=1, get the message
1496: FND_MSG_PUB.Count_And_Get (
1497: p_encoded => FND_API.G_FALSE,
1498: p_count => x_msg_count,
1499: p_data => x_msg_data
1500: );
1746: 'PV_QUESTIONNAIRE_ENTITY_CODE', -- Lookup Type
1747: p_qsnr_element_rec.arc_used_by_entity_code -- Lookup Code
1748: ) = FND_API.g_false
1749: THEN
1750: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1751: THEN
1752: FND_MESSAGE.set_name('PV', 'PV_NOT_A_VALID_ENTITY_CODE');
1753: FND_MSG_PUB.add;
1754: END IF;
1749: THEN
1750: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1751: THEN
1752: FND_MESSAGE.set_name('PV', 'PV_NOT_A_VALID_ENTITY_CODE');
1753: FND_MSG_PUB.add;
1754: END IF;
1755: x_return_status := FND_API.g_ret_sts_error;
1756: RETURN;
1757:
1979:
1980: -- Initialize message list if p_init_msg_list is set to TRUE.
1981: IF FND_API.to_Boolean( p_init_msg_list )
1982: THEN
1983: FND_MSG_PUB.initialize;
1984: END IF;
1985:
1986: IF (PV_DEBUG_HIGH_ON) THEN
1987:
2073: END IF;
2074:
2075:
2076: -- Standard call to get message count and if count is 1, get message info.
2077: FND_MSG_PUB.Count_And_Get
2078: (p_count => x_msg_count,
2079: p_data => x_msg_data
2080: );
2081: EXCEPTION
2087: WHEN FND_API.G_EXC_ERROR THEN
2088: ROLLBACK TO VALIDATE_Gq_Elements_;
2089: x_return_status := FND_API.G_RET_STS_ERROR;
2090: -- Standard call to get message count and if count=1, get the message
2091: FND_MSG_PUB.Count_And_Get (
2092: p_encoded => FND_API.G_FALSE,
2093: p_count => x_msg_count,
2094: p_data => x_msg_data
2095: );
2097: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2098: ROLLBACK TO VALIDATE_Gq_Elements_;
2099: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2100: -- Standard call to get message count and if count=1, get the message
2101: FND_MSG_PUB.Count_And_Get (
2102: p_encoded => FND_API.G_FALSE,
2103: p_count => x_msg_count,
2104: p_data => x_msg_data
2105: );
2106:
2107: WHEN OTHERS THEN
2108: ROLLBACK TO VALIDATE_Gq_Elements_;
2109: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2110: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2111: THEN
2112: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2113: END IF;
2114: -- Standard call to get message count and if count=1, get the message
2108: ROLLBACK TO VALIDATE_Gq_Elements_;
2109: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2110: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2111: THEN
2112: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2113: END IF;
2114: -- Standard call to get message count and if count=1, get the message
2115: FND_MSG_PUB.Count_And_Get (
2116: p_encoded => FND_API.G_FALSE,
2111: THEN
2112: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2113: END IF;
2114: -- Standard call to get message count and if count=1, get the message
2115: FND_MSG_PUB.Count_And_Get (
2116: p_encoded => FND_API.G_FALSE,
2117: p_count => x_msg_count,
2118: p_data => x_msg_data
2119: );
2132: BEGIN
2133: -- Initialize message list if p_init_msg_list is set to TRUE.
2134: IF FND_API.to_Boolean( p_init_msg_list )
2135: THEN
2136: FND_MSG_PUB.initialize;
2137: END IF;
2138:
2139:
2140:
2151:
2152: PVX_UTILITY_PVT.debug_message('Private API: Validate_dm_model_rec');
2153: END IF;
2154: -- Standard call to get message count and if count is 1, get message info.
2155: FND_MSG_PUB.Count_And_Get
2156: (p_count => x_msg_count,
2157: p_data => x_msg_data
2158: );
2159: END Validate_qsnr_element_Rec;
2257:
2258: -- Initialize message list if p_init_msg_list is set to TRUE.
2259: IF FND_API.to_Boolean( p_init_msg_list )
2260: THEN
2261: FND_MSG_PUB.initialize;
2262: END IF;
2263:
2264: -- Initialize API return status to SUCCESS
2265: x_return_status := FND_API.G_RET_STS_SUCCESS;
2534: IF FND_API.to_Boolean( p_commit ) THEN
2535: COMMIT WORK;
2536: END IF;
2537:
2538: FND_MSG_PUB.Count_And_Get
2539: (p_count => x_msg_count,
2540: p_data => x_msg_data
2541: );
2542:
2545: WHEN FND_API.G_EXC_ERROR THEN
2546: ROLLBACK TO Move_Qsnr_Element;
2547: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2548: -- Standard call to get message count and if count=1, get the message
2549: Fnd_Msg_Pub.Count_And_Get (
2550: p_encoded => Fnd_Api.G_FALSE
2551: ,p_count => x_msg_count
2552: ,p_data => x_msg_data
2553: );
2555: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2556: ROLLBACK TO Move_Qsnr_Element;
2557: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2558: -- Standard call to get message count and if count=1, get the message
2559: Fnd_Msg_Pub.Count_And_Get (
2560: p_encoded => Fnd_Api.G_FALSE
2561: ,p_count => x_msg_count
2562: ,p_data => x_msg_data
2563: );
2564:
2565: WHEN OTHERS THEN
2566: ROLLBACK TO Move_Qsnr_Element;
2567: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2568: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
2569: THEN
2570: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2571: END IF;
2572: -- Standard call to get message count and if count=1, get the message
2566: ROLLBACK TO Move_Qsnr_Element;
2567: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2568: IF Fnd_Msg_Pub.Check_Msg_Level ( Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
2569: THEN
2570: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2571: END IF;
2572: -- Standard call to get message count and if count=1, get the message
2573: Fnd_Msg_Pub.Count_And_Get (
2574: p_encoded => Fnd_Api.G_FALSE
2569: THEN
2570: Fnd_Msg_Pub.Add_Exc_Msg( G_PKG_NAME,l_api_name);
2571: END IF;
2572: -- Standard call to get message count and if count=1, get the message
2573: Fnd_Msg_Pub.Count_And_Get (
2574: p_encoded => Fnd_Api.G_FALSE
2575: ,p_count => x_msg_count
2576: ,p_data => x_msg_data
2577: );