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.AHL_VWP_VISIT_CST_PR_PVT dependencies on FND_MSG_PUB

Line 99: FND_MSG_PUB.Initialize;

95: SAVEPOINT get_visit_cost_details;
96:
97: -- Initialize message list if p_init_msg_list is set to TRUE
98: IF FND_API.To_Boolean( p_init_msg_list) THEN
99: FND_MSG_PUB.Initialize;
100: END IF;
101:
102: -- Initialize API return status to success
103: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 139: FND_MSG_PUB.ADD;

135:
136: -- make sure that visit id is present in the input
137: IF(p_x_cost_price_rec.visit_id IS NULL OR p_x_cost_price_rec.visit_id = FND_API.G_MISS_NUM) THEN
138: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INPUT_MISS');
139: FND_MSG_PUB.ADD;
140: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
141: fnd_log.string
142: (
143: fnd_log.level_exception,

Line 161: FND_MSG_PUB.ADD;

157: l_cost_price_rec.visit_start_date, l_cost_price_rec.visit_end_date;
158:
159: IF (visit_info_csr%NOTFOUND)THEN
160: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_VISIT');
161: FND_MSG_PUB.ADD;
162: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
163: fnd_log.string
164: (
165: fnd_log.level_exception,

Line 184: FND_MSG_PUB.ADD;

180: OPEN customer_id_csr(l_cost_price_rec.service_request_id);
181: FETCH customer_id_csr INTO l_cost_price_rec.customer_id;
182: IF(customer_id_csr%NOTFOUND)THEN
183: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_SR_ID');
184: FND_MSG_PUB.ADD;
185: IF(fnd_log.level_unexpected >= fnd_log.g_current_runtime_level)THEN
186: fnd_log.string
187: (
188: fnd_log.level_unexpected,

Line 219: FND_MSG_PUB.ADD;

215: FETCH price_list_name_csr INTO l_cost_price_rec.price_list_name;
216:
217: IF(price_list_name_csr%NOTFOUND)THEN
218: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_VISIT');
219: FND_MSG_PUB.ADD;
220: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
221: fnd_log.string
222: (
223: fnd_log.level_error,

Line 319: x_msg_count := FND_MSG_PUB.count_msg;

315: END IF;
316: END IF; -- status <> CANCELLED
317:
318: -- Check Error Message stack.
319: x_msg_count := FND_MSG_PUB.count_msg;
320: IF x_msg_count > 0 THEN
321: RAISE FND_API.G_EXC_ERROR;
322: END IF;
323:

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

366: EXCEPTION
367: WHEN FND_API.G_EXC_ERROR THEN
368: x_return_status := FND_API.G_RET_STS_ERROR;
369: ROLLBACK TO get_visit_cost_details;
370: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
371: p_data => x_msg_data,
372: p_encoded => fnd_api.g_false);
373:
374:

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

374:
375: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
376: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
377: ROLLBACK TO get_visit_cost_details;
378: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
379: p_data => x_msg_data,
380: p_encoded => fnd_api.g_false);
381:
382:

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

382:
383: WHEN OTHERS THEN
384: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
385: ROLLBACK TO get_visit_cost_details;
386: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
387: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
388: p_procedure_name => 'get_visit_cost_details',
389: p_error_text => SUBSTR(SQLERRM,1,500));
390: END IF;

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

383: WHEN OTHERS THEN
384: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
385: ROLLBACK TO get_visit_cost_details;
386: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
387: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
388: p_procedure_name => 'get_visit_cost_details',
389: p_error_text => SUBSTR(SQLERRM,1,500));
390: END IF;
391: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

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

387: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
388: p_procedure_name => 'get_visit_cost_details',
389: p_error_text => SUBSTR(SQLERRM,1,500));
390: END IF;
391: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
392: p_data => x_msg_data,
393: p_encoded => fnd_api.g_false);
394:
395: END get_visit_cost_details;

Line 467: FND_MSG_PUB.Initialize;

463: SAVEPOINT update_visit_cost_details;
464:
465: -- Initialize message list if p_init_msg_list is set to TRUE
466: IF FND_API.To_Boolean( p_init_msg_list) THEN
467: FND_MSG_PUB.Initialize;
468: END IF;
469:
470: -- Initialize API return status to success
471: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 498: FND_MSG_PUB.ADD;

