DBA Data[Home] [Help]

APPS.AHL_LTP_RESRC_LEVL_PVT dependencies on FND_MSG_PUB

Line 402: Fnd_Msg_Pub.Initialize;

398: END IF;
399:
400: -- Initialize message list if p_init_msg_list is set to TRUE
401: IF Fnd_Api.To_Boolean(p_init_msg_list) THEN
402: Fnd_Msg_Pub.Initialize;
403: END IF;
404:
405: -- Initialize API return status to success
406: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

Line 421: Fnd_Msg_Pub.ADD;

417:
418: -- Validate Visit Id
419: IF (p_visit_id IS NULL) THEN
420: Fnd_Message.Set_Name('AHL','AHL_LTP_VISIT_ID_NULL');
421: Fnd_Msg_Pub.ADD;
422: RAISE Fnd_Api.G_EXC_ERROR;
423: ELSE
424: OPEN l_validate_visit_csr(p_visit_id);
425: FETCH l_validate_visit_csr INTO l_junk;

Line 429: Fnd_Msg_Pub.ADD;

425: FETCH l_validate_visit_csr INTO l_junk;
426: IF (l_validate_visit_csr%NOTFOUND) THEN
427: Fnd_Message.Set_Name('AHL','AHL_LTP_VISIT_ID_INVALID');
428: Fnd_Message.Set_Token('VISIT_ID', p_visit_id);
429: Fnd_Msg_Pub.ADD;
430: CLOSE l_validate_visit_csr;
431: RAISE Fnd_Api.G_EXC_ERROR;
432: END IF;
433: CLOSE l_validate_visit_csr;

Line 441: Fnd_Msg_Pub.ADD;

437: IF (p_start_time IS NOT NULL AND p_end_time IS NOT NULL AND p_start_time > p_end_time) THEN
438: Fnd_Message.Set_Name('AHL','AHL_LTP_STIME_GT_ETIME');
439: Fnd_Message.Set_Token('STIME', p_start_time);
440: Fnd_Message.Set_Token('ETIME', p_end_time);
441: Fnd_Msg_Pub.ADD;
442: RAISE Fnd_Api.G_EXC_ERROR;
443: END IF;
444:
445: -- Call helper method to do the actual processing

Line 460: x_msg_count := Fnd_Msg_Pub.count_msg;

456: x_visit_task_times_tbl => x_visit_task_times_tbl);
457:
458: Ahl_Debug_Pub.debug('Completed Processing. Checking for errors', 'LTP:Derive_Visit_Task_Times');
459: -- Check Error Message stack.
460: x_msg_count := Fnd_Msg_Pub.count_msg;
461: IF x_msg_count > 0 THEN
462: RAISE Fnd_Api.G_EXC_ERROR;
463: END IF;
464:

Line 471: Fnd_Msg_Pub.Count_And_Get

467: COMMIT WORK;
468: END IF;
469:
470: -- Standard call to get message count and if count is 1, get message info
471: Fnd_Msg_Pub.Count_And_Get
472: ( p_count => x_msg_count,
473: p_data => x_msg_data,
474: p_encoded => Fnd_Api.g_false
475: );

Line 485: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

481: EXCEPTION
482: WHEN Fnd_Api.G_EXC_ERROR THEN
483: ROLLBACK TO Derive_Visit_Task_Times_pvt;
484: x_return_status := Fnd_Api.G_RET_STS_ERROR;
485: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
486: p_data => x_msg_data,
487: p_encoded => Fnd_Api.g_false);
488: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
489:

Line 494: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

490:
491: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
492: ROLLBACK TO Derive_Visit_Task_Times_pvt;
493: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
494: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
495: p_data => x_msg_data,
496: p_encoded => Fnd_Api.g_false);
497: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
498:

Line 502: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN

498:
499: WHEN OTHERS THEN
500: ROLLBACK TO Derive_Visit_Task_Times_pvt;
501: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
502: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
503: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
504: p_procedure_name => 'Derive_Visit_Task_Times',
505: p_error_text => SUBSTR(SQLERRM,1,240));
506: END IF;

Line 503: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

499: WHEN OTHERS THEN
500: ROLLBACK TO Derive_Visit_Task_Times_pvt;
501: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
502: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
503: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
504: p_procedure_name => 'Derive_Visit_Task_Times',
505: p_error_text => SUBSTR(SQLERRM,1,240));
506: END IF;
507: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

Line 507: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

503: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
504: p_procedure_name => 'Derive_Visit_Task_Times',
505: p_error_text => SUBSTR(SQLERRM,1,240));
506: END IF;
507: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
508: p_data => x_msg_data,
509: p_encoded => Fnd_Api.g_false);
510: --AHL_UTIL_PKG.Err_Mesg_To_Table(x_err_mesg_tbl);
511:

Line 617: Fnd_Msg_Pub.Initialize;

613: END IF;
614:
615: -- Initialize message list if p_init_msg_list is set to TRUE
616: IF Fnd_Api.To_Boolean(p_init_msg_list) THEN
617: Fnd_Msg_Pub.Initialize;
618: END IF;
619:
620: -- Initialize API return status to success
621: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

Line 636: Fnd_Msg_Pub.ADD;

632: FETCH l_dept_id_csr INTO l_dept_id;
633: IF (l_dept_id_csr%NOTFOUND) THEN
634: Fnd_Message.Set_Name('AHL','AHL_LTP_DEPT_INVALID');
635: Fnd_Message.Set_Token('DEPT', p_dept_name);
636: Fnd_Msg_Pub.ADD;
637: CLOSE l_dept_id_csr;
638: RAISE Fnd_Api.G_EXC_ERROR;
639: END IF;
640: CLOSE l_dept_id_csr;

Line 646: Fnd_Msg_Pub.ADD;

642: ELSE
643: -- Validate Dept Id
644: IF (p_dept_id IS NULL) THEN
645: Fnd_Message.Set_Name('AHL','AHL_LTP_DEPT_NULL');
646: Fnd_Msg_Pub.ADD;
647: RAISE Fnd_Api.G_EXC_ERROR;
648: ELSE
649: OPEN l_validate_dept_csr(p_dept_id);
650: FETCH l_validate_dept_csr INTO l_junk;

Line 654: Fnd_Msg_Pub.ADD;

650: FETCH l_validate_dept_csr INTO l_junk;
651: IF (l_validate_dept_csr%NOTFOUND) THEN
652: Fnd_Message.Set_Name('AHL','AHL_LTP_DEPT_ID_INVALID');
653: Fnd_Message.Set_Token('DEPT', p_dept_id);
654: Fnd_Msg_Pub.ADD;
655: CLOSE l_validate_dept_csr;
656: RAISE Fnd_Api.G_EXC_ERROR;
657: END IF;
658: CLOSE l_validate_dept_csr;

Line 667: Fnd_Msg_Pub.ADD;

663:
664: -- Validate Plan Id
665: IF (p_plan_id IS NULL) THEN
666: Fnd_Message.Set_Name('AHL','AHL_LTP_PLAN_ID_NULL');
667: Fnd_Msg_Pub.ADD;
668: RAISE Fnd_Api.G_EXC_ERROR;
669: ELSE
670: OPEN l_validate_plan_csr(p_plan_id);
671: FETCH l_validate_plan_csr INTO l_junk;

Line 675: Fnd_Msg_Pub.ADD;

671: FETCH l_validate_plan_csr INTO l_junk;
672: IF (l_validate_plan_csr%NOTFOUND) THEN
673: Fnd_Message.Set_Name('AHL','AHL_LTP_PLAN_ID_INVALID');
674: Fnd_Message.Set_Token('PLAN', p_plan_id);
675: Fnd_Msg_Pub.ADD;
676: CLOSE l_validate_plan_csr;
677: RAISE Fnd_Api.G_EXC_ERROR;
678: END IF;
679: CLOSE l_validate_plan_csr;

Line 688: Fnd_Msg_Pub.ADD;

684: IF (p_start_time IS NOT NULL AND p_end_time IS NOT NULL AND p_start_time > p_end_time) THEN
685: Fnd_Message.Set_Name('AHL','AHL_LTP_STIME_GT_ETIME');
686: Fnd_Message.Set_Token('STIME', p_start_time);
687: Fnd_Message.Set_Token('ETIME', p_end_time);
688: Fnd_Msg_Pub.ADD;
689: RAISE Fnd_Api.G_EXC_ERROR;
690: END IF;
691:
692: -- dbms_output.put_line('Completed Mapping. Calling Get_Plan_Tasks');

Line 725: x_msg_count := Fnd_Msg_Pub.count_msg;

721: x_plan_rsrc_tbl := l_temp_rsrc_tbl;
722:
723: Ahl_Debug_Pub.debug('Completed Processing. Checking for errors', 'LTP');
724: -- Check Error Message stack.
725: x_msg_count := Fnd_Msg_Pub.count_msg;
726: IF x_msg_count > 0 THEN
727: RAISE Fnd_Api.G_EXC_ERROR;
728: END IF;
729:

Line 736: Fnd_Msg_Pub.Count_And_Get

732: COMMIT WORK;
733: END IF;
734:
735: -- Standard call to get message count and if count is 1, get message info
736: Fnd_Msg_Pub.Count_And_Get
737: ( p_count => x_msg_count,
738: p_data => x_msg_data,
739: p_encoded => Fnd_Api.g_false
740: );

Line 749: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

745: EXCEPTION
746: WHEN Fnd_Api.G_EXC_ERROR THEN
747: ROLLBACK TO Get_Plan_Resources_pvt;
748: x_return_status := Fnd_Api.G_RET_STS_ERROR;
749: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
750: p_data => x_msg_data,
751: p_encoded => Fnd_Api.g_false);
752:
753: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

Line 756: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

752:
753: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
754: ROLLBACK TO Get_Plan_Resources_pvt;
755: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
756: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
757: p_data => x_msg_data,
758: p_encoded => Fnd_Api.g_false);
759:
760: WHEN OTHERS THEN

Line 763: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN

759:
760: WHEN OTHERS THEN
761: ROLLBACK TO Get_Plan_Resources_pvt;
762: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
763: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
764: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
765: p_procedure_name => 'Get_Plan_Resources',
766: p_error_text => SUBSTR(SQLERRM,1,240));
767: END IF;

Line 764: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

760: WHEN OTHERS THEN
761: ROLLBACK TO Get_Plan_Resources_pvt;
762: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
763: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
764: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
765: p_procedure_name => 'Get_Plan_Resources',
766: p_error_text => SUBSTR(SQLERRM,1,240));
767: END IF;
768: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

Line 768: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

764: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
765: p_procedure_name => 'Get_Plan_Resources',
766: p_error_text => SUBSTR(SQLERRM,1,240));
767: END IF;
768: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
769: p_data => x_msg_data,
770: p_encoded => Fnd_Api.g_false);
771:
772: END Get_Plan_Resources;

Line 943: Fnd_Msg_Pub.Initialize;

939: END IF;
940:
941: -- Initialize message list if p_init_msg_list is set to TRUE
942: IF Fnd_Api.To_Boolean(p_init_msg_list) THEN
943: Fnd_Msg_Pub.Initialize;
944: END IF;
945:
946: -- Initialize API return status to success
947: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

Line 1005: Fnd_Msg_Pub.ADD;

1001: END IF;
1002:
1003: IF (p_org_name IS NULL) THEN
1004: Fnd_Message.Set_Name('AHL','AHL_LTP_ORG_MAN_JSP');
1005: Fnd_Msg_Pub.ADD;
1006: RAISE Fnd_Api.G_EXC_ERROR;
1007: END IF;
1008:
1009: IF (p_start_time IS NULL) THEN

Line 1011: Fnd_Msg_Pub.ADD;

1007: END IF;
1008:
1009: IF (p_start_time IS NULL) THEN
1010: Fnd_Message.Set_Name('AHL','AHL_LTP_STARTDATE_MAN_JSP');
1011: Fnd_Msg_Pub.ADD;
1012: RAISE Fnd_Api.G_EXC_ERROR;
1013: END IF;
1014:
1015: IF (p_end_time IS NULL) THEN

Line 1017: Fnd_Msg_Pub.ADD;

1013: END IF;
1014:
1015: IF (p_end_time IS NULL) THEN
1016: Fnd_Message.Set_Name('AHL','AHL_LTP_ENDDATE_MAN_JSP');
1017: Fnd_Msg_Pub.ADD;
1018: RAISE Fnd_Api.G_EXC_ERROR;
1019: END IF;
1020:
1021: IF (TRUNC(p_start_time) < TRUNC(SYSDATE) ) THEN

Line 1023: Fnd_Msg_Pub.ADD;

1019: END IF;
1020:
1021: IF (TRUNC(p_start_time) < TRUNC(SYSDATE) ) THEN
1022: Fnd_Message.Set_Name('AHL','AHL_LTP_INVALID_START_DATE');
1023: Fnd_Msg_Pub.ADD;
1024: RAISE Fnd_Api.G_EXC_ERROR;
1025: END IF;
1026:
1027: IF (TRUNC(p_end_time) < TRUNC(SYSDATE) ) THEN

Line 1029: Fnd_Msg_Pub.ADD;

1025: END IF;
1026:
1027: IF (TRUNC(p_end_time) < TRUNC(SYSDATE) ) THEN
1028: Fnd_Message.Set_Name('AHL','AHL_LTP_INVALID_END_DATE');
1029: Fnd_Msg_Pub.ADD;
1030: RAISE Fnd_Api.G_EXC_ERROR;
1031: END IF;
1032: -- yazhou 24Aug2005 ends
1033:

Line 1043: Fnd_Msg_Pub.ADD;

1039: FETCH l_validate_org_csr INTO l_name;
1040: IF (l_validate_org_csr%NOTFOUND) THEN
1041: Fnd_Message.Set_Name('AHL','AHL_LTP_ORG_ID_INVALID');
1042: Fnd_Message.Set_Token('ORG', p_org_name);
1043: Fnd_Msg_Pub.ADD;
1044: CLOSE l_validate_org_csr;
1045: RAISE Fnd_Api.G_EXC_ERROR;
1046: END IF;
1047: --

Line 1055: Fnd_Msg_Pub.ADD;

1051: FETCH l_dept_id_csr INTO l_deprt_id,l_orga_id, l_department_name;
1052: IF (l_dept_id_csr%NOTFOUND) THEN
1053: Fnd_Message.Set_Name('AHL','AHL_LTP_DEPT_INV_OR_NO_SFT');
1054: Fnd_Message.Set_Token('DEPT', p_dept_name);
1055: Fnd_Msg_Pub.ADD;
1056: CLOSE l_dept_id_csr;
1057: RAISE Fnd_Api.G_EXC_ERROR;
1058: END IF;
1059: CLOSE l_dept_id_csr;

Line 1075: Fnd_Msg_Pub.ADD;

1071: FETCH l_validate_dept_csr INTO l_dept_name;
1072: IF (l_validate_dept_csr%NOTFOUND) THEN
1073: Fnd_Message.Set_Name('AHL','AHL_LTP_DEPT_INV_OR_NO_SFT');
1074: Fnd_Message.Set_Token('DEPT', p_dept_id);
1075: Fnd_Msg_Pub.ADD;
1076: CLOSE l_validate_dept_csr;
1077: RAISE Fnd_Api.G_EXC_ERROR;
1078: END IF;
1079: END IF;

Line 1092: Fnd_Msg_Pub.ADD;

1088:
1089: -- Validate Plan Id
1090: IF (p_plan_id IS NULL) THEN
1091: Fnd_Message.Set_Name('AHL','AHL_LTP_PLAN_ID_NULL');
1092: Fnd_Msg_Pub.ADD;
1093: RAISE Fnd_Api.G_EXC_ERROR;
1094: ELSE
1095: OPEN l_validate_plan_csr(p_plan_id);
1096: FETCH l_validate_plan_csr INTO l_junk;

Line 1100: Fnd_Msg_Pub.ADD;

1096: FETCH l_validate_plan_csr INTO l_junk;
1097: IF (l_validate_plan_csr%NOTFOUND) THEN
1098: Fnd_Message.Set_Name('AHL','AHL_LTP_PLAN_ID_INVALID');
1099: Fnd_Message.Set_Token('PLAN', p_plan_id);
1100: Fnd_Msg_Pub.ADD;
1101: CLOSE l_validate_plan_csr;
1102: RAISE Fnd_Api.G_EXC_ERROR;
1103: END IF;
1104: CLOSE l_validate_plan_csr;

Line 1115: Fnd_Msg_Pub.ADD;

1111: IF (p_start_time IS NOT NULL AND p_end_time IS NOT NULL AND p_start_time > p_end_time) THEN
1112: Fnd_Message.Set_Name('AHL','AHL_LTP_STIME_GT_ETIME');
1113: Fnd_Message.Set_Token('STIME', p_start_time);
1114: Fnd_Message.Set_Token('ETIME', p_end_time);
1115: Fnd_Msg_Pub.ADD;
1116: RAISE Fnd_Api.G_EXC_ERROR;
1117: END IF;
1118:
1119: -- yazhou 24Aug2005 ends

Line 1424: x_msg_count := Fnd_Msg_Pub.count_msg;

1420: END LOOP; --dept id
1421:
1422: -- Check Error Message stack.
1423:
1424: x_msg_count := Fnd_Msg_Pub.count_msg;
1425: IF x_msg_count > 0 THEN
1426: RAISE Fnd_Api.G_EXC_ERROR;
1427: END IF;
1428:

Line 1436: Fnd_Msg_Pub.Count_And_Get

1432: COMMIT WORK;
1433: END IF;
1434:
1435: -- Standard call to get message count and if count is 1, get message info
1436: Fnd_Msg_Pub.Count_And_Get
1437: ( p_count => x_msg_count,
1438: p_data => x_msg_data,
1439: p_encoded => Fnd_Api.g_false
1440: );

Line 1449: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

1445: EXCEPTION
1446: WHEN Fnd_Api.G_EXC_ERROR THEN
1447: ROLLBACK TO Get_Rsrc_Req_By_Period_pvt;
1448: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1449: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
1450: p_data => x_msg_data,
1451: p_encoded => Fnd_Api.g_false);
1452:
1453: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

Line 1456: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

1452:
1453: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1454: ROLLBACK TO Get_Rsrc_Req_By_Period_pvt;
1455: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1456: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
1457: p_data => x_msg_data,
1458: p_encoded => Fnd_Api.g_false);
1459:
1460: WHEN OTHERS THEN

Line 1463: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN

1459:
1460: WHEN OTHERS THEN
1461: ROLLBACK TO Get_Rsrc_Req_By_Period_pvt;
1462: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1463: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
1464: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1465: p_procedure_name => 'Get_Rsrc_Req_By_Period',
1466: p_error_text => SUBSTR(SQLERRM,1,240));
1467: END IF;

Line 1464: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

1460: WHEN OTHERS THEN
1461: ROLLBACK TO Get_Rsrc_Req_By_Period_pvt;
1462: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1463: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
1464: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1465: p_procedure_name => 'Get_Rsrc_Req_By_Period',
1466: p_error_text => SUBSTR(SQLERRM,1,240));
1467: END IF;
1468: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

Line 1468: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

1464: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1465: p_procedure_name => 'Get_Rsrc_Req_By_Period',
1466: p_error_text => SUBSTR(SQLERRM,1,240));
1467: END IF;
1468: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
1469: p_data => x_msg_data,
1470: p_encoded => Fnd_Api.g_false);
1471:
1472: END Get_Rsrc_Req_By_Period;

Line 1593: Fnd_Msg_Pub.Initialize;

1589: END IF;
1590:
1591: -- Initialize message list if p_init_msg_list is set to TRUE
1592: IF Fnd_Api.To_Boolean(p_init_msg_list) THEN
1593: Fnd_Msg_Pub.Initialize;
1594: END IF;
1595:
1596: -- Initialize API return status to success
1597: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

Line 1612: Fnd_Msg_Pub.ADD;

1608: FETCH l_dept_id_csr INTO l_dept_id,l_org_id;
1609: IF (l_dept_id_csr%NOTFOUND) THEN
1610: Fnd_Message.Set_Name('AHL','AHL_LTP_DEPT_INV_OR_NO_SFT');
1611: Fnd_Message.Set_Token('DEPT', p_dept_name);
1612: Fnd_Msg_Pub.ADD;
1613: CLOSE l_dept_id_csr;
1614: RAISE Fnd_Api.G_EXC_ERROR;
1615: END IF;
1616: CLOSE l_dept_id_csr;

Line 1622: Fnd_Msg_Pub.ADD;

1618: ELSE
1619: -- Validate Dept Id
1620: IF (p_dept_id IS NULL) THEN
1621: Fnd_Message.Set_Name('AHL','AHL_LTP_DEPT_NULL');
1622: Fnd_Msg_Pub.ADD;
1623: RAISE Fnd_Api.G_EXC_ERROR;
1624: ELSE
1625: OPEN l_validate_dept_csr(p_dept_id);
1626: FETCH l_validate_dept_csr INTO l_junk;

Line 1630: Fnd_Msg_Pub.ADD;

1626: FETCH l_validate_dept_csr INTO l_junk;
1627: IF (l_validate_dept_csr%NOTFOUND) THEN
1628: Fnd_Message.Set_Name('AHL','AHL_LTP_DEPT_INV_OR_NO_SFT');
1629: Fnd_Message.Set_Token('DEPT', p_dept_id);
1630: Fnd_Msg_Pub.ADD;
1631: CLOSE l_validate_dept_csr;
1632: RAISE Fnd_Api.G_EXC_ERROR;
1633: END IF;
1634: CLOSE l_validate_dept_csr;

Line 1643: Fnd_Msg_Pub.ADD;

1639:
1640: -- Validate Plan Id
1641: IF (p_plan_id IS NULL) THEN
1642: Fnd_Message.Set_Name('AHL','AHL_LTP_PLAN_ID_NULL');
1643: Fnd_Msg_Pub.ADD;
1644: RAISE Fnd_Api.G_EXC_ERROR;
1645: ELSE
1646: OPEN l_validate_plan_csr(p_plan_id);
1647: FETCH l_validate_plan_csr INTO l_junk;

Line 1651: Fnd_Msg_Pub.ADD;

1647: FETCH l_validate_plan_csr INTO l_junk;
1648: IF (l_validate_plan_csr%NOTFOUND) THEN
1649: Fnd_Message.Set_Name('AHL','AHL_LTP_PLAN_ID_INVALID');
1650: Fnd_Message.Set_Token('PLAN', p_plan_id);
1651: Fnd_Msg_Pub.ADD;
1652: CLOSE l_validate_plan_csr;
1653: RAISE Fnd_Api.G_EXC_ERROR;
1654: END IF;
1655: CLOSE l_validate_plan_csr;

Line 1664: Fnd_Msg_Pub.ADD;

1660: IF (p_start_time IS NOT NULL AND p_end_time IS NOT NULL AND p_start_time > p_end_time) THEN
1661: Fnd_Message.Set_Name('AHL','AHL_LTP_STIME_GT_ETIME');
1662: Fnd_Message.Set_Token('STIME', p_start_time);
1663: Fnd_Message.Set_Token('ETIME', p_end_time);
1664: Fnd_Msg_Pub.ADD;
1665: RAISE Fnd_Api.G_EXC_ERROR;
1666: END IF;
1667:
1668: -- dbms_output.put_line('Completed Mapping. Calling Get_Plan_Tasks');

Line 1714: x_msg_count := Fnd_Msg_Pub.count_msg;

1710:
1711: -- dbms_output.put_line('x_task_req_tbl.COUNT = ' || x_task_req_tbl.COUNT);
1712: Ahl_Debug_Pub.debug('Completed Processing. Checking FOR errors', 'LTP');
1713: -- Check Error Message stack.
1714: x_msg_count := Fnd_Msg_Pub.count_msg;
1715: IF x_msg_count > 0 THEN
1716: RAISE Fnd_Api.G_EXC_ERROR;
1717: END IF;
1718:

Line 1725: Fnd_Msg_Pub.Count_And_Get

1721: COMMIT WORK;
1722: END IF;
1723:
1724: -- Standard call to get message count and if count is 1, get message info
1725: Fnd_Msg_Pub.Count_And_Get
1726: ( p_count => x_msg_count,
1727: p_data => x_msg_data,
1728: p_encoded => Fnd_Api.g_false
1729: );

Line 1738: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

1734: EXCEPTION
1735: WHEN Fnd_Api.G_EXC_ERROR THEN
1736: ROLLBACK TO Get_Task_Requirements_pvt;
1737: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1738: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
1739: p_data => x_msg_data,
1740: p_encoded => Fnd_Api.g_false);
1741:
1742: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

Line 1745: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

1741:
1742: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1743: ROLLBACK TO Get_Task_Requirements_pvt;
1744: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1745: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
1746: p_data => x_msg_data,
1747: p_encoded => Fnd_Api.g_false);
1748:
1749: WHEN OTHERS THEN

Line 1752: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN

1748:
1749: WHEN OTHERS THEN
1750: ROLLBACK TO Get_Task_Requirements_pvt;
1751: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1752: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
1753: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1754: p_procedure_name => 'Get_Task_Requirements',
1755: p_error_text => SUBSTR(SQLERRM,1,240));
1756: END IF;

Line 1753: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,

1749: WHEN OTHERS THEN
1750: ROLLBACK TO Get_Task_Requirements_pvt;
1751: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1752: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR) THEN
1753: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1754: p_procedure_name => 'Get_Task_Requirements',
1755: p_error_text => SUBSTR(SQLERRM,1,240));
1756: END IF;
1757: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

Line 1757: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

1753: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => G_PKG_NAME,
1754: p_procedure_name => 'Get_Task_Requirements',
1755: p_error_text => SUBSTR(SQLERRM,1,240));
1756: END IF;
1757: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
1758: p_data => x_msg_data,
1759: p_encoded => Fnd_Api.g_false);
1760:
1761: END Get_Task_Requirements;

Line 2252: Fnd_Msg_Pub.ADD;

2248: -- yazhou 24Aug2005 ends
2249:
2250: IF(l_visit_details_csr%NOTFOUND) THEN
2251: Fnd_Message.Set_Name('AHL','AHL_LTP_VISIT_ID_NULL');
2252: Fnd_Msg_Pub.ADD;
2253: CLOSE l_visit_details_csr;
2254: Ahl_Debug_Pub.debug('Invalid visit Id', 'LTP: Derive_Visit_Task_Times');
2255: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2256: END IF;

Line 2438: Fnd_Msg_Pub.ADD;

2434: FETCH l_get_route_csr INTO l_mr_route_id,l_route_id;
2435: IF l_get_route_csr%NOTFOUND OR l_route_id IS NULL THEN
2436: Fnd_Message.Set_Name('AHL','AHL_LTP_NO_ROUTE_FOR_TASK');
2437: Fnd_Message.Set_Token('TASK_ID', p_task_id);
2438: Fnd_Msg_Pub.ADD;
2439: CLOSE l_get_route_csr;
2440: RETURN;
2441: END IF;
2442: CLOSE l_get_route_csr;

Line 2449: Fnd_Msg_Pub.ADD;

2445: FETCH l_get_dept_csr INTO l_vtdept_id,l_vdept_id,l_org_id;
2446: IF l_get_dept_csr%NOTFOUND THEN
2447: Fnd_Message.Set_Name('AHL','AHL_LTP_NO_DEPT_FOR_TASK');
2448: Fnd_Message.Set_Token('TASK_ID', p_task_id);
2449: Fnd_Msg_Pub.ADD;
2450: CLOSE l_get_dept_csr;
2451: RETURN;
2452: END IF;
2453: l_dept_id := NVL(l_vtdept_id,l_vdept_id);

Line 2474: Fnd_Msg_Pub.ADD;

2470: OPEN l_get_bom_resources_csr(l_rt_resource_rec.ASO_RESOURCE_ID,l_org_id);
2471: FETCH l_get_bom_resources_csr INTO l_bom_resource_id;
2472: IF l_get_bom_resources_csr%NOTFOUND THEN
2473: Fnd_Message.Set_Name('AHL','AHL_LTP_NO_BOM_RESRC_ID');
2474: Fnd_Msg_Pub.ADD;
2475: CLOSE l_get_bom_resources_csr;
2476: RAISE Fnd_Api.G_EXC_ERROR;
2477: -- RETURN;
2478: END IF;

Line 2522: Fnd_Msg_Pub.ADD;

2518: Ahl_Debug_Pub.debug('OPERATION LEVEL, bom resource id oper = ' || l_bom_resource_id);
2519:
2520: IF l_get_bom_resources_csr%NOTFOUND THEN
2521: Fnd_Message.Set_Name('AHL','AHL_LTP_NO_BOM_RESRC_ID');
2522: Fnd_Msg_Pub.ADD;
2523: CLOSE l_get_bom_resources_csr;
2524: RAISE Fnd_Api.G_EXC_ERROR;
2525: -- RETURN;
2526: END IF;

Line 2623: Fnd_Msg_Pub.ADD;

2619:
2620: IF (l_get_bom_rsrc_dtls_csr%NOTFOUND) THEN
2621: Fnd_Message.Set_Name('AHL','AHL_LTP_BOM_RSRC_ID_INVALID');
2622: Fnd_Message.Set_Token('ASO_RSRC_ID', p_bom_resource_id);
2623: Fnd_Msg_Pub.ADD;
2624: CLOSE l_get_bom_rsrc_dtls_csr;
2625: RAISE Fnd_Api.G_EXC_ERROR;
2626: END IF;
2627: -- Check for shift capacity

Line 2715: Fnd_Msg_Pub.ADD;

2711:
2712: IF (l_get_bom_rsrc_dtls_csr%NOTFOUND) THEN
2713: Fnd_Message.Set_Name('AHL','AHL_LTP_BOM_RSRC_ID_INVALID');
2714: Fnd_Message.Set_Token('ASO_RSRC_ID', p_aso_resource_id);
2715: Fnd_Msg_Pub.ADD;
2716: CLOSE l_get_bom_rsrc_dtls_csr;
2717: RAISE Fnd_Api.G_EXC_ERROR;
2718: END IF;
2719:

Line 3187: FND_MSG_PUB.ADD;

3183:
3184: IF (p_resource_id IS NULL) THEN
3185: -- Error
3186: FND_MESSAGE.Set_Name('AHL','AHL_LTP_RSRC_ID_NULL');
3187: FND_MSG_PUB.ADD;
3188: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3189: END IF;
3190:
3191: IF (l_log_statement >= l_log_current_level) THEN

Line 3327: Fnd_Msg_Pub.ADD;

3323: BEGIN
3324: IF (p_resource_id IS NULL) THEN
3325: -- Error
3326: Fnd_Message.Set_Name('AHL','AHL_LTP_RSRC_ID_NULL');
3327: Fnd_Msg_Pub.ADD;
3328: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3329: END IF;
3330:
3331: IF (p_aso_bom_type = G_ASO_RESOURCE) THEN

Line 3357: Fnd_Msg_Pub.ADD;

3353: ELSE
3354: -- Error
3355: Fnd_Message.Set_Name('AHL','AHL_LTP_RSRC_TYPE_INVALID');
3356: Fnd_Message.Set_Token('RSRC_TYPE', p_aso_bom_type);
3357: Fnd_Msg_Pub.ADD;
3358: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3359: END IF;
3360: -- Assign Local table to Output Parameter
3361: p_x_tp_dtls_tbl := l_temp_table;

Line 3452: Fnd_Msg_Pub.ADD;

3448: FETCH l_dept_shift_csr INTO L_CALENDAR_CODE, L_SHIFT_NUM;
3449: IF (l_dept_shift_csr%NOTFOUND) THEN
3450: Fnd_Message.Set_Name('AHL','AHL_LTP_NO_SHIFT_FOR_DEPT');
3451: Fnd_Message.Set_Token('DEPT_ID', l_dept_name);
3452: Fnd_Msg_Pub.ADD;
3453: CLOSE l_dept_shift_csr;
3454: Ahl_Debug_Pub.debug('No shift/calendar code for department: ' || p_dept_id, 'LTP: Create_Time_Periods');
3455: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3456: END IF;

Line 3467: Fnd_Msg_Pub.ADD;

3463: FETCH l_calendar_csr INTO L_CAL_START, L_CAL_END;
3464: IF (l_calendar_csr%NOTFOUND) THEN
3465: Fnd_Message.Set_Name('AHL','AHL_LTP_CAL_CODE_INVALID');
3466: Fnd_Message.Set_Token('CAL_CODE', L_CALENDAR_CODE);
3467: Fnd_Msg_Pub.ADD;
3468: CLOSE l_calendar_csr;
3469: Ahl_Debug_Pub.debug('No BOM_CALENDARS entry for calendar code: ' || L_CALENDAR_CODE, 'LTP: Create_Time_Periods');
3470: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3471: END IF;

Line 3485: Fnd_Msg_Pub.ADD;

3481: FETCH l_workday_pattern_csr INTO L_DAYS_ON, L_DAYS_OFF;
3482: IF (l_workday_pattern_csr%NOTFOUND) THEN
3483: Fnd_Message.Set_Name('AHL','AHL_LTP_NO_PTRN_FOR_DEPT');
3484: Fnd_Message.Set_Token('DEPT_ID', l_dept_name);
3485: Fnd_Msg_Pub.ADD;
3486: CLOSE l_workday_pattern_csr;
3487: Ahl_Debug_Pub.debug('No Work Day Pattern for department: ' || p_dept_id, 'LTP: Create_Time_Periods');
3488: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3489: END IF;

Line 3501: Fnd_Msg_Pub.ADD;

3497: FETCH l_shift_times_csr INTO L_SHIFT_START, L_SHIFT_END;
3498: IF (l_shift_times_csr%NOTFOUND) THEN
3499: Fnd_Message.Set_Name('AHL','AHL_LTP_NO_SHIFT_FOR_DEPT');
3500: Fnd_Message.Set_Token('DEPT_ID', l_dept_name);
3501: Fnd_Msg_Pub.ADD;
3502: CLOSE l_shift_times_csr;
3503: Ahl_Debug_Pub.debug('No shift start and end times for department: ' || p_dept_id, 'LTP: Create_Time_Periods');
3504: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3505: END IF;

Line 3526: Fnd_Msg_Pub.ADD;

3522: -- dbms_output.put_line('Not a holiday');
3523: -- Working Day: Check if day is in calendar range
3524: IF(l_temp_start > L_CAL_END) THEN
3525: Fnd_Message.Set_Name('AHL','AHL_LTP_INSUFFICIENT_CAL_RANGE');
3526: Fnd_Msg_Pub.ADD;
3527: Ahl_Debug_Pub.debug('Computed date (' || l_temp_start|| ') is outside calendar range', 'LTP: Init_Time_Vars');
3528: RAISE Fnd_Api.G_EXC_ERROR;
3529: END IF;
3530: l_working_day := TRUE;

Line 3573: Fnd_Msg_Pub.ADD;

3569: -- dbms_output.put_line('Not a holiday');
3570: -- Working Day: Check if day is in calendar range
3571: IF(l_temp_start > L_CAL_END) THEN
3572: Fnd_Message.Set_Name('AHL','AHL_LTP_INSUFFICIENT_CAL_RANGE');
3573: Fnd_Msg_Pub.ADD;
3574: Ahl_Debug_Pub.debug('Computed date (' || l_temp_start || ') is outside calendar range', 'LTP: Init_Time_Vars');
3575: RAISE Fnd_Api.G_EXC_ERROR;
3576: END IF;
3577: x_per_rsrc_tbl(l_temp_index).PERIOD_START := trunc(l_temp_start);

Line 3638: Fnd_Msg_Pub.ADD;

3634: ELSE
3635: -- Invalid UOM Code
3636: Fnd_Message.Set_Name('AHL','AHL_LTP_UOM_CODE_INVALID');
3637: Fnd_Message.Set_Token('UOM_CODE', p_UOM_code);
3638: Fnd_Msg_Pub.ADD;
3639: RAISE Fnd_Api.G_EXC_ERROR;
3640: END IF;
3641: -- Ensure that the end time of the last period does not exceed user given end time
3642: IF (l_temp_index > 1 AND (x_per_rsrc_tbl(l_temp_index - 1).PERIOD_END > l_temp_end)) THEN

Line 3812: Fnd_Msg_Pub.ADD;

3808: FETCH l_get_visit_name_csr INTO l_prev_visit_name, l_prev_visit_number;
3809: IF (l_get_visit_name_csr%NOTFOUND) THEN
3810: Fnd_Message.Set_Name('AHL','AHL_LTP_VISIT_ID_INVALID');
3811: Fnd_Message.Set_Token('VISIT_ID', l_visit_id);
3812: Fnd_Msg_Pub.ADD;
3813: CLOSE l_get_visit_name_csr;
3814: RAISE Fnd_Api.G_EXC_ERROR;
3815: END IF;
3816: CLOSE l_get_visit_name_csr;

Line 3831: Fnd_Msg_Pub.ADD;

3827: FETCH l_get_task_name_csr INTO l_task_name,l_task_type_code;
3828: IF (l_get_task_name_csr%NOTFOUND) THEN
3829: Fnd_Message.Set_Name('AHL','AHL_LTP_TASK_ID_INVALID');
3830: Fnd_Message.Set_Token('TASK_ID', l_task_id);
3831: Fnd_Msg_Pub.ADD;
3832: CLOSE l_get_task_name_csr;
3833: RAISE Fnd_Api.G_EXC_ERROR;
3834: END IF;
3835: CLOSE l_get_task_name_csr;

Line 3872: Fnd_Msg_Pub.ADD;

3868: FETCH l_get_visit_name_csr INTO l_prev_visit_name, l_prev_visit_number;
3869: IF (l_get_visit_name_csr%NOTFOUND) THEN
3870: Fnd_Message.Set_Name('AHL','AHL_LTP_VISIT_ID_INVALID');
3871: Fnd_Message.Set_Token('VISIT_ID', l_visit_id);
3872: Fnd_Msg_Pub.ADD;
3873: CLOSE l_get_visit_name_csr;
3874: RAISE Fnd_Api.G_EXC_ERROR;
3875: END IF;
3876: CLOSE l_get_visit_name_csr;

Line 3886: Fnd_Msg_Pub.ADD;

3882: FETCH l_get_task_name_csr INTO l_task_name,l_task_type_code;
3883: IF (l_get_task_name_csr%NOTFOUND) THEN
3884: Fnd_Message.Set_Name('AHL','AHL_LTP_TASK_ID_INVALID');
3885: Fnd_Message.Set_Token('TASK_ID', l_task_id);
3886: Fnd_Msg_Pub.ADD;
3887: CLOSE l_get_task_name_csr;
3888: RAISE Fnd_Api.G_EXC_ERROR;
3889: END IF;
3890: CLOSE l_get_task_name_csr;

Line 3939: Fnd_Msg_Pub.ADD;

3935: FETCH l_route_time_span_csr INTO x_duration;
3936: IF (l_route_time_span_csr%NOTFOUND) THEN
3937: Fnd_Message.Set_Name('AHL', 'AHL_LTP_ROUTE_ID_INVALID');
3938: Fnd_Message.Set_Token('ROUTE_ID', p_route_id);
3939: Fnd_Msg_Pub.ADD;
3940: CLOSE l_route_time_span_csr;
3941: Ahl_Debug_Pub.debug('Invalid route Id: ' || x_duration, 'LTP: Get_Route_Duration');
3942: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3943: END IF;

Line 4100: Fnd_Msg_Pub.ADD;

4096: FETCH l_dept_shift_csr INTO G_CALENDAR_CODE, G_SHIFT_NUM;
4097: IF (l_dept_shift_csr%NOTFOUND) THEN
4098: Fnd_Message.Set_Name('AHL','AHL_LTP_NO_SHIFT_FOR_DEPT');
4099: Fnd_Message.Set_Token('DEPT_ID', l_dept_name);
4100: Fnd_Msg_Pub.ADD;
4101: CLOSE l_dept_shift_csr;
4102: Ahl_Debug_Pub.debug('No shift/calendar code for department: ' || p_department_id, 'LTP: Init_Time_Vars');
4103: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
4104: END IF;

Line 4115: Fnd_Msg_Pub.ADD;

4111: FETCH l_calendar_csr INTO G_CAL_START, G_CAL_END;
4112: IF (l_calendar_csr%NOTFOUND) THEN
4113: Fnd_Message.Set_Name('AHL','AHL_LTP_CAL_CODE_INVALID');
4114: Fnd_Message.Set_Token('CAL_CODE', G_CALENDAR_CODE);
4115: Fnd_Msg_Pub.ADD;
4116: CLOSE l_calendar_csr;
4117: Ahl_Debug_Pub.debug('No BOM_CALENDARS entry for calendar code: ' || G_CALENDAR_CODE, 'LTP: Init_Time_Vars');
4118: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
4119: END IF;

Line 4133: Fnd_Msg_Pub.ADD;

4129: FETCH l_shift_times_csr INTO G_SHIFT_START, G_SHIFT_END;
4130: IF (l_shift_times_csr%NOTFOUND) THEN
4131: Fnd_Message.Set_Name('AHL','AHL_LTP_NO_SHIFT_FOR_DEPT');
4132: Fnd_Message.Set_Token('DEPT_ID', l_dept_name);
4133: Fnd_Msg_Pub.ADD;
4134: CLOSE l_shift_times_csr;
4135: Ahl_Debug_Pub.debug('No shift start and end times for department: ' || p_department_id, 'LTP: Init_Time_Vars');
4136: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
4137: END IF;

Line 4154: Fnd_Msg_Pub.ADD;

4150: FETCH l_workday_pattern_csr INTO G_DAYS_ON, G_DAYS_OFF;
4151: IF (l_workday_pattern_csr%NOTFOUND) THEN
4152: Fnd_Message.Set_Name('AHL','AHL_LTP_NO_PTRN_FOR_DEPT');
4153: Fnd_Message.Set_Token('DEPT_ID', l_dept_name);
4154: Fnd_Msg_Pub.ADD;
4155: CLOSE l_workday_pattern_csr;
4156: Ahl_Debug_Pub.debug('No Work Day Pattern for department: ' || p_department_id, 'LTP: Init_Time_Vars');
4157: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
4158: END IF;

Line 4174: Fnd_Msg_Pub.ADD;

4170: CLOSE l_exceptions_csr;
4171:
4172: IF (p_visit_start_date IS NULL) THEN
4173: Fnd_Message.Set_Name('AHL','AHL_LTP_VISIT_ST_DATE_NULL');
4174: Fnd_Msg_Pub.ADD;
4175: Ahl_Debug_Pub.debug('Visit start date is null', 'LTP: Init_Time_Vars');
4176: RAISE Fnd_Api.G_EXC_ERROR;
4177: ELSIF (p_visit_start_date < G_CAL_START OR p_visit_start_date > G_CAL_END) THEN
4178: Fnd_Message.Set_Name('AHL','AHL_LTP_VISIT_ST_DATE_INVALID');

Line 4180: Fnd_Msg_Pub.ADD;

4176: RAISE Fnd_Api.G_EXC_ERROR;
4177: ELSIF (p_visit_start_date < G_CAL_START OR p_visit_start_date > G_CAL_END) THEN
4178: Fnd_Message.Set_Name('AHL','AHL_LTP_VISIT_ST_DATE_INVALID');
4179: Fnd_Message.Set_Token('VISIT_ST_DATE', p_visit_start_date);
4180: Fnd_Msg_Pub.ADD;
4181: Ahl_Debug_Pub.debug('Visit start date (' || p_visit_start_date || ') is outside calendar range', 'LTP: Init_Time_Vars');
4182: RAISE Fnd_Api.G_EXC_ERROR;
4183: END IF;
4184:

Line 4211: Fnd_Msg_Pub.ADD;

4207: IF (l_curr_wday_index > G_DAYS_ON) THEN
4208: -- Day Off
4209: Fnd_Message.Set_Name('AHL','AHL_LTP_VISIT_ST_WDATE_INVALID');
4210: Fnd_Message.Set_Token('VISIT_ST_DATE', p_visit_start_date);
4211: Fnd_Msg_Pub.ADD;
4212: Ahl_Debug_Pub.debug('Visit start date (' || p_visit_start_date || ') is not a working day', 'LTP: Init_Time_Vars');
4213: RAISE Fnd_Api.G_EXC_ERROR;
4214: ELSE
4215: -- Not Day Off: Check if Holiday

Line 4220: Fnd_Msg_Pub.ADD;

4216: IF(IS_DEPT_Holiday(l_visit_start_date)) THEN
4217: -- Holiday
4218: Fnd_Message.Set_Name('AHL','AHL_LTP_VISIT_ST_WDATE_INVALID');
4219: Fnd_Message.Set_Token('VISIT_ST_DATE', p_visit_start_date);
4220: Fnd_Msg_Pub.ADD;
4221: Ahl_Debug_Pub.debug('Visit start date (' || p_visit_start_date || ') is not a working day', 'LTP: Init_Time_Vars');
4222: RAISE Fnd_Api.G_EXC_ERROR;
4223: END IF;
4224: END IF;*/

Line 4276: Fnd_Msg_Pub.ADD;

4272: /*
4273: -- Working Day: Check if day is in calendar range
4274: IF(l_curr_day > G_CAL_END) THEN
4275: Fnd_Message.Set_Name('AHL','AHL_LTP_INSUFFICIENT_CAL_RANGE');
4276: Fnd_Msg_Pub.ADD;
4277: Ahl_Debug_Pub.debug('Computed date (' || l_curr_day || ') is outside calendar range', 'LTP: Init_Time_Vars');
4278: RAISE Fnd_Api.G_EXC_ERROR;
4279: END IF;
4280: */

Line 4366: Fnd_Msg_Pub.ADD;

4362: FETCH l_shift_details_csr INTO l_shift_start, l_shift_end;
4363: IF (l_shift_details_csr%NOTFOUND) THEN
4364: Fnd_Message.Set_Name('AHL','AHL_LTP_NO_SHIFT_FOR_RSRC');
4365: Fnd_Message.Set_Token('RSRC_ID', p_resource_id);
4366: Fnd_Msg_Pub.ADD;
4367: CLOSE l_shift_details_csr;
4368: Ahl_Debug_Pub.debug('No Shift for Resource: ' || p_resource_id, 'LTP: Resource_In_Duty');
4369: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
4370: END IF;

Line 4701: Fnd_Msg_Pub.ADD;

4697: FETCH l_get_bom_rsrc_dtls_csr INTO l_capacity_units,l_description;
4698: IF l_get_bom_rsrc_dtls_csr%NOTFOUND THEN
4699: Fnd_Message.Set_Name('AHL','AHL_LTP_RES_ID_INVALID');
4700: Fnd_Message.Set_Token('RES_ID', l_description);
4701: Fnd_Msg_Pub.ADD;
4702: END IF;
4703: CLOSE l_get_bom_rsrc_dtls_csr;
4704: Ahl_Debug_Pub.debug('Inside get available l_capacity_units:'||l_capacity_units);
4705: