APPS.AHL_PP_RESRC_REQUIRE_PVT dependencies on FND_MSG_PUB

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

396: Ahl_Debug_Pub.debug('Inside Check_Resrc_Require_Req_Items check while adding');
397: END IF;
398: -- OPERATION_SEQ_NUMBER
399: IF (p_resrc_Require_rec.OPERATION_SEQ_NUMBER IS NULL OR p_resrc_Require_rec.OPERATION_SEQ_NUMBER = Fnd_Api.G_MISS_NUM) THEN
400: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
401: IF G_DEBUG='Y' THEN
402: Ahl_Debug_Pub.debug ( 'OPERATION_SEQUENCE NUMBER PROB');
403: END IF;
404: Fnd_Message.set_name ('AHL', 'AHL_PP_OPER_SEQ_MISSING');

Line 405: Fnd_Msg_Pub.ADD;

401: IF G_DEBUG='Y' THEN
402: Ahl_Debug_Pub.debug ( 'OPERATION_SEQUENCE NUMBER PROB');
403: END IF;
404: Fnd_Message.set_name ('AHL', 'AHL_PP_OPER_SEQ_MISSING');
405: Fnd_Msg_Pub.ADD;
406: END IF;
407: x_return_status := Fnd_Api.g_ret_sts_error;
408: RETURN;
409: END IF;

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

410:
411: -- OPERATION_SEQ_NUMBER - Positive
412: 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
413: IF p_resrc_Require_rec.OPERATION_SEQ_NUMBER < 0 THEN
414: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
415: IF G_DEBUG='Y' THEN
416: Ahl_Debug_Pub.debug ( 'ONLY POSITIVE');
417: END IF;
418: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');

Line 419: Fnd_Msg_Pub.ADD;

415: IF G_DEBUG='Y' THEN
416: Ahl_Debug_Pub.debug ( 'ONLY POSITIVE');
417: END IF;
418: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
419: Fnd_Msg_Pub.ADD;
420: END IF;
421: x_return_status := Fnd_Api.g_ret_sts_error;
422: RETURN;
423: END IF;

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

424: END IF;
425:
426: -- RESOURCE_SEQ_NUMBER
427: IF (p_resrc_Require_rec.RESOURCE_SEQ_NUMBER IS NULL OR p_resrc_Require_rec.RESOURCE_SEQ_NUMBER = Fnd_Api.G_MISS_NUM) THEN
428: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
429: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_SEQ_MISSING');
430: Fnd_Msg_Pub.ADD;
431: END IF;
432: x_return_status := Fnd_Api.g_ret_sts_error;

Line 430: Fnd_Msg_Pub.ADD;

426: -- RESOURCE_SEQ_NUMBER
427: IF (p_resrc_Require_rec.RESOURCE_SEQ_NUMBER IS NULL OR p_resrc_Require_rec.RESOURCE_SEQ_NUMBER = Fnd_Api.G_MISS_NUM) THEN
428: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
429: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_SEQ_MISSING');
430: Fnd_Msg_Pub.ADD;
431: END IF;
432: x_return_status := Fnd_Api.g_ret_sts_error;
433: RETURN;
434: END IF;

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

435:
436: -- RESOURCE_SEQ_NUMBER -- Positive / Multiples of 10
437: 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
438: IF p_resrc_Require_rec.RESOURCE_SEQ_NUMBER < 0 THEN
439: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
440: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
441: Fnd_Msg_Pub.ADD;
442: END IF;
443: x_return_status := Fnd_Api.g_ret_sts_error;

Line 441: Fnd_Msg_Pub.ADD;

437: 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
438: IF p_resrc_Require_rec.RESOURCE_SEQ_NUMBER < 0 THEN
439: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
440: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
441: Fnd_Msg_Pub.ADD;
442: END IF;
443: x_return_status := Fnd_Api.g_ret_sts_error;
444: RETURN;
445: END IF;

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

444: RETURN;
445: END IF;
446:
447: IF (p_resrc_Require_rec.RESOURCE_SEQ_NUMBER mod 10) <> 0 THEN
448: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
449: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_SEQ_MULTI_OF_TEN');
450: Fnd_Msg_Pub.ADD;
451: END IF;
452: x_return_status := Fnd_Api.g_ret_sts_error;

Line 450: Fnd_Msg_Pub.ADD;

446:
447: IF (p_resrc_Require_rec.RESOURCE_SEQ_NUMBER mod 10) <> 0 THEN
448: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
449: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_SEQ_MULTI_OF_TEN');
450: Fnd_Msg_Pub.ADD;
451: END IF;
452: x_return_status := Fnd_Api.g_ret_sts_error;
453: RETURN;
454: END IF;

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

471: TRUNC(p_resrc_Require_rec.schedule_seq_num) <> p_resrc_Require_rec.schedule_seq_num
472: )
473: THEN
474:
475: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
476: Fnd_Message.set_name ('AHL', 'AHL_COM_SCHED_SEQ_INV');
477: Fnd_Msg_Pub.ADD;
478: END IF;
479: x_return_status := Fnd_Api.g_ret_sts_error;

Line 477: Fnd_Msg_Pub.ADD;

473: THEN
474:
475: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
476: Fnd_Message.set_name ('AHL', 'AHL_COM_SCHED_SEQ_INV');
477: Fnd_Msg_Pub.ADD;
478: END IF;
479: x_return_status := Fnd_Api.g_ret_sts_error;
480: RETURN;
481:

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

490: IF G_DEBUG='Y' THEN
491: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- RESOURCE_NAME ='|| p_resrc_Require_rec.RESOURCE_NAME);
492: END IF;
493:
494: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
495: Fnd_Message.set_name ('AHL', 'AHL_PP_RESOURCE_MISSING');
496: Fnd_Msg_Pub.ADD;
497: END IF;
498: x_return_status := Fnd_Api.g_ret_sts_error;

Line 496: Fnd_Msg_Pub.ADD;

492: END IF;
493:
494: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
495: Fnd_Message.set_name ('AHL', 'AHL_PP_RESOURCE_MISSING');
496: Fnd_Msg_Pub.ADD;
497: END IF;
498: x_return_status := Fnd_Api.g_ret_sts_error;
499: RETURN;
500: END IF;

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

507: IF (p_resrc_Require_rec.Duration IS NULL OR p_resrc_Require_rec.Duration = Fnd_Api.G_MISS_NUM) THEN
508: IF G_DEBUG='Y' THEN
509: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Duration =' || p_resrc_Require_rec.Duration);
510: END IF;
511: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
512: Fnd_Message.set_name ('AHL', 'AHL_PP_DURATION_MISSING');
513: Fnd_Msg_Pub.ADD;
514: END IF;
515: x_return_status := Fnd_Api.g_ret_sts_error;