494:
495: -- Make sure that visit id is present in the input
496: IF(p_x_cost_price_rec.visit_id IS NULL OR p_x_cost_price_rec.visit_id = FND_API.G_MISS_NUM) THEN
497: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INPUT_MISS');
498: FND_MSG_PUB.ADD;
499: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
500: fnd_log.string
501: (
502: fnd_log.level_exception,

Line 513: FND_MSG_PUB.ADD;

509:
510: --make sure outside party flag is valid
511: IF (NVL(p_x_cost_price_rec.outside_party_flag,'N') NOT IN ('Y','N'))THEN
512: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INPUT_OSP_INV');
513: FND_MSG_PUB.ADD;
514: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
515: fnd_log.string
516: (
517: fnd_log.level_exception,

Line 534: FND_MSG_PUB.ADD;

530: l_close_date_time;
531:
532: IF (visit_info_csr%NOTFOUND)THEN
533: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_VISIT');
534: FND_MSG_PUB.ADD;
535: CLOSE visit_info_csr;
536: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
537:
538: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN

Line 549: FND_MSG_PUB.ADD;

545: END IF;
546:
547: ELSIF (l_visit_status_code = 'CLOSED')THEN
548: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_VISIT_UPDT_STS');
549: FND_MSG_PUB.ADD;
550: CLOSE visit_info_csr;
551: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
552:
553: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN

Line 564: FND_MSG_PUB.ADD;

560: END IF;
561:
562: ELSIF (l_service_request_id IS NULL)THEN
563: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_VISIT_UPDT_NOSR');
564: FND_MSG_PUB.ADD;
565: CLOSE visit_info_csr;
566: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
567:
568: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN

Line 585: FND_MSG_PUB.ADD;

581: FETCH visit_tasks_csr INTO l_exists;
582:
583: IF (visit_tasks_csr%FOUND)THEN
584: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_OSP_FLAG_MOD');
585: FND_MSG_PUB.ADD;
586: RAISE FND_API.G_EXC_ERROR;
587:
588: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
589: fnd_log.string

Line 610: FND_MSG_PUB.ADD;

606: IF (l_cost_price_rec.outside_party_flag = 'Y' AND l_cost_price_rec.price_list_name IS NULL)
607: THEN
608:
609: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_PRICE_LIST_MAND');
610: FND_MSG_PUB.ADD;
611: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
612: fnd_log.string
613: (
614: fnd_log.level_error,

Line 643: FND_MSG_PUB.ADD;

639: END IF;
640: ELSIF(l_cost_price_rec.outside_party_flag = 'N' AND l_cost_price_rec.price_list_name IS NOT NULL)THEN
641: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_OSP_VISIT_PR_LIST');
642: -- Please select check box 'Visit for outside party' or remove price list from LOV.
643: FND_MSG_PUB.ADD;
644: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
645: fnd_log.string
646: (
647: fnd_log.level_error,

Line 678: FND_MSG_PUB.ADD;

674: IF (TRUNC(l_price_list_active_start_date) > TRUNC(l_start_date_time)) OR
675: (TRUNC(l_price_list_active_end_date) < TRUNC(l_start_date_time)) THEN
676:
677: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_PRICE_LIST_INV_STR');
678: FND_MSG_PUB.ADD;
679: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
680: fnd_log.string
681: (
682: fnd_log.level_error,

Line 699: FND_MSG_PUB.ADD;

695: IF (TRUNC(l_price_list_active_start_date) > TRUNC(l_close_date_time)) OR
696: (TRUNC(l_price_list_active_end_date) < TRUNC(l_close_date_time)) THEN
697:
698: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_PRICE_LIST_INV_END');
699: FND_MSG_PUB.ADD;
700: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
701: fnd_log.string
702: (
703: fnd_log.level_error,

Line 721: FND_MSG_PUB.ADD;

717: (TRUNC(l_price_list_active_end_date) < TRUNC(sysdate)) THEN
718:
719: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_PRICE_LIST_INV_SYS');
720: -- CHANGE THIS MESSAGE TEST AND NAME TOO -- IMPORTANT
721: FND_MSG_PUB.ADD;
722: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
723: fnd_log.string
724: (
725: fnd_log.level_error,

Line 808: x_msg_count := FND_MSG_PUB.count_msg;

804:
805: -- Reema End
806:
807: -- Check Error Message stack.
808: x_msg_count := FND_MSG_PUB.count_msg;
809: IF x_msg_count > 0 THEN
810: RAISE FND_API.G_EXC_ERROR;
811: END IF;
812:

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

827: EXCEPTION
828: WHEN FND_API.G_EXC_ERROR THEN
829: x_return_status := FND_API.G_RET_STS_ERROR;
830: ROLLBACK TO update_visit_cost_details;
831: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
832: p_data => x_msg_data,
833: p_encoded => fnd_api.g_false);
834:
835:

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

835:
836: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
837: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
838: ROLLBACK TO update_visit_cost_details;
839: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
840: p_data => x_msg_data,
841: p_encoded => fnd_api.g_false);
842:
843:

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

843:
844: WHEN OTHERS THEN
845: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
846: ROLLBACK TO update_visit_cost_details;
847: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
848: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
849: p_procedure_name => 'update_visit_cost_details',
850: p_error_text => SUBSTR(SQLERRM,1,500));
851: END IF;

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

844: WHEN OTHERS THEN
845: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
846: ROLLBACK TO update_visit_cost_details;
847: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
848: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
849: p_procedure_name => 'update_visit_cost_details',
850: p_error_text => SUBSTR(SQLERRM,1,500));
851: END IF;
852: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

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

848: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
849: p_procedure_name => 'update_visit_cost_details',
850: p_error_text => SUBSTR(SQLERRM,1,500));
851: END IF;
852: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
853: p_data => x_msg_data,
854: p_encoded => fnd_api.g_false);
855: END update_visit_cost_details;
856:

Line 904: FND_MSG_PUB.Initialize;

900:
901: -- Initialize message list if p_init_msg_list is set to TRUE
902:
903: IF FND_API.To_Boolean( p_init_msg_list) THEN
904: FND_MSG_PUB.Initialize;
905: END IF;
906:
907: -- Initialize API return status to success
908: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 947: FND_MSG_PUB.ADD;

943: -- make sure that visit id is present in the input
944:
945: IF(p_x_cost_price_rec.visit_id IS NULL OR p_x_cost_price_rec.visit_id = FND_API.G_MISS_NUM) THEN
946: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INPUT_MISS');
947: FND_MSG_PUB.ADD;
948:
949: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
950: fnd_log.string
951: (

Line 1000: l_msg_count := FND_MSG_PUB.count_msg;

996: END IF;
997:
998: -- Check Error Message stack.
999: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1000: l_msg_count := FND_MSG_PUB.count_msg;
1001: IF l_msg_count > 0 THEN
1002: RAISE FND_API.G_EXC_ERROR;
1003: END IF;
1004: END IF;

Line 1033: x_msg_count := FND_MSG_PUB.count_msg;

1029: RAISE FND_API.G_EXC_ERROR;
1030: END IF;
1031:
1032: -- Check Error Message stack.
1033: x_msg_count := FND_MSG_PUB.count_msg;
1034:
1035: IF x_msg_count > 0 THEN
1036: RAISE FND_API.G_EXC_ERROR;
1037: END IF;

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

1059: WHEN FND_API.G_EXC_ERROR THEN
1060:
1061: x_return_status := FND_API.G_RET_STS_ERROR;
1062: ROLLBACK TO estimate_visit_cost;
1063: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1064: p_data => x_msg_data,
1065: p_encoded => fnd_api.g_false);
1066:
1067: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

1066:
1067: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1068: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1069: ROLLBACK TO estimate_visit_cost;
1070: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1071: p_data => x_msg_data,
1072: p_encoded => fnd_api.g_false);
1073:
1074: WHEN OTHERS THEN

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

