APPS.AHL_PP_RESRC_REQUIRE_PVT dependencies on FND_MSG_PUB

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

404: Ahl_Debug_Pub.debug('Inside Check_Resrc_Require_Req_Items check while adding');
405: END IF;
406: -- OPERATION_SEQ_NUMBER
407: IF (p_resrc_Require_rec.OPERATION_SEQ_NUMBER IS NULL OR p_resrc_Require_rec.OPERATION_SEQ_NUMBER = Fnd_Api.G_MISS_NUM) THEN
408: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
409: IF G_DEBUG='Y' THEN
410: Ahl_Debug_Pub.debug ( 'OPERATION_SEQUENCE NUMBER PROB');
411: END IF;
412: Fnd_Message.set_name ('AHL', 'AHL_PP_OPER_SEQ_MISSING');

Line 413: Fnd_Msg_Pub.ADD;

409: IF G_DEBUG='Y' THEN
410: Ahl_Debug_Pub.debug ( 'OPERATION_SEQUENCE NUMBER PROB');
411: END IF;
412: Fnd_Message.set_name ('AHL', 'AHL_PP_OPER_SEQ_MISSING');
413: Fnd_Msg_Pub.ADD;
414: END IF;
415: x_return_status := Fnd_Api.g_ret_sts_error;
416: RETURN;
417: END IF;

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

418:
419: -- OPERATION_SEQ_NUMBER - Positive
420: IF (p_resrc_Require_rec.OPERATION_SEQ_NUMBER IS NOT NULL AND p_resrc_Require_rec.OPERATION_SEQ_NUMBER <> Fnd_Api.G_MISS_NUM) THEN
421: IF p_resrc_Require_rec.OPERATION_SEQ_NUMBER < 0 THEN
422: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
423: IF G_DEBUG='Y' THEN
424: Ahl_Debug_Pub.debug ( 'ONLY POSITIVE');
425: END IF;
426: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');

Line 427: Fnd_Msg_Pub.ADD;

423: IF G_DEBUG='Y' THEN
424: Ahl_Debug_Pub.debug ( 'ONLY POSITIVE');
425: END IF;
426: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
427: Fnd_Msg_Pub.ADD;
428: END IF;
429: x_return_status := Fnd_Api.g_ret_sts_error;
430: RETURN;
431: END IF;

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

432: END IF;
433:
434: -- RESOURCE_SEQ_NUMBER
435: IF (p_resrc_Require_rec.RESOURCE_SEQ_NUMBER IS NULL OR p_resrc_Require_rec.RESOURCE_SEQ_NUMBER = Fnd_Api.G_MISS_NUM) THEN
436: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
437: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_SEQ_MISSING');
438: Fnd_Msg_Pub.ADD;
439: END IF;
440: x_return_status := Fnd_Api.g_ret_sts_error;

Line 438: Fnd_Msg_Pub.ADD;

434: -- RESOURCE_SEQ_NUMBER
435: IF (p_resrc_Require_rec.RESOURCE_SEQ_NUMBER IS NULL OR p_resrc_Require_rec.RESOURCE_SEQ_NUMBER = Fnd_Api.G_MISS_NUM) THEN
436: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
437: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_SEQ_MISSING');
438: Fnd_Msg_Pub.ADD;
439: END IF;
440: x_return_status := Fnd_Api.g_ret_sts_error;
441: RETURN;
442: END IF;

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

443:
444: -- RESOURCE_SEQ_NUMBER -- Positive / Multiples of 10
445: IF (p_resrc_Require_rec.RESOURCE_SEQ_NUMBER IS NOT NULL AND p_resrc_Require_rec.RESOURCE_SEQ_NUMBER <> Fnd_Api.G_MISS_NUM) THEN
446: IF p_resrc_Require_rec.RESOURCE_SEQ_NUMBER < 0 THEN
447: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
448: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
449: Fnd_Msg_Pub.ADD;
450: END IF;
451: x_return_status := Fnd_Api.g_ret_sts_error;

Line 449: Fnd_Msg_Pub.ADD;

445: IF (p_resrc_Require_rec.RESOURCE_SEQ_NUMBER IS NOT NULL AND p_resrc_Require_rec.RESOURCE_SEQ_NUMBER <> Fnd_Api.G_MISS_NUM) THEN
446: IF p_resrc_Require_rec.RESOURCE_SEQ_NUMBER < 0 THEN
447: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
448: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
449: Fnd_Msg_Pub.ADD;
450: END IF;
451: x_return_status := Fnd_Api.g_ret_sts_error;
452: RETURN;
453: END IF;

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

452: RETURN;
453: END IF;
454:
455: IF (p_resrc_Require_rec.RESOURCE_SEQ_NUMBER mod 10) <> 0 THEN
456: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
457: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_SEQ_MULTI_OF_TEN');
458: Fnd_Msg_Pub.ADD;
459: END IF;
460: x_return_status := Fnd_Api.g_ret_sts_error;

Line 458: Fnd_Msg_Pub.ADD;

454:
455: IF (p_resrc_Require_rec.RESOURCE_SEQ_NUMBER mod 10) <> 0 THEN
456: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
457: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_SEQ_MULTI_OF_TEN');
458: Fnd_Msg_Pub.ADD;
459: END IF;
460: x_return_status := Fnd_Api.g_ret_sts_error;
461: RETURN;
462: END IF;

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

479: TRUNC(p_resrc_Require_rec.schedule_seq_num) <> p_resrc_Require_rec.schedule_seq_num
480: )
481: THEN
482:
483: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
484: Fnd_Message.set_name ('AHL', 'AHL_COM_SCHED_SEQ_INV');
485: Fnd_Msg_Pub.ADD;
486: END IF;
487: x_return_status := Fnd_Api.g_ret_sts_error;

Line 485: Fnd_Msg_Pub.ADD;

481: THEN
482:
483: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
484: Fnd_Message.set_name ('AHL', 'AHL_COM_SCHED_SEQ_INV');
485: Fnd_Msg_Pub.ADD;
486: END IF;
487: x_return_status := Fnd_Api.g_ret_sts_error;
488: RETURN;
489:

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

498: IF G_DEBUG='Y' THEN
499: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- RESOURCE_NAME ='|| p_resrc_Require_rec.RESOURCE_NAME);
500: END IF;
501:
502: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
503: Fnd_Message.set_name ('AHL', 'AHL_PP_RESOURCE_MISSING');
504: Fnd_Msg_Pub.ADD;
505: END IF;
506: x_return_status := Fnd_Api.g_ret_sts_error;

Line 504: Fnd_Msg_Pub.ADD;

500: END IF;
501:
502: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
503: Fnd_Message.set_name ('AHL', 'AHL_PP_RESOURCE_MISSING');
504: Fnd_Msg_Pub.ADD;
505: END IF;
506: x_return_status := Fnd_Api.g_ret_sts_error;
507: RETURN;
508: END IF;

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

515: IF (p_resrc_Require_rec.Duration IS NULL OR p_resrc_Require_rec.Duration = Fnd_Api.G_MISS_NUM) THEN
516: IF G_DEBUG='Y' THEN
517: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Duration =' || p_resrc_Require_rec.Duration);
518: END IF;
519: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
520: Fnd_Message.set_name ('AHL', 'AHL_PP_DURATION_MISSING');
521: Fnd_Msg_Pub.ADD;
522: END IF;
523: x_return_status := Fnd_Api.g_ret_sts_error;

Line 521: Fnd_Msg_Pub.ADD;

517: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Duration =' || p_resrc_Require_rec.Duration);
518: END IF;
519: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
520: Fnd_Message.set_name ('AHL', 'AHL_PP_DURATION_MISSING');
521: Fnd_Msg_Pub.ADD;
522: END IF;
523: x_return_status := Fnd_Api.g_ret_sts_error;
524: RETURN;
525: END IF;

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

525: END IF;
526: -- DURATION - Positive
527: IF (p_resrc_Require_rec.Duration IS NOT NULL AND p_resrc_Require_rec.Duration <> Fnd_Api.G_MISS_NUM) THEN
528: IF p_resrc_Require_rec.Duration < 0 THEN
529: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
530: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
531: Fnd_Msg_Pub.ADD;
532: END IF;
533: x_return_status := Fnd_Api.g_ret_sts_error;

Line 531: Fnd_Msg_Pub.ADD;

527: IF (p_resrc_Require_rec.Duration IS NOT NULL AND p_resrc_Require_rec.Duration <> Fnd_Api.G_MISS_NUM) THEN
528: IF p_resrc_Require_rec.Duration < 0 THEN
529: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
530: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
531: Fnd_Msg_Pub.ADD;
532: END IF;
533: x_return_status := Fnd_Api.g_ret_sts_error;
534: RETURN;
535: END IF;

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

541: END IF;
542:
543: IF (p_resrc_Require_rec.QUANTITY IS NULL OR p_resrc_Require_rec.QUANTITY = Fnd_Api.G_MISS_NUM) THEN
544: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Quantity =' || p_resrc_Require_rec.quantity);
545: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
546: Fnd_Message.set_name ('AHL', 'AHL_PP_QUANTITY_MISSING');
547: Fnd_Msg_Pub.ADD;
548: END IF;
549: x_return_status := Fnd_Api.g_ret_sts_error;

Line 547: Fnd_Msg_Pub.ADD;

543: IF (p_resrc_Require_rec.QUANTITY IS NULL OR p_resrc_Require_rec.QUANTITY = Fnd_Api.G_MISS_NUM) THEN
544: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Quantity =' || p_resrc_Require_rec.quantity);
545: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
546: Fnd_Message.set_name ('AHL', 'AHL_PP_QUANTITY_MISSING');
547: Fnd_Msg_Pub.ADD;
548: END IF;
549: x_return_status := Fnd_Api.g_ret_sts_error;
550: RETURN;
551: END IF;

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

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

Line 558: Fnd_Msg_Pub.ADD;

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

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

567: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- REQ_START_DATE =' || p_resrc_Require_rec.REQ_START_DATE);
568: END IF;
569:
570: IF (p_resrc_Require_rec.REQ_START_DATE IS NULL OR p_resrc_Require_rec.REQ_START_DATE = Fnd_Api.G_MISS_DATE) THEN
571: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
572: Fnd_Message.set_name ('AHL', 'AHL_PP_REQUIRE_ST_DT_MISSING');
573: Fnd_Msg_Pub.ADD;
574: END IF;
575: x_return_status := Fnd_Api.g_ret_sts_error;

Line 573: Fnd_Msg_Pub.ADD;

569:
570: IF (p_resrc_Require_rec.REQ_START_DATE IS NULL OR p_resrc_Require_rec.REQ_START_DATE = Fnd_Api.G_MISS_DATE) THEN
571: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
572: Fnd_Message.set_name ('AHL', 'AHL_PP_REQUIRE_ST_DT_MISSING');
573: Fnd_Msg_Pub.ADD;
574: END IF;
575: x_return_status := Fnd_Api.g_ret_sts_error;
576: RETURN;
577: END IF;

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

581: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- REQ_START_DATE =' || p_resrc_Require_rec.REQ_START_DATE);
582: END IF;
583:
584: IF (p_resrc_Require_rec.REQ_END_DATE IS NULL OR p_resrc_Require_rec.REQ_END_DATE = Fnd_Api.G_MISS_DATE) THEN
585: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
586: Fnd_Message.set_name ('AHL', 'AHL_PP_REQUIRE_END_DT_MISSING');
587: Fnd_Msg_Pub.ADD;
588: END IF;
589: x_return_status := Fnd_Api.g_ret_sts_error;

Line 587: Fnd_Msg_Pub.ADD;

583:
584: IF (p_resrc_Require_rec.REQ_END_DATE IS NULL OR p_resrc_Require_rec.REQ_END_DATE = Fnd_Api.G_MISS_DATE) THEN
585: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
586: Fnd_Message.set_name ('AHL', 'AHL_PP_REQUIRE_END_DT_MISSING');
587: Fnd_Msg_Pub.ADD;
588: END IF;
589: x_return_status := Fnd_Api.g_ret_sts_error;
590: RETURN;
591: END IF;

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

607: --
608: -- Validate the active dates.
609: IF l_Require_start_date IS NOT NULL AND l_Require_end_date IS NOT NULL THEN
610: IF l_Require_start_date > l_Require_end_date THEN
611: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
612: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_FROMDT_GTR_TODT');
613: Fnd_Msg_Pub.ADD;
614: END IF;
615: x_return_status := Fnd_Api.g_ret_sts_error;

Line 613: Fnd_Msg_Pub.ADD;

609: IF l_Require_start_date IS NOT NULL AND l_Require_end_date IS NOT NULL THEN
610: IF l_Require_start_date > l_Require_end_date THEN
611: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
612: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_FROMDT_GTR_TODT');
613: Fnd_Msg_Pub.ADD;
614: END IF;
615: x_return_status := Fnd_Api.g_ret_sts_error;
616: RETURN;
617: END IF;

Line 629: Fnd_Msg_Pub.ADD;

625: IF c_wo_oper%NOTFOUND THEN
626: CLOSE c_wo_oper;
627: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '--If condition--');
628: Fnd_Message.SET_NAME('AHL','AHL_PP_WORKORDER_NOT_EXISTS');
629: Fnd_Msg_Pub.ADD;
630: ELSE
631: CLOSE c_wo_oper;
632: END IF;
633: ELSE

Line 639: Fnd_Msg_Pub.ADD;

635: FETCH c_oper_req INTO c_oper_req_rec;
636: IF c_oper_req%NOTFOUND THEN
637: CLOSE c_oper_req;
638: Fnd_Message.SET_NAME('AHL','AHL_PP_WORKORDER_OPER_NOT_EXISTS');
639: Fnd_Msg_Pub.ADD;
640: ELSE
641: CLOSE c_oper_req;
642: OPEN c_wo_oper(c_oper_req_rec.WORKORDER_OPERATION_ID);
643: FETCH c_wo_oper INTO l_eff_st_date, l_eff_end_date, l_sch_st_date, l_sch_end_date;

Line 648: Fnd_Msg_Pub.ADD;

644: IF c_wo_oper%NOTFOUND THEN
645: CLOSE c_wo_oper;
646: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '--Else If condition--');
647: Fnd_Message.SET_NAME('AHL','AHL_PP_WORKORDER_NOT_EXISTS');
648: Fnd_Msg_Pub.ADD;
649: ELSE
650: CLOSE c_wo_oper;
651: END IF;
652: END IF;

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

674: --JKJain, removed the validations of Required dates with Actual dates. Bug 9195920.
675: /* IF l_eff_st_date IS NOT NULL THEN
676: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Actual Start Date =' || l_eff_st_date);
677: IF l_Require_start_date < l_eff_st_date THEN
678: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
679: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_STDT_LESS_ACT_STDT');
680: Fnd_Msg_Pub.ADD;
681: END IF;
682: x_return_status := Fnd_Api.g_ret_sts_error;

Line 680: Fnd_Msg_Pub.ADD;

676: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Actual Start Date =' || l_eff_st_date);
677: IF l_Require_start_date < l_eff_st_date THEN
678: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
679: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_STDT_LESS_ACT_STDT');
680: Fnd_Msg_Pub.ADD;
681: END IF;
682: x_return_status := Fnd_Api.g_ret_sts_error;
683: RETURN;
684: END IF;

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

685: ELS*/
686: IF l_sch_st_date IS NOT NULL THEN
687: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Scheduled Start Date =' || l_sch_st_date);
688: IF l_Require_start_date < l_sch_st_date THEN
689: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
690: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_STDT_LESS_SCH_STDT');
691: Fnd_Msg_Pub.ADD;
692: END IF;
693: x_return_status := Fnd_Api.g_ret_sts_error;

Line 691: Fnd_Msg_Pub.ADD;

687: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Scheduled Start Date =' || l_sch_st_date);
688: IF l_Require_start_date < l_sch_st_date THEN
689: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
690: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_STDT_LESS_SCH_STDT');
691: Fnd_Msg_Pub.ADD;
692: END IF;
693: x_return_status := Fnd_Api.g_ret_sts_error;
694: RETURN;
695: END IF;

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

697:
698: /* IF l_eff_end_date IS NOT NULL THEN
699: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Actual Start Date =' || l_eff_st_date);
700: IF l_Require_start_date > l_eff_end_date THEN
701: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
702: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_STDT_MORE_ACT_EDDT');
703: Fnd_Msg_Pub.ADD;
704: END IF;
705: x_return_status := Fnd_Api.g_ret_sts_error;

Line 703: Fnd_Msg_Pub.ADD;

699: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Actual Start Date =' || l_eff_st_date);
700: IF l_Require_start_date > l_eff_end_date THEN
701: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
702: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_STDT_MORE_ACT_EDDT');
703: Fnd_Msg_Pub.ADD;
704: END IF;
705: x_return_status := Fnd_Api.g_ret_sts_error;
706: RETURN;
707: END IF;

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

708: ELS */
709: IF l_sch_end_date IS NOT NULL THEN
710: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Scheduled End Date =' || l_sch_end_date);
711: IF l_Require_start_date > l_sch_end_date THEN
712: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
713: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_STDT_MORE_SCH_EDDT');
714: Fnd_Msg_Pub.ADD;
715: END IF;
716: x_return_status := Fnd_Api.g_ret_sts_error;

Line 714: Fnd_Msg_Pub.ADD;

710: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Scheduled End Date =' || l_sch_end_date);
711: IF l_Require_start_date > l_sch_end_date THEN
712: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
713: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_STDT_MORE_SCH_EDDT');
714: Fnd_Msg_Pub.ADD;
715: END IF;
716: x_return_status := Fnd_Api.g_ret_sts_error;
717: RETURN;
718: END IF;

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

723: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- End Date =' || l_Require_end_date);
724: /* IF l_eff_end_date IS NOT NULL THEN
725: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- Actual End Date =' || l_eff_end_date);
726: IF l_Require_end_date > l_eff_end_date THEN
727: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
728: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_EDDT_MORE_ACT_EDDT');
729: Fnd_Msg_Pub.ADD;
730: END IF;
731: x_return_status := Fnd_Api.g_ret_sts_error;

Line 729: Fnd_Msg_Pub.ADD;

725: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- Actual End Date =' || l_eff_end_date);
726: IF l_Require_end_date > l_eff_end_date THEN
727: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
728: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_EDDT_MORE_ACT_EDDT');
729: Fnd_Msg_Pub.ADD;
730: END IF;
731: x_return_status := Fnd_Api.g_ret_sts_error;
732: RETURN;
733: END IF;

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

734: ELS */
735: IF l_sch_end_date IS NOT NULL THEN
736: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- Scheduled End Date =' || l_sch_end_date);
737: IF l_Require_end_date > l_sch_end_date THEN
738: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
739: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_EDDT_MORE_SCH_EDDT');
740: Fnd_Msg_Pub.ADD;
741: END IF;
742: x_return_status := Fnd_Api.g_ret_sts_error;

Line 740: Fnd_Msg_Pub.ADD;

736: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- Scheduled End Date =' || l_sch_end_date);
737: IF l_Require_end_date > l_sch_end_date THEN
738: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
739: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_EDDT_MORE_SCH_EDDT');
740: Fnd_Msg_Pub.ADD;
741: END IF;
742: x_return_status := Fnd_Api.g_ret_sts_error;
743: RETURN;
744: END IF;

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

746:
747: /* IF l_eff_st_date IS NOT NULL THEN
748: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- Actual Start Date =' || l_eff_st_date);
749: IF l_Require_end_date < l_eff_st_date THEN
750: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
751: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_EDDT_LESS_ACT_STDT');
752: Fnd_Msg_Pub.ADD;
753: END IF;
754: x_return_status := Fnd_Api.g_ret_sts_error;

Line 752: Fnd_Msg_Pub.ADD;

748: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- Actual Start Date =' || l_eff_st_date);
749: IF l_Require_end_date < l_eff_st_date THEN
750: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
751: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_EDDT_LESS_ACT_STDT');
752: Fnd_Msg_Pub.ADD;
753: END IF;
754: x_return_status := Fnd_Api.g_ret_sts_error;
755: RETURN;
756: END IF;

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

757: ELS */
758: IF l_sch_st_date IS NOT NULL THEN
759: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- Scheduled Start Date =' || l_sch_st_date);
760: IF l_Require_end_date < l_sch_st_date THEN
761: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
762: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_EDDT_LESS_SCH_STDT');
763: Fnd_Msg_Pub.ADD;
764: END IF;
765: x_return_status := Fnd_Api.g_ret_sts_error;

Line 763: Fnd_Msg_Pub.ADD;

759: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- Scheduled Start Date =' || l_sch_st_date);
760: IF l_Require_end_date < l_sch_st_date THEN
761: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
762: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_EDDT_LESS_SCH_STDT');
763: Fnd_Msg_Pub.ADD;
764: END IF;
765: x_return_status := Fnd_Api.g_ret_sts_error;
766: RETURN;
767: END IF;

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

826:
827: IF l_valid_flag = Fnd_Api.g_false
828: THEN
829:
830: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
831: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_NOT_UNIQUE');
832: Fnd_Msg_Pub.ADD;
833: END IF;
834: x_return_status := Fnd_Api.g_ret_sts_error;

Line 832: Fnd_Msg_Pub.ADD;

828: THEN
829:
830: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
831: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_NOT_UNIQUE');
832: Fnd_Msg_Pub.ADD;
833: END IF;
834: x_return_status := Fnd_Api.g_ret_sts_error;
835: RETURN;
836: END IF;

Line 921: Fnd_Msg_Pub.initialize;

917: Ahl_Debug_Pub.debug( l_full_name ||':Start');
918: END IF;
919:
920: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
921: Fnd_Msg_Pub.initialize;
922: END IF;
923:
924: IF NOT Fnd_Api.compatible_api_call (
925: l_api_version,

Line 967: Fnd_Msg_Pub.ADD;

963: l_resource_type_code := p_resrc_Require_rec.resource_type_code;
964: END IF;
965: IF (l_resource_type_code NOT IN (1,2)) AND p_resrc_Require_rec.scheduled_type_code = 1 THEN
966: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_SCHEDULE_TYPE' );
967: Fnd_Msg_Pub.ADD;
968: RAISE Fnd_Api.g_exc_error;
969: END IF;
970: END IF;
971: */

Line 973: Fnd_Msg_Pub.count_and_get (

969: END IF;
970: END IF;
971: */
972: -------------------- finish --------------------------
973: Fnd_Msg_Pub.count_and_get (
974: p_encoded => Fnd_Api.g_false,
975: p_count => x_msg_count,
976: p_data => x_msg_data
977: );

Line 990: Fnd_Msg_Pub.count_and_get (

986:
987: EXCEPTION
988: WHEN Fnd_Api.g_exc_error THEN
989: x_return_status := Fnd_Api.g_ret_sts_error;
990: Fnd_Msg_Pub.count_and_get (
991: p_encoded => Fnd_Api.g_false,
992: p_count => x_msg_count,
993: p_data => x_msg_data
994: );

Line 997: Fnd_Msg_Pub.count_and_get (

993: p_data => x_msg_data
994: );
995: WHEN Fnd_Api.g_exc_unexpected_error THEN
996: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
997: Fnd_Msg_Pub.count_and_get (
998: p_encoded => Fnd_Api.g_false,
999: p_count => x_msg_count,
1000: p_data => x_msg_data
1001: );

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

1000: p_data => x_msg_data
1001: );
1002: WHEN OTHERS THEN
1003: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
1004: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
1005: THEN
1006: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1007: END IF;
1008:

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

1002: WHEN OTHERS THEN
1003: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
1004: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
1005: THEN
1006: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1007: END IF;
1008:
1009: Fnd_Msg_Pub.count_and_get (
1010: p_encoded => Fnd_Api.g_false,

Line 1009: Fnd_Msg_Pub.count_and_get (

1005: THEN
1006: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1007: END IF;
1008:
1009: Fnd_Msg_Pub.count_and_get (
1010: p_encoded => Fnd_Api.g_false,
1011: p_count => x_msg_count,
1012: p_data => x_msg_data
1013: );

Line 1392: FND_MSG_PUB.initialize;

1388:
1389: -- Standard call to check for call compatibility.
1390: IF FND_API.to_boolean(p_init_msg_list)
1391: THEN
1392: FND_MSG_PUB.initialize;
1393: END IF;
1394:
1395: -- Initialize API return status to success
1396: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1438: Fnd_Msg_Pub.ADD;

1434: IF c_wo_oper%NOTFOUND THEN
1435: CLOSE c_wo_oper;
1436: Ahl_Debug_Pub.debug('NO SEQ');
1437: Fnd_Message.SET_NAME('AHL','AHL_PP_OPER_SEQ_NOT_EXISTS');
1438: Fnd_Msg_Pub.ADD;
1439: ELSE
1440: CLOSE c_wo_oper;
1441: l_Resrc_Require_Rec.workorder_operation_id := l_wo_operation_id;
1442:

Line 1454: Fnd_Msg_Pub.ADD;

1450: IF G_DEBUG='Y' THEN
1451: Ahl_Debug_Pub.debug('UNIQ 1');
1452: END IF;
1453: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_SEQ_NOT_UNIQUE');
1454: Fnd_Msg_Pub.ADD;
1455: END IF;
1456: END IF; -- Check resrc sequence number
1457: END IF; -- Check c_wo_oper%NOTFOUND
1458:

Line 1462: Fnd_Msg_Pub.ADD;

1458:
1459: END IF; -- Check of Oper sequence number
1460: ELSE
1461: Fnd_Message.SET_NAME('AHL','AHL_PP_JOB_NOT_EXISTS');
1462: Fnd_Msg_Pub.ADD;
1463: END IF; -- Check of work order id
1464:
1465: --rroy
1466: -- ACL Changes

Line 1473: Fnd_Msg_Pub.ADD;

1469: OPEN c_workorder(l_Resrc_Require_Rec.workorder_id);
1470: FETCH c_workorder INTO c_workorder_rec;
1471: IF c_workorder%NOTFOUND THEN
1472: Fnd_Message.SET_NAME('AHL','AHL_PP_WORKORDER_NOT_EXISTS');
1473: Fnd_Msg_Pub.ADD;
1474: END IF;
1475: CLOSE c_workorder;
1476: END IF;
1477:

Line 1485: FND_MSG_PUB.ADD;

1481: p_visit_id => NULL,
1482: p_item_instance_id => NULL);
1483: IF l_return_status = FND_API.G_TRUE THEN
1484: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_CRT_RESREQ_UNTLCKD');
1485: FND_MSG_PUB.ADD;
1486: RAISE FND_API.G_EXC_ERROR;
1487: END IF;
1488: --rroy
1489: -- ACL Changes

Line 1574: Fnd_Msg_Pub.ADD;

1570:
1571: IF NVL(l_return_status, 'X') <> 'S'
1572: THEN
1573: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_TYPE_NOT_EXISTS');
1574: Fnd_Msg_Pub.ADD;
1575: RAISE Fnd_Api.G_EXC_ERROR;
1576: END IF;
1577: END IF;
1578: IF G_DEBUG='Y' THEN

Line 1602: Fnd_Msg_Pub.ADD;

1598:
1599: IF NVL(l_return_status, 'X') <> 'S'
1600: THEN
1601: Fnd_Message.SET_NAME('AHL','AHL_PP_RESOURCE_NOT_EXISTS');
1602: Fnd_Msg_Pub.ADD;
1603: RAISE Fnd_Api.G_EXC_ERROR;
1604: END IF;
1605: END IF;
1606: IF G_DEBUG='Y' THEN

Line 1624: Fnd_Msg_Pub.ADD;

1620: OPEN c_resources(l_Resrc_Require_Rec.Resource_Id);
1621: FETCH c_resources INTO l_resrc_dept_id;
1622: IF c_resources%NOTFOUND THEN
1623: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_DEPT_NOT_EXISTS');
1624: Fnd_Msg_Pub.ADD;
1625: END IF;
1626: CLOSE c_resources;
1627:
1628: -- check resource id dept matches the operation dept.

Line 1631: Fnd_Msg_Pub.ADD;

1627:
1628: -- check resource id dept matches the operation dept.
1629: IF (l_resrc_dept_id <> l_department_id) THEN
1630: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_DEPT_NOT_EXISTS');
1631: Fnd_Msg_Pub.ADD;
1632: END IF;
1633:
1634: --Convert Uom code
1635: OPEN c_uom_code(l_Resrc_Require_Rec.Resource_Id);

Line 1649: Fnd_Msg_Pub.ADD;

1645: FETCH c_UOM INTO l_Resrc_Require_Rec.UOM_CODE;
1646: IF c_UOM%NOTFOUND THEN
1647: CLOSE c_UOM;
1648: Fnd_Message.SET_NAME('AHL','AHL_PP_UOM_NOT_EXISTS');
1649: Fnd_Msg_Pub.ADD;
1650: ELSE
1651: CLOSE c_UOM;
1652: END IF;
1653: END IF;

Line 1670: Fnd_Msg_Pub.ADD;

1666:
1667: IF NVL(l_return_status, 'X') <> 'S'
1668: THEN
1669: Fnd_Message.SET_NAME('AHL','AHL_PP_CHARGE_TYPE_NOT_EXISTS');
1670: Fnd_Msg_Pub.ADD;
1671: RAISE Fnd_Api.G_EXC_ERROR;
1672: END IF;
1673: END IF;
1674: IF G_DEBUG='Y' THEN

Line 1694: Fnd_Msg_Pub.ADD;

1690:
1691: IF NVL(l_return_status, 'X') <> 'S'
1692: THEN
1693: Fnd_Message.SET_NAME('AHL','AHL_PP_COST_BASIS_NOT_EXISTS');
1694: Fnd_Msg_Pub.ADD;
1695: RAISE Fnd_Api.G_EXC_ERROR;
1696: END IF;
1697: END IF;
1698: IF G_DEBUG='Y' THEN

Line 1718: Fnd_Msg_Pub.ADD;

1714:
1715: IF NVL(l_return_status, 'X') <> 'S'
1716: THEN
1717: Fnd_Message.SET_NAME('AHL','AHL_PP_SCHED_TYPE_NOT_EXISTS');
1718: Fnd_Msg_Pub.ADD;
1719: RAISE Fnd_Api.G_EXC_ERROR;
1720: END IF;
1721: END IF;
1722: IF G_DEBUG='Y' THEN

Line 1776: l_msg_count := Fnd_Msg_Pub.count_msg;

1772: IF G_DEBUG='Y' THEN
1773: Ahl_Debug_Pub.debug ( l_full_name || ' ******After calling Validate_Resrc_Require****');
1774: END IF;
1775: --Standard check to count messages
1776: l_msg_count := Fnd_Msg_Pub.count_msg;
1777:
1778: IF l_msg_count > 0 THEN
1779: x_msg_count := l_msg_count;
1780: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 2076: l_msg_count := Fnd_Msg_Pub.count_msg;

2072:
2073: END IF;
2074:
2075: --Standard check to count messages
2076: l_msg_count := Fnd_Msg_Pub.count_msg;
2077: IF l_msg_count > 0 THEN
2078: X_msg_count := l_msg_count;
2079: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2080: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

Line 2112: Fnd_Msg_Pub.ADD;

2108: CLOSE Sch_id_exists;
2109: --
2110: IF l_dummy IS NOT NULL THEN
2111: Fnd_Message.SET_NAME('AHL','AHL_PP_SEQUENCE_NO_EXISTS');
2112: Fnd_Msg_Pub.ADD;
2113: RAISE FND_API.G_EXC_ERROR;
2114: END IF;
2115: IF G_DEBUG='Y' THEN
2116: Ahl_Debug_Pub.debug ( l_full_name || ' ******Before calling Insert_Row****');

Line 2202: l_msg_count := Fnd_Msg_Pub.count_msg;

2198:
2199: --END IF;
2200: ------------------------End of Body---------------------------------------
2201: --Standard check to count messages
2202: l_msg_count := Fnd_Msg_Pub.count_msg;
2203: IF l_msg_count > 0 THEN
2204: X_msg_count := l_msg_count;
2205: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2206: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

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

2221: EXCEPTION
2222: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2223: ROLLBACK TO Create_Resrc_Require;
2224: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2225: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2226: p_count => x_msg_count,
2227: p_data => x_msg_data);
2228: IF G_DEBUG='Y' THEN
2229: -- Debug info.

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

2235:
2236: WHEN FND_API.G_EXC_ERROR THEN
2237: ROLLBACK TO Create_Resrc_Require;
2238: X_return_status := FND_API.G_RET_STS_ERROR;
2239: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2240: p_count => x_msg_count,
2241: p_data => X_msg_data);
2242: IF G_DEBUG='Y' THEN
2243:

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

2254: ROLLBACK TO Create_Resrc_Require;
2255: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2256:
2257: Ahl_Debug_Pub.debug('Inside Exception' || '**SQL ERRORS');
2258: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2259: THEN
2260: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
2261: p_procedure_name => 'Create_Resrc_Require',
2262: p_error_text => SUBSTR(SQLERRM,1,240));

Line 2260: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',

2256:
2257: Ahl_Debug_Pub.debug('Inside Exception' || '**SQL ERRORS');
2258: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2259: THEN
2260: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
2261: p_procedure_name => 'Create_Resrc_Require',
2262: p_error_text => SUBSTR(SQLERRM,1,240));
2263: END IF;
2264: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

2260: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
2261: p_procedure_name => 'Create_Resrc_Require',
2262: p_error_text => SUBSTR(SQLERRM,1,240));
2263: END IF;
2264: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2265: p_count => x_msg_count,
2266: p_data => X_msg_data);
2267: IF G_DEBUG='Y' THEN
2268:

Line 2461: FND_MSG_PUB.initialize;

2457: G_MODULE_TYPE:=P_MODULE_TYPE;
2458: -- Standard call to check for call compatibility.
2459: IF FND_API.to_boolean(p_init_msg_list)
2460: THEN
2461: FND_MSG_PUB.initialize;
2462: END IF;
2463:
2464: -- Initialize API return status to success
2465: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2509: FND_MSG_PUB.ADD;

2505: p_visit_id => NULL,
2506: p_item_instance_id => NULL);
2507: IF l_return_status = FND_API.G_TRUE THEN
2508: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_UPD_RESREQ_UNTLCKD');
2509: FND_MSG_PUB.ADD;
2510: RAISE FND_API.G_EXC_ERROR;
2511: END IF;
2512:
2513: -- rroy

Line 2619: Fnd_Msg_Pub.ADD;

2615:
2616: IF NVL(l_return_status, 'X') <> 'S'
2617: THEN
2618: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_TYPE_NOT_EXISTS');
2619: Fnd_Msg_Pub.ADD;
2620: RAISE Fnd_Api.G_EXC_ERROR;
2621: END IF;
2622: END IF;
2623:

Line 2643: Fnd_Msg_Pub.ADD;

2639:
2640: IF NVL(l_return_status, 'X') <> 'S'
2641: THEN
2642: Fnd_Message.SET_NAME('AHL','AHL_PP_RESOURCE_NOT_EXISTS');
2643: Fnd_Msg_Pub.ADD;
2644: RAISE Fnd_Api.G_EXC_ERROR;
2645: END IF;
2646: END IF;
2647: IF G_DEBUG='Y' THEN

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

2652:
2653: -- RESOURCE_TYPE_NAME
2654: IF (l_Resrc_Require_Rec.RESOURCE_TYPE_NAME IS NULL OR l_Resrc_Require_Rec.RESOURCE_TYPE_NAME = Fnd_Api.G_MISS_CHAR) THEN
2655: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Resource Type Name =' || l_Resrc_Require_Rec.RESOURCE_TYPE_NAME);
2656: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2657: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_TYPE_MISSING');
2658: Fnd_Msg_Pub.ADD;
2659: END IF;
2660: END IF;

Line 2658: Fnd_Msg_Pub.ADD;

2654: IF (l_Resrc_Require_Rec.RESOURCE_TYPE_NAME IS NULL OR l_Resrc_Require_Rec.RESOURCE_TYPE_NAME = Fnd_Api.G_MISS_CHAR) THEN
2655: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Resource Type Name =' || l_Resrc_Require_Rec.RESOURCE_TYPE_NAME);
2656: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2657: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_TYPE_MISSING');
2658: Fnd_Msg_Pub.ADD;
2659: END IF;
2660: END IF;
2661:
2662: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Resource Name =' || l_Resrc_Require_Rec.RESOURCE_NAME);

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

2662: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Resource Name =' || l_Resrc_Require_Rec.RESOURCE_NAME);
2663: -- RESOURCE_NAME
2664: IF (l_Resrc_Require_Rec.RESOURCE_NAME IS NULL OR l_Resrc_Require_Rec.RESOURCE_NAME = Fnd_Api.G_MISS_CHAR) THEN
2665: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Resource Name =' || l_Resrc_Require_Rec.RESOURCE_NAME);
2666: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2667: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_NAME_MISSING');
2668: Fnd_Msg_Pub.ADD;
2669: END IF;
2670: END IF;

Line 2668: Fnd_Msg_Pub.ADD;

2664: IF (l_Resrc_Require_Rec.RESOURCE_NAME IS NULL OR l_Resrc_Require_Rec.RESOURCE_NAME = Fnd_Api.G_MISS_CHAR) THEN
2665: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Resource Name =' || l_Resrc_Require_Rec.RESOURCE_NAME);
2666: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2667: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_NAME_MISSING');
2668: Fnd_Msg_Pub.ADD;
2669: END IF;
2670: END IF;
2671:
2672: Ahl_Debug_Pub.debug ( l_full_name || 'After WORKORDER ID = ' || l_Resrc_Require_Rec.workorder_id);

Line 2678: Fnd_Msg_Pub.ADD;

2674: FETCH c_workorder INTO c_workorder_rec;
2675: IF c_workorder%NOTFOUND THEN
2676: CLOSE c_workorder;
2677: Fnd_Message.SET_NAME('AHL','AHL_PP_WORKORDER_NOT_EXISTS');
2678: Fnd_Msg_Pub.ADD;
2679: ELSE
2680: CLOSE c_workorder;*/
2681:
2682: OPEN c_resources(l_Resrc_Require_Rec.Resource_Id);

Line 2687: Fnd_Msg_Pub.ADD;

2683: FETCH c_resources INTO l_resrc_dept_id;
2684: IF c_resources%NOTFOUND THEN
2685: CLOSE c_resources;
2686: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_DEPT_NOT_EXISTS');
2687: Fnd_Msg_Pub.ADD;
2688: ELSE
2689: CLOSE c_resources;
2690: --IF l_resrc_dept_id = c_workorder_rec.department_id THEN
2691: IF l_resrc_dept_id <> l_department_id THEN

Line 2693: Fnd_Msg_Pub.ADD;

2689: CLOSE c_resources;
2690: --IF l_resrc_dept_id = c_workorder_rec.department_id THEN
2691: IF l_resrc_dept_id <> l_department_id THEN
2692: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_DEPT_NOT_EXISTS');
2693: Fnd_Msg_Pub.ADD;
2694: END IF;
2695: END IF;
2696:
2697: --END IF;

Line 2712: Fnd_Msg_Pub.ADD;

2708: FETCH c_UOM INTO l_Resrc_Require_Rec.UOM_CODE;
2709: IF c_UOM%NOTFOUND THEN
2710: CLOSE c_UOM;
2711: Fnd_Message.SET_NAME('AHL','AHL_PP_UOM_NOT_EXISTS');
2712: Fnd_Msg_Pub.ADD;
2713: ELSE
2714: CLOSE c_UOM;
2715: END IF;
2716: END IF;

Line 2744: Fnd_Msg_Pub.ADD;

2740:
2741: IF NVL(l_return_status, 'X') <> 'S'
2742: THEN
2743: Fnd_Message.SET_NAME('AHL','AHL_PP_CHARGE_TYPE_NOT_EXISTS');
2744: Fnd_Msg_Pub.ADD;
2745: RAISE Fnd_Api.G_EXC_ERROR;
2746: END IF;
2747: END IF;
2748: IF G_DEBUG='Y' THEN

Line 2768: Fnd_Msg_Pub.ADD;

2764:
2765: IF NVL(l_return_status, 'X') <> 'S'
2766: THEN
2767: Fnd_Message.SET_NAME('AHL','AHL_PP_COST_BASIS_NOT_EXISTS');
2768: Fnd_Msg_Pub.ADD;
2769: RAISE Fnd_Api.G_EXC_ERROR;
2770: END IF;
2771: END IF;
2772: IF G_DEBUG='Y' THEN

Line 2792: Fnd_Msg_Pub.ADD;

2788:
2789: IF NVL(l_return_status, 'X') <> 'S'
2790: THEN
2791: Fnd_Message.SET_NAME('AHL','AHL_PP_SCHED_TYPE_NOT_EXISTS');
2792: Fnd_Msg_Pub.ADD;
2793: RAISE Fnd_Api.G_EXC_ERROR;
2794: END IF;
2795: END IF;
2796: IF G_DEBUG='Y' THEN

Line 2824: l_msg_count := Fnd_Msg_Pub.count_msg;

2820: x_msg_data => x_msg_data
2821: );
2822:
2823: --Standard check to count messages
2824: l_msg_count := Fnd_Msg_Pub.count_msg;
2825:
2826: IF l_msg_count > 0 THEN
2827: x_msg_count := l_msg_count;
2828: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 2966: Fnd_Msg_Pub.ADD;

2962: END IF;
2963: IF (c_oper_req_rec.object_version_number <> l_Resrc_Require_Rec.object_version_number)
2964: THEN
2965: Fnd_Message.Set_Name('AHL','AHL_COM_RECORD_CHANGED');
2966: Fnd_Msg_Pub.ADD;
2967: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2968: --
2969: END IF;
2970:

Line 3135: l_msg_count := Fnd_Msg_Pub.count_msg;

3131: END IF;
3132: --
3133: ------------------------End of Body---------------------------------------
3134: -- Standard check to count messages
3135: l_msg_count := Fnd_Msg_Pub.count_msg;
3136:
3137: IF l_msg_count > 0 THEN
3138: X_msg_count := l_msg_count;
3139: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

3155: EXCEPTION
3156: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3157: ROLLBACK TO Update_Resrc_Require;
3158: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3159: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3160: p_count => x_msg_count,
3161: p_data => x_msg_data);
3162: IF G_DEBUG='Y' THEN
3163: -- Debug info.

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

3169: END IF;
3170: WHEN FND_API.G_EXC_ERROR THEN
3171: ROLLBACK TO Update_Resrc_Require;
3172: X_return_status := FND_API.G_RET_STS_ERROR;
3173: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3174: p_count => x_msg_count,
3175: p_data => X_msg_data);
3176: IF G_DEBUG='Y' THEN
3177: -- Debug info.

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

3184: END IF;
3185: WHEN OTHERS THEN
3186: ROLLBACK TO Update_Resrc_Require;
3187: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3188: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3189: THEN
3190: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
3191: p_procedure_name => 'UPDATE_Resrc_Require',
3192: p_error_text => SUBSTR(SQLERRM,1,240));

Line 3190: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',

3186: ROLLBACK TO Update_Resrc_Require;
3187: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3188: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3189: THEN
3190: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
3191: p_procedure_name => 'UPDATE_Resrc_Require',
3192: p_error_text => SUBSTR(SQLERRM,1,240));
3193: END IF;
3194: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

3190: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
3191: p_procedure_name => 'UPDATE_Resrc_Require',
3192: p_error_text => SUBSTR(SQLERRM,1,240));
3193: END IF;
3194: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3195: p_count => x_msg_count,
3196: p_data => X_msg_data);
3197: IF G_DEBUG='Y' THEN
3198: -- Debug info.

Line 3356: Fnd_Msg_Pub.initialize;

3352:
3353: -- Standard call to check for call compatibility.
3354: IF Fnd_Api.to_boolean(p_init_msg_list)
3355: THEN
3356: Fnd_Msg_Pub.initialize;
3357: END IF;
3358:
3359: -- Initialize API return status to success
3360: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

Line 3505: Fnd_Msg_Pub.Count_And_Get

3501:
3502: END LOOP;
3503: END IF;
3504: -- Standard call to get message count and if count is 1, get message info
3505: Fnd_Msg_Pub.Count_And_Get
3506: ( p_count => x_msg_count,
3507: p_data => x_msg_data,
3508: p_encoded => Fnd_Api.g_false);
3509:

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

3523: EXCEPTION
3524: WHEN Fnd_Api.G_EXC_ERROR THEN
3525: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3526: ROLLBACK TO Get_Resource_Requirement;
3527: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
3528: p_data => x_msg_data,
3529: p_encoded => Fnd_Api.g_false);
3530:
3531:

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

3531:
3532: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3533: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3534: ROLLBACK TO Get_Resource_Requirement;
3535: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
3536: p_data => x_msg_data,
3537: p_encoded => Fnd_Api.g_false);
3538:
3539: WHEN OTHERS THEN

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

3538:
3539: WHEN OTHERS THEN
3540: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3541: ROLLBACK TO Get_Resource_Requirement;
3542: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
3543: p_procedure_name => 'Get_Resource_Requirement',
3544: p_error_text => SQLERRM);
3545:
3546: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

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

3542: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
3543: p_procedure_name => 'Get_Resource_Requirement',
3544: p_error_text => SQLERRM);
3545:
3546: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
3547: p_data => x_msg_data,
3548: p_encoded => Fnd_Api.g_false);
3549: END Get_Resource_Requirement;
3550: --

Line 3675: Fnd_Msg_Pub.initialize;

3671: END IF;
3672: -- Standard call to check for call compatibility.
3673: IF Fnd_Api.to_boolean(p_init_msg_list)
3674: THEN
3675: Fnd_Msg_Pub.initialize;
3676: END IF;
3677:
3678: -- Initialize API return status to success
3679: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

Line 3707: Fnd_Msg_Pub.ADD;

3703: OPEN Get_resource_cur (p_x_resrc_Require_tbl(i).operation_resource_id);
3704: FETCH Get_resource_cur INTO l_resource_rec;
3705: IF Get_resource_cur%NOTFOUND THEN
3706: Fnd_Message.Set_Name('AHL','AHL_PP_RECORD_INVALID');
3707: Fnd_Msg_Pub.ADD;
3708: CLOSE Get_resource_cur;
3709: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3710: END IF;
3711: CLOSE Get_resource_cur;

Line 3726: Fnd_Msg_Pub.ADD;

3722: IF(p_x_resrc_Require_tbl(i).object_version_number <> l_resource_rec.object_version_number )
3723: THEN
3724: --
3725: Fnd_Message.Set_Name('AHL','AHL_COM_RECORD_CHANGED');
3726: Fnd_Msg_Pub.ADD;
3727: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3728: END IF;
3729: END IF;
3730: --

Line 3761: FND_MSG_PUB.ADD;

3757: p_visit_id => NULL,
3758: p_item_instance_id => NULL);
3759: IF l_return_status = FND_API.G_TRUE THEN
3760: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_DEL_RESREQ_UNTLCKD');
3761: FND_MSG_PUB.ADD;
3762: RAISE FND_API.G_EXC_ERROR;
3763: END IF;
3764:
3765: -- rroy

Line 3776: FND_MSG_PUB.ADD;

3772: FETCH check_resrc_txn INTO l_junk;
3773: IF (check_resrc_txn%FOUND) THEN
3774: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_DEL_RESREQ_RESTXN');
3775: FND_MESSAGE.Set_Token('OPER_RES', l_wo_oper_rec.operation_sequence_num || '-' || l_resource_rec.resource_sequence_num);
3776: FND_MSG_PUB.ADD;
3777: CLOSE check_resrc_txn;
3778: RAISE FND_API.G_EXC_ERROR;
3779: END IF;
3780: CLOSE check_resrc_txn;

Line 3823: l_msg_count := Fnd_Msg_Pub.count_msg;

3819: Ahl_Debug_Pub.debug ('Inside OVN:'||p_x_resrc_Require_tbl(i).object_version_number);
3820: Ahl_Debug_Pub.debug ('l_Resrc_Require_Rec.UOM_CODE: ' ||p_x_resrc_Require_tbl(i).uom_code );
3821:
3822: END IF;
3823: l_msg_count := Fnd_Msg_Pub.count_msg;
3824: IF G_DEBUG='Y' THEN
3825: Ahl_Debug_Pub.debug ( 'msg count:'||l_msg_count);
3826: END IF;
3827:

Line 3901: Fnd_Msg_Pub.ADD;

3897: IF l_count > 0 THEN
3898: Ahl_Debug_Pub.debug ('Count in Assignments table' || l_count);
3899: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_ASSIGN_EXITS');
3900: FND_MESSAGE.SET_TOKEN('RECORD',p_x_resrc_Require_tbl(i).RESOURCE_SEQ_NUMBER,FALSE);
3901: Fnd_Msg_Pub.ADD;
3902: ELSE
3903: Ahl_Debug_Pub.debug ('Count in Assignments table' || l_count);
3904: Ahl_Debug_Pub.debug ('BEFORE DELETE RESOURCES' || p_x_resrc_Require_tbl(i).Operation_Resource_Id);
3905: DELETE FROM AHL_OPERATION_RESOURCES

Line 3914: l_msg_count := Fnd_Msg_Pub.count_msg;

3910: END IF; --Return status
3911:
3912: ---------------------------End of Body---------------------------------------
3913: --Standard check to count messages
3914: l_msg_count := Fnd_Msg_Pub.count_msg;
3915:
3916: IF l_msg_count > 0 THEN
3917: X_msg_count := l_msg_count;
3918: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

3934: EXCEPTION
3935: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3936: ROLLBACK TO Remove_Resource_Requirement;
3937: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3938: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
3939: p_count => x_msg_count,
3940: p_data => x_msg_data);
3941: IF G_DEBUG='Y' THEN
3942: Ahl_Debug_Pub.log_app_messages (

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

3947: END IF;
3948: WHEN Fnd_Api.G_EXC_ERROR THEN
3949: ROLLBACK TO Remove_Resource_Requirement;
3950: X_return_status := Fnd_Api.G_RET_STS_ERROR;
3951: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
3952: p_count => x_msg_count,
3953: p_data => X_msg_data);
3954: IF G_DEBUG='Y' THEN
3955: -- Debug info.

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

3962:
3963: WHEN OTHERS THEN
3964: ROLLBACK TO Remove_Resource_Requirement;
3965: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3966: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
3967: THEN
3968: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
3969: p_procedure_name => 'Remove_Resource_Requirement',
3970: p_error_text => SUBSTR(SQLERRM,1,240));

Line 3968: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',

3964: ROLLBACK TO Remove_Resource_Requirement;
3965: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3966: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
3967: THEN
3968: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
3969: p_procedure_name => 'Remove_Resource_Requirement',
3970: p_error_text => SUBSTR(SQLERRM,1,240));
3971: END IF;
3972: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

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

3968: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
3969: p_procedure_name => 'Remove_Resource_Requirement',
3970: p_error_text => SUBSTR(SQLERRM,1,240));
3971: END IF;
3972: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
3973: p_count => x_msg_count,
3974: p_data => x_msg_data);
3975: IF G_DEBUG='Y' THEN
3976: -- Debug info.

Line 4065: FND_MSG_PUB.initialize;

4061: END IF;
4062: -- Standard call to check for call compatibility.
4063: IF FND_API.to_boolean(p_init_msg_list)
4064: THEN
4065: FND_MSG_PUB.initialize;
4066: END IF;
4067: -- Initialize API return status to success
4068: x_return_status := FND_API.G_RET_STS_SUCCESS;
4069: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 4146: l_msg_count := Fnd_Msg_Pub.count_msg;

4142: );
4143: END IF;
4144: ------------------------End of Body---------------------------------------
4145: --Standard check to count messages
4146: l_msg_count := Fnd_Msg_Pub.count_msg;
4147:
4148: -- Fix for Bug # 9201220 (FP for Bug # 9115435) -- start
4149: IF l_msg_count > 0 THEN
4150: x_msg_count := l_msg_count;

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

4240: EXCEPTION
4241: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4242: ROLLBACK TO Process_Resrc_Require;
4243: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4244: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4245: p_count => x_msg_count,
4246: p_data => x_msg_data);
4247: IF G_DEBUG='Y' THEN
4248: AHL_DEBUG_PUB.log_app_messages (

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

4252: END IF;
4253: WHEN FND_API.G_EXC_ERROR THEN
4254: ROLLBACK TO Process_Resrc_Require;
4255: X_return_status := FND_API.G_RET_STS_ERROR;
4256: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4257: p_count => x_msg_count,
4258: p_data => X_msg_data);
4259: IF G_DEBUG='Y' THEN
4260: -- Debug info.

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

4265: END IF;
4266: WHEN OTHERS THEN
4267: ROLLBACK TO Process_Resrc_Require;
4268: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4269: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4270: THEN
4271: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
4272: p_procedure_name => 'Process_Resrc_Require',
4273: p_error_text => SUBSTR(SQLERRM,1,240));

Line 4271: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',

4267: ROLLBACK TO Process_Resrc_Require;
4268: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4269: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
4270: THEN
4271: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
4272: p_procedure_name => 'Process_Resrc_Require',
4273: p_error_text => SUBSTR(SQLERRM,1,240));
4274: END IF;
4275: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

4271: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
4272: p_procedure_name => 'Process_Resrc_Require',
4273: p_error_text => SUBSTR(SQLERRM,1,240));
4274: END IF;
4275: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4276: p_count => x_msg_count,
4277: p_data => x_msg_data);
4278: IF G_DEBUG='Y' THEN
4279: -- Debug info.