Line 513: Fnd_Msg_Pub.ADD;

509: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Duration =' || p_resrc_Require_rec.Duration);
510: END IF;
511: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
512: Fnd_Message.set_name ('AHL', 'AHL_PP_DURATION_MISSING');
513: Fnd_Msg_Pub.ADD;
514: END IF;
515: x_return_status := Fnd_Api.g_ret_sts_error;
516: RETURN;
517: END IF;

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

517: END IF;
518: -- DURATION - Positive
519: IF (p_resrc_Require_rec.Duration IS NOT NULL AND p_resrc_Require_rec.Duration <> Fnd_Api.G_MISS_NUM) THEN
520: IF p_resrc_Require_rec.Duration < 0 THEN
521: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
522: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
523: Fnd_Msg_Pub.ADD;
524: END IF;
525: x_return_status := Fnd_Api.g_ret_sts_error;

Line 523: Fnd_Msg_Pub.ADD;

519: IF (p_resrc_Require_rec.Duration IS NOT NULL AND p_resrc_Require_rec.Duration <> Fnd_Api.G_MISS_NUM) THEN
520: IF p_resrc_Require_rec.Duration < 0 THEN
521: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
522: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
523: Fnd_Msg_Pub.ADD;
524: END IF;
525: x_return_status := Fnd_Api.g_ret_sts_error;
526: RETURN;
527: END IF;

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

533: END IF;
534:
535: IF (p_resrc_Require_rec.QUANTITY IS NULL OR p_resrc_Require_rec.QUANTITY = Fnd_Api.G_MISS_NUM) THEN
536: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Quantity =' || p_resrc_Require_rec.quantity);
537: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
538: Fnd_Message.set_name ('AHL', 'AHL_PP_QUANTITY_MISSING');
539: Fnd_Msg_Pub.ADD;
540: END IF;
541: x_return_status := Fnd_Api.g_ret_sts_error;

Line 539: Fnd_Msg_Pub.ADD;

535: IF (p_resrc_Require_rec.QUANTITY IS NULL OR p_resrc_Require_rec.QUANTITY = Fnd_Api.G_MISS_NUM) THEN
536: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Quantity =' || p_resrc_Require_rec.quantity);
537: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
538: Fnd_Message.set_name ('AHL', 'AHL_PP_QUANTITY_MISSING');
539: Fnd_Msg_Pub.ADD;
540: END IF;
541: x_return_status := Fnd_Api.g_ret_sts_error;
542: RETURN;
543: END IF;

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

544:
545: -- QUANTITY - Positive
546: IF (p_resrc_Require_rec.QUANTITY IS NOT NULL AND p_resrc_Require_rec.QUANTITY <> Fnd_Api.G_MISS_NUM) THEN
547: IF p_resrc_Require_rec.QUANTITY < 0 THEN
548: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
549: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
550: Fnd_Msg_Pub.ADD;
551: END IF;
552: x_return_status := Fnd_Api.g_ret_sts_error;

Line 550: Fnd_Msg_Pub.ADD;

546: IF (p_resrc_Require_rec.QUANTITY IS NOT NULL AND p_resrc_Require_rec.QUANTITY <> Fnd_Api.G_MISS_NUM) THEN
547: IF p_resrc_Require_rec.QUANTITY < 0 THEN
548: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
549: Fnd_Message.set_name ('AHL', 'AHL_PP_ONLY_POSITIVE_VALUE');
550: Fnd_Msg_Pub.ADD;
551: END IF;
552: x_return_status := Fnd_Api.g_ret_sts_error;
553: RETURN;
554: END IF;

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

559: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- REQ_START_DATE =' || p_resrc_Require_rec.REQ_START_DATE);
560: END IF;
561:
562: IF (p_resrc_Require_rec.REQ_START_DATE IS NULL OR p_resrc_Require_rec.REQ_START_DATE = Fnd_Api.G_MISS_DATE) THEN
563: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
564: Fnd_Message.set_name ('AHL', 'AHL_PP_REQUIRE_ST_DT_MISSING');
565: Fnd_Msg_Pub.ADD;
566: END IF;
567: x_return_status := Fnd_Api.g_ret_sts_error;

Line 565: Fnd_Msg_Pub.ADD;

561:
562: IF (p_resrc_Require_rec.REQ_START_DATE IS NULL OR p_resrc_Require_rec.REQ_START_DATE = Fnd_Api.G_MISS_DATE) THEN
563: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
564: Fnd_Message.set_name ('AHL', 'AHL_PP_REQUIRE_ST_DT_MISSING');
565: Fnd_Msg_Pub.ADD;
566: END IF;
567: x_return_status := Fnd_Api.g_ret_sts_error;
568: RETURN;
569: END IF;

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

573: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- REQ_START_DATE =' || p_resrc_Require_rec.REQ_START_DATE);
574: END IF;
575:
576: IF (p_resrc_Require_rec.REQ_END_DATE IS NULL OR p_resrc_Require_rec.REQ_END_DATE = Fnd_Api.G_MISS_DATE) 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_REQUIRE_END_DT_MISSING');
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:
576: IF (p_resrc_Require_rec.REQ_END_DATE IS NULL OR p_resrc_Require_rec.REQ_END_DATE = Fnd_Api.G_MISS_DATE) 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_REQUIRE_END_DT_MISSING');
579: Fnd_Msg_Pub.ADD;
580: END IF;
581: x_return_status := Fnd_Api.g_ret_sts_error;
582: RETURN;
583: END IF;

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

599: --
600: -- Validate the active dates.
601: IF l_Require_start_date IS NOT NULL AND l_Require_end_date IS NOT NULL THEN
602: IF l_Require_start_date > l_Require_end_date THEN
603: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
604: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_FROMDT_GTR_TODT');
605: Fnd_Msg_Pub.ADD;
606: END IF;
607: x_return_status := Fnd_Api.g_ret_sts_error;

Line 605: Fnd_Msg_Pub.ADD;

601: IF l_Require_start_date IS NOT NULL AND l_Require_end_date IS NOT NULL THEN
602: IF l_Require_start_date > l_Require_end_date THEN
603: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
604: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_FROMDT_GTR_TODT');
605: Fnd_Msg_Pub.ADD;
606: END IF;
607: x_return_status := Fnd_Api.g_ret_sts_error;
608: RETURN;
609: END IF;

Line 621: Fnd_Msg_Pub.ADD;

617: IF c_wo_oper%NOTFOUND THEN
618: CLOSE c_wo_oper;
619: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '--If condition--');
620: Fnd_Message.SET_NAME('AHL','AHL_PP_WORKORDER_NOT_EXISTS');
621: Fnd_Msg_Pub.ADD;
622: ELSE
623: CLOSE c_wo_oper;
624: END IF;
625: ELSE

Line 631: Fnd_Msg_Pub.ADD;