1074: WHEN OTHERS THEN
1075: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1076: ROLLBACK TO estimate_visit_cost;
1077:
1078: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1079: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1080: p_procedure_name => 'estimate_visit_cost',
1081: p_error_text => SUBSTR(SQLERRM,1,500));
1082: END IF;

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

1075: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1076: ROLLBACK TO estimate_visit_cost;
1077:
1078: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1079: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1080: p_procedure_name => 'estimate_visit_cost',
1081: p_error_text => SUBSTR(SQLERRM,1,500));
1082: END IF;
1083:

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

1080: p_procedure_name => 'estimate_visit_cost',
1081: p_error_text => SUBSTR(SQLERRM,1,500));
1082: END IF;
1083:
1084: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
1085: p_data => x_msg_data,
1086: p_encoded => fnd_api.g_false);
1087: END estimate_visit_cost;
1088:

Line 1438: FND_MSG_PUB.Initialize;

1434: SAVEPOINT estimate_visit_price;
1435:
1436: -- Initialize message list if p_init_msg_list is set to TRUE
1437: IF FND_API.To_Boolean( p_init_msg_list) THEN
1438: FND_MSG_PUB.Initialize;
1439: END IF;
1440:
1441: -- Initialize API return status to success
1442: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1467: FND_MSG_PUB.ADD;

1463: -- make sure that visit id is present in the input
1464:
1465: IF(p_x_cost_price_rec.visit_id IS NULL OR p_x_cost_price_rec.visit_id = FND_API.G_MISS_NUM) THEN
1466: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INPUT_MISS');
1467: FND_MSG_PUB.ADD;
1468: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1469: fnd_log.string
1470: (
1471: fnd_log.level_exception,

Line 1486: FND_MSG_PUB.ADD;

1482:
1483: IF(visit_info_csr%NOTFOUND)THEN
1484:
1485: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_VISIT');
1486: FND_MSG_PUB.ADD;
1487:
1488: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
1489: fnd_log.string
1490: (

Line 1506: FND_MSG_PUB.ADD;

1502:
1503: -- price estimation valid or not
1504: IF(l_cost_price_rec.outside_party_flag <> 'Y')THEN
1505: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_PR_EST');
1506: FND_MSG_PUB.ADD;
1507:
1508: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1509: fnd_log.string
1510: (

Line 1554: l_msg_count := FND_MSG_PUB.count_msg;

1550: END IF;
1551:
1552: -- Check Error Message stack.
1553: if (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
1554: l_msg_count := FND_MSG_PUB.count_msg;
1555: IF l_msg_count > 0 THEN
1556: RAISE FND_API.G_EXC_ERROR;
1557: END IF;
1558: END IF;

Line 1583: FND_MSG_PUB.ADD;

1579: FETCH customer_id_csr INTO l_cost_price_rec.customer_id;
1580:
1581: IF(customer_id_csr%NOTFOUND)THEN
1582: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INV_SRVREQ_NOCUST');
1583: FND_MSG_PUB.ADD;
1584:
1585: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1586: fnd_log.string
1587: (

Line 1608: FND_MSG_PUB.ADD;

1604:
1605: -- Check if currency value is null
1606: IF l_cost_price_rec.currency IS NULL THEN
1607: FND_MESSAGE.Set_Name(G_PKG_NAME,'AHL_VWP_CST_NO_CURRENCY');
1608: FND_MSG_PUB.ADD;
1609:
1610: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1611: fnd_log.string
1612: (

Line 1627: FND_MSG_PUB.add;

1623: IF (l_visit_rec.price_list_id IS NULL OR
1624: l_visit_rec.price_list_id = FND_API.G_MISS_NUM ) THEN
1625:
1626: FND_MESSAGE.set_name( 'AHL','AHL_VWP_PRICE_LIST_INVALID' );
1627: FND_MSG_PUB.add;
1628:
1629: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
1630: fnd_log.string
1631: (

Line 1709: l_msg_count := FND_MSG_PUB.count_msg;

1705: x_status_meaning => l_job_status_meaning
1706: );
1707:
1708: IF (l_job_status_code is NULL) THEN
1709: l_msg_count := FND_MSG_PUB.count_msg;
1710: IF l_msg_count > 0 THEN
1711: RAISE FND_API.G_EXC_ERROR;
1712: END IF;
1713: END IF;

Line 2046: x_msg_count := FND_MSG_PUB.count_msg;

2042: p_x_cost_price_rec.estimated_price := l_estimated_price;
2043:
2044:
2045: -- Check Error Message stack.
2046: x_msg_count := FND_MSG_PUB.count_msg;
2047:
2048: IF x_msg_count > 0 THEN
2049:
2050: RAISE FND_API.G_EXC_ERROR;

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

2075: x_return_status := FND_API.G_RET_STS_ERROR;
2076:
2077: ROLLBACK TO estimate_visit_price;
2078:
2079: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2080:
2081: p_data => x_msg_data,
2082:
2083: p_encoded => fnd_api.g_false);

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

2088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2089:
2090: ROLLBACK TO estimate_visit_price;
2091:
2092: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2093:
2094: p_data => x_msg_data,
2095:
2096: p_encoded => fnd_api.g_false);

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

2100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2101:
2102: ROLLBACK TO estimate_visit_price;
2103:
2104: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2105:
2106: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2107:
2108: p_procedure_name => 'estimate_visit_price',

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

2102: ROLLBACK TO estimate_visit_price;
2103:
2104: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2105:
2106: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2107:
2108: p_procedure_name => 'estimate_visit_price',
2109:
2110: p_error_text => SUBSTR(SQLERRM,1,500));

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

2110: p_error_text => SUBSTR(SQLERRM,1,500));
2111:
2112: END IF;
2113:
2114: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2115:
2116: p_data => x_msg_data,
2117:
2118: p_encoded => fnd_api.g_false);

Line 2179: FND_MSG_PUB.Initialize;

2175:
2176: -- Initialize message list if p_init_msg_list is set to TRUE
2177:
2178: IF FND_API.To_Boolean( p_init_msg_list) THEN
2179: FND_MSG_PUB.Initialize;
2180: END IF;
2181:
2182: -- Initialize API return status to success
2183:

Line 2208: FND_MSG_PUB.ADD;

2204:
2205: IF(p_visit_id IS NULL OR p_visit_id = FND_API.G_MISS_NUM) THEN
2206:
2207: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INPUT_MISS');
2208: FND_MSG_PUB.ADD;
2209:
2210: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2211: fnd_log.string
2212: (

Line 2232: FND_MSG_PUB.ADD;

2228:
2229: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_SNAP_PRC_MISS');
2230: FND_MESSAGE.Set_Token('VISIT_TASK_NUMBER',other_tasks_rec.visit_task_number);
2231: FND_MESSAGE.Set_Token('VISIT_NUMBER',other_tasks_rec.visit_number);
2232: FND_MSG_PUB.ADD;
2233:
2234: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2235: fnd_log.string
2236: (

Line 2323: x_msg_count := FND_MSG_PUB.count_msg;

2319:
2320:
2321:
2322: -- Check Error Message stack.
2323: x_msg_count := FND_MSG_PUB.count_msg;
2324: IF x_msg_count > 0 THEN
2325: RAISE FND_API.G_EXC_ERROR;
2326: END IF;
2327:

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

2346: x_return_status := FND_API.G_RET_STS_ERROR;
2347:
2348: ROLLBACK TO create_price_snapshot;
2349:
2350: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2351:
2352: p_data => x_msg_data,
2353:
2354: p_encoded => fnd_api.g_false);

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

2358: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2359:
2360: ROLLBACK TO create_price_snapshot;
2361:
2362: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2363:
2364: p_data => x_msg_data,
2365:
2366: p_encoded => fnd_api.g_false);

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

2370: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2371:
2372: ROLLBACK TO create_price_snapshot;
2373:
2374: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2375:
2376: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2377:
2378: p_procedure_name => 'create_price_snapshot',

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

2372: ROLLBACK TO create_price_snapshot;
2373:
2374: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2375:
2376: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2377:
2378: p_procedure_name => 'create_price_snapshot',
2379:
2380: p_error_text => SUBSTR(SQLERRM,1,500));

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

2380: p_error_text => SUBSTR(SQLERRM,1,500));
2381:
2382: END IF;
2383:
2384: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2385:
2386: p_data => x_msg_data,
2387:
2388: p_encoded => fnd_api.g_false);

Line 2458: FND_MSG_PUB.Initialize;

2454: SAVEPOINT create_cost_snapshot;
2455:
2456: -- Initialize message list if p_init_msg_list is set to TRUE
2457: IF FND_API.To_Boolean( p_init_msg_list) THEN
2458: FND_MSG_PUB.Initialize;
2459: END IF;
2460:
2461: -- Initialize API return status to success
2462: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2486: FND_MSG_PUB.ADD;

2482:
2483: -- make sure that visit id is present in the input
2484: IF(p_x_cost_price_rec.visit_id IS NULL OR p_x_cost_price_rec.visit_id = FND_API.G_MISS_NUM) THEN
2485: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_INPUT_MISS');
2486: FND_MSG_PUB.ADD;
2487: IF (fnd_log.level_exception >= fnd_log.g_current_runtime_level)THEN
2488: fnd_log.string
2489: (
2490: fnd_log.level_exception,

Line 2541: FND_MSG_PUB.ADD;

2537: );
2538:
2539: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN
2540: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_CALC_TCOST_ERR');
2541: FND_MSG_PUB.ADD;
2542: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2543: fnd_log.string
2544: (
2545: fnd_log.level_error,

Line 2609: FND_MSG_PUB.ADD;

2605: );
2606:
2607: IF(x_return_status <> FND_API.G_RET_STS_SUCCESS)THEN
2608: FND_MESSAGE.Set_Name(G_APP_NAME,'AHL_VWP_CST_CALC_TCOST_ERR');
2609: FND_MSG_PUB.ADD;
2610: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2611: fnd_log.string
2612: (
2613: fnd_log.level_error,

Line 2662: x_msg_count := FND_MSG_PUB.count_msg;

2658: );
2659: END LOOP;
2660:
2661: -- Check Error Message stack.
2662: x_msg_count := FND_MSG_PUB.count_msg;
2663: IF x_msg_count > 0 THEN
2664: RAISE FND_API.G_EXC_ERROR;
2665: END IF;
2666:

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

2680: EXCEPTION
2681: WHEN FND_API.G_EXC_ERROR THEN
2682: x_return_status := FND_API.G_RET_STS_ERROR;
2683: ROLLBACK TO create_cost_snapshot;
2684: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2685: p_data => x_msg_data,
2686: p_encoded => fnd_api.g_false);
2687:
2688:

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

2688:
2689: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2690: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2691: ROLLBACK TO create_cost_snapshot;
2692: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2693: p_data => x_msg_data,
2694: p_encoded => fnd_api.g_false);
2695:
2696:

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

2696:
2697: WHEN OTHERS THEN
2698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2699: ROLLBACK TO create_cost_snapshot;
2700: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2701: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2702: p_procedure_name => 'create_cost_snapshot',
2703: p_error_text => SUBSTR(SQLERRM,1,500));
2704: END IF;

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

2697: WHEN OTHERS THEN
2698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2699: ROLLBACK TO create_cost_snapshot;
2700: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2701: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2702: p_procedure_name => 'create_cost_snapshot',
2703: p_error_text => SUBSTR(SQLERRM,1,500));
2704: END IF;
2705: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

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

2701: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
2702: p_procedure_name => 'create_cost_snapshot',
2703: p_error_text => SUBSTR(SQLERRM,1,500));
2704: END IF;
2705: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
2706: p_data => x_msg_data,
2707: p_encoded => fnd_api.g_false);
2708: END create_cost_snapshot;
2709:

Line 2823: FND_MSG_PUB.initialize;

2819: END IF;
2820:
2821: IF FND_API.to_boolean(p_init_msg_list)
2822: THEN
2823: FND_MSG_PUB.initialize;
2824: END IF;
2825:
2826: x_return_status:=FND_API.G_RET_STS_SUCCESS;
2827:

Line 2842: FND_MSG_PUB.ADD;

2838: -- Check for Required Parameters
2839: IF(l_cost_price_rec.visit_id IS NULL OR
2840: l_cost_price_rec.visit_id = FND_API.G_MISS_NUM) THEN
2841: FND_MESSAGE.Set_Name('AHL','AHL_VWP_CST_INPUT_MISS');
2842: FND_MSG_PUB.ADD;
2843:
2844: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2845: fnd_log.string
2846: (

Line 2863: Fnd_Msg_Pub.ADD;

2859: Fetch c_visit_csr into l_visit_rec;
2860: If c_visit_csr%notfound
2861: Then
2862: Fnd_Message.SET_NAME('AHL','AHL_VWP_VISIT_INVALID');
2863: Fnd_Msg_Pub.ADD;
2864: Close c_visit_csr;
2865: RAISE FND_API.G_EXC_ERROR;
2866: End if;
2867: Close c_visit_csr;

Line 2912: l_msg_count := FND_MSG_PUB.count_msg;

2908: END IF;
2909:
2910: -- Check Error Message stack.
2911: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
2912: l_msg_count := FND_MSG_PUB.count_msg;
2913: IF l_msg_count > 0 THEN
2914: RAISE FND_API.G_EXC_ERROR;
2915: END IF;
2916: END IF;

Line 2925: FND_MSG_PUB.ADD;

2921:
2922: If l_visit_rec.outside_party_flag ='N'
2923: then
2924: FND_MESSAGE.Set_Name('AHL','AHL_VWP_CST_OUTSDPRTY_FLAG');
2925: FND_MSG_PUB.ADD;
2926: RAISE FND_API.G_EXC_ERROR;
2927: --Display an error message `Visit number visit_number is not an outside party.'
2928: END if;
2929:

Line 2939: FND_MSG_PUB.ADD;

2935: then
2936: l_cost_price_rec.price_list_id :=l_visit_rec.price_list_id;
2937: Else
2938: FND_MESSAGE.Set_Name('AHL','AHL_VWP_CST_PRICELISTIDNULL'); --AHL_VWP_PRICE_LIST_ID_NULL
2939: FND_MSG_PUB.ADD;
2940: RAISE FND_API.G_EXC_ERROR;
2941:
2942: END IF;
2943:

Line 2992: FND_MSG_PUB.ADD;

2988:
2989: -- Error handling
2990: IF l_cost_price_rec.currency IS NULL THEN
2991: FND_MESSAGE.Set_Name(G_PKG_NAME,'AHL_VWP_CST_NO_CURRENCY');
2992: FND_MSG_PUB.ADD;
2993: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level)THEN
2994: fnd_log.string
2995: (
2996: fnd_log.level_error,

Line 3033: l_msg_count := FND_MSG_PUB.count_msg;

3029: x_status_meaning => l_job_status_meaning
3030: );
3031:
3032: IF (l_job_status_code is NULL) THEN
3033: l_msg_count := FND_MSG_PUB.count_msg;
3034: IF l_msg_count > 0 THEN
3035: RAISE FND_API.G_EXC_ERROR;
3036: END IF;
3037: END IF;

Line 3216: l_msg_count := FND_MSG_PUB.count_msg;

3212: CLOSE c_task_csr;
3213:
3214: -- Check Error Message stack.
3215: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
3216: l_msg_count := FND_MSG_PUB.count_msg;
3217: IF l_msg_count > 0 THEN
3218: RAISE FND_API.G_EXC_ERROR;
3219: END IF;
3220: END IF;

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

3245: EXCEPTION
3246: WHEN FND_API.G_EXC_ERROR THEN
3247: x_return_status := FND_API.G_RET_STS_ERROR;
3248: ROLLBACK TO Get_Visit_Items_no_price_PVT;
3249: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
3250: p_data => x_msg_data,
3251: p_encoded => fnd_api.g_false);
3252:
3253: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

3252:
3253: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3254: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3255: ROLLBACK TO Get_Visit_Items_no_price_PVT;
3256: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
3257: p_data => x_msg_data,
3258: p_encoded => fnd_api.g_false);
3259: WHEN OTHERS THEN
3260: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

3258: p_encoded => fnd_api.g_false);
3259: WHEN OTHERS THEN
3260: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3261: ROLLBACK TO Get_Visit_Items_no_price_PVT;
3262: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3263: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
3264: p_procedure_name => l_api_name,
3265: p_error_text => SUBSTR(SQLERRM,1,500));
3266: END IF;

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

3259: WHEN OTHERS THEN
3260: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3261: ROLLBACK TO Get_Visit_Items_no_price_PVT;
3262: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3263: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
3264: p_procedure_name => l_api_name,
3265: p_error_text => SUBSTR(SQLERRM,1,500));
3266: END IF;
3267: FND_MSG_PUB.count_and_get( p_count => x_msg_count,

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

3263: fnd_msg_pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
3264: p_procedure_name => l_api_name,
3265: p_error_text => SUBSTR(SQLERRM,1,500));
3266: END IF;
3267: FND_MSG_PUB.count_and_get( p_count => x_msg_count,
3268: p_data => x_msg_data,
3269: p_encoded => fnd_api.g_false);
3270: END Get_Visit_Items_no_price;
3271: