DBA Data[Home] [Help]

APPS.AHL_VWP_TASK_CST_PR_PVT dependencies on FND_MSG_PUB

Line 208: FND_MSG_PUB.Initialize;

204: SAVEPOINT Get_Task_Cost_Details;
205:
206: -- Initialize message list if p_init_msg_list is set to TRUE
207: IF FND_API.To_Boolean( p_init_msg_list) THEN
208: FND_MSG_PUB.Initialize;
209: END IF;
210:
211: -- Initialize API return status to success
212: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 240: FND_MSG_PUB.ADD;

236: -- Check for Required Parameters
237: IF(l_cost_price_rec.visit_task_id IS NULL OR
238: l_cost_price_rec.visit_task_id = FND_API.G_MISS_NUM) THEN
239: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INPUT_MISS');
240: FND_MSG_PUB.ADD;
241: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
242: fnd_log.string
243: (
244: fnd_log.level_error,

Line 263: FND_MSG_PUB.add;

259: close c_task_number;
260: --End of changes by amagrawa
261: FND_MESSAGE.set_name( 'AHL','AHL_VWP_TASK_INVALID' );
262: FND_MESSAGE.SET_TOKEN('TASK_NUM',l_task_number);
263: FND_MSG_PUB.add;
264: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
265: fnd_log.string
266: (
267: fnd_log.level_error,

Line 343: FND_MSG_PUB.add;

339: OPEN Get_price_list_name_cur(l_task_cost_price_rec.price_list_id);
340: FETCH Get_price_list_name_cur INTO l_cost_price_rec.price_list_name;
341: IF Get_price_list_name_cur%NOTFOUND THEN
342: FND_MESSAGE.set_name( 'AHL','AHL_VWP_PRICE_LIST_INVALID' );
343: FND_MSG_PUB.add;
344: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
345: fnd_log.string
346: (
347: fnd_log.level_error,

Line 411: FND_MSG_PUB.ADD;

407: FETCH visit_info_csr INTO l_visit_status;
408:
409: IF (visit_info_csr%NOTFOUND)THEN
410: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_VISIT');
411: FND_MSG_PUB.ADD;
412: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
413: fnd_log.string
414: (
415: fnd_log.level_exception,

Line 467: l_msg_count := FND_MSG_PUB.count_msg;

463: );
464: END IF;
465:
466: -- Check Error Message stack.
467: l_msg_count := FND_MSG_PUB.count_msg;
468: IF l_msg_count > 0 THEN
469: x_return_status := FND_API.G_RET_STS_ERROR;
470: RAISE FND_API.G_EXC_ERROR;
471: END IF;

Line 524: l_msg_count := FND_MSG_PUB.count_msg;

520: );
521: END IF;
522:
523: -- Check Error Message stack.
524: l_msg_count := FND_MSG_PUB.count_msg;
525: IF l_msg_count > 0 THEN
526: x_return_status := FND_API.G_RET_STS_ERROR;
527: RAISE FND_API.G_EXC_ERROR;
528: END IF;

Line 585: l_msg_count := FND_MSG_PUB.count_msg;

581:
582: END IF;
583:
584: -- Check Error Message stack.
585: l_msg_count := FND_MSG_PUB.count_msg;
586: IF l_msg_count > 0 THEN
587: x_return_status := FND_API.G_RET_STS_ERROR;
588: RAISE FND_API.G_EXC_ERROR;
589: END IF;

Line 752: x_msg_count := FND_MSG_PUB.count_msg;

748:
749: END IF;
750:
751: -- Check Error Message stack.
752: x_msg_count := FND_MSG_PUB.count_msg;
753: IF x_msg_count > 0 THEN
754: RAISE FND_API.G_EXC_ERROR;
755: END IF;
756:

Line 775: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

771: EXCEPTION
772: WHEN FND_API.G_EXC_ERROR THEN
773: x_return_status := FND_API.G_RET_STS_ERROR;
774: ROLLBACK TO Get_Task_Cost_Details;
775: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
776: p_data => x_msg_data,
777: p_encoded => fnd_api.g_false);
778:
779:

Line 783: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

779:
780: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
781: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
782: ROLLBACK TO Get_Task_Cost_Details;
783: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
784: p_data => x_msg_data,
785: p_encoded => fnd_api.g_false);
786:
787:

Line 791: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

787:
788: WHEN OTHERS THEN
789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
790: ROLLBACK TO Get_Task_Cost_Details;
791: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
792: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
793: p_procedure_name => 'Get_Task_Cost_Details',
794: p_error_text => SUBSTR(SQLERRM,1,500));
795: END IF;

Line 792: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

788: WHEN OTHERS THEN
789: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
790: ROLLBACK TO Get_Task_Cost_Details;
791: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
792: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
793: p_procedure_name => 'Get_Task_Cost_Details',
794: p_error_text => SUBSTR(SQLERRM,1,500));
795: END IF;
796: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 796: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

792: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
793: p_procedure_name => 'Get_Task_Cost_Details',
794: p_error_text => SUBSTR(SQLERRM,1,500));
795: END IF;
796: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
797: p_data => x_msg_data,
798: p_encoded => fnd_api.g_false);
799:
800: END Get_Task_Cost_Details;

Line 937: FND_MSG_PUB.Initialize;

933: SAVEPOINT Update_Task_Cost_Details;
934:
935: -- Initialize message list if p_init_msg_list is set to TRUE
936: IF FND_API.To_Boolean( p_init_msg_list) THEN
937: FND_MSG_PUB.Initialize;
938: END IF;
939:
940: -- Initialize API return status to success
941: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 956: FND_MSG_PUB.ADD;

952: -- Check for Required Parameters
953: IF(l_cost_price_rec.visit_task_id IS NULL OR
954: l_cost_price_rec.visit_task_id = FND_API.G_MISS_NUM) THEN
955: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INPUT_MISS');
956: FND_MSG_PUB.ADD;
957: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
958: fnd_log.string
959: (
960: fnd_log.level_error,

Line 974: FND_MSG_PUB.add;

970: FETCH Get_visit_task_dtls_cur INTO l_visit_task_dtls_rec;
971: IF Get_visit_task_dtls_cur%NOTFOUND THEN
972: FND_MESSAGE.set_name( 'AHL','AHL_VWP_TASK_INVALID' );
973: FND_MESSAGE.Set_Token('TASK_NUM', l_cost_price_rec.visit_task_number);
974: FND_MSG_PUB.add;
975: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
976: fnd_log.string
977: (
978: fnd_log.level_error,

Line 998: FND_MSG_PUB.add;

994: OPEN Get_visit_dtls_cur(l_cost_price_rec.visit_id);
995: FETCH Get_visit_dtls_cur INTO l_visit_dtls_rec;
996: IF Get_visit_dtls_cur%NOTFOUND THEN
997: FND_MESSAGE.set_name( 'AHL','AHL_VWP_VISIT_INVALID' );
998: FND_MSG_PUB.add;
999: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1000: fnd_log.string
1001: (
1002: fnd_log.level_error,

Line 1050: FND_MSG_PUB.ADD;

1046: FETCH price_list_id_csr INTO l_cost_price_rec.price_list_id;
1047: IF (price_list_id_csr%NOTFOUND)THEN
1048: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_PLIST_NFOUND');
1049: FND_MESSAGE.Set_Token('PRICE_LIST',p_price_list_name);
1050: FND_MSG_PUB.ADD;
1051:
1052: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1053: fnd_log.string
1054: (

Line 1085: FND_MSG_PUB.add;

1081: OPEN Get_price_list_cur(l_cost_price_rec.price_list_id);
1082: FETCH Get_price_list_cur INTO l_price_list_rec;
1083: IF Get_price_list_cur%NOTFOUND THEN
1084: FND_MESSAGE.set_name( 'AHL','AHL_VWP_PRICE_LIST_INVALID' );
1085: FND_MSG_PUB.add;
1086: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1087: fnd_log.string
1088: (
1089: fnd_log.level_error,

Line 1116: FND_MSG_PUB.ADD;

1112: IF (TRUNC(l_price_list_active_start_date) > TRUNC(l_start_date_time)) OR
1113: (TRUNC(l_price_list_active_end_date) < TRUNC(l_start_date_time)) THEN
1114:
1115: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_PRICE_LIST_INV_STR');
1116: FND_MSG_PUB.ADD;
1117: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1118: fnd_log.string
1119: (
1120: fnd_log.level_error,

Line 1137: FND_MSG_PUB.ADD;

1133: IF (TRUNC(l_price_list_active_start_date) > TRUNC(l_close_date_time)) OR
1134: (TRUNC(l_price_list_active_end_date) < TRUNC(l_close_date_time)) THEN
1135:
1136: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_PRICE_LIST_INV_END');
1137: FND_MSG_PUB.ADD;
1138: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1139: fnd_log.string
1140: (
1141: fnd_log.level_error,

Line 1162: FND_MSG_PUB.ADD;

1158: THEN
1159:
1160: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_PRICE_LIST_INV_SYS');
1161: -- CHANGE THIS MESSAGE TEST AND NAME TOO -- IMPORTANT
1162: FND_MSG_PUB.ADD;
1163: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1164: fnd_log.string
1165: (
1166: fnd_log.level_error,

Line 1222: x_msg_count := FND_MSG_PUB.count_msg;

1218: OBJECT_VERSION_NUMBER = l_cost_price_rec.object_version_number + 1
1219: WHERE VISIT_TASK_ID = l_cost_price_rec.visit_task_id;
1220:
1221: -- Check Error Message stack.
1222: x_msg_count := FND_MSG_PUB.count_msg;
1223: IF x_msg_count > 0 THEN
1224: RAISE FND_API.G_EXC_ERROR;
1225: END IF;
1226:

Line 1244: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

1240: EXCEPTION
1241: WHEN FND_API.G_EXC_ERROR THEN
1242: x_return_status := FND_API.G_RET_STS_ERROR;
1243: ROLLBACK TO Update_Task_Cost_Details;
1244: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1245: p_data => x_msg_data,
1246: p_encoded => fnd_api.g_false);
1247:
1248:

Line 1252: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

1248:
1249: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1250: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1251: ROLLBACK TO Update_Task_Cost_Details;
1252: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1253: p_data => x_msg_data,
1254: p_encoded => fnd_api.g_false);
1255:
1256:

Line 1260: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

1256:
1257: WHEN OTHERS THEN
1258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1259: ROLLBACK TO Update_Task_Cost_Details;
1260: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1261: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1262: p_procedure_name => 'Update_Task_Cost_Details',
1263: p_error_text => SUBSTR(SQLERRM,1,500));
1264: END IF;

Line 1261: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

1257: WHEN OTHERS THEN
1258: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1259: ROLLBACK TO Update_Task_Cost_Details;
1260: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1261: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1262: p_procedure_name => 'Update_Task_Cost_Details',
1263: p_error_text => SUBSTR(SQLERRM,1,500));
1264: END IF;
1265: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 1265: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

1261: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1262: p_procedure_name => 'Update_Task_Cost_Details',
1263: p_error_text => SUBSTR(SQLERRM,1,500));
1264: END IF;
1265: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1266: p_data => x_msg_data,
1267: p_encoded => fnd_api.g_false);
1268:
1269: END Update_Task_Cost_Details;

Line 1358: FND_MSG_PUB.Initialize;

1354: SAVEPOINT Estimate_Task_Cost;
1355:
1356: -- Initialize message list if p_init_msg_list is set to TRUE
1357: IF FND_API.To_Boolean( p_init_msg_list) THEN
1358: FND_MSG_PUB.Initialize;
1359: END IF;
1360: -- Initialize API return status to success
1361: x_return_status := FND_API.G_RET_STS_SUCCESS;
1362: --

Line 1390: FND_MSG_PUB.ADD;

1386: -- Check for Required Parameters
1387: IF(l_cost_price_rec.visit_task_id IS NULL OR
1388: l_cost_price_rec.visit_task_id = FND_API.G_MISS_NUM) THEN
1389: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INPUT_MISS');
1390: FND_MSG_PUB.ADD;
1391: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1392: fnd_log.string
1393: (
1394: fnd_log.level_error,

Line 1453: l_msg_count := FND_MSG_PUB.count_msg;

1449: END IF;
1450:
1451: -- Check Error Message stack.
1452: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1453: l_msg_count := FND_MSG_PUB.count_msg;
1454: IF l_msg_count > 0 THEN
1455: RAISE FND_API.G_EXC_ERROR;
1456: END IF;
1457: END IF;

Line 1539: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

1535: EXCEPTION
1536: WHEN FND_API.G_EXC_ERROR THEN
1537: x_return_status := FND_API.G_RET_STS_ERROR;
1538: ROLLBACK TO Estimate_Task_Cost;
1539: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1540: p_data => x_msg_data,
1541: p_encoded => fnd_api.g_false);
1542:
1543:

Line 1547: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

1543:
1544: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1545: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1546: ROLLBACK TO Estimate_Task_Cost;
1547: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1548: p_data => x_msg_data,
1549: p_encoded => fnd_api.g_false);
1550:
1551:

Line 1555: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

1551:
1552: WHEN OTHERS THEN
1553: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1554: ROLLBACK TO Estimate_Task_Cost;
1555: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1556: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1557: p_procedure_name => 'Estimate_Task_Cost',
1558: p_error_text => SUBSTR(SQLERRM,1,500));
1559: END IF;

Line 1556: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

1552: WHEN OTHERS THEN
1553: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1554: ROLLBACK TO Estimate_Task_Cost;
1555: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1556: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1557: p_procedure_name => 'Estimate_Task_Cost',
1558: p_error_text => SUBSTR(SQLERRM,1,500));
1559: END IF;
1560: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 1560: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

1556: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1557: p_procedure_name => 'Estimate_Task_Cost',
1558: p_error_text => SUBSTR(SQLERRM,1,500));
1559: END IF;
1560: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1561: p_data => x_msg_data,
1562: p_encoded => fnd_api.g_false);
1563:
1564: END Estimate_Task_Cost;

Line 1705: FND_MSG_PUB.Initialize;

1701: -- Standard start of API savepoint
1702: SAVEPOINT Estimate_Task_Price;
1703: -- Initialize message list if p_init_msg_list is set to TRUE
1704: IF FND_API.To_Boolean( p_init_msg_list) THEN
1705: FND_MSG_PUB.Initialize;
1706: END IF;
1707: -- Initialize API return status to success
1708: x_return_status := FND_API.G_RET_STS_SUCCESS;
1709: --

Line 1734: FND_MSG_PUB.ADD;

1730: -- Check for Required Parameters
1731: IF(l_cost_price_rec.visit_task_id IS NULL OR
1732: l_cost_price_rec.visit_task_id = FND_API.G_MISS_NUM) THEN
1733: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INPUT_MISS');
1734: FND_MSG_PUB.ADD;
1735: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1736: fnd_log.string
1737: (
1738: fnd_log.level_error,

Line 1751: FND_MSG_PUB.add;

1747: OPEN Get_visit_task_dtls_cur(l_cost_price_rec.visit_task_id) ;
1748: FETCH Get_visit_task_dtls_cur INTO l_visit_task_dtls_rec;
1749: IF Get_visit_task_dtls_cur%NOTFOUND THEN
1750: FND_MESSAGE.set_name( 'AHL','AHL_VWP_VISIT_TASK_INVALID' );
1751: FND_MSG_PUB.add;
1752: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1753: fnd_log.string
1754: (
1755: fnd_log.level_error,

Line 1806: FND_MSG_PUB.ADD;

1802: x_currency_code => l_cost_price_rec.currency);
1803: -- error handling
1804: IF l_cost_price_rec.currency IS NULL THEN
1805: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_NO_CURRENCY');
1806: FND_MSG_PUB.ADD;
1807: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1808: fnd_log.string
1809: (
1810: fnd_log.level_error,

Line 1834: FND_MSG_PUB.add;

1830: -- visit price list. If both not exists then raise an error message
1831: IF (l_cost_price_rec.price_list_id IS NULL OR
1832: l_cost_price_rec.price_list_id = FND_API.G_MISS_NUM ) THEN
1833: FND_MESSAGE.set_name( 'AHL','AHL_VWP_PRICE_LIST_INVALID' );
1834: FND_MSG_PUB.add;
1835: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1836: fnd_log.string
1837: (
1838: fnd_log.level_error,

Line 2004: l_msg_count := FND_MSG_PUB.count_msg;

2000: END IF;
2001:
2002: -- error hanling
2003: IF (l_job_status_code is NULL) THEN
2004: l_msg_count := FND_MSG_PUB.count_msg;
2005: IF l_msg_count > 0 THEN
2006: RAISE FND_API.G_EXC_ERROR;
2007: END IF;
2008: END IF;

Line 2138: FND_MSG_PUB.add;

2134: IF (l_cost_price_rec.task_start_date IS NULL OR
2135: l_cost_price_rec.task_start_date = FND_API.G_MISS_DATE ) THEN
2136:
2137: FND_MESSAGE.set_name( 'AHL','AHL_VWP_VALIDATE_ERROR' );
2138: FND_MSG_PUB.add;
2139:
2140: IF G_DEBUG='Y' THEN
2141: Ahl_Debug_Pub.debug( l_full_name ||'Task Start Date is null');
2142: END IF;

Line 2562: x_msg_count := FND_MSG_PUB.count_msg;

2558:
2559: END IF;
2560:
2561: -- Check Error Message stack.
2562: x_msg_count := FND_MSG_PUB.count_msg;
2563: IF x_msg_count > 0 THEN
2564: RAISE FND_API.G_EXC_ERROR;
2565: END IF;
2566:

Line 2585: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

2581: EXCEPTION
2582: WHEN FND_API.G_EXC_ERROR THEN
2583: x_return_status := FND_API.G_RET_STS_ERROR;
2584: ROLLBACK TO Estimate_Task_Price;
2585: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2586: p_data => x_msg_data,
2587: p_encoded => fnd_api.g_false);
2588:
2589:

Line 2593: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

2589:
2590: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2591: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2592: ROLLBACK TO Estimate_Task_Price;
2593: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2594: p_data => x_msg_data,
2595: p_encoded => fnd_api.g_false);
2596:
2597:

Line 2601: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

2597:
2598: WHEN OTHERS THEN
2599: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2600: ROLLBACK TO Estimate_Task_Price;
2601: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2602: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2603: p_procedure_name => 'Estimate_Task_Price',
2604: p_error_text => SUBSTR(SQLERRM,1,500));
2605: END IF;

Line 2602: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

2598: WHEN OTHERS THEN
2599: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2600: ROLLBACK TO Estimate_Task_Price;
2601: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2602: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2603: p_procedure_name => 'Estimate_Task_Price',
2604: p_error_text => SUBSTR(SQLERRM,1,500));
2605: END IF;
2606: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 2606: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

2602: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2603: p_procedure_name => 'Estimate_Task_Price',
2604: p_error_text => SUBSTR(SQLERRM,1,500));
2605: END IF;
2606: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2607: p_data => x_msg_data,
2608: p_encoded => fnd_api.g_false);
2609: END Estimate_Task_Price;
2610:

Line 2690: Fnd_Msg_Pub.Initialize;

2686: END IF;
2687:
2688: -- Initialize message list if p_init_msg_list is set to TRUE
2689: IF Fnd_Api.To_Boolean(p_init_msg_list) THEN
2690: Fnd_Msg_Pub.Initialize;
2691: END IF;
2692:
2693: -- Initialize API return status to success
2694: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

Line 2717: FND_MSG_PUB.ADD;

2713: FETCH visit_info_csr INTO l_visit_status;
2714:
2715: IF (visit_info_csr%NOTFOUND)THEN
2716: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_VISIT');
2717: FND_MSG_PUB.ADD;
2718: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2719: fnd_log.string
2720: (
2721: fnd_log.level_exception,

Line 2751: --x_msg_count := Fnd_Msg_Pub.count_msg;

2747: p_validation_level =>Fnd_Api.G_VALID_LEVEL_FULL,
2748: p_x_cost_price_rec => l_cost_price_rec,
2749: x_return_status =>x_return_status );
2750:
2751: --x_msg_count := Fnd_Msg_Pub.count_msg;
2752: IF x_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
2753:
2754: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2755: fnd_log.string

Line 2803: FND_MSG_PUB.ADD;

2799: 'Error : visit task id is null'
2800: );
2801:
2802: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INPUT_MISS');
2803: FND_MSG_PUB.ADD;
2804: RAISE FND_API.G_EXC_ERROR;
2805: END IF;
2806:
2807: END IF;

Line 2809: x_msg_count := Fnd_Msg_Pub.count_msg;

2805: END IF;
2806:
2807: END IF;
2808:
2809: x_msg_count := Fnd_Msg_Pub.count_msg;
2810: IF x_msg_count > 0 THEN
2811: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level)THEN
2812: fnd_log.string
2813: (

Line 2835: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

2831: EXCEPTION
2832: WHEN FND_API.G_EXC_ERROR THEN
2833: x_return_status := FND_API.G_RET_STS_ERROR;
2834: ROLLBACK TO Get_Node_Cost_Details_pvt;
2835: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2836: p_data => x_msg_data,
2837: p_encoded => fnd_api.g_false);
2838:
2839:

Line 2843: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

2839:
2840: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2841: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2842: ROLLBACK TO Get_Node_Cost_Details_pvt;
2843: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2844: p_data => x_msg_data,
2845: p_encoded => fnd_api.g_false);
2846:
2847:

Line 2851: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

2847:
2848: WHEN OTHERS THEN
2849: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2850: ROLLBACK TO Get_Node_Cost_Details_pvt;
2851: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2852: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2853: p_procedure_name => 'Get_Node_Cost_Details',
2854: p_error_text => SUBSTR(SQLERRM,1,500));
2855: END IF;

Line 2852: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

2848: WHEN OTHERS THEN
2849: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2850: ROLLBACK TO Get_Node_Cost_Details_pvt;
2851: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2852: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2853: p_procedure_name => 'Get_Node_Cost_Details',
2854: p_error_text => SUBSTR(SQLERRM,1,500));
2855: END IF;
2856: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 2856: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

2852: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2853: p_procedure_name => 'Get_Node_Cost_Details',
2854: p_error_text => SUBSTR(SQLERRM,1,500));
2855: END IF;
2856: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2857: p_data => x_msg_data,
2858: p_encoded => fnd_api.g_false);
2859:
2860:

Line 3034: Fnd_Msg_Pub.Initialize;

3030: END IF;
3031:
3032: -- Initialize message list if p_init_msg_list is set to TRUE
3033: IF Fnd_Api.To_Boolean(p_init_msg_list) THEN
3034: Fnd_Msg_Pub.Initialize;
3035: END IF;
3036:
3037: -- Initialize API return status to success
3038: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3054: FND_MSG_PUB.ADD;

3050: -- Check for Required Parameters
3051: IF(l_cost_price_rec.visit_task_id IS NULL OR
3052: l_cost_price_rec.visit_task_id = FND_API.G_MISS_NUM) THEN
3053: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INPUT_MISS');
3054: FND_MSG_PUB.ADD;
3055: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
3056: fnd_log.string
3057: (
3058: fnd_log.level_error,

Line 3074: FND_MSG_PUB.add;

3070:
3071:
3072: IF c_task_csr%NOTFOUND THEN
3073: FND_MESSAGE.set_name( 'AHL','AHL_VWP_VISIT_TASK_INVALID' );
3074: FND_MSG_PUB.add;
3075: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
3076: fnd_log.string
3077: (
3078: fnd_log.level_error,

Line 3143: l_msg_count := FND_MSG_PUB.count_msg;

3139: END IF;
3140:
3141: -- Check Error Message stack.
3142: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3143: l_msg_count := FND_MSG_PUB.count_msg;
3144: IF l_msg_count > 0 THEN
3145: RAISE FND_API.G_EXC_ERROR;
3146: END IF;
3147: END IF;

Line 3160: FND_MSG_PUB.ADD;

3156:
3157: If l_visit_rec.outside_party_flag ='N'
3158: then
3159: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_OUTSDPRTY_FLAG');
3160: FND_MSG_PUB.ADD;
3161: RAISE FND_API.G_EXC_ERROR;
3162: --Display an error message `Visit number visit_number is not an outside party.'
3163: Else
3164: If l_task_rec.price_list_id is not Null

Line 3172: FND_MSG_PUB.ADD;

3168: then
3169: l_cost_price_rec.price_list_id :=l_visit_rec.price_list_id;
3170: Else
3171: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_PRICELISTIDNULL');
3172: FND_MSG_PUB.ADD;
3173: RAISE FND_API.G_EXC_ERROR;
3174:
3175: END IF;
3176:

Line 3231: FND_MSG_PUB.ADD;

3227:
3228: -- Check for value is null
3229: IF l_cost_price_rec.currency IS NULL THEN
3230: FND_MESSAGE.Set_Name(G_PKG_NAME,'AHL_VWP_CST_NO_CURRENCY');
3231: FND_MSG_PUB.ADD;
3232: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)THEN
3233: fnd_log.string
3234: (
3235: fnd_log.level_statement,

Line 3263: l_msg_count := FND_MSG_PUB.count_msg;

3259: x_status_code => l_job_status_code,
3260: x_status_meaning => l_job_status_mean);
3261:
3262: IF (l_job_status_code is NULL) THEN
3263: l_msg_count := FND_MSG_PUB.count_msg;
3264: IF l_msg_count > 0 THEN
3265: RAISE FND_API.G_EXC_ERROR;
3266: END IF;
3267: END IF;

Line 3442: l_msg_count := FND_MSG_PUB.count_msg;

3438: End IF; --- mr or other tasks
3439:
3440: -- Check Error Message stack.
3441: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3442: l_msg_count := FND_MSG_PUB.count_msg;
3443: IF l_msg_count > 0 THEN
3444: RAISE FND_API.G_EXC_ERROR;
3445: END IF;
3446: END IF;

Line 3470: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

3466: EXCEPTION
3467: WHEN FND_API.G_EXC_ERROR THEN
3468: x_return_status := FND_API.G_RET_STS_ERROR;
3469: ROLLBACK TO GET_TASK_ITEMS_NO_PRICE_PVT;
3470: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
3471: p_data => x_msg_data,
3472: p_encoded => fnd_api.g_false);
3473:
3474:

Line 3478: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

3474:
3475: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3476: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3477: ROLLBACK TO GET_TASK_ITEMS_NO_PRICE_PVT;
3478: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
3479: p_data => x_msg_data,
3480: p_encoded => fnd_api.g_false);
3481:
3482:

Line 3486: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

3482:
3483: WHEN OTHERS THEN
3484: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3485: ROLLBACK TO GET_TASK_ITEMS_NO_PRICE_PVT;
3486: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3487: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
3488: p_procedure_name => L_API_NAME,
3489: p_error_text => SUBSTR(SQLERRM,1,500));
3490: END IF;

Line 3487: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

3483: WHEN OTHERS THEN
3484: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3485: ROLLBACK TO GET_TASK_ITEMS_NO_PRICE_PVT;
3486: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3487: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
3488: p_procedure_name => L_API_NAME,
3489: p_error_text => SUBSTR(SQLERRM,1,500));
3490: END IF;
3491: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 3491: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

3487: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
3488: p_procedure_name => L_API_NAME,
3489: p_error_text => SUBSTR(SQLERRM,1,500));
3490: END IF;
3491: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
3492: p_data => x_msg_data,
3493: p_encoded => fnd_api.g_false);
3494:
3495:

Line 3585: l_msg_count := FND_MSG_PUB.count_msg;

3581: end if;
3582:
3583: -- Check Error Message stack.
3584: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3585: l_msg_count := FND_MSG_PUB.count_msg;
3586: IF l_msg_count > 0 THEN
3587: RAISE FND_API.G_EXC_ERROR;
3588: END IF;
3589: END IF;

Line 3629: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

3625: EXCEPTION
3626: WHEN FND_API.G_EXC_ERROR THEN
3627: x_return_status := FND_API.G_RET_STS_ERROR;
3628: ROLLBACK TO GET_UNASSOCIATED_ITEMS_PVT;
3629: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
3630: p_data => x_msg_data,
3631: p_encoded => fnd_api.g_false);
3632:
3633:

Line 3637: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

3633:
3634: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3636: ROLLBACK TO GET_UNASSOCIATED_ITEMS_PVT;
3637: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
3638: p_data => x_msg_data,
3639: p_encoded => fnd_api.g_false);
3640:
3641:

Line 3645: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

3641:
3642: WHEN OTHERS THEN
3643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3644: ROLLBACK TO GET_UNASSOCIATED_ITEMS_PVT;
3645: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3646: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
3647: p_procedure_name => L_API_NAME,
3648: p_error_text => SUBSTR(SQLERRM,1,500));
3649: END IF;

Line 3646: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

3642: WHEN OTHERS THEN
3643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3644: ROLLBACK TO GET_UNASSOCIATED_ITEMS_PVT;
3645: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3646: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
3647: p_procedure_name => L_API_NAME,
3648: p_error_text => SUBSTR(SQLERRM,1,500));
3649: END IF;
3650: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 3650: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

3646: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
3647: p_procedure_name => L_API_NAME,
3648: p_error_text => SUBSTR(SQLERRM,1,500));
3649: END IF;
3650: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
3651: p_data => x_msg_data,
3652: p_encoded => fnd_api.g_false);
3653: END GET_UNASSOCIATED_ITEMS;
3654:

Line 3730: FND_MSG_PUB.add;

3726: IF (p_task_start_time IS NULL OR
3727: p_task_start_time = FND_API.G_MISS_DATE ) THEN
3728:
3729: FND_MESSAGE.set_name( 'AHL','AHL_VWP_VALIDATE_ERROR' );
3730: FND_MSG_PUB.add;
3731:
3732: IF G_DEBUG='Y' THEN
3733: Ahl_Debug_Pub.debug( l_full_name ||'Task Start Date is null');
3734: END IF;

Line 3922: l_msg_count := FND_MSG_PUB.count_msg;

3918: END IF;
3919:
3920: -- Check Error Message stack.
3921: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3922: l_msg_count := FND_MSG_PUB.count_msg;
3923: IF l_msg_count > 0 THEN
3924: RAISE FND_API.G_EXC_ERROR;
3925: END IF;
3926: END IF;

Line 3950: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

3946: EXCEPTION
3947: WHEN FND_API.G_EXC_ERROR THEN
3948: x_return_status := FND_API.G_RET_STS_ERROR;
3949: ROLLBACK TO GET_OTHER_TASK_ITEMS_PVT;
3950: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
3951: p_data => x_msg_data,
3952: p_encoded => fnd_api.g_false);
3953:
3954:

Line 3958: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

3954:
3955: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3956: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3957: ROLLBACK TO GET_OTHER_TASK_ITEMS_PVT;
3958: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
3959: p_data => x_msg_data,
3960: p_encoded => fnd_api.g_false);
3961:
3962:

Line 3966: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

3962:
3963: WHEN OTHERS THEN
3964: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3965: ROLLBACK TO GET_OTHER_TASK_ITEMS_PVT;
3966: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3967: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
3968: p_procedure_name => L_API_NAME,
3969: p_error_text => SUBSTR(SQLERRM,1,500));
3970: END IF;

Line 3967: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

3963: WHEN OTHERS THEN
3964: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3965: ROLLBACK TO GET_OTHER_TASK_ITEMS_PVT;
3966: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3967: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
3968: p_procedure_name => L_API_NAME,
3969: p_error_text => SUBSTR(SQLERRM,1,500));
3970: END IF;
3971: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

Line 3971: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

3967: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
3968: p_procedure_name => L_API_NAME,
3969: p_error_text => SUBSTR(SQLERRM,1,500));
3970: END IF;
3971: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
3972: p_data => x_msg_data,
3973: p_encoded => fnd_api.g_false);
3974:
3975: END GET_OTHER_TASK_ITEMS;