627: FETCH c_oper_req INTO c_oper_req_rec;
628: IF c_oper_req%NOTFOUND THEN
629: CLOSE c_oper_req;
630: Fnd_Message.SET_NAME('AHL','AHL_PP_WORKORDER_OPER_NOT_EXISTS');
631: Fnd_Msg_Pub.ADD;
632: ELSE
633: CLOSE c_oper_req;
634: OPEN c_wo_oper(c_oper_req_rec.WORKORDER_OPERATION_ID);
635: FETCH c_wo_oper INTO l_eff_st_date, l_eff_end_date, l_sch_st_date, l_sch_end_date;

Line 640: Fnd_Msg_Pub.ADD;

636: IF c_wo_oper%NOTFOUND THEN
637: CLOSE c_wo_oper;
638: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '--Else If condition--');
639: Fnd_Message.SET_NAME('AHL','AHL_PP_WORKORDER_NOT_EXISTS');
640: Fnd_Msg_Pub.ADD;
641: ELSE
642: CLOSE c_wo_oper;
643: END IF;
644: END IF;

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

665: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Start Date =' || l_Require_start_date);
666: IF l_eff_st_date IS NOT NULL THEN
667: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Actual Start Date =' || l_eff_st_date);
668: IF l_Require_start_date < l_eff_st_date THEN
669: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
670: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_STDT_LESS_ACT_STDT');
671: Fnd_Msg_Pub.ADD;
672: END IF;
673: x_return_status := Fnd_Api.g_ret_sts_error;

Line 671: Fnd_Msg_Pub.ADD;

667: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Actual Start Date =' || l_eff_st_date);
668: IF l_Require_start_date < l_eff_st_date THEN
669: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
670: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_STDT_LESS_ACT_STDT');
671: Fnd_Msg_Pub.ADD;
672: END IF;
673: x_return_status := Fnd_Api.g_ret_sts_error;
674: RETURN;
675: END IF;

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

675: END IF;
676: ELSIF l_sch_st_date IS NOT NULL THEN
677: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Scheduled Start Date =' || l_sch_st_date);
678: IF l_Require_start_date < l_sch_st_date THEN
679: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
680: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_STDT_LESS_SCH_STDT');
681: Fnd_Msg_Pub.ADD;
682: END IF;
683: x_return_status := Fnd_Api.g_ret_sts_error;

Line 681: Fnd_Msg_Pub.ADD;

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

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

687:
688: IF l_eff_end_date IS NOT NULL THEN
689: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Actual Start Date =' || l_eff_st_date);
690: IF l_Require_start_date > l_eff_end_date THEN
691: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
692: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_STDT_MORE_ACT_EDDT');
693: Fnd_Msg_Pub.ADD;
694: END IF;
695: x_return_status := Fnd_Api.g_ret_sts_error;

Line 693: Fnd_Msg_Pub.ADD;

689: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Actual Start Date =' || l_eff_st_date);
690: IF l_Require_start_date > l_eff_end_date THEN
691: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
692: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_STDT_MORE_ACT_EDDT');
693: Fnd_Msg_Pub.ADD;
694: END IF;
695: x_return_status := Fnd_Api.g_ret_sts_error;
696: RETURN;
697: END IF;

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

697: END IF;
698: ELSIF l_sch_end_date IS NOT NULL THEN
699: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items AAA' || '-- Scheduled End Date =' || l_sch_end_date);
700: IF l_Require_start_date > l_sch_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_SCH_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' || '-- Scheduled End Date =' || l_sch_end_date);
700: IF l_Require_start_date > l_sch_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_SCH_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 716: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN

712: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- End Date =' || l_Require_end_date);
713: IF l_eff_end_date IS NOT NULL THEN
714: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- Actual End Date =' || l_eff_end_date);
715: IF l_Require_end_date > l_eff_end_date THEN
716: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
717: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_EDDT_MORE_ACT_EDDT');
718: Fnd_Msg_Pub.ADD;
719: END IF;
720: x_return_status := Fnd_Api.g_ret_sts_error;

Line 718: Fnd_Msg_Pub.ADD;

714: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- Actual End Date =' || l_eff_end_date);
715: IF l_Require_end_date > l_eff_end_date THEN
716: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
717: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_EDDT_MORE_ACT_EDDT');
718: Fnd_Msg_Pub.ADD;
719: END IF;
720: x_return_status := Fnd_Api.g_ret_sts_error;
721: RETURN;
722: END IF;

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

722: END IF;
723: ELSIF l_sch_end_date IS NOT NULL THEN
724: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- Scheduled End Date =' || l_sch_end_date);
725: IF l_Require_end_date > l_sch_end_date THEN
726: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
727: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_EDDT_MORE_SCH_EDDT');
728: Fnd_Msg_Pub.ADD;
729: END IF;
730: x_return_status := Fnd_Api.g_ret_sts_error;

Line 728: Fnd_Msg_Pub.ADD;

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

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

734:
735: IF l_eff_st_date IS NOT NULL THEN
736: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- Actual Start Date =' || l_eff_st_date);
737: IF l_Require_end_date < l_eff_st_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_LESS_ACT_STDT');
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' || '-- Actual Start Date =' || l_eff_st_date);
737: IF l_Require_end_date < l_eff_st_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_LESS_ACT_STDT');
740: Fnd_Msg_Pub.ADD;
741: END IF;
742: x_return_status := Fnd_Api.g_ret_sts_error;
743: RETURN;
744: END IF;

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

744: END IF;
745: ELSIF l_sch_st_date IS NOT NULL THEN
746: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- Scheduled Start Date =' || l_sch_st_date);
747: IF l_Require_end_date < l_sch_st_date THEN
748: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
749: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_EDDT_LESS_SCH_STDT');
750: Fnd_Msg_Pub.ADD;
751: END IF;
752: x_return_status := Fnd_Api.g_ret_sts_error;

Line 750: Fnd_Msg_Pub.ADD;

746: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items BBB' || '-- Scheduled Start Date =' || l_sch_st_date);
747: IF l_Require_end_date < l_sch_st_date THEN
748: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
749: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_EDDT_LESS_SCH_STDT');
750: Fnd_Msg_Pub.ADD;
751: END IF;
752: x_return_status := Fnd_Api.g_ret_sts_error;
753: RETURN;
754: END IF;

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

813:
814: IF l_valid_flag = Fnd_Api.g_false
815: THEN
816:
817: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
818: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_NOT_UNIQUE');
819: Fnd_Msg_Pub.ADD;
820: END IF;
821: x_return_status := Fnd_Api.g_ret_sts_error;

Line 819: Fnd_Msg_Pub.ADD;

815: THEN
816:
817: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
818: Fnd_Message.set_name ('AHL', 'AHL_PP_REQ_NOT_UNIQUE');
819: Fnd_Msg_Pub.ADD;
820: END IF;
821: x_return_status := Fnd_Api.g_ret_sts_error;
822: RETURN;
823: END IF;

Line 908: Fnd_Msg_Pub.initialize;

904: Ahl_Debug_Pub.debug( l_full_name ||':Start');
905: END IF;
906:
907: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
908: Fnd_Msg_Pub.initialize;
909: END IF;
910:
911: IF NOT Fnd_Api.compatible_api_call (
912: l_api_version,

Line 954: Fnd_Msg_Pub.ADD;

950: l_resource_type_code := p_resrc_Require_rec.resource_type_code;
951: END IF;
952: IF (l_resource_type_code NOT IN (1,2)) AND p_resrc_Require_rec.scheduled_type_code = 1 THEN
953: FND_MESSAGE.set_name( 'AHL', 'AHL_PRD_INVALID_SCHEDULE_TYPE' );
954: Fnd_Msg_Pub.ADD;
955: RAISE Fnd_Api.g_exc_error;
956: END IF;
957: END IF;
958: */

Line 960: Fnd_Msg_Pub.count_and_get (

956: END IF;
957: END IF;
958: */
959: -------------------- finish --------------------------
960: Fnd_Msg_Pub.count_and_get (
961: p_encoded => Fnd_Api.g_false,
962: p_count => x_msg_count,
963: p_data => x_msg_data
964: );

Line 977: Fnd_Msg_Pub.count_and_get (

973:
974: EXCEPTION
975: WHEN Fnd_Api.g_exc_error THEN
976: x_return_status := Fnd_Api.g_ret_sts_error;
977: Fnd_Msg_Pub.count_and_get (
978: p_encoded => Fnd_Api.g_false,
979: p_count => x_msg_count,
980: p_data => x_msg_data
981: );

Line 984: Fnd_Msg_Pub.count_and_get (

980: p_data => x_msg_data
981: );
982: WHEN Fnd_Api.g_exc_unexpected_error THEN
983: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
984: Fnd_Msg_Pub.count_and_get (
985: p_encoded => Fnd_Api.g_false,
986: p_count => x_msg_count,
987: p_data => x_msg_data
988: );

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

987: p_data => x_msg_data
988: );
989: WHEN OTHERS THEN
990: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
991: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
992: THEN
993: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
994: END IF;
995:

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

989: WHEN OTHERS THEN
990: x_return_status := Fnd_Api.g_ret_sts_unexp_error;
991: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
992: THEN
993: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
994: END IF;
995:
996: Fnd_Msg_Pub.count_and_get (
997: p_encoded => Fnd_Api.g_false,

Line 996: Fnd_Msg_Pub.count_and_get (

992: THEN
993: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
994: END IF;
995:
996: Fnd_Msg_Pub.count_and_get (
997: p_encoded => Fnd_Api.g_false,
998: p_count => x_msg_count,
999: p_data => x_msg_data
1000: );

Line 1214: FND_MSG_PUB.initialize;

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

Line 1260: Fnd_Msg_Pub.ADD;

1256: IF c_wo_oper%NOTFOUND THEN
1257: CLOSE c_wo_oper;
1258: Ahl_Debug_Pub.debug('NO SEQ');
1259: Fnd_Message.SET_NAME('AHL','AHL_PP_OPER_SEQ_NOT_EXISTS');
1260: Fnd_Msg_Pub.ADD;
1261: ELSE
1262: CLOSE c_wo_oper;
1263: l_Resrc_Require_Rec.workorder_operation_id := l_wo_operation_id;
1264:

Line 1276: Fnd_Msg_Pub.ADD;

1272: IF G_DEBUG='Y' THEN
1273: Ahl_Debug_Pub.debug('UNIQ 1');
1274: END IF;
1275: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_SEQ_NOT_UNIQUE');
1276: Fnd_Msg_Pub.ADD;
1277: END IF;
1278: END IF; -- Check resrc sequence number
1279: END IF; -- Check c_wo_oper%NOTFOUND
1280:

Line 1284: Fnd_Msg_Pub.ADD;

1280:
1281: END IF; -- Check of Oper sequence number
1282: ELSE
1283: Fnd_Message.SET_NAME('AHL','AHL_PP_JOB_NOT_EXISTS');
1284: Fnd_Msg_Pub.ADD;
1285: END IF; -- Check of work order id
1286:
1287: --rroy
1288: -- ACL Changes

Line 1295: Fnd_Msg_Pub.ADD;

1291: OPEN c_workorder(l_Resrc_Require_Rec.workorder_id);
1292: FETCH c_workorder INTO c_workorder_rec;
1293: IF c_workorder%NOTFOUND THEN
1294: Fnd_Message.SET_NAME('AHL','AHL_PP_WORKORDER_NOT_EXISTS');
1295: Fnd_Msg_Pub.ADD;
1296: END IF;
1297: CLOSE c_workorder;
1298: END IF;
1299:

Line 1307: FND_MSG_PUB.ADD;

1303: p_visit_id => NULL,
1304: p_item_instance_id => NULL);
1305: IF l_return_status = FND_API.G_TRUE THEN
1306: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_CRT_RESREQ_UNTLCKD');
1307: FND_MSG_PUB.ADD;
1308: RAISE FND_API.G_EXC_ERROR;
1309: END IF;
1310: --rroy
1311: -- ACL Changes

Line 1383: Fnd_Msg_Pub.ADD;

1379:
1380: IF NVL(l_return_status, 'X') <> 'S'
1381: THEN
1382: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_TYPE_NOT_EXISTS');
1383: Fnd_Msg_Pub.ADD;
1384: RAISE Fnd_Api.G_EXC_ERROR;
1385: END IF;
1386: END IF;
1387: IF G_DEBUG='Y' THEN

Line 1411: Fnd_Msg_Pub.ADD;

1407:
1408: IF NVL(l_return_status, 'X') <> 'S'
1409: THEN
1410: Fnd_Message.SET_NAME('AHL','AHL_PP_RESOURCE_NOT_EXISTS');
1411: Fnd_Msg_Pub.ADD;
1412: RAISE Fnd_Api.G_EXC_ERROR;
1413: END IF;
1414: END IF;
1415: IF G_DEBUG='Y' THEN

Line 1433: Fnd_Msg_Pub.ADD;

1429: OPEN c_resources(l_Resrc_Require_Rec.Resource_Id);
1430: FETCH c_resources INTO l_resrc_dept_id;
1431: IF c_resources%NOTFOUND THEN
1432: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_DEPT_NOT_EXISTS');
1433: Fnd_Msg_Pub.ADD;
1434: END IF;
1435: CLOSE c_resources;
1436:
1437: -- check resource id dept matches the operation dept.

Line 1440: Fnd_Msg_Pub.ADD;

1436:
1437: -- check resource id dept matches the operation dept.
1438: IF (l_resrc_dept_id <> l_department_id) THEN
1439: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_DEPT_NOT_EXISTS');
1440: Fnd_Msg_Pub.ADD;
1441: END IF;
1442:
1443: --Convert Uom code
1444: OPEN c_uom_code(l_Resrc_Require_Rec.Resource_Id);

Line 1458: Fnd_Msg_Pub.ADD;

1454: FETCH c_UOM INTO l_Resrc_Require_Rec.UOM_CODE;
1455: IF c_UOM%NOTFOUND THEN
1456: CLOSE c_UOM;
1457: Fnd_Message.SET_NAME('AHL','AHL_PP_UOM_NOT_EXISTS');
1458: Fnd_Msg_Pub.ADD;
1459: ELSE
1460: CLOSE c_UOM;
1461: END IF;
1462: END IF;

Line 1479: Fnd_Msg_Pub.ADD;

1475:
1476: IF NVL(l_return_status, 'X') <> 'S'
1477: THEN
1478: Fnd_Message.SET_NAME('AHL','AHL_PP_CHARGE_TYPE_NOT_EXISTS');
1479: Fnd_Msg_Pub.ADD;
1480: RAISE Fnd_Api.G_EXC_ERROR;
1481: END IF;
1482: END IF;
1483: IF G_DEBUG='Y' THEN

Line 1503: Fnd_Msg_Pub.ADD;

1499:
1500: IF NVL(l_return_status, 'X') <> 'S'
1501: THEN
1502: Fnd_Message.SET_NAME('AHL','AHL_PP_COST_BASIS_NOT_EXISTS');
1503: Fnd_Msg_Pub.ADD;
1504: RAISE Fnd_Api.G_EXC_ERROR;
1505: END IF;
1506: END IF;
1507: IF G_DEBUG='Y' THEN

Line 1527: Fnd_Msg_Pub.ADD;

1523:
1524: IF NVL(l_return_status, 'X') <> 'S'
1525: THEN
1526: Fnd_Message.SET_NAME('AHL','AHL_PP_SCHED_TYPE_NOT_EXISTS');
1527: Fnd_Msg_Pub.ADD;
1528: RAISE Fnd_Api.G_EXC_ERROR;
1529: END IF;
1530: END IF;
1531: IF G_DEBUG='Y' THEN

Line 1585: l_msg_count := Fnd_Msg_Pub.count_msg;

1581: IF G_DEBUG='Y' THEN
1582: Ahl_Debug_Pub.debug ( l_full_name || ' ******After calling Validate_Resrc_Require****');
1583: END IF;
1584: --Standard check to count messages
1585: l_msg_count := Fnd_Msg_Pub.count_msg;
1586:
1587: IF l_msg_count > 0 THEN
1588: x_msg_count := l_msg_count;
1589: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 1881: l_msg_count := Fnd_Msg_Pub.count_msg;

1877:
1878: END IF;
1879:
1880: --Standard check to count messages
1881: l_msg_count := Fnd_Msg_Pub.count_msg;
1882: IF l_msg_count > 0 THEN
1883: X_msg_count := l_msg_count;
1884: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1885: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

Line 1917: Fnd_Msg_Pub.ADD;

1913: CLOSE Sch_id_exists;
1914: --
1915: IF l_dummy IS NOT NULL THEN
1916: Fnd_Message.SET_NAME('AHL','AHL_PP_SEQUENCE_NO_EXISTS');
1917: Fnd_Msg_Pub.ADD;
1918: RAISE FND_API.G_EXC_ERROR;
1919: END IF;
1920: IF G_DEBUG='Y' THEN
1921: Ahl_Debug_Pub.debug ( l_full_name || ' ******Before calling Insert_Row****');

Line 2004: l_msg_count := Fnd_Msg_Pub.count_msg;

2000:
2001: --END IF;
2002: ------------------------End of Body---------------------------------------
2003: --Standard check to count messages
2004: l_msg_count := Fnd_Msg_Pub.count_msg;
2005: IF l_msg_count > 0 THEN
2006: X_msg_count := l_msg_count;
2007: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2008: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

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

2023: EXCEPTION
2024: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2025: ROLLBACK TO Create_Resrc_Require;
2026: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2027: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2028: p_count => x_msg_count,
2029: p_data => x_msg_data);
2030: IF G_DEBUG='Y' THEN
2031: -- Debug info.

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

2037:
2038: WHEN FND_API.G_EXC_ERROR THEN
2039: ROLLBACK TO Create_Resrc_Require;
2040: X_return_status := FND_API.G_RET_STS_ERROR;
2041: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2042: p_count => x_msg_count,
2043: p_data => X_msg_data);
2044: IF G_DEBUG='Y' THEN
2045:

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

2056: ROLLBACK TO Create_Resrc_Require;
2057: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2058:
2059: Ahl_Debug_Pub.debug('Inside Exception' || '**SQL ERRORS');
2060: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2061: THEN
2062: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
2063: p_procedure_name => 'Create_Resrc_Require',
2064: p_error_text => SUBSTR(SQLERRM,1,240));

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

2058:
2059: Ahl_Debug_Pub.debug('Inside Exception' || '**SQL ERRORS');
2060: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2061: THEN
2062: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
2063: p_procedure_name => 'Create_Resrc_Require',
2064: p_error_text => SUBSTR(SQLERRM,1,240));
2065: END IF;
2066: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

2062: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
2063: p_procedure_name => 'Create_Resrc_Require',
2064: p_error_text => SUBSTR(SQLERRM,1,240));
2065: END IF;
2066: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2067: p_count => x_msg_count,
2068: p_data => X_msg_data);
2069: IF G_DEBUG='Y' THEN
2070:

Line 2263: FND_MSG_PUB.initialize;

2259: G_MODULE_TYPE:=P_MODULE_TYPE;
2260: -- Standard call to check for call compatibility.
2261: IF FND_API.to_boolean(p_init_msg_list)
2262: THEN
2263: FND_MSG_PUB.initialize;
2264: END IF;
2265:
2266: -- Initialize API return status to success
2267: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2311: FND_MSG_PUB.ADD;

2307: p_visit_id => NULL,
2308: p_item_instance_id => NULL);
2309: IF l_return_status = FND_API.G_TRUE THEN
2310: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_UPD_RESREQ_UNTLCKD');
2311: FND_MSG_PUB.ADD;
2312: RAISE FND_API.G_EXC_ERROR;
2313: END IF;
2314:
2315: -- rroy

Line 2402: Fnd_Msg_Pub.ADD;

2398:
2399: IF NVL(l_return_status, 'X') <> 'S'
2400: THEN
2401: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_TYPE_NOT_EXISTS');
2402: Fnd_Msg_Pub.ADD;
2403: RAISE Fnd_Api.G_EXC_ERROR;
2404: END IF;
2405: END IF;
2406:

Line 2426: Fnd_Msg_Pub.ADD;

2422:
2423: IF NVL(l_return_status, 'X') <> 'S'
2424: THEN
2425: Fnd_Message.SET_NAME('AHL','AHL_PP_RESOURCE_NOT_EXISTS');
2426: Fnd_Msg_Pub.ADD;
2427: RAISE Fnd_Api.G_EXC_ERROR;
2428: END IF;
2429: END IF;
2430: IF G_DEBUG='Y' THEN

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

2435:
2436: -- RESOURCE_TYPE_NAME
2437: IF (l_Resrc_Require_Rec.RESOURCE_TYPE_NAME IS NULL OR l_Resrc_Require_Rec.RESOURCE_TYPE_NAME = Fnd_Api.G_MISS_CHAR) THEN
2438: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Resource Type Name =' || l_Resrc_Require_Rec.RESOURCE_TYPE_NAME);
2439: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2440: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_TYPE_MISSING');
2441: Fnd_Msg_Pub.ADD;
2442: END IF;
2443: END IF;

Line 2441: Fnd_Msg_Pub.ADD;

2437: IF (l_Resrc_Require_Rec.RESOURCE_TYPE_NAME IS NULL OR l_Resrc_Require_Rec.RESOURCE_TYPE_NAME = Fnd_Api.G_MISS_CHAR) THEN
2438: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Resource Type Name =' || l_Resrc_Require_Rec.RESOURCE_TYPE_NAME);
2439: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2440: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_TYPE_MISSING');
2441: Fnd_Msg_Pub.ADD;
2442: END IF;
2443: END IF;
2444:
2445: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Resource Name =' || l_Resrc_Require_Rec.RESOURCE_NAME);

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

2445: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Resource Name =' || l_Resrc_Require_Rec.RESOURCE_NAME);
2446: -- RESOURCE_NAME
2447: IF (l_Resrc_Require_Rec.RESOURCE_NAME IS NULL OR l_Resrc_Require_Rec.RESOURCE_NAME = Fnd_Api.G_MISS_CHAR) THEN
2448: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Resource Name =' || l_Resrc_Require_Rec.RESOURCE_NAME);
2449: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2450: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_NAME_MISSING');
2451: Fnd_Msg_Pub.ADD;
2452: END IF;
2453: END IF;

Line 2451: Fnd_Msg_Pub.ADD;

2447: IF (l_Resrc_Require_Rec.RESOURCE_NAME IS NULL OR l_Resrc_Require_Rec.RESOURCE_NAME = Fnd_Api.G_MISS_CHAR) THEN
2448: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Resource Name =' || l_Resrc_Require_Rec.RESOURCE_NAME);
2449: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_error) THEN
2450: Fnd_Message.set_name ('AHL', 'AHL_PP_RESRC_NAME_MISSING');
2451: Fnd_Msg_Pub.ADD;
2452: END IF;
2453: END IF;
2454:
2455: Ahl_Debug_Pub.debug ( l_full_name || 'After WORKORDER ID = ' || l_Resrc_Require_Rec.workorder_id);

Line 2461: Fnd_Msg_Pub.ADD;

2457: FETCH c_workorder INTO c_workorder_rec;
2458: IF c_workorder%NOTFOUND THEN
2459: CLOSE c_workorder;
2460: Fnd_Message.SET_NAME('AHL','AHL_PP_WORKORDER_NOT_EXISTS');
2461: Fnd_Msg_Pub.ADD;
2462: ELSE
2463: CLOSE c_workorder;*/
2464:
2465: OPEN c_resources(l_Resrc_Require_Rec.Resource_Id);

Line 2470: Fnd_Msg_Pub.ADD;

2466: FETCH c_resources INTO l_resrc_dept_id;
2467: IF c_resources%NOTFOUND THEN
2468: CLOSE c_resources;
2469: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_DEPT_NOT_EXISTS');
2470: Fnd_Msg_Pub.ADD;
2471: ELSE
2472: CLOSE c_resources;
2473: --IF l_resrc_dept_id = c_workorder_rec.department_id THEN
2474: IF l_resrc_dept_id <> l_department_id THEN

Line 2476: Fnd_Msg_Pub.ADD;

2472: CLOSE c_resources;
2473: --IF l_resrc_dept_id = c_workorder_rec.department_id THEN
2474: IF l_resrc_dept_id <> l_department_id THEN
2475: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_DEPT_NOT_EXISTS');
2476: Fnd_Msg_Pub.ADD;
2477: END IF;
2478: END IF;
2479:
2480: --END IF;

Line 2495: Fnd_Msg_Pub.ADD;

2491: FETCH c_UOM INTO l_Resrc_Require_Rec.UOM_CODE;
2492: IF c_UOM%NOTFOUND THEN
2493: CLOSE c_UOM;
2494: Fnd_Message.SET_NAME('AHL','AHL_PP_UOM_NOT_EXISTS');
2495: Fnd_Msg_Pub.ADD;
2496: ELSE
2497: CLOSE c_UOM;
2498: END IF;
2499: END IF;

Line 2527: Fnd_Msg_Pub.ADD;

2523:
2524: IF NVL(l_return_status, 'X') <> 'S'
2525: THEN
2526: Fnd_Message.SET_NAME('AHL','AHL_PP_CHARGE_TYPE_NOT_EXISTS');
2527: Fnd_Msg_Pub.ADD;
2528: RAISE Fnd_Api.G_EXC_ERROR;
2529: END IF;
2530: END IF;
2531: IF G_DEBUG='Y' THEN

Line 2551: Fnd_Msg_Pub.ADD;

2547:
2548: IF NVL(l_return_status, 'X') <> 'S'
2549: THEN
2550: Fnd_Message.SET_NAME('AHL','AHL_PP_COST_BASIS_NOT_EXISTS');
2551: Fnd_Msg_Pub.ADD;
2552: RAISE Fnd_Api.G_EXC_ERROR;
2553: END IF;
2554: END IF;
2555: IF G_DEBUG='Y' THEN

Line 2575: Fnd_Msg_Pub.ADD;

2571:
2572: IF NVL(l_return_status, 'X') <> 'S'
2573: THEN
2574: Fnd_Message.SET_NAME('AHL','AHL_PP_SCHED_TYPE_NOT_EXISTS');
2575: Fnd_Msg_Pub.ADD;
2576: RAISE Fnd_Api.G_EXC_ERROR;
2577: END IF;
2578: END IF;
2579: IF G_DEBUG='Y' THEN

Line 2607: l_msg_count := Fnd_Msg_Pub.count_msg;

2603: x_msg_data => x_msg_data
2604: );
2605:
2606: --Standard check to count messages
2607: l_msg_count := Fnd_Msg_Pub.count_msg;
2608:
2609: IF l_msg_count > 0 THEN
2610: x_msg_count := l_msg_count;
2611: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 2749: Fnd_Msg_Pub.ADD;

2745: END IF;
2746: IF (c_oper_req_rec.object_version_number <> l_Resrc_Require_Rec.object_version_number)
2747: THEN
2748: Fnd_Message.Set_Name('AHL','AHL_COM_RECORD_CHANGED');
2749: Fnd_Msg_Pub.ADD;
2750: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2751: --
2752: END IF;
2753:

Line 2914: l_msg_count := Fnd_Msg_Pub.count_msg;

2910: END IF;
2911: --
2912: ------------------------End of Body---------------------------------------
2913: -- Standard check to count messages
2914: l_msg_count := Fnd_Msg_Pub.count_msg;
2915:
2916: IF l_msg_count > 0 THEN
2917: X_msg_count := l_msg_count;
2918: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

2934: EXCEPTION
2935: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2936: ROLLBACK TO Update_Resrc_Require;
2937: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2938: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2939: p_count => x_msg_count,
2940: p_data => x_msg_data);
2941: IF G_DEBUG='Y' THEN
2942: -- Debug info.

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

2948: END IF;
2949: WHEN FND_API.G_EXC_ERROR THEN
2950: ROLLBACK TO Update_Resrc_Require;
2951: X_return_status := FND_API.G_RET_STS_ERROR;
2952: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2953: p_count => x_msg_count,
2954: p_data => X_msg_data);
2955: IF G_DEBUG='Y' THEN
2956: -- Debug info.

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

2963: END IF;
2964: WHEN OTHERS THEN
2965: ROLLBACK TO Update_Resrc_Require;
2966: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2967: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2968: THEN
2969: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
2970: p_procedure_name => 'UPDATE_Resrc_Require',
2971: p_error_text => SUBSTR(SQLERRM,1,240));

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

2965: ROLLBACK TO Update_Resrc_Require;
2966: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2967: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2968: THEN
2969: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
2970: p_procedure_name => 'UPDATE_Resrc_Require',
2971: p_error_text => SUBSTR(SQLERRM,1,240));
2972: END IF;
2973: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

2969: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
2970: p_procedure_name => 'UPDATE_Resrc_Require',
2971: p_error_text => SUBSTR(SQLERRM,1,240));
2972: END IF;
2973: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
2974: p_count => x_msg_count,
2975: p_data => X_msg_data);
2976: IF G_DEBUG='Y' THEN
2977: -- Debug info.

Line 3111: Fnd_Msg_Pub.initialize;

3107:
3108: -- Standard call to check for call compatibility.
3109: IF Fnd_Api.to_boolean(p_init_msg_list)
3110: THEN
3111: Fnd_Msg_Pub.initialize;
3112: END IF;
3113:
3114: -- Initialize API return status to success
3115: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

Line 3260: Fnd_Msg_Pub.Count_And_Get

3256:
3257: END LOOP;
3258: END IF;
3259: -- Standard call to get message count and if count is 1, get message info
3260: Fnd_Msg_Pub.Count_And_Get
3261: ( p_count => x_msg_count,
3262: p_data => x_msg_data,
3263: p_encoded => Fnd_Api.g_false);
3264:

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

3278: EXCEPTION
3279: WHEN Fnd_Api.G_EXC_ERROR THEN
3280: x_return_status := Fnd_Api.G_RET_STS_ERROR;
3281: ROLLBACK TO Get_Resource_Requirement;
3282: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
3283: p_data => x_msg_data,
3284: p_encoded => Fnd_Api.g_false);
3285:
3286:

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

3286:
3287: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3288: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3289: ROLLBACK TO Get_Resource_Requirement;
3290: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
3291: p_data => x_msg_data,
3292: p_encoded => Fnd_Api.g_false);
3293:
3294: WHEN OTHERS THEN

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

3293:
3294: WHEN OTHERS THEN
3295: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3296: ROLLBACK TO Get_Resource_Requirement;
3297: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
3298: p_procedure_name => 'Get_Resource_Requirement',
3299: p_error_text => SQLERRM);
3300:
3301: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,

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

3297: Fnd_Msg_Pub.add_exc_msg( p_pkg_name => G_PKG_NAME,
3298: p_procedure_name => 'Get_Resource_Requirement',
3299: p_error_text => SQLERRM);
3300:
3301: Fnd_Msg_Pub.count_and_get( p_count => x_msg_count,
3302: p_data => x_msg_data,
3303: p_encoded => Fnd_Api.g_false);
3304: END Get_Resource_Requirement;
3305: --

Line 3430: Fnd_Msg_Pub.initialize;

3426: END IF;
3427: -- Standard call to check for call compatibility.
3428: IF Fnd_Api.to_boolean(p_init_msg_list)
3429: THEN
3430: Fnd_Msg_Pub.initialize;
3431: END IF;
3432:
3433: -- Initialize API return status to success
3434: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

Line 3462: Fnd_Msg_Pub.ADD;

3458: OPEN Get_resource_cur (p_x_resrc_Require_tbl(i).operation_resource_id);
3459: FETCH Get_resource_cur INTO l_resource_rec;
3460: IF Get_resource_cur%NOTFOUND THEN
3461: Fnd_Message.Set_Name('AHL','AHL_PP_RECORD_INVALID');
3462: Fnd_Msg_Pub.ADD;
3463: CLOSE Get_resource_cur;
3464: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3465: END IF;
3466: CLOSE Get_resource_cur;

Line 3481: Fnd_Msg_Pub.ADD;

3477: IF(p_x_resrc_Require_tbl(i).object_version_number <> l_resource_rec.object_version_number )
3478: THEN
3479: --
3480: Fnd_Message.Set_Name('AHL','AHL_COM_RECORD_CHANGED');
3481: Fnd_Msg_Pub.ADD;
3482: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3483: END IF;
3484: END IF;
3485: --

Line 3516: FND_MSG_PUB.ADD;

3512: p_visit_id => NULL,
3513: p_item_instance_id => NULL);
3514: IF l_return_status = FND_API.G_TRUE THEN
3515: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_DEL_RESREQ_UNTLCKD');
3516: FND_MSG_PUB.ADD;
3517: RAISE FND_API.G_EXC_ERROR;
3518: END IF;
3519:
3520: -- rroy

Line 3531: FND_MSG_PUB.ADD;

3527: FETCH check_resrc_txn INTO l_junk;
3528: IF (check_resrc_txn%FOUND) THEN
3529: FND_MESSAGE.Set_Name('AHL', 'AHL_PP_DEL_RESREQ_RESTXN');
3530: FND_MESSAGE.Set_Token('OPER_RES', l_wo_oper_rec.operation_sequence_num || '-' || l_resource_rec.resource_sequence_num);
3531: FND_MSG_PUB.ADD;
3532: CLOSE check_resrc_txn;
3533: RAISE FND_API.G_EXC_ERROR;
3534: END IF;
3535: CLOSE check_resrc_txn;

Line 3578: l_msg_count := Fnd_Msg_Pub.count_msg;

3574: Ahl_Debug_Pub.debug ('Inside OVN:'||p_x_resrc_Require_tbl(i).object_version_number);
3575: Ahl_Debug_Pub.debug ('l_Resrc_Require_Rec.UOM_CODE: ' ||p_x_resrc_Require_tbl(i).uom_code );
3576:
3577: END IF;
3578: l_msg_count := Fnd_Msg_Pub.count_msg;
3579: IF G_DEBUG='Y' THEN
3580: Ahl_Debug_Pub.debug ( 'msg count:'||l_msg_count);
3581: END IF;
3582:

Line 3656: Fnd_Msg_Pub.ADD;

3652: IF l_count > 0 THEN
3653: Ahl_Debug_Pub.debug ('Count in Assignments table' || l_count);
3654: Fnd_Message.SET_NAME('AHL','AHL_PP_RESRC_ASSIGN_EXITS');
3655: FND_MESSAGE.SET_TOKEN('RECORD',p_x_resrc_Require_tbl(i).RESOURCE_SEQ_NUMBER,FALSE);
3656: Fnd_Msg_Pub.ADD;
3657: ELSE
3658: Ahl_Debug_Pub.debug ('Count in Assignments table' || l_count);
3659: Ahl_Debug_Pub.debug ('BEFORE DELETE RESOURCES' || p_x_resrc_Require_tbl(i).Operation_Resource_Id);
3660: DELETE FROM AHL_OPERATION_RESOURCES

Line 3669: l_msg_count := Fnd_Msg_Pub.count_msg;

3665: END IF; --Return status
3666:
3667: ---------------------------End of Body---------------------------------------
3668: --Standard check to count messages
3669: l_msg_count := Fnd_Msg_Pub.count_msg;
3670:
3671: IF l_msg_count > 0 THEN
3672: X_msg_count := l_msg_count;
3673: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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

3689: EXCEPTION
3690: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3691: ROLLBACK TO Remove_Resource_Requirement;
3692: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3693: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
3694: p_count => x_msg_count,
3695: p_data => x_msg_data);
3696: IF G_DEBUG='Y' THEN
3697: Ahl_Debug_Pub.log_app_messages (

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

3702: END IF;
3703: WHEN Fnd_Api.G_EXC_ERROR THEN
3704: ROLLBACK TO Remove_Resource_Requirement;
3705: X_return_status := Fnd_Api.G_RET_STS_ERROR;
3706: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
3707: p_count => x_msg_count,
3708: p_data => X_msg_data);
3709: IF G_DEBUG='Y' THEN
3710: -- Debug info.

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

3717:
3718: WHEN OTHERS THEN
3719: ROLLBACK TO Remove_Resource_Requirement;
3720: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3721: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
3722: THEN
3723: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
3724: p_procedure_name => 'Remove_Resource_Requirement',
3725: p_error_text => SUBSTR(SQLERRM,1,240));

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

3719: ROLLBACK TO Remove_Resource_Requirement;
3720: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3721: IF Fnd_Msg_Pub.check_msg_level(Fnd_Msg_Pub.G_MSG_LVL_UNEXP_ERROR)
3722: THEN
3723: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
3724: p_procedure_name => 'Remove_Resource_Requirement',
3725: p_error_text => SUBSTR(SQLERRM,1,240));
3726: END IF;
3727: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,

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

3723: Fnd_Msg_Pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
3724: p_procedure_name => 'Remove_Resource_Requirement',
3725: p_error_text => SUBSTR(SQLERRM,1,240));
3726: END IF;
3727: Fnd_Msg_Pub.count_and_get( p_encoded => Fnd_Api.G_FALSE,
3728: p_count => x_msg_count,
3729: p_data => x_msg_data);
3730: IF G_DEBUG='Y' THEN
3731: -- Debug info.

Line 3820: FND_MSG_PUB.initialize;

3816: END IF;
3817: -- Standard call to check for call compatibility.
3818: IF FND_API.to_boolean(p_init_msg_list)
3819: THEN
3820: FND_MSG_PUB.initialize;
3821: END IF;
3822: -- Initialize API return status to success
3823: x_return_status := FND_API.G_RET_STS_SUCCESS;
3824: -- Initialize message list if p_init_msg_list is set to TRUE.

Line 3901: l_msg_count := Fnd_Msg_Pub.count_msg;

3897: );
3898: END IF;
3899: ------------------------End of Body---------------------------------------
3900: --Standard check to count messages
3901: l_msg_count := Fnd_Msg_Pub.count_msg;
3902:
3903: -- Balaji added following piece of code for bug # 5099536
3904: -- Update_Job API is called to recalculate Master workorder actual dates
3905: -- after altering resource requirement for a child workorder.

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

3968: EXCEPTION
3969: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3970: ROLLBACK TO Process_Resrc_Require;
3971: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
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: AHL_DEBUG_PUB.log_app_messages (

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

3980: END IF;
3981: WHEN FND_API.G_EXC_ERROR THEN
3982: ROLLBACK TO Process_Resrc_Require;
3983: X_return_status := FND_API.G_RET_STS_ERROR;
3984: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
3985: p_count => x_msg_count,
3986: p_data => X_msg_data);
3987: IF G_DEBUG='Y' THEN
3988: -- Debug info.

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

3993: END IF;
3994: WHEN OTHERS THEN
3995: ROLLBACK TO Process_Resrc_Require;
3996: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3997: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3998: THEN
3999: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
4000: p_procedure_name => 'Process_Resrc_Require',
4001: p_error_text => SUBSTR(SQLERRM,1,240));

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

3995: ROLLBACK TO Process_Resrc_Require;
3996: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3997: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
3998: THEN
3999: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
4000: p_procedure_name => 'Process_Resrc_Require',
4001: p_error_text => SUBSTR(SQLERRM,1,240));
4002: END IF;
4003: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,

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

3999: fnd_msg_pub.add_exc_msg(p_pkg_name => 'AHL_PP_RESRC_Require_PVT',
4000: p_procedure_name => 'Process_Resrc_Require',
4001: p_error_text => SUBSTR(SQLERRM,1,240));
4002: END IF;
4003: FND_MSG_PUB.count_and_get( p_encoded => FND_API.G_FALSE,
4004: p_count => x_msg_count,
4005: p_data => x_msg_data);
4006: IF G_DEBUG='Y' THEN
4007: -- Debug info.