DBA Data[Home] [Help]

APPS.AHL_PP_RESRC_ASSIGN_PVT dependencies on FND_MSG_PUB

Line 508: Fnd_Msg_Pub.ADD;

504: END IF;
505:
506: /*IF SQL%rowcount = 0 THEN
507: Fnd_Message.SET_NAME('AHL','AHL_COM_RECORD_CHANGED');
508: Fnd_Msg_Pub.ADD;
509: END IF;*/
510: END UPDATE_ROW;
511:
512: ---------------------------------------------------------------------

Line 543: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

539:
540: IF (p_resrc_assign_rec.ASSIGNMENT_ID IS NULL OR p_resrc_assign_rec.ASSIGNMENT_ID = Fnd_Api.G_MISS_NUM) THEN
541: -- OPERATION_SEQ_NUMBER
542: IF (p_resrc_assign_rec.OPERATION_SEQ_NUMBER IS NULL OR p_resrc_assign_rec.OPERATION_SEQ_NUMBER = Fnd_Api.G_MISS_NUM) THEN
543: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
544: Fnd_Message.set_name ('AHL', 'AHL_PP_OPER_SEQ_MISSING');
545: Fnd_Msg_Pub.ADD;
546: END IF;
547: x_return_status := Fnd_Api.g_ret_sts_error;

Line 545: Fnd_Msg_Pub.ADD;

541: -- OPERATION_SEQ_NUMBER
542: IF (p_resrc_assign_rec.OPERATION_SEQ_NUMBER IS NULL OR p_resrc_assign_rec.OPERATION_SEQ_NUMBER = Fnd_Api.G_MISS_NUM) THEN
543: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
544: Fnd_Message.set_name ('AHL', 'AHL_PP_OPER_SEQ_MISSING');
545: Fnd_Msg_Pub.ADD;
546: END IF;
547: x_return_status := Fnd_Api.g_ret_sts_error;
548: RETURN;
549: END IF;

Line 554: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

550:
551: -- OPERATION_SEQ_NUMBER - Positive
552: IF (p_resrc_assign_rec.OPERATION_SEQ_NUMBER IS NOT NULL AND p_resrc_assign_rec.OPERATION_SEQ_NUMBER <> Fnd_Api.G_MISS_NUM) THEN
553: IF p_resrc_assign_rec.OPERATION_SEQ_NUMBER < 0 THEN
554: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
555: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
556: Fnd_Msg_Pub.ADD;
557: END IF;
558: x_return_status := Fnd_Api.g_ret_sts_error;

Line 556: Fnd_Msg_Pub.ADD;

552: IF (p_resrc_assign_rec.OPERATION_SEQ_NUMBER IS NOT NULL AND p_resrc_assign_rec.OPERATION_SEQ_NUMBER <> Fnd_Api.G_MISS_NUM) THEN
553: IF p_resrc_assign_rec.OPERATION_SEQ_NUMBER < 0 THEN
554: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
555: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
556: Fnd_Msg_Pub.ADD;
557: END IF;
558: x_return_status := Fnd_Api.g_ret_sts_error;
559: RETURN;
560: END IF;

Line 565: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

561: END IF;
562:
563: -- RESOURCE_SEQ_NUMBER
564: IF (p_resrc_assign_rec.RESOURCE_SEQ_NUMBER IS NULL OR p_resrc_assign_rec.RESOURCE_SEQ_NUMBER = Fnd_Api.G_MISS_NUM) THEN
565: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
566: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_SEQ_MISSING');
567: Fnd_Msg_Pub.ADD;
568: RAISE FND_API.G_EXC_ERROR;
569: END IF;

Line 567: Fnd_Msg_Pub.ADD;

563: -- RESOURCE_SEQ_NUMBER
564: IF (p_resrc_assign_rec.RESOURCE_SEQ_NUMBER IS NULL OR p_resrc_assign_rec.RESOURCE_SEQ_NUMBER = Fnd_Api.G_MISS_NUM) THEN
565: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
566: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_SEQ_MISSING');
567: Fnd_Msg_Pub.ADD;
568: RAISE FND_API.G_EXC_ERROR;
569: END IF;
570: x_return_status := Fnd_Api.g_ret_sts_error;
571: RETURN;

Line 577: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

573:
574: -- RESOURCE_SEQ_NUMBER - Positive
575: IF (p_resrc_assign_rec.RESOURCE_SEQ_NUMBER IS NOT NULL AND p_resrc_assign_rec.RESOURCE_SEQ_NUMBER <> Fnd_Api.G_MISS_NUM) THEN
576: IF p_resrc_assign_rec.RESOURCE_SEQ_NUMBER < 0 THEN
577: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
578: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
579: Fnd_Msg_Pub.ADD;
580: END IF;
581: x_return_status := Fnd_Api.g_ret_sts_error;

Line 579: Fnd_Msg_Pub.ADD;

575: IF (p_resrc_assign_rec.RESOURCE_SEQ_NUMBER IS NOT NULL AND p_resrc_assign_rec.RESOURCE_SEQ_NUMBER <> Fnd_Api.G_MISS_NUM) THEN
576: IF p_resrc_assign_rec.RESOURCE_SEQ_NUMBER < 0 THEN
577: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
578: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
579: Fnd_Msg_Pub.ADD;
580: END IF;
581: x_return_status := Fnd_Api.g_ret_sts_error;
582: RETURN;
583: END IF;

Line 605: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

601: IF G_DEBUG='Y' THEN
602: Ahl_Debug_Pub.debug( ': Resource Type 22222= ' || p_resrc_assign_rec.RESOURCE_TYPE_CODE);
603: END IF;
604:
605: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
606: Fnd_Message.set_name ('AHL', 'AHL_PP_EMP_NUM_MISSING');
607: Fnd_Msg_Pub.ADD;
608: END IF;
609: x_return_status := Fnd_Api.g_ret_sts_error;

Line 607: Fnd_Msg_Pub.ADD;

603: END IF;
604:
605: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
606: Fnd_Message.set_name ('AHL', 'AHL_PP_EMP_NUM_MISSING');
607: Fnd_Msg_Pub.ADD;
608: END IF;
609: x_return_status := Fnd_Api.g_ret_sts_error;
610: RETURN;
611: END IF; */

Line 618: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

614: IF G_DEBUG='Y' THEN
615: Ahl_Debug_Pub.debug( ': Resource Type 22222= ' || p_resrc_assign_rec.RESOURCE_TYPE_CODE);
616: END IF;
617:
618: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
619: Fnd_Message.set_name ('AHL', 'AHL_PP_EMP_NUM_MISSING');
620: Fnd_Msg_Pub.ADD;
621: END IF;
622: x_return_status := Fnd_Api.g_ret_sts_error;

Line 620: Fnd_Msg_Pub.ADD;

616: END IF;
617:
618: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
619: Fnd_Message.set_name ('AHL', 'AHL_PP_EMP_NUM_MISSING');
620: Fnd_Msg_Pub.ADD;
621: END IF;
622: x_return_status := Fnd_Api.g_ret_sts_error;
623: RETURN;
624: END IF;

Line 630: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

626:
627: IF p_resrc_assign_rec.RESOURCE_TYPE_CODE <> 2 THEN
628: -- SERIAL NUMBER
629: IF (p_resrc_assign_rec.SERIAL_NUMBER IS NULL OR p_resrc_assign_rec.SERIAL_NUMBER = Fnd_Api.G_MISS_CHAR) THEN
630: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
631: Fnd_Message.set_name ('AHL', 'AHL_PP_SERIAL_MISSING');
632: Fnd_Msg_Pub.ADD;
633: END IF;
634: x_return_status := Fnd_Api.g_ret_sts_error;

Line 632: Fnd_Msg_Pub.ADD;

628: -- SERIAL NUMBER
629: IF (p_resrc_assign_rec.SERIAL_NUMBER IS NULL OR p_resrc_assign_rec.SERIAL_NUMBER = Fnd_Api.G_MISS_CHAR) THEN
630: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
631: Fnd_Message.set_name ('AHL', 'AHL_PP_SERIAL_MISSING');
632: Fnd_Msg_Pub.ADD;
633: END IF;
634: x_return_status := Fnd_Api.g_ret_sts_error;
635: RETURN;
636: END IF;

Line 641: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

637: END IF;
638:
639: -- ASSIGN_START_DATE
640: IF (p_resrc_assign_rec.ASSIGN_START_DATE IS NULL OR p_resrc_assign_rec.ASSIGN_START_DATE = Fnd_Api.G_MISS_DATE)THEN
641: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
642: Fnd_Message.set_name ('AHL', 'AHL_PP_ASSIGN_ST_DT_MISSING');
643: Fnd_Msg_Pub.ADD;
644: END IF;
645: x_return_status := Fnd_Api.g_ret_sts_error;

Line 643: Fnd_Msg_Pub.ADD;

639: -- ASSIGN_START_DATE
640: IF (p_resrc_assign_rec.ASSIGN_START_DATE IS NULL OR p_resrc_assign_rec.ASSIGN_START_DATE = Fnd_Api.G_MISS_DATE)THEN
641: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
642: Fnd_Message.set_name ('AHL', 'AHL_PP_ASSIGN_ST_DT_MISSING');
643: Fnd_Msg_Pub.ADD;
644: END IF;
645: x_return_status := Fnd_Api.g_ret_sts_error;
646: RETURN;
647: END IF;

Line 651: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

647: END IF;
648:
649: -- ASSIGN_END_DATE
650: IF (p_resrc_assign_rec.ASSIGN_END_DATE IS NULL OR p_resrc_assign_rec.ASSIGN_END_DATE = Fnd_Api.G_MISS_DATE)THEN
651: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
652: Fnd_Message.set_name ('AHL', 'AHL_PP_ASSIGN_END_DT_MISSING');
653: Fnd_Msg_Pub.ADD;
654: END IF;
655: x_return_status := Fnd_Api.g_ret_sts_error;

Line 653: Fnd_Msg_Pub.ADD;

649: -- ASSIGN_END_DATE
650: IF (p_resrc_assign_rec.ASSIGN_END_DATE IS NULL OR p_resrc_assign_rec.ASSIGN_END_DATE = Fnd_Api.G_MISS_DATE)THEN
651: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
652: Fnd_Message.set_name ('AHL', 'AHL_PP_ASSIGN_END_DT_MISSING');
653: Fnd_Msg_Pub.ADD;
654: END IF;
655: x_return_status := Fnd_Api.g_ret_sts_error;
656: RETURN;
657: END IF;

Line 784: Fnd_Msg_Pub.initialize;

780: Ahl_Debug_Pub.debug( l_full_name ||':Start');
781: END IF;
782:
783: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
784: Fnd_Msg_Pub.initialize;
785: END IF;
786:
787: IF NOT Fnd_Api.compatible_api_call (
788: l_api_version,

Line 834: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

830:
831: ---End date must be greater than or equal to Start Date
832:
833: IF l_assign_start_date > l_assign_end_date THEN
834: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
835: Fnd_Message.set_name ('AHL', 'AHL_PP_ASG_FROMDT_GTR_TODT');
836: Fnd_Msg_Pub.ADD;
837: END IF;
838: x_return_status := Fnd_Api.g_ret_sts_error;

Line 836: Fnd_Msg_Pub.ADD;

832:
833: IF l_assign_start_date > l_assign_end_date THEN
834: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
835: Fnd_Message.set_name ('AHL', 'AHL_PP_ASG_FROMDT_GTR_TODT');
836: Fnd_Msg_Pub.ADD;
837: END IF;
838: x_return_status := Fnd_Api.g_ret_sts_error;
839: RETURN;
840: END IF;

Line 855: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

851: IF l_actual_start_date is not null or l_actual_end_date is not null THEN
852:
853: IF l_actual_start_date is not null and l_assign_start_date < l_actual_start_date THEN
854:
855: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
856: Fnd_Message.set_name ('AHL', 'AHL_PP_ASG_EARLY_ACTUAL');
857: Fnd_Msg_Pub.ADD;
858: END IF;
859: x_return_status := Fnd_Api.g_ret_sts_error;

Line 857: Fnd_Msg_Pub.ADD;

853: IF l_actual_start_date is not null and l_assign_start_date < l_actual_start_date THEN
854:
855: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
856: Fnd_Message.set_name ('AHL', 'AHL_PP_ASG_EARLY_ACTUAL');
857: Fnd_Msg_Pub.ADD;
858: END IF;
859: x_return_status := Fnd_Api.g_ret_sts_error;
860: RETURN;
861: END IF;

Line 865: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

861: END IF;
862:
863: IF l_actual_end_date is not null and l_assign_end_date > l_actual_end_date THEN
864:
865: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
866: Fnd_Message.set_name ('AHL', 'AHL_PP_ASG_LATER_ACTUAL');
867: Fnd_Msg_Pub.ADD;
868: END IF;
869: x_return_status := Fnd_Api.g_ret_sts_error;

Line 867: Fnd_Msg_Pub.ADD;

863: IF l_actual_end_date is not null and l_assign_end_date > l_actual_end_date THEN
864:
865: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
866: Fnd_Message.set_name ('AHL', 'AHL_PP_ASG_LATER_ACTUAL');
867: Fnd_Msg_Pub.ADD;
868: END IF;
869: x_return_status := Fnd_Api.g_ret_sts_error;
870: RETURN;
871: END IF;

Line 877: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

873: ELSE
874:
875: IF l_scheduled_start_date is not null and l_assign_start_date < l_scheduled_start_date THEN
876:
877: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
878: Fnd_Message.set_name ('AHL', 'AHL_PP_ASG_EARLY_SCHEDULE');
879: Fnd_Msg_Pub.ADD;
880: END IF;
881: x_return_status := Fnd_Api.g_ret_sts_error;

Line 879: Fnd_Msg_Pub.ADD;

875: IF l_scheduled_start_date is not null and l_assign_start_date < l_scheduled_start_date THEN
876:
877: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
878: Fnd_Message.set_name ('AHL', 'AHL_PP_ASG_EARLY_SCHEDULE');
879: Fnd_Msg_Pub.ADD;
880: END IF;
881: x_return_status := Fnd_Api.g_ret_sts_error;
882: RETURN;
883: END IF;

Line 887: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

883: END IF;
884:
885: IF l_scheduled_end_date is not null and l_assign_end_date > l_scheduled_end_date THEN
886:
887: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
888: Fnd_Message.set_name ('AHL', 'AHL_PP_ASG_LATER_SCHEDULE');
889: Fnd_Msg_Pub.ADD;
890: END IF;
891: x_return_status := Fnd_Api.g_ret_sts_error;

Line 889: Fnd_Msg_Pub.ADD;

885: IF l_scheduled_end_date is not null and l_assign_end_date > l_scheduled_end_date THEN
886:
887: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
888: Fnd_Message.set_name ('AHL', 'AHL_PP_ASG_LATER_SCHEDULE');
889: Fnd_Msg_Pub.ADD;
890: END IF;
891: x_return_status := Fnd_Api.g_ret_sts_error;
892: RETURN;
893: END IF;

Line 912: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

908:
909: END IF;
910: /*
911: IF trunc(l_assign_start_date) < trunc(l_eff_st_date) THEN
912: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
913: Fnd_Message.set_name ('AHL', 'AHL_PP_ASG_STDT_GTR_EMP_STDT');
914: Fnd_Msg_Pub.ADD;
915: END IF;
916: x_return_status := Fnd_Api.g_ret_sts_error;

Line 914: Fnd_Msg_Pub.ADD;

910: /*
911: IF trunc(l_assign_start_date) < trunc(l_eff_st_date) THEN
912: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
913: Fnd_Message.set_name ('AHL', 'AHL_PP_ASG_STDT_GTR_EMP_STDT');
914: Fnd_Msg_Pub.ADD;
915: END IF;
916: x_return_status := Fnd_Api.g_ret_sts_error;
917: RETURN;
918: END IF;

Line 921: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

917: RETURN;
918: END IF;
919: */
920: IF trunc(l_assign_end_date) > trunc(l_eff_end_date) THEN
921: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
922: Fnd_Message.set_name ('AHL', 'AHL_PP_EMP_ENDDT_GTR_ASG_ENDDT');
923: Fnd_Msg_Pub.ADD;
924: END IF;
925: x_return_status := Fnd_Api.g_ret_sts_error;

Line 923: Fnd_Msg_Pub.ADD;

919: */
920: IF trunc(l_assign_end_date) > trunc(l_eff_end_date) THEN
921: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
922: Fnd_Message.set_name ('AHL', 'AHL_PP_EMP_ENDDT_GTR_ASG_ENDDT');
923: Fnd_Msg_Pub.ADD;
924: END IF;
925: x_return_status := Fnd_Api.g_ret_sts_error;
926: RETURN;
927: END IF;

Line 931: Fnd_Msg_Pub.count_and_get (

927: END IF;
928: END IF;
929:
930: -------------------- finish --------------------------
931: Fnd_Msg_Pub.count_and_get (
932: p_encoded => Fnd_Api.g_false,
933: p_count => x_msg_count,
934: p_data => x_msg_data
935: );

Line 949: Fnd_Msg_Pub.count_and_get (

945:
946: EXCEPTION
947: WHEN Fnd_Api.g_exc_error THEN
948: x_return_status := Fnd_Api.g_ret_sts_error;
949: Fnd_Msg_Pub.count_and_get (
950: p_encoded => Fnd_Api.g_false,
951: p_count => x_msg_count,
952: p_data => x_msg_data
953: );

Line 956: Fnd_Msg_Pub.count_and_get (

952: p_data => x_msg_data
953: );
954: WHEN Fnd_Api.g_exc_unexpected_error THEN
955: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
956: Fnd_Msg_Pub.count_and_get (
957: p_encoded => Fnd_Api.g_false,
958: p_count => x_msg_count,
959: p_data => x_msg_data
960: );

Line 963: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)

959: p_data => x_msg_data
960: );
961: WHEN OTHERS THEN
962: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
963: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
964: THEN
965: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
966: END IF;
967:

Line 965: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);

961: WHEN OTHERS THEN
962: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
963: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
964: THEN
965: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
966: END IF;
967:
968: Fnd_Msg_Pub.count_and_get (
969: p_encoded => Fnd_Api.g_false,

Line 968: Fnd_Msg_Pub.count_and_get (

964: THEN
965: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
966: END IF;
967:
968: Fnd_Msg_Pub.count_and_get (
969: p_encoded => Fnd_Api.g_false,
970: p_count => x_msg_count,
971: p_data => x_msg_data
972: );

Line 1218: FND_MSG_PUB.initialize;

1214:
1215: -- Standard call to check for call compatibility.
1216: IF FND_API.to_boolean(p_init_msg_list)
1217: THEN
1218: FND_MSG_PUB.initialize;
1219: END IF;
1220:
1221: -- Initialize API return status to success
1222: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1261: Fnd_Msg_Pub.ADD;

1257: FETCH c_oper_resrc INTO l_oper_resrc_id, l_wo_operation_id,l_resource_id;
1258: IF c_oper_resrc%NOTFOUND THEN
1259: AHL_DEBUG_PUB.debug(l_full_name || 'c_oper_resrc i.e Cursor not found');
1260: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_REQ_NOT_EXISTS');
1261: Fnd_Msg_Pub.ADD;
1262: RAISE Fnd_Api.G_EXC_ERROR;
1263: END IF;
1264: CLOSE c_oper_resrc;
1265:

Line 1269: Fnd_Msg_Pub.ADD;

1265:
1266: END IF; -- Check resrc sequence number
1267: ELSE
1268: Fnd_Message.SET_NAME('AHL','AHL_PP_JOB_NOT_EXISTS');
1269: Fnd_Msg_Pub.ADD;
1270: END IF; -- Check of work order id
1271:
1272: -- rroy
1273: -- ACL Changes

Line 1280: FND_MSG_PUB.ADD;

1276: p_visit_id => NULL,
1277: p_item_instance_id => NULL);
1278: IF l_return_status = FND_API.G_TRUE THEN
1279: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_CRT_RESASG_UNTLCKD');
1280: FND_MSG_PUB.ADD;
1281: RAISE FND_API.G_EXC_ERROR;
1282: END IF;
1283: -- rroy
1284: -- ACL Changes

Line 1309: Fnd_Msg_Pub.ADD;

1305: END IF;
1306:
1307: CLOSE c_resource;
1308: Fnd_Message.SET_NAME('AHL','AHL_PP_NO_RES_TYPE_FOUND');
1309: Fnd_Msg_Pub.ADD;
1310: RAISE Fnd_Api.G_EXC_ERROR;
1311: END IF;
1312:
1313: Ahl_Debug_Pub.debug( 'l_resource_type = ' || l_resource_type);

Line 1444: Fnd_Msg_Pub.ADD;

1440: Ot
1441: (l_Resrc_Assign_Rec.employee_name IS NOT NULL AND l_Resrc_Assign_Rec.employee_name <> Fnd_Api.G_MISS_CHAR))
1442: THEN
1443: Fnd_Message.SET_NAME('AHL','AHL_PP_EMPLOYEE_NOT_REQ');
1444: Fnd_Msg_Pub.ADD;
1445: RAISE Fnd_Api.G_EXC_ERROR;
1446: END IF;*/
1447:
1448: -- Convert serial number to instance/ serial id

Line 1475: Fnd_Msg_Pub.ADD;

1471:
1472: IF NVL(l_return_status,'x') <> 'S'
1473: THEN
1474: Fnd_Message.SET_NAME('AHL','AHL_PP_SERIAL_NOT_EXISTS');
1475: Fnd_Msg_Pub.ADD;
1476: RAISE Fnd_Api.G_EXC_ERROR;
1477: END IF;
1478: END IF;
1479:

Line 1502: Fnd_Msg_Pub.ADD;

1498:
1499: /*IF (l_Resrc_Assign_Rec.serial_number IS NOT NULL AND l_Resrc_Assign_Rec.serial_number <> Fnd_Api.G_MISS_CHAR)
1500: THEN
1501: Fnd_Message.SET_NAME('AHL','AHL_PP_EMPLOYEE_NOT_REQ');
1502: Fnd_Msg_Pub.ADD;
1503: RAISE Fnd_Api.G_EXC_ERROR;
1504: END IF;*/
1505: IF G_DEBUG='Y' THEN
1506: AHL_DEBUG_PUB.debug(l_full_name || 'RESOURCE TYPE in record -- ' || p_x_resrc_assign_tbl(i).resource_type_code);

Line 1531: Fnd_Msg_Pub.ADD;

1527:
1528: IF NVL(l_return_status, 'X') <> 'S'
1529: THEN
1530: Fnd_Message.SET_NAME('AHL','AHL_PP_EMP_NUM_NOT_EXISTS');
1531: Fnd_Msg_Pub.ADD;
1532: RAISE Fnd_Api.G_EXC_ERROR;
1533: END IF;
1534:
1535: END IF;

Line 1559: Fnd_Msg_Pub.ADD;

1555:
1556: IF NVL(l_return_status, 'X') <> 'S'
1557: THEN
1558: Fnd_Message.SET_NAME('AHL','AHL_PP_EMP_NAME_NOT_EXISTS');
1559: Fnd_Msg_Pub.ADD;
1560: RAISE Fnd_Api.G_EXC_ERROR;
1561: END IF;
1562:
1563: IF p_x_resrc_assign_tbl(i).employee_id <> l_employee_id THEN

Line 1565: Fnd_Msg_Pub.ADD;

1561: END IF;
1562:
1563: IF p_x_resrc_assign_tbl(i).employee_id <> l_employee_id THEN
1564: Fnd_Message.SET_NAME('AHL','AHL_PP_USE_EMP_NAME_LOV');
1565: Fnd_Msg_Pub.ADD;
1566: END IF;
1567:
1568: IF p_x_resrc_assign_tbl(i).employee_name <> l_employee_name THEN
1569: Fnd_Message.SET_NAME('AHL','AHL_PP_EMP_NAME_NOT_EXISTS');

Line 1570: Fnd_Msg_Pub.ADD;

1566: END IF;
1567:
1568: IF p_x_resrc_assign_tbl(i).employee_name <> l_employee_name THEN
1569: Fnd_Message.SET_NAME('AHL','AHL_PP_EMP_NAME_NOT_EXISTS');
1570: Fnd_Msg_Pub.ADD;
1571: END IF;
1572:
1573: --
1574: p_x_resrc_assign_tbl(i).employee_id := l_employee_id;

Line 1613: l_msg_count := Fnd_Msg_Pub.count_msg;

1609:
1610: END LOOP;
1611: END IF;
1612: --Standard check to count messages
1613: l_msg_count := Fnd_Msg_Pub.count_msg;
1614:
1615: IF l_msg_count > 0 THEN
1616: X_msg_count := l_msg_count;
1617: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 1818: l_msg_count := Fnd_Msg_Pub.count_msg;

1814: l_Resrc_Assign_tbl(i).attribute15 := p_x_resrc_assign_tbl(i).attribute15;
1815: END IF;
1816:
1817: --Standard check to count messages
1818: l_msg_count := Fnd_Msg_Pub.count_msg;
1819:
1820: IF l_msg_count > 0 THEN
1821: X_msg_count := l_msg_count;
1822: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 1838: Fnd_Msg_Pub.ADD;

1834: CLOSE Sch_id_exists;
1835: --
1836: IF l_dummy IS NOT NULL THEN
1837: Fnd_Message.SET_NAME('AHL','AHL_PP_SEQUENCE_NO_EXISTS');
1838: Fnd_Msg_Pub.ADD;
1839: RAISE FND_API.G_EXC_ERROR;
1840: END IF;
1841:
1842:

Line 1887: l_msg_count := Fnd_Msg_Pub.count_msg;

1883: END IF; -- Count > 0
1884: END IF; -- Return status from Eam Api
1885: ------------------------End of Body---------------------------------------
1886: --Standard check to count messages
1887: l_msg_count := Fnd_Msg_Pub.count_msg;
1888:
1889: IF l_msg_count > 0 THEN
1890: X_msg_count := l_msg_count;
1891: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 1910: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1906: EXCEPTION
1907: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1908: ROLLBACK TO Create_Resrc_Assign;
1909: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1910: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1911: p_count => x_msg_count,
1912: p_data => x_msg_data);
1913:
1914: IF G_DEBUG='Y' THEN

Line 1925: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1921:
1922: WHEN FND_API.G_EXC_ERROR THEN
1923: ROLLBACK TO Create_Resrc_Assign;
1924: X_return_status := FND_API.G_RET_STS_ERROR;
1925: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1926: p_count => x_msg_count,
1927: p_data => X_msg_data);
1928: IF G_DEBUG='Y' THEN
1929: -- Debug info.

Line 1940: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

1936:
1937: WHEN OTHERS THEN
1938: ROLLBACK TO Create_Resrc_Assign;
1939: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1940: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1941: THEN
1942: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',
1943: p_procedure_name => 'CREATE_Resrc_Assign',
1944: p_error_text => SUBSTR(SQLERRM,1,240));

Line 1942: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',

1938: ROLLBACK TO Create_Resrc_Assign;
1939: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1940: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1941: THEN
1942: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',
1943: p_procedure_name => 'CREATE_Resrc_Assign',
1944: p_error_text => SUBSTR(SQLERRM,1,240));
1945: END IF;
1946: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 1946: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

1942: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',
1943: p_procedure_name => 'CREATE_Resrc_Assign',
1944: p_error_text => SUBSTR(SQLERRM,1,240));
1945: END IF;
1946: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
1947: p_count => x_msg_count,
1948: p_data => X_msg_data);
1949:
1950: IF G_DEBUG='Y' THEN

Line 2183: FND_MSG_PUB.initialize;

2179:
2180: -- Standard call to check for call compatibility.
2181: IF FND_API.to_boolean(p_init_msg_list)
2182: THEN
2183: FND_MSG_PUB.initialize;
2184: END IF;
2185:
2186: -- Initialize API return status to success
2187: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2246: FND_MSG_PUB.ADD;

2242: p_visit_id => NULL,
2243: p_item_instance_id => NULL);
2244: IF l_return_status = FND_API.G_TRUE THEN
2245: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_UPD_RESASG_UNTLCKD');
2246: FND_MSG_PUB.ADD;
2247: RAISE FND_API.G_EXC_ERROR;
2248: END IF;
2249:
2250: -- rroy

Line 2395: Fnd_Msg_Pub.ADD;

2391:
2392: IF NVL(l_return_status,'x') <> 'S'
2393: THEN
2394: Fnd_Message.SET_NAME('AHL','AHL_PP_SERIAL_NOT_EXISTS');
2395: Fnd_Msg_Pub.ADD;
2396: RAISE Fnd_Api.G_EXC_ERROR;
2397: END IF;
2398: END IF;
2399:

Line 2435: Fnd_Msg_Pub.ADD;

2431:
2432: IF NVL(l_return_status, 'X') <> 'S'
2433: THEN
2434: Fnd_Message.SET_NAME('AHL','AHL_PP_EMP_NUM_NOT_EXISTS');
2435: Fnd_Msg_Pub.ADD;
2436: RAISE Fnd_Api.G_EXC_ERROR;
2437: END IF;
2438:
2439: -- For Employee Name

Line 2459: Fnd_Msg_Pub.ADD;

2455:
2456: IF NVL(l_return_status, 'X') <> 'S'
2457: THEN
2458: Fnd_Message.SET_NAME('AHL','AHL_PP_EMP_NAME_NOT_EXISTS');
2459: Fnd_Msg_Pub.ADD;
2460: RAISE Fnd_Api.G_EXC_ERROR;
2461: END IF;
2462:
2463: IF p_x_resrc_assign_tbl(i).employee_id <> l_employee_id THEN

Line 2465: Fnd_Msg_Pub.ADD;

2461: END IF;
2462:
2463: IF p_x_resrc_assign_tbl(i).employee_id <> l_employee_id THEN
2464: Fnd_Message.SET_NAME('AHL','AHL_PP_USE_EMP_NAME_LOV');
2465: Fnd_Msg_Pub.ADD;
2466: END IF;
2467:
2468: IF p_x_resrc_assign_tbl(i).employee_name <> l_employee_name THEN
2469: Fnd_Message.SET_NAME('AHL','AHL_PP_EMP_NAME_NOT_EXISTS');

Line 2470: Fnd_Msg_Pub.ADD;

2466: END IF;
2467:
2468: IF p_x_resrc_assign_tbl(i).employee_name <> l_employee_name THEN
2469: Fnd_Message.SET_NAME('AHL','AHL_PP_EMP_NAME_NOT_EXISTS');
2470: Fnd_Msg_Pub.ADD;
2471: END IF;
2472: END IF;
2473: END IF;
2474: --Assign

Line 2513: l_msg_count := Fnd_Msg_Pub.count_msg;

2509: END LOOP;
2510: END IF;
2511:
2512: --Standard check to count messages
2513: l_msg_count := Fnd_Msg_Pub.count_msg;
2514:
2515: IF l_msg_count > 0 THEN
2516: X_msg_count := l_msg_count;
2517: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 2591: Fnd_Msg_Pub.ADD;

2587: -- Check Object version number.
2588: IF (p_x_resrc_assign_tbl(i).object_version_number <> c_assign_rec.object_version_number) THEN
2589: AHL_DEBUG_PUB.debug(l_full_name || 'Inside OVN comparison');
2590: Fnd_Message.Set_Name('AHL','AHL_COM_RECORD_CHANGED');
2591: Fnd_Msg_Pub.ADD;
2592: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2593: END IF;
2594:
2595: IF p_x_resrc_assign_tbl(i).Assignment_id <> FND_API.G_MISS_NUM THEN

Line 2774: l_msg_count := Fnd_Msg_Pub.count_msg;

2770: END IF;
2771: */
2772:
2773: --Standard check to count messages
2774: l_msg_count := Fnd_Msg_Pub.count_msg;
2775:
2776: IF l_msg_count > 0 THEN
2777: x_msg_count := l_msg_count;
2778: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 2831: l_msg_count := Fnd_Msg_Pub.count_msg;

2827:
2828: END IF; -- Return status from Ahl Eam Api
2829: ------------------------End of Body---------------------------------------
2830: --Standard check to count messages
2831: l_msg_count := Fnd_Msg_Pub.count_msg;
2832:
2833: IF l_msg_count > 0 THEN
2834: X_msg_count := l_msg_count;
2835: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 2854: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

2850: EXCEPTION
2851: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2852: ROLLBACK TO update_Resrc_Assign;
2853: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2854: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2855: p_count => x_msg_count,
2856: p_data => x_msg_data);
2857: IF G_DEBUG='Y' THEN
2858: AHL_DEBUG_PUB.log_app_messages(x_msg_count, x_msg_data, 'ERROR' );

Line 2867: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

2863: END IF;
2864: WHEN FND_API.G_EXC_ERROR THEN
2865: ROLLBACK TO update_Resrc_Assign;
2866: X_return_status := FND_API.G_RET_STS_ERROR;
2867: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2868: p_count => x_msg_count,
2869: p_data => X_msg_data);
2870: IF G_DEBUG='Y' THEN
2871: -- Debug info.

Line 2881: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

2877: END IF;
2878: WHEN OTHERS THEN
2879: ROLLBACK TO update_Resrc_Assign;
2880: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2881: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2882: THEN
2883: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',
2884: p_procedure_name => 'UPDATE_Resrc_Assign',
2885: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2883: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',

2879: ROLLBACK TO update_Resrc_Assign;
2880: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2881: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2882: THEN
2883: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',
2884: p_procedure_name => 'UPDATE_Resrc_Assign',
2885: p_error_text => SUBSTR(SQLERRM,1,240));
2886: END IF;
2887: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 2887: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

2883: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',
2884: p_procedure_name => 'UPDATE_Resrc_Assign',
2885: p_error_text => SUBSTR(SQLERRM,1,240));
2886: END IF;
2887: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2888: p_count => x_msg_count,
2889: p_data => X_msg_data);
2890:
2891: IF G_DEBUG='Y' THEN

Line 2974: Fnd_Msg_Pub.initialize;

2970: END IF;
2971: -- Standard call to check for call compatibility.
2972: IF Fnd_Api.to_boolean(p_init_msg_list)
2973: THEN
2974: Fnd_Msg_Pub.initialize;
2975: END IF;
2976:
2977: -- Initialize API return status to success
2978: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

Line 3002: Fnd_Msg_Pub.ADD;

2998: OPEN get_resrc_assign_cur(p_x_resrc_assign_tbl(i).assignment_id);
2999: FETCH get_resrc_assign_cur INTO l_resrc_assign_rec;
3000: IF get_resrc_assign_cur%NOTFOUND THEN
3001: Fnd_Message.Set_Name('AHL','AHL_COM_INVALID_RECORD');
3002: Fnd_Msg_Pub.ADD;
3003: CLOSE get_resrc_assign_cur;
3004: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3005: END IF;
3006: --

Line 3013: Fnd_Msg_Pub.ADD;

3009: --Check for object version number
3010: IF p_x_resrc_assign_tbl(i).object_version_number <> l_resrc_assign_rec.object_version_number
3011: THEN
3012: Fnd_Message.Set_Name('AHL','AHL_COM_RECORD_CHANGED');
3013: Fnd_Msg_Pub.ADD;
3014: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3015: END IF;
3016: --
3017: -- Get Wip entity ,operation resource details

Line 3049: l_msg_count := Fnd_Msg_Pub.count_msg;

3045: END LOOP;
3046: END IF;
3047:
3048: --Standard check to count messages
3049: l_msg_count := Fnd_Msg_Pub.count_msg;
3050:
3051: IF l_msg_count > 0 THEN
3052: x_msg_count := l_msg_count;
3053: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 3110: l_msg_count := Fnd_Msg_Pub.count_msg;

3106:
3107: END IF;
3108: ---------------------------End of Body---------------------------------------
3109: --Standard check to count messages
3110: l_msg_count := Fnd_Msg_Pub.count_msg;
3111:
3112: IF l_msg_count > 0 THEN
3113: X_msg_count := l_msg_count;
3114: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 3133: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

3129: EXCEPTION
3130: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3131: ROLLBACK TO Remove_Resource_Assignment;
3132: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3133: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
3134: p_count => x_msg_count,
3135: p_data => x_msg_data);
3136: IF G_DEBUG='Y' THEN
3137: Ahl_Debug_Pub.log_app_messages (

Line 3147: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

3143:
3144: WHEN Fnd_Api.G_EXC_ERROR THEN
3145: ROLLBACK TO remove_Resource_Assignment;
3146: X_return_status := Fnd_Api.G_RET_STS_ERROR;
3147: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
3148: p_count => x_msg_count,
3149: p_data => X_msg_data);
3150: IF G_DEBUG='Y' THEN
3151: -- Debug info.

Line 3162: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)

3158:
3159: WHEN OTHERS THEN
3160: ROLLBACK TO remove_Resource_Assignment;
3161: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3162: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
3163: THEN
3164: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',
3165: p_procedure_name => 'REMOVE_Resource_Assignment',
3166: p_error_text => SUBSTR(SQLERRM,1,240));

Line 3164: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',

3160: ROLLBACK TO remove_Resource_Assignment;
3161: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3162: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
3163: THEN
3164: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',
3165: p_procedure_name => 'REMOVE_Resource_Assignment',
3166: p_error_text => SUBSTR(SQLERRM,1,240));
3167: END IF;
3168: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

Line 3168: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

3164: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',
3165: p_procedure_name => 'REMOVE_Resource_Assignment',
3166: p_error_text => SUBSTR(SQLERRM,1,240));
3167: END IF;
3168: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
3169: p_count => x_msg_count,
3170: p_data => X_msg_data);
3171: IF G_DEBUG='Y' THEN
3172: -- Debug info.

Line 3249: FND_MSG_PUB.initialize;

3245: END IF;
3246: -- Standard call to check for call compatibility.
3247: IF FND_API.to_boolean(p_init_msg_list)
3248: THEN
3249: FND_MSG_PUB.initialize;
3250: END IF;
3251:
3252: -- Initialize API return status to success
3253: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 3323: l_msg_count := Fnd_Msg_Pub.count_msg;

3319: END IF;
3320: END IF;
3321: ------------------------End of Body---------------------------------------
3322: --Standard check to count messages
3323: l_msg_count := Fnd_Msg_Pub.count_msg;
3324:
3325: IF l_msg_count > 0 THEN
3326: x_msg_count := l_msg_count;
3327: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 3349: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

3345: EXCEPTION
3346: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3347: ROLLBACK TO Process_Resrc_Assign;
3348: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3349: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3350: p_count => x_msg_count,
3351: p_data => x_msg_data);
3352: IF G_DEBUG='Y' THEN
3353: AHL_DEBUG_PUB.log_app_messages (

Line 3362: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

3358:
3359: WHEN FND_API.G_EXC_ERROR THEN
3360: ROLLBACK TO Process_Resrc_Assign;
3361: X_return_status := FND_API.G_RET_STS_ERROR;
3362: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3363: p_count => x_msg_count,
3364: p_data => X_msg_data);
3365: IF G_DEBUG='Y' THEN
3366: -- Debug info.

Line 3375: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)

3371: END IF;
3372: WHEN OTHERS THEN
3373: ROLLBACK TO Process_Resrc_Assign;
3374: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3375: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3376: THEN
3377: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',
3378: p_procedure_name => 'Process_Resrc_Assign',
3379: p_error_text => SUBSTR(SQLERRM,1,240));

Line 3377: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',

3373: ROLLBACK TO Process_Resrc_Assign;
3374: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3375: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3376: THEN
3377: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',
3378: p_procedure_name => 'Process_Resrc_Assign',
3379: p_error_text => SUBSTR(SQLERRM,1,240));
3380: END IF;
3381: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

Line 3381: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

3377: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_ASSIGN_PVT',
3378: p_procedure_name => 'Process_Resrc_Assign',
3379: p_error_text => SUBSTR(SQLERRM,1,240));
3380: END IF;
3381: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3382: p_count => x_msg_count,
3383: p_data => X_msg_data);
3384: IF G_DEBUG='Y' THEN
3385: -- Debug info.