eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AHL_PP_RESRC_REQUIRE_PVT dependencies on FND_API

Line 60: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

56: AND TRUNC(SYSDATE) BETWEEN TRUNC(NVL(start_date_active, SYSDATE))
57: AND TRUNC(NVL(end_date_active,SYSDATE));
58: END IF;
59:
60: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
61: EXCEPTION
62: WHEN NO_DATA_FOUND THEN
63: x_return_status := Fnd_Api.G_RET_STS_ERROR;
64: WHEN TOO_MANY_ROWS THEN

Line 63: x_return_status := Fnd_Api.G_RET_STS_ERROR;

59:
60: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
61: EXCEPTION
62: WHEN NO_DATA_FOUND THEN
63: x_return_status := Fnd_Api.G_RET_STS_ERROR;
64: WHEN TOO_MANY_ROWS THEN
65: x_return_status := Fnd_Api.G_RET_STS_ERROR;
66: WHEN OTHERS THEN
67: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 65: x_return_status := Fnd_Api.G_RET_STS_ERROR;

61: EXCEPTION
62: WHEN NO_DATA_FOUND THEN
63: x_return_status := Fnd_Api.G_RET_STS_ERROR;
64: WHEN TOO_MANY_ROWS THEN
65: x_return_status := Fnd_Api.G_RET_STS_ERROR;
66: WHEN OTHERS THEN
67: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
68: RAISE;
69: END;

Line 67: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

63: x_return_status := Fnd_Api.G_RET_STS_ERROR;
64: WHEN TOO_MANY_ROWS THEN
65: x_return_status := Fnd_Api.G_RET_STS_ERROR;
66: WHEN OTHERS THEN
67: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
68: RAISE;
69: END;
70:
71: --------------------------------------------------------------------

Line 102: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

98: IF G_DEBUG='Y' THEN
99: Ahl_Debug_Pub.debug(': Inside Check Serial Id= ' || x_serial_id);
100: END IF;
101:
102: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
103: EXCEPTION
104: WHEN NO_DATA_FOUND THEN
105: x_return_status:= Fnd_Api.G_RET_STS_ERROR;
106: x_error_msg_code:= 'AHL_PP_SERIAL_NOT_EXISTS';

Line 105: x_return_status:= Fnd_Api.G_RET_STS_ERROR;

101:
102: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
103: EXCEPTION
104: WHEN NO_DATA_FOUND THEN
105: x_return_status:= Fnd_Api.G_RET_STS_ERROR;
106: x_error_msg_code:= 'AHL_PP_SERIAL_NOT_EXISTS';
107: WHEN TOO_MANY_ROWS THEN
108: x_return_status:= Fnd_Api.G_RET_STS_ERROR;
109: x_error_msg_code:= 'AHL_PP_SERIAL_NOT_EXISTS';

Line 108: x_return_status:= Fnd_Api.G_RET_STS_ERROR;

104: WHEN NO_DATA_FOUND THEN
105: x_return_status:= Fnd_Api.G_RET_STS_ERROR;
106: x_error_msg_code:= 'AHL_PP_SERIAL_NOT_EXISTS';
107: WHEN TOO_MANY_ROWS THEN
108: x_return_status:= Fnd_Api.G_RET_STS_ERROR;
109: x_error_msg_code:= 'AHL_PP_SERIAL_NOT_EXISTS';
110: WHEN OTHERS THEN
111: x_return_status:= Fnd_Api.G_RET_STS_UNEXP_ERROR;
112: RAISE;

Line 111: x_return_status:= Fnd_Api.G_RET_STS_UNEXP_ERROR;

107: WHEN TOO_MANY_ROWS THEN
108: x_return_status:= Fnd_Api.G_RET_STS_ERROR;
109: x_error_msg_code:= 'AHL_PP_SERIAL_NOT_EXISTS';
110: WHEN OTHERS THEN
111: x_return_status:= Fnd_Api.G_RET_STS_UNEXP_ERROR;
112: RAISE;
113: END Check_Serial_Name_Or_Id;
114:
115: --------------------------------------------------------------------

Line 145: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

141: IF G_DEBUG='Y' THEN
142: Ahl_Debug_Pub.debug(': Inside Check Resource Id= ' || x_Resource_id);
143: END IF;
144:
145: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
146: EXCEPTION
147: WHEN NO_DATA_FOUND THEN
148: x_return_status:= Fnd_Api.G_RET_STS_ERROR;
149: x_error_msg_code:= 'AHL_PP_RESOURCE_NOT_EXISTS';

Line 148: x_return_status:= Fnd_Api.G_RET_STS_ERROR;

144:
145: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
146: EXCEPTION
147: WHEN NO_DATA_FOUND THEN
148: x_return_status:= Fnd_Api.G_RET_STS_ERROR;
149: x_error_msg_code:= 'AHL_PP_RESOURCE_NOT_EXISTS';
150: WHEN TOO_MANY_ROWS THEN
151: x_return_status:= Fnd_Api.G_RET_STS_ERROR;
152: x_error_msg_code:= 'AHL_PP_RESOURCE_NOT_EXISTS';

Line 151: x_return_status:= Fnd_Api.G_RET_STS_ERROR;

147: WHEN NO_DATA_FOUND THEN
148: x_return_status:= Fnd_Api.G_RET_STS_ERROR;
149: x_error_msg_code:= 'AHL_PP_RESOURCE_NOT_EXISTS';
150: WHEN TOO_MANY_ROWS THEN
151: x_return_status:= Fnd_Api.G_RET_STS_ERROR;
152: x_error_msg_code:= 'AHL_PP_RESOURCE_NOT_EXISTS';
153: WHEN OTHERS THEN
154: x_return_status:= Fnd_Api.G_RET_STS_UNEXP_ERROR;
155: RAISE;

Line 154: x_return_status:= Fnd_Api.G_RET_STS_UNEXP_ERROR;

150: WHEN TOO_MANY_ROWS THEN
151: x_return_status:= Fnd_Api.G_RET_STS_ERROR;
152: x_error_msg_code:= 'AHL_PP_RESOURCE_NOT_EXISTS';
153: WHEN OTHERS THEN
154: x_return_status:= Fnd_Api.G_RET_STS_UNEXP_ERROR;
155: RAISE;
156: END Check_Resource_Name_Or_Id;
157:
158: --------------------------------------------------------------------

Line 394: IF p_resrc_Require_rec.OPERATION_RESOURCE_ID = Fnd_Api.G_MISS_NUM OR p_resrc_Require_rec.OPERATION_RESOURCE_ID IS NULL THEN

390: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || 'WORKORDER_OPERATION_ID = ' || p_resrc_Require_rec.WORKORDER_OPERATION_ID);
391: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || 'Resource ID = ' || p_resrc_Require_rec.Resource_Id);
392: END IF;
393:
394: IF p_resrc_Require_rec.OPERATION_RESOURCE_ID = Fnd_Api.G_MISS_NUM OR p_resrc_Require_rec.OPERATION_RESOURCE_ID IS NULL THEN
395: IF G_DEBUG='Y' THEN
396: Ahl_Debug_Pub.debug('Inside Check_Resrc_Require_Req_Items check while adding');
397: END IF;
398: -- OPERATION_SEQ_NUMBER

Line 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

395: IF G_DEBUG='Y' 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;

Line 407: x_return_status := Fnd_Api.g_ret_sts_error;

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;
410:
411: -- OPERATION_SEQ_NUMBER - Positive

Line 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

408: RETURN;
409: END IF;
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');

Line 421: x_return_status := Fnd_Api.g_ret_sts_error;

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;
424: END IF;
425:

Line 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

423: END IF;
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;

Line 432: x_return_status := Fnd_Api.g_ret_sts_error;

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;
435:
436: -- RESOURCE_SEQ_NUMBER -- Positive / Multiples of 10

Line 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

433: RETURN;
434: END IF;
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;

Line 443: x_return_status := Fnd_Api.g_ret_sts_error;

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;
446:
447: IF (p_resrc_Require_rec.RESOURCE_SEQ_NUMBER mod 10) <> 0 THEN

Line 452: x_return_status := Fnd_Api.g_ret_sts_error;

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;
455: END IF;
456: END IF;

Line 465: p_resrc_Require_rec.schedule_seq_num <> Fnd_Api.G_MISS_NUM

461: -- Schedule seq number validation
462: -- JKJAIN US space FP for ER # 6998882-- start
463: IF (
464: p_resrc_Require_rec.schedule_seq_num IS NOT NULL AND
465: p_resrc_Require_rec.schedule_seq_num <> Fnd_Api.G_MISS_NUM
466: )
467: THEN
468:
469: IF (

Line 479: x_return_status := Fnd_Api.g_ret_sts_error;

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:
482: END IF;
483:

Line 489: IF p_Resrc_Require_Rec.RESOURCE_NAME IS NULL OR p_Resrc_Require_Rec.RESOURCE_NAME = Fnd_Api.G_MISS_CHAR THEN

485: -- JKJAIN US space FP for ER # 6998882 end
486:
487: IF g_MODULE_TYPE='JSP' THEN
488:
489: IF p_Resrc_Require_Rec.RESOURCE_NAME IS NULL OR p_Resrc_Require_Rec.RESOURCE_NAME = Fnd_Api.G_MISS_CHAR 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:

Line 498: x_return_status := Fnd_Api.g_ret_sts_error;

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;
501: END IF;
502:

Line 507: IF (p_resrc_Require_rec.Duration IS NULL OR p_resrc_Require_rec.Duration = Fnd_Api.G_MISS_NUM) THEN

503: IF G_DEBUG='Y' THEN
504: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Duration =' || p_resrc_Require_rec.Duration);
505: END IF;
506: -- DURATION
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

Line 515: x_return_status := Fnd_Api.g_ret_sts_error;

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;
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

Line 519: IF (p_resrc_Require_rec.Duration IS NOT NULL AND p_resrc_Require_rec.Duration <> Fnd_Api.G_MISS_NUM) THEN

515: x_return_status := Fnd_Api.g_ret_sts_error;
516: RETURN;
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;

Line 525: x_return_status := Fnd_Api.g_ret_sts_error;

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;
528: END IF;
529:

Line 535: IF (p_resrc_Require_rec.QUANTITY IS NULL OR p_resrc_Require_rec.QUANTITY = Fnd_Api.G_MISS_NUM) THEN

531: IF G_DEBUG='Y' THEN
532: Ahl_Debug_Pub.debug('Check_Resrc_Require_Req_Items' || '-- Quantity =' || p_resrc_Require_rec.quantity);
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;

Line 541: x_return_status := Fnd_Api.g_ret_sts_error;

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;
544:
545: -- QUANTITY - Positive

Line 546: IF (p_resrc_Require_rec.QUANTITY IS NOT NULL AND p_resrc_Require_rec.QUANTITY <> Fnd_Api.G_MISS_NUM) THEN

542: RETURN;
543: END IF;
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;

Line 552: x_return_status := Fnd_Api.g_ret_sts_error;

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;
555: END IF;
556:

Line 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

558: IF G_DEBUG='Y' 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;

Line 567: x_return_status := Fnd_Api.g_ret_sts_error;

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;
570:
571: -- REQ_END_DATE

Line 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

572: IF G_DEBUG='Y' 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;

Line 581: x_return_status := Fnd_Api.g_ret_sts_error;

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;
584: --
585: -- Use local vars to reduce amount of typing.

Line 586: IF p_resrc_Require_rec.Req_start_date IS NOT NULL OR p_resrc_Require_rec.Req_start_date <> Fnd_Api.g_miss_date THEN

582: RETURN;
583: END IF;
584: --
585: -- Use local vars to reduce amount of typing.
586: IF p_resrc_Require_rec.Req_start_date IS NOT NULL OR p_resrc_Require_rec.Req_start_date <> Fnd_Api.g_miss_date THEN
587: l_Require_start_date := p_resrc_Require_rec.Req_start_date;
588: END IF;
589:
590: IF p_resrc_Require_rec.Req_end_date IS NOT NULL OR p_resrc_Require_rec.Req_end_date <> Fnd_Api.g_miss_date THEN

Line 590: IF p_resrc_Require_rec.Req_end_date IS NOT NULL OR p_resrc_Require_rec.Req_end_date <> Fnd_Api.g_miss_date THEN

586: IF p_resrc_Require_rec.Req_start_date IS NOT NULL OR p_resrc_Require_rec.Req_start_date <> Fnd_Api.g_miss_date THEN
587: l_Require_start_date := p_resrc_Require_rec.Req_start_date;
588: END IF;
589:
590: IF p_resrc_Require_rec.Req_end_date IS NOT NULL OR p_resrc_Require_rec.Req_end_date <> Fnd_Api.g_miss_date THEN
591: l_Require_end_date := p_resrc_Require_rec.Req_end_date;
592: END IF;
593:
594: IF G_DEBUG='Y' THEN

Line 607: x_return_status := Fnd_Api.g_ret_sts_error;

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;
610: END IF;
611:

Line 614: IF p_resrc_Require_rec.OPERATION_RESOURCE_ID = Fnd_Api.G_MISS_NUM OR p_resrc_Require_rec.OPERATION_RESOURCE_ID IS NULL THEN

610: END IF;
611:
612: ------------------- Start Uncommented on 27 Jan 2003 as bug#2771573 -----------------
613: IF g_MODULE_TYPE='JSP' THEN
614: IF p_resrc_Require_rec.OPERATION_RESOURCE_ID = Fnd_Api.G_MISS_NUM OR p_resrc_Require_rec.OPERATION_RESOURCE_ID IS NULL THEN
615: OPEN c_wo_oper(p_resrc_Require_rec.WORKORDER_OPERATION_ID);
616: FETCH c_wo_oper INTO l_eff_st_date, l_eff_end_date, l_sch_st_date, l_sch_end_date;
617: IF c_wo_oper%NOTFOUND THEN
618: CLOSE c_wo_oper;

Line 673: x_return_status := Fnd_Api.g_ret_sts_error;

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;
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);

Line 683: x_return_status := Fnd_Api.g_ret_sts_error;

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;
686: END IF;
687:

Line 695: x_return_status := Fnd_Api.g_ret_sts_error;

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;
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);

Line 705: x_return_status := Fnd_Api.g_ret_sts_error;

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;
708: END IF;
709: END IF;

Line 720: x_return_status := Fnd_Api.g_ret_sts_error;

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;
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);

Line 730: x_return_status := Fnd_Api.g_ret_sts_error;

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;
733: END IF;
734:

Line 742: x_return_status := Fnd_Api.g_ret_sts_error;

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;
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);

Line 752: x_return_status := Fnd_Api.g_ret_sts_error;

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;
755: END IF;
756: END IF;

Line 772: x_return_status := Fnd_Api.g_ret_sts_success;

768: IS
769: l_valid_flag VARCHAR2(1);
770: l_ctr NUMBER:=0;
771: BEGIN
772: x_return_status := Fnd_Api.g_ret_sts_success;
773:
774: --
775: -- For when ID is passed in, we need to check if this ID is unique.
776: IF G_DEBUG='Y' THEN

Line 785: IF p_validation_mode = Jtf_Plsql_Api.g_create AND (p_resrc_Require_rec.OPERATION_RESOURCE_ID IS NULL OR p_resrc_Require_rec.OPERATION_RESOURCE_ID = FND_API.g_miss_num) THEN

781: Ahl_Debug_Pub.debug( ' OPERATION_RESOURCE_ID -->' ||p_resrc_Require_rec.OPERATION_RESOURCE_ID);
782: Ahl_Debug_Pub.debug( ' WORKORDER_OPERATION_ID -->' ||p_resrc_Require_rec.WORKORDER_OPERATION_ID);
783: END IF;
784:
785: IF p_validation_mode = Jtf_Plsql_Api.g_create AND (p_resrc_Require_rec.OPERATION_RESOURCE_ID IS NULL OR p_resrc_Require_rec.OPERATION_RESOURCE_ID = FND_API.g_miss_num) THEN
786: Ahl_Debug_Pub.debug( 'For create l_valid_flag -->' || l_valid_flag);
787: Ahl_Debug_Pub.debug( 'QUERY -->' || 'RESOURCE_SEQUENCE_NUM = ' || p_resrc_Require_rec.RESOURCE_SEQ_NUMBER ||
788: ' AND WORKORDER_OPERATION_ID = ' || p_resrc_Require_rec.WORKORDER_OPERATION_ID);
789:

Line 814: IF l_valid_flag = Fnd_Api.g_false

810: ' AND WORKORDER_OPERATION_ID = ' || p_resrc_Require_rec.WORKORDER_OPERATION_ID ||
811: ' AND OPERATION_RESOURCE_ID <> ' || p_resrc_Require_rec.OPERATION_RESOURCE_ID);
812: END IF;
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');

Line 821: x_return_status := Fnd_Api.g_ret_sts_error;

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;
824:
825: END Check_Resrc_Require_UK_Items;

Line 849: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN

845: p_resrc_Require_rec => p_resrc_Require_rec,
846: x_return_status => x_return_status
847: );
848:
849: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
850: RETURN;
851: END IF;
852: --
853: -- Validate uniqueness.

Line 860: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN

856: p_validation_mode => p_validation_mode,
857: x_return_status => x_return_status
858: );
859:
860: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
861: RETURN;
862: END IF;
863:
864: END Check_Resrc_Require_Items;

Line 873: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

869: --
870: --------------------------------------------------------------------
871: PROCEDURE Validate_Resrc_Require (
872: p_api_version IN NUMBER,
873: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
874: p_commit IN VARCHAR2 := Fnd_Api.g_false,
875: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
876: p_resrc_Require_rec IN Resrc_Require_Rec_Type,
877:

Line 874: p_commit IN VARCHAR2 := Fnd_Api.g_false,

870: --------------------------------------------------------------------
871: PROCEDURE Validate_Resrc_Require (
872: p_api_version IN NUMBER,
873: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
874: p_commit IN VARCHAR2 := Fnd_Api.g_false,
875: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
876: p_resrc_Require_rec IN Resrc_Require_Rec_Type,
877:
878: x_return_status OUT NOCOPY VARCHAR2,

Line 875: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

871: PROCEDURE Validate_Resrc_Require (
872: p_api_version IN NUMBER,
873: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
874: p_commit IN VARCHAR2 := Fnd_Api.g_false,
875: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
876: p_resrc_Require_rec IN Resrc_Require_Rec_Type,
877:
878: x_return_status OUT NOCOPY VARCHAR2,
879: x_msg_count OUT NOCOPY NUMBER,

Line 907: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

903: IF G_DEBUG='Y' THEN
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 (

Line 911: IF NOT Fnd_Api.compatible_api_call (

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,
913: p_api_version,
914: l_api_name,
915: G_PKG_NAME

Line 917: RAISE Fnd_Api.g_exc_unexpected_error;

913: p_api_version,
914: l_api_name,
915: G_PKG_NAME
916: ) THEN
917: RAISE Fnd_Api.g_exc_unexpected_error;
918: END IF;
919: x_return_status := Fnd_Api.g_ret_sts_success;
920:
921: ---------------------- validate ------------------------

Line 919: x_return_status := Fnd_Api.g_ret_sts_success;

915: G_PKG_NAME
916: ) THEN
917: RAISE Fnd_Api.g_exc_unexpected_error;
918: END IF;
919: x_return_status := Fnd_Api.g_ret_sts_success;
920:
921: ---------------------- validate ------------------------
922: IF G_DEBUG='Y' THEN
923: Ahl_Debug_Pub.debug( l_full_name ||':Check items');

Line 933: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

929: p_validation_mode => Jtf_Plsql_Api.g_create,
930: x_return_status => l_return_status
931: );
932:
933: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
934: RAISE Fnd_Api.g_exc_unexpected_error;
935: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
936: RAISE Fnd_Api.g_exc_error;
937: END IF;

Line 934: RAISE Fnd_Api.g_exc_unexpected_error;

930: x_return_status => l_return_status
931: );
932:
933: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
934: RAISE Fnd_Api.g_exc_unexpected_error;
935: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
936: RAISE Fnd_Api.g_exc_error;
937: END IF;
938: END IF;

Line 935: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

931: );
932:
933: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
934: RAISE Fnd_Api.g_exc_unexpected_error;
935: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
936: RAISE Fnd_Api.g_exc_error;
937: END IF;
938: END IF;
939: --FP for Bug 6625880. AMSRINIV. Doing away with below validation as misc resources can be scheduled.

Line 936: RAISE Fnd_Api.g_exc_error;

932:
933: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
934: RAISE Fnd_Api.g_exc_unexpected_error;
935: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
936: RAISE Fnd_Api.g_exc_error;
937: END IF;
938: END IF;
939: --FP for Bug 6625880. AMSRINIV. Doing away with below validation as misc resources can be scheduled.
940: -- Fix for bug# 6512803. Validate scheduled type with resource type.

Line 943: p_resrc_Require_rec.scheduled_type_code <> FND_API.G_MISS_NUM) THEN

939: --FP for Bug 6625880. AMSRINIV. Doing away with below validation as misc resources can be scheduled.
940: -- Fix for bug# 6512803. Validate scheduled type with resource type.
941: /*
942: IF (p_resrc_Require_rec.scheduled_type_code IS NOT NULL AND
943: p_resrc_Require_rec.scheduled_type_code <> FND_API.G_MISS_NUM) THEN
944: IF (p_resrc_Require_rec.resource_type_code IS NULL AND
945: p_resrc_Require_rec.resource_type_code = FND_API.G_MISS_NUM) THEN
946: OPEN get_res_type(p_resrc_Require_rec.resource_id);
947: FETCH get_res_type INTO l_resource_type_code;

Line 945: p_resrc_Require_rec.resource_type_code = FND_API.G_MISS_NUM) THEN

941: /*
942: IF (p_resrc_Require_rec.scheduled_type_code IS NOT NULL AND
943: p_resrc_Require_rec.scheduled_type_code <> FND_API.G_MISS_NUM) THEN
944: IF (p_resrc_Require_rec.resource_type_code IS NULL AND
945: p_resrc_Require_rec.resource_type_code = FND_API.G_MISS_NUM) THEN
946: OPEN get_res_type(p_resrc_Require_rec.resource_id);
947: FETCH get_res_type INTO l_resource_type_code;
948: CLOSE get_res_type;
949: ELSE

Line 955: RAISE Fnd_Api.g_exc_error;

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: */
959: -------------------- finish --------------------------

Line 961: p_encoded => Fnd_Api.g_false,

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: );
965: IF G_DEBUG='Y' THEN

Line 975: WHEN Fnd_Api.g_exc_error THEN

971: Ahl_Debug_Pub.disable_debug;
972: END IF;
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,

Line 976: x_return_status := Fnd_Api.g_ret_sts_error;

972: END IF;
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

Line 978: p_encoded => Fnd_Api.g_false,

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: );
982: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 982: WHEN Fnd_Api.g_exc_unexpected_error THEN

978: p_encoded => Fnd_Api.g_false,
979: p_count => x_msg_count,
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,

Line 983: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

979: p_count => x_msg_count,
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

Line 985: p_encoded => Fnd_Api.g_false,

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: );
989: WHEN OTHERS THEN

Line 990: x_return_status := Fnd_Api.g_ret_sts_unexp_error;

986: p_count => x_msg_count,
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;

Line 997: p_encoded => Fnd_Api.g_false,

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: );
1001: END Validate_Resrc_Require;

Line 1012: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE

1008: -- Parameters :
1009: --
1010: -- Standard IN Parameters :
1011: -- p_api_version IN NUMBER Required
1012: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
1013: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
1014: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
1015: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
1016: -- p_module_type IN VARCHAR2 Default NULL.

Line 1013: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE

1009: --
1010: -- Standard IN Parameters :
1011: -- p_api_version IN NUMBER Required
1012: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
1013: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
1014: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
1015: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
1016: -- p_module_type IN VARCHAR2 Default NULL.
1017: --

Line 1014: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL

1010: -- Standard IN Parameters :
1011: -- p_api_version IN NUMBER Required
1012: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
1013: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
1014: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
1015: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
1016: -- p_module_type IN VARCHAR2 Default NULL.
1017: --
1018: -- Standard OUT Parameters :

Line 1015: -- p_default IN VARCHAR2 Default FND_API.G_TRUE

1011: -- p_api_version IN NUMBER Required
1012: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
1013: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
1014: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
1015: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
1016: -- p_module_type IN VARCHAR2 Default NULL.
1017: --
1018: -- Standard OUT Parameters :
1019: -- x_return_status OUT VARCHAR2 Required

Line 1034: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,

1030: -- End of Comments.
1031:
1032: PROCEDURE Create_Resrc_Require (
1033: p_api_version IN NUMBER,
1034: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
1035: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
1036: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
1037: p_module_type IN VARCHAR2 := NULL,
1038: p_interface_flag IN VARCHAR2,

Line 1035: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,

1031:
1032: PROCEDURE Create_Resrc_Require (
1033: p_api_version IN NUMBER,
1034: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
1035: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
1036: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
1037: p_module_type IN VARCHAR2 := NULL,
1038: p_interface_flag IN VARCHAR2,
1039: p_x_resrc_Require_Tbl IN OUT NOCOPY AHL_PP_RESRC_Require_PVT.Resrc_Require_Tbl_Type,

Line 1036: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,

1032: PROCEDURE Create_Resrc_Require (
1033: p_api_version IN NUMBER,
1034: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
1035: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
1036: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
1037: p_module_type IN VARCHAR2 := NULL,
1038: p_interface_flag IN VARCHAR2,
1039: p_x_resrc_Require_Tbl IN OUT NOCOPY AHL_PP_RESRC_Require_PVT.Resrc_Require_Tbl_Type,
1040: x_return_status OUT NOCOPY VARCHAR2,

Line 1212: IF FND_API.to_boolean(p_init_msg_list)

1208: END IF;
1209: G_MODULE_TYPE:=P_MODULE_TYPE;
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:

Line 1218: x_return_status := FND_API.G_RET_STS_SUCCESS;

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;
1219:
1220: -- Initialize message list if p_init_msg_list is set to TRUE.
1221: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
1222: p_api_version,

Line 1221: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

1217: -- Initialize API return status to success
1218: x_return_status := FND_API.G_RET_STS_SUCCESS;
1219:
1220: -- Initialize message list if p_init_msg_list is set to TRUE.
1221: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
1222: p_api_version,
1223: l_api_name,G_PKG_NAME)
1224: THEN
1225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1221: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
1222: p_api_version,
1223: l_api_name,G_PKG_NAME)
1224: THEN
1225: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1226: END IF;
1227: --------------------Start of API Body-----------------------------------
1228: IF p_x_resrc_Require_tbl.COUNT > 0 THEN
1229: FOR i IN p_x_resrc_Require_tbl.FIRST..p_x_resrc_Require_tbl.LAST

Line 1252: IF l_Resrc_Require_Rec.operation_seq_number IS NOT NULL AND l_Resrc_Require_Rec.operation_seq_number <> FND_API.G_MISS_NUM THEN

1248:
1249: END IF;
1250:
1251: IF l_Resrc_Require_Rec.workorder_id IS NOT NULL THEN
1252: IF l_Resrc_Require_Rec.operation_seq_number IS NOT NULL AND l_Resrc_Require_Rec.operation_seq_number <> FND_API.G_MISS_NUM THEN
1253:
1254: OPEN c_wo_oper(l_Resrc_Require_Rec.workorder_id, l_Resrc_Require_Rec.operation_seq_number);
1255: FETCH c_wo_oper INTO l_wo_operation_id;
1256: IF c_wo_oper%NOTFOUND THEN

Line 1266: l_Resrc_Require_Rec.resource_seq_number <> FND_API.G_MISS_NUM THEN

1262: CLOSE c_wo_oper;
1263: l_Resrc_Require_Rec.workorder_operation_id := l_wo_operation_id;
1264:
1265: IF l_Resrc_Require_Rec.resource_seq_number IS NOT NULL AND
1266: l_Resrc_Require_Rec.resource_seq_number <> FND_API.G_MISS_NUM THEN
1267: OPEN c_resrc_seq(l_Resrc_Require_Rec.workorder_id, l_Resrc_Require_Rec.operation_seq_number,l_Resrc_Require_Rec.resource_seq_number);
1268: FETCH c_resrc_seq INTO l_count;
1269: CLOSE c_resrc_seq;
1270:

Line 1305: IF l_return_status = FND_API.G_TRUE THEN

1301: p_workorder_id => l_resrc_require_rec.workorder_id,
1302: p_ue_id => NULL,
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;

Line 1308: RAISE FND_API.G_EXC_ERROR;

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
1312:

Line 1370: l_Resrc_Require_Rec.resource_type_name <> Fnd_Api.G_MISS_CHAR )

1366: END IF;
1367: --
1368: -- For Resource Type
1369: IF ( l_Resrc_Require_Rec.resource_type_name IS NOT NULL AND
1370: l_Resrc_Require_Rec.resource_type_name <> Fnd_Api.G_MISS_CHAR )
1371: THEN
1372: Check_Lookup_Name_Or_Id (
1373: p_lookup_type => 'BOM_RESOURCE_TYPE',
1374: p_lookup_code => NULL,

Line 1384: RAISE Fnd_Api.G_EXC_ERROR;

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
1388: Ahl_Debug_Pub.debug ( ' Resource Type Code = ' || l_Resrc_Require_Rec.resource_type_code);

Line 1396: l_Resrc_Require_Rec.RESOURCE_NAME <> Fnd_Api.G_MISS_CHAR

1392: Ahl_Debug_Pub.debug ( l_full_name || '*******************BEFORE RESOURCE NAME CHECK');
1393: END IF;
1394: -- For Resource
1395: IF l_Resrc_Require_Rec.RESOURCE_NAME IS NOT NULL AND
1396: l_Resrc_Require_Rec.RESOURCE_NAME <> Fnd_Api.G_MISS_CHAR
1397: THEN
1398: Check_Resource_Name_Or_Id
1399: (p_Resource_Id => l_Resrc_Require_Rec.Resource_Id,
1400: p_Resource_code => l_Resrc_Require_Rec.Resource_Name,

Line 1412: RAISE Fnd_Api.G_EXC_ERROR;

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
1416: Ahl_Debug_Pub.debug ( l_full_name || '*******************AFTER RESOURCE NAME CHECK');

Line 1451: l_Resrc_Require_Rec.UOM_NAME <> Fnd_Api.G_MISS_CHAR

1447: --
1448: p_x_resrc_Require_tbl(i).uom_code := l_Resrc_Require_Rec.UOM_CODE;
1449: -- For Units of Measure
1450: IF l_Resrc_Require_Rec.UOM_NAME IS NOT NULL AND
1451: l_Resrc_Require_Rec.UOM_NAME <> Fnd_Api.G_MISS_CHAR
1452: THEN
1453: OPEN c_UOM(l_Resrc_Require_Rec.UOM_NAME);
1454: FETCH c_UOM INTO l_Resrc_Require_Rec.UOM_CODE;
1455: IF c_UOM%NOTFOUND THEN

Line 1466: l_Resrc_Require_Rec.CHARGE_TYPE_NAME <> Fnd_Api.G_MISS_CHAR )

1462: END IF;
1463:
1464: -- For AutoCharge Type
1465: IF ( l_Resrc_Require_Rec.CHARGE_TYPE_NAME IS NOT NULL AND
1466: l_Resrc_Require_Rec.CHARGE_TYPE_NAME <> Fnd_Api.G_MISS_CHAR )
1467: THEN
1468: Check_Lookup_Name_Or_Id (
1469: p_lookup_type => 'BOM_AUTOCHARGE_TYPE',
1470: p_lookup_code => NULL,

Line 1480: RAISE Fnd_Api.G_EXC_ERROR;

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
1484: Ahl_Debug_Pub.debug ( l_full_name || ' AutoCharge Code = ' || l_Resrc_Require_Rec.CHARGE_TYPE_CODE);

Line 1490: l_Resrc_Require_Rec.COST_BASIS_NAME <> Fnd_Api.G_MISS_CHAR )

1486: Ahl_Debug_Pub.debug ( l_full_name || ' COST BASIS CODE = ' || l_Resrc_Require_Rec.COST_BASIS_CODE);
1487: END IF;
1488: -- For Cost Basis
1489: IF ( l_Resrc_Require_Rec.COST_BASIS_NAME IS NOT NULL AND
1490: l_Resrc_Require_Rec.COST_BASIS_NAME <> Fnd_Api.G_MISS_CHAR )
1491: THEN
1492: Check_Lookup_Name_Or_Id (
1493: p_lookup_type => 'CST_BASIS',
1494: p_lookup_code => NULL,

Line 1504: RAISE Fnd_Api.G_EXC_ERROR;

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
1508: Ahl_Debug_Pub.debug ( l_full_name || ' COST BASIS CODE = ' || l_Resrc_Require_Rec.COST_BASIS_CODE);

Line 1514: l_Resrc_Require_Rec.SCHEDULED_TYPE_NAME <> Fnd_Api.G_MISS_CHAR )

1510: Ahl_Debug_Pub.debug ( l_full_name || ' SCHEDULED TYPE CODE = ' || l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE);
1511: END IF;
1512: -- For Scheduled Type
1513: IF ( l_Resrc_Require_Rec.SCHEDULED_TYPE_NAME IS NOT NULL AND
1514: l_Resrc_Require_Rec.SCHEDULED_TYPE_NAME <> Fnd_Api.G_MISS_CHAR )
1515: THEN
1516: Check_Lookup_Name_Or_Id (
1517: p_lookup_type => 'BOM_RESOURCE_SCHEDULE_TYPE',
1518: p_lookup_code => NULL,

Line 1528: RAISE Fnd_Api.G_EXC_ERROR;

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
1532: Ahl_Debug_Pub.debug ( l_full_name || ' SCHEDULED TYPE CODE = ' || l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE);

Line 1537: l_Resrc_Require_Rec.STD_RATE_FLAG_CODE <> Fnd_Api.G_MISS_NUM) THEN

1533: Ahl_Debug_Pub.debug ( l_full_name || ' STANDARD RATE FLAG = ' || l_Resrc_Require_Rec.STD_RATE_FLAG_CODE);
1534: END IF;
1535: -- To find meaning for fnd_lookups code
1536: IF (l_Resrc_Require_Rec.STD_RATE_FLAG_CODE IS NOT NULL AND
1537: l_Resrc_Require_Rec.STD_RATE_FLAG_CODE <> Fnd_Api.G_MISS_NUM) THEN
1538: SELECT meaning
1539: INTO l_std_rate_flag
1540: FROM MFG_LOOKUPS
1541: WHERE lookup_code = l_Resrc_Require_Rec.STD_RATE_FLAG_CODE

Line 1589: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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;
1590: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1591: END IF;
1592:
1593: --

Line 1590: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

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;
1590: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1591: END IF;
1592:
1593: --
1594: IF l_Resrc_Require_Rec.Operation_Resource_Id = FND_API.G_MISS_NUM OR l_Resrc_Require_Rec.Operation_Resource_Id IS NULL

Line 1594: IF l_Resrc_Require_Rec.Operation_Resource_Id = FND_API.G_MISS_NUM OR l_Resrc_Require_Rec.Operation_Resource_Id IS NULL

1590: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1591: END IF;
1592:
1593: --
1594: IF l_Resrc_Require_Rec.Operation_Resource_Id = FND_API.G_MISS_NUM OR l_Resrc_Require_Rec.Operation_Resource_Id IS NULL
1595: THEN
1596: IF G_DEBUG='Y' THEN
1597: Ahl_Debug_Pub.debug ( l_full_name || ' ******INSIDE DEFAULT VALUES****');
1598: END IF;

Line 1602: l_Resrc_Require_Rec.CHARGE_TYPE_CODE = Fnd_Api.G_MISS_NUM) THEN

1598: END IF;
1599:
1600: -- These conditions are Required for optional fields
1601: IF (l_Resrc_Require_Rec.CHARGE_TYPE_CODE IS NULL OR
1602: l_Resrc_Require_Rec.CHARGE_TYPE_CODE = Fnd_Api.G_MISS_NUM) THEN
1603: l_Resrc_Require_Rec.charge_type_code := 2;
1604: END IF;
1605:
1606: IF (l_Resrc_Require_Rec.COST_BASIS_CODE IS NULL OR

Line 1607: l_Resrc_Require_Rec.COST_BASIS_CODE = Fnd_Api.G_MISS_NUM) THEN

1603: l_Resrc_Require_Rec.charge_type_code := 2;
1604: END IF;
1605:
1606: IF (l_Resrc_Require_Rec.COST_BASIS_CODE IS NULL OR
1607: l_Resrc_Require_Rec.COST_BASIS_CODE = Fnd_Api.G_MISS_NUM) THEN
1608: l_Resrc_Require_Rec.cost_basis_code := 1;
1609: END IF;
1610:
1611: IF (l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE IS NULL OR

Line 1612: l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE = Fnd_Api.G_MISS_NUM) THEN

1608: l_Resrc_Require_Rec.cost_basis_code := 1;
1609: END IF;
1610:
1611: IF (l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE IS NULL OR
1612: l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE = Fnd_Api.G_MISS_NUM) THEN
1613: l_Resrc_Require_Rec.scheduled_type_code := 1;
1614: END IF;
1615:
1616: -- As part of fix for bug# 6512803, merged validation of STD_RATE_FLAG_CODE and

Line 1619: l_Resrc_Require_Rec.STD_RATE_FLAG_CODE = Fnd_Api.G_MISS_NUM) OR

1615:
1616: -- As part of fix for bug# 6512803, merged validation of STD_RATE_FLAG_CODE and
1617: -- SCHEDULED_TYPE_CODE under one IF block.
1618: IF (l_Resrc_Require_Rec.STD_RATE_FLAG_CODE IS NULL OR
1619: l_Resrc_Require_Rec.STD_RATE_FLAG_CODE = Fnd_Api.G_MISS_NUM) OR
1620: (l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE IS NULL OR
1621: l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE = Fnd_Api.G_MISS_NUM) THEN
1622:
1623: -- Balaji modified the code for Bug # 5951435-- Begin

Line 1621: l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE = Fnd_Api.G_MISS_NUM) THEN

1617: -- SCHEDULED_TYPE_CODE under one IF block.
1618: IF (l_Resrc_Require_Rec.STD_RATE_FLAG_CODE IS NULL OR
1619: l_Resrc_Require_Rec.STD_RATE_FLAG_CODE = Fnd_Api.G_MISS_NUM) OR
1620: (l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE IS NULL OR
1621: l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE = Fnd_Api.G_MISS_NUM) THEN
1622:
1623: -- Balaji modified the code for Bug # 5951435-- Begin
1624:
1625: OPEN c_get_std_rate_flag(l_Resrc_Require_Rec.Resource_Id);

Line 1633: l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE = Fnd_Api.G_MISS_NUM) THEN

1629:
1630: -- Balaji modified the code for Bug # 5951435-- End
1631: -- Added to fix bug# 6512803.
1632: IF (l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE IS NULL OR
1633: l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE = Fnd_Api.G_MISS_NUM) THEN
1634: IF (l_resource_type IN (1,2)) THEN
1635: l_Resrc_Require_Rec.scheduled_type_code := 1;
1636: ELSE
1637: l_Resrc_Require_Rec.scheduled_type_code := 2;

Line 1644: IF l_Resrc_Require_Rec.last_update_login = FND_API.G_MISS_NUM

1640:
1641: END IF;
1642:
1643: -- Last Updated Date
1644: IF l_Resrc_Require_Rec.last_update_login = FND_API.G_MISS_NUM
1645: THEN
1646: l_Resrc_Require_Rec.last_update_login := NULL;
1647: ELSE
1648: l_Resrc_Require_Rec.last_update_login := l_Resrc_Require_Rec.last_update_login;

Line 1651: IF l_Resrc_Require_Rec.attribute_category = FND_API.G_MISS_CHAR

1647: ELSE
1648: l_Resrc_Require_Rec.last_update_login := l_Resrc_Require_Rec.last_update_login;
1649: END IF;
1650: -- Attribute Category
1651: IF l_Resrc_Require_Rec.attribute_category = FND_API.G_MISS_CHAR
1652: THEN
1653: l_Resrc_Require_Rec.attribute_category := NULL;
1654: ELSE
1655: l_Resrc_Require_Rec.attribute_category := l_Resrc_Require_Rec.attribute_category;

Line 1658: IF l_Resrc_Require_Rec.attribute1 = FND_API.G_MISS_CHAR

1654: ELSE
1655: l_Resrc_Require_Rec.attribute_category := l_Resrc_Require_Rec.attribute_category;
1656: END IF;
1657: -- Attribute1
1658: IF l_Resrc_Require_Rec.attribute1 = FND_API.G_MISS_CHAR
1659: THEN
1660: l_Resrc_Require_Rec.attribute1 := NULL;
1661: ELSE
1662: l_Resrc_Require_Rec.attribute1 := l_Resrc_Require_Rec.attribute1;

Line 1665: IF l_Resrc_Require_Rec.attribute2 = FND_API.G_MISS_CHAR

1661: ELSE
1662: l_Resrc_Require_Rec.attribute1 := l_Resrc_Require_Rec.attribute1;
1663: END IF;
1664: -- Attribute2
1665: IF l_Resrc_Require_Rec.attribute2 = FND_API.G_MISS_CHAR
1666: THEN
1667: l_Resrc_Require_Rec.attribute2 := NULL;
1668: ELSE
1669: l_Resrc_Require_Rec.attribute2 := l_Resrc_Require_Rec.attribute2;

Line 1672: IF l_Resrc_Require_Rec.attribute3 = FND_API.G_MISS_CHAR

1668: ELSE
1669: l_Resrc_Require_Rec.attribute2 := l_Resrc_Require_Rec.attribute2;
1670: END IF;
1671: -- Attribute3
1672: IF l_Resrc_Require_Rec.attribute3 = FND_API.G_MISS_CHAR
1673: THEN
1674: l_Resrc_Require_Rec.attribute3 := NULL;
1675: ELSE
1676: l_Resrc_Require_Rec.attribute3 := l_Resrc_Require_Rec.attribute3;

Line 1679: IF l_Resrc_Require_Rec.attribute4 = FND_API.G_MISS_CHAR

1675: ELSE
1676: l_Resrc_Require_Rec.attribute3 := l_Resrc_Require_Rec.attribute3;
1677: END IF;
1678: -- Attribute4
1679: IF l_Resrc_Require_Rec.attribute4 = FND_API.G_MISS_CHAR
1680: THEN
1681: l_Resrc_Require_Rec.attribute4 := NULL;
1682: ELSE
1683: l_Resrc_Require_Rec.attribute4 := l_Resrc_Require_Rec.attribute4;

Line 1686: IF l_Resrc_Require_Rec.attribute5 = FND_API.G_MISS_CHAR

1682: ELSE
1683: l_Resrc_Require_Rec.attribute4 := l_Resrc_Require_Rec.attribute4;
1684: END IF;
1685: -- Attribute5
1686: IF l_Resrc_Require_Rec.attribute5 = FND_API.G_MISS_CHAR
1687: THEN
1688: l_Resrc_Require_Rec.attribute5 := NULL;
1689: ELSE
1690: l_Resrc_Require_Rec.attribute5 := l_Resrc_Require_Rec.attribute5;

Line 1693: IF l_Resrc_Require_Rec.attribute6 = FND_API.G_MISS_CHAR

1689: ELSE
1690: l_Resrc_Require_Rec.attribute5 := l_Resrc_Require_Rec.attribute5;
1691: END IF;
1692: -- Attribute6
1693: IF l_Resrc_Require_Rec.attribute6 = FND_API.G_MISS_CHAR
1694: THEN
1695: l_Resrc_Require_Rec.attribute6 := NULL;
1696: ELSE
1697: l_Resrc_Require_Rec.attribute6 := l_Resrc_Require_Rec.attribute6;

Line 1700: IF l_Resrc_Require_Rec.attribute7 = FND_API.G_MISS_CHAR

1696: ELSE
1697: l_Resrc_Require_Rec.attribute6 := l_Resrc_Require_Rec.attribute6;
1698: END IF;
1699: -- Attribute7
1700: IF l_Resrc_Require_Rec.attribute7 = FND_API.G_MISS_CHAR
1701: THEN
1702: l_Resrc_Require_Rec.attribute7 := NULL;
1703: ELSE
1704: l_Resrc_Require_Rec.attribute7 := l_Resrc_Require_Rec.attribute7;

Line 1707: IF l_Resrc_Require_Rec.attribute8 = FND_API.G_MISS_CHAR

1703: ELSE
1704: l_Resrc_Require_Rec.attribute7 := l_Resrc_Require_Rec.attribute7;
1705: END IF;
1706: -- Attribute8
1707: IF l_Resrc_Require_Rec.attribute8 = FND_API.G_MISS_CHAR
1708: THEN
1709: l_Resrc_Require_Rec.attribute8 := NULL;
1710: ELSE
1711: l_Resrc_Require_Rec.attribute8 := l_Resrc_Require_Rec.attribute8;

Line 1714: IF l_Resrc_Require_Rec.attribute9 = FND_API.G_MISS_CHAR

1710: ELSE
1711: l_Resrc_Require_Rec.attribute8 := l_Resrc_Require_Rec.attribute8;
1712: END IF;
1713: -- Attribute9
1714: IF l_Resrc_Require_Rec.attribute9 = FND_API.G_MISS_CHAR
1715: THEN
1716: l_Resrc_Require_Rec.attribute9 := NULL;
1717: ELSE
1718: l_Resrc_Require_Rec.attribute9 := l_Resrc_Require_Rec.attribute9;

Line 1721: IF l_Resrc_Require_Rec.attribute10 = FND_API.G_MISS_CHAR

1717: ELSE
1718: l_Resrc_Require_Rec.attribute9 := l_Resrc_Require_Rec.attribute9;
1719: END IF;
1720: -- Attribute10
1721: IF l_Resrc_Require_Rec.attribute10 = FND_API.G_MISS_CHAR
1722: THEN
1723: l_Resrc_Require_Rec.attribute10 := NULL;
1724: ELSE
1725: l_Resrc_Require_Rec.attribute10 := l_Resrc_Require_Rec.attribute10;

Line 1728: IF l_Resrc_Require_Rec.attribute11 = FND_API.G_MISS_CHAR

1724: ELSE
1725: l_Resrc_Require_Rec.attribute10 := l_Resrc_Require_Rec.attribute10;
1726: END IF;
1727: -- Attribute11
1728: IF l_Resrc_Require_Rec.attribute11 = FND_API.G_MISS_CHAR
1729: THEN
1730: l_Resrc_Require_Rec.attribute11 := NULL;
1731: ELSE
1732: l_Resrc_Require_Rec.attribute11 := l_Resrc_Require_Rec.attribute11;

Line 1735: IF l_Resrc_Require_Rec.attribute12 = FND_API.G_MISS_CHAR

1731: ELSE
1732: l_Resrc_Require_Rec.attribute11 := l_Resrc_Require_Rec.attribute11;
1733: END IF;
1734: -- Attribute12
1735: IF l_Resrc_Require_Rec.attribute12 = FND_API.G_MISS_CHAR
1736: THEN
1737: l_Resrc_Require_Rec.attribute12 := NULL;
1738: ELSE
1739: l_Resrc_Require_Rec.attribute12 := l_Resrc_Require_Rec.attribute12;

Line 1742: IF l_Resrc_Require_Rec.attribute13 = FND_API.G_MISS_CHAR

1738: ELSE
1739: l_Resrc_Require_Rec.attribute12 := l_Resrc_Require_Rec.attribute12;
1740: END IF;
1741: -- Attribute13
1742: IF l_Resrc_Require_Rec.attribute13 = FND_API.G_MISS_CHAR
1743: THEN
1744: l_Resrc_Require_Rec.attribute13 := NULL;
1745: ELSE
1746: l_Resrc_Require_Rec.attribute13 := l_Resrc_Require_Rec.attribute13;

Line 1749: IF l_Resrc_Require_Rec.attribute14 = FND_API.G_MISS_CHAR

1745: ELSE
1746: l_Resrc_Require_Rec.attribute13 := l_Resrc_Require_Rec.attribute13;
1747: END IF;
1748: -- Attribute14
1749: IF l_Resrc_Require_Rec.attribute14 = FND_API.G_MISS_CHAR
1750: THEN
1751: l_Resrc_Require_Rec.attribute14 := NULL;
1752: ELSE
1753: l_Resrc_Require_Rec.attribute14 := l_Resrc_Require_Rec.attribute14;

Line 1756: IF l_Resrc_Require_Rec.attribute15 = FND_API.G_MISS_CHAR

1752: ELSE
1753: l_Resrc_Require_Rec.attribute14 := l_Resrc_Require_Rec.attribute14;
1754: END IF;
1755: -- Attribute15
1756: IF l_Resrc_Require_Rec.attribute15 = FND_API.G_MISS_CHAR
1757: THEN
1758: l_Resrc_Require_Rec.attribute15 := NULL;
1759: ELSE
1760: l_Resrc_Require_Rec.attribute15 := l_Resrc_Require_Rec.attribute15;

Line 1859: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1855:
1856: -- possible that EAM api returns error status but no error messages.
1857: -- not chking return status causes data corruption - see bug# 7632674
1858: -- Raise errors if exceptions occur
1859: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1860: IF G_DEBUG='Y' THEN
1861: Ahl_Debug_Pub.debug ('Error returned from AHL_EAM_JOB_PVT.process_resource_req:'||l_return_status);
1862: END IF;
1863: RAISE FND_API.G_EXC_ERROR;

Line 1863: RAISE FND_API.G_EXC_ERROR;

1859: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1860: IF G_DEBUG='Y' THEN
1861: Ahl_Debug_Pub.debug ('Error returned from AHL_EAM_JOB_PVT.process_resource_req:'||l_return_status);
1862: END IF;
1863: RAISE FND_API.G_EXC_ERROR;
1864: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1865: IF G_DEBUG='Y' THEN
1866: Ahl_Debug_Pub.debug ('Error returned from AHL_EAM_JOB_PVT.process_resource_req:'||l_return_status);
1867: END IF;

Line 1864: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1860: IF G_DEBUG='Y' THEN
1861: Ahl_Debug_Pub.debug ('Error returned from AHL_EAM_JOB_PVT.process_resource_req:'||l_return_status);
1862: END IF;
1863: RAISE FND_API.G_EXC_ERROR;
1864: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1865: IF G_DEBUG='Y' THEN
1866: Ahl_Debug_Pub.debug ('Error returned from AHL_EAM_JOB_PVT.process_resource_req:'||l_return_status);
1867: END IF;
1868: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1868: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1864: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1865: IF G_DEBUG='Y' THEN
1866: Ahl_Debug_Pub.debug ('Error returned from AHL_EAM_JOB_PVT.process_resource_req:'||l_return_status);
1867: END IF;
1868: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1869: END IF;
1870: END IF;
1871:
1872: END IF; -- interface flag

Line 1884: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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;
1886: END IF;
1887:
1888: -- IF l_return_status ='S' THEN

Line 1885: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

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;
1886: END IF;
1887:
1888: -- IF l_return_status ='S' THEN
1889: --

Line 1898: IF l_Resrc_Require_Rec.Operation_Resource_id = FND_API.G_MISS_NUM OR l_Resrc_Require_Rec.Operation_Resource_Id IS NULL

1894: Ahl_Debug_Pub.debug ( l_full_name || ' ******INSIDE REQUIRE LOOP****');
1895: END IF;
1896:
1897: l_Resrc_Require_Rec := p_x_resrc_Require_tbl(i);
1898: IF l_Resrc_Require_Rec.Operation_Resource_id = FND_API.G_MISS_NUM OR l_Resrc_Require_Rec.Operation_Resource_Id IS NULL
1899: THEN
1900: IF G_DEBUG='Y' THEN
1901: Ahl_Debug_Pub.debug ( l_full_name || ' ******INSIDE REQUIRE ID IF CASE****');
1902: END IF;

Line 1918: RAISE FND_API.G_EXC_ERROR;

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****');
1922: Ahl_Debug_Pub.debug ( 'l_Resrc_Require_Rec.workorder_operation_id'||l_Resrc_Require_Rec.workorder_operation_id);

Line 2007: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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;
2009: END IF;
2010:
2011: --Standard check for commit

Line 2008: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

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;
2009: END IF;
2010:
2011: --Standard check for commit
2012: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

Line 2012: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

2008: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2009: END IF;
2010:
2011: --Standard check for commit
2012: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
2013: COMMIT;
2014: END IF;
2015: IF G_DEBUG='Y' THEN
2016: -- Debug info

Line 2024: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2020: --
2021: END IF;
2022:
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,

Line 2026: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2022:
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

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 2038: WHEN FND_API.G_EXC_ERROR THEN

2034: -- Check if API is called in debug mode. If yes, disable debug.
2035: AHL_DEBUG_PUB.disable_debug;
2036: END IF;
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,

Line 2040: X_return_status := FND_API.G_RET_STS_ERROR;

2036: END IF;
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

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 2057: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2053: END IF;
2054:
2055: WHEN OTHERS THEN
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

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 2091: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE

2087: -- Parameters :
2088: --
2089: -- Standard IN Parameters :
2090: -- p_api_version IN NUMBER Required
2091: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
2092: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
2093: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
2094: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
2095: -- p_module_type IN VARCHAR2 Default NULL.

Line 2092: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE

2088: --
2089: -- Standard IN Parameters :
2090: -- p_api_version IN NUMBER Required
2091: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
2092: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
2093: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
2094: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
2095: -- p_module_type IN VARCHAR2 Default NULL.
2096: --

Line 2093: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL

2089: -- Standard IN Parameters :
2090: -- p_api_version IN NUMBER Required
2091: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
2092: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
2093: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
2094: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
2095: -- p_module_type IN VARCHAR2 Default NULL.
2096: --
2097: -- Standard OUT Parameters :

Line 2094: -- p_default IN VARCHAR2 Default FND_API.G_TRUE

2090: -- p_api_version IN NUMBER Required
2091: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
2092: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
2093: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
2094: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
2095: -- p_module_type IN VARCHAR2 Default NULL.
2096: --
2097: -- Standard OUT Parameters :
2098: -- x_return_status OUT VARCHAR2 Required

Line 2113: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,

2109: -- End of Comments.
2110:
2111: PROCEDURE Update_Resrc_Require (
2112: p_api_version IN NUMBER,
2113: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
2114: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
2115: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
2116: p_module_type IN VARCHAR2 := Null,
2117: p_interface_flag IN VARCHAR2,

Line 2114: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,

2110:
2111: PROCEDURE Update_Resrc_Require (
2112: p_api_version IN NUMBER,
2113: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
2114: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
2115: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
2116: p_module_type IN VARCHAR2 := Null,
2117: p_interface_flag IN VARCHAR2,
2118:

Line 2115: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,

2111: PROCEDURE Update_Resrc_Require (
2112: p_api_version IN NUMBER,
2113: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
2114: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
2115: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
2116: p_module_type IN VARCHAR2 := Null,
2117: p_interface_flag IN VARCHAR2,
2118:
2119: p_x_resrc_Require_Tbl IN OUT NOCOPY Resrc_Require_Tbl_Type,

Line 2261: IF FND_API.to_boolean(p_init_msg_list)

2257: END IF;
2258:
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:

Line 2267: x_return_status := FND_API.G_RET_STS_SUCCESS;

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;
2268:
2269: -- Initialize message list if p_init_msg_list is set to TRUE.
2270: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
2271: p_api_version,

Line 2270: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

2266: -- Initialize API return status to success
2267: x_return_status := FND_API.G_RET_STS_SUCCESS;
2268:
2269: -- Initialize message list if p_init_msg_list is set to TRUE.
2270: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
2271: p_api_version,
2272: l_api_name,G_PKG_NAME)
2273: THEN
2274: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 2274: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2270: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
2271: p_api_version,
2272: l_api_name,G_PKG_NAME)
2273: THEN
2274: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2275: END IF;
2276: --------------------Start of API Body-----------------------------------
2277: IF p_x_resrc_Require_tbl.COUNT > 0 THEN
2278: FOR i IN p_x_resrc_Require_tbl.FIRST..p_x_resrc_Require_tbl.LAST

Line 2309: IF l_return_status = FND_API.G_TRUE THEN

2305: p_workorder_id => l_workorder_id,
2306: p_ue_id => NULL,
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;

Line 2312: RAISE FND_API.G_EXC_ERROR;

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
2316: -- ACL changes

Line 2389: l_Resrc_Require_Rec.resource_type_name <> Fnd_Api.G_MISS_CHAR )

2385: Ahl_Debug_Pub.debug ( l_full_name || ' Resource Type Code = ' || l_Resrc_Require_Rec.resource_type_code);*/
2386:
2387: -- For Resource Type
2388: IF ( l_Resrc_Require_Rec.resource_type_name IS NOT NULL AND
2389: l_Resrc_Require_Rec.resource_type_name <> Fnd_Api.G_MISS_CHAR )
2390: THEN
2391: Check_Lookup_Name_Or_Id (
2392: p_lookup_type => 'BOM_RESOURCE_TYPE',
2393: p_lookup_code => NULL,

Line 2403: RAISE Fnd_Api.G_EXC_ERROR;

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:
2407: --Ahl_Debug_Pub.debug ( l_full_name || ' Resource Type Code = ' || l_Resrc_Require_Rec.resource_type_code);

Line 2411: l_Resrc_Require_Rec.RESOURCE_NAME <> Fnd_Api.G_MISS_CHAR

2407: --Ahl_Debug_Pub.debug ( l_full_name || ' Resource Type Code = ' || l_Resrc_Require_Rec.resource_type_code);
2408: --Ahl_Debug_Pub.debug ( l_full_name || ' Resource Name = ' || l_Resrc_Require_Rec.RESOURCE_NAME);
2409: -- For Resource
2410: IF l_Resrc_Require_Rec.RESOURCE_NAME IS NOT NULL AND
2411: l_Resrc_Require_Rec.RESOURCE_NAME <> Fnd_Api.G_MISS_CHAR
2412: THEN
2413: Check_Resource_Name_Or_Id
2414: (p_Resource_id => l_Resrc_Require_Rec.Resource_Id,
2415: p_Resource_code => l_Resrc_Require_Rec.Resource_Name,

Line 2427: RAISE Fnd_Api.G_EXC_ERROR;

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
2431: Ahl_Debug_Pub.debug ( l_full_name || 'After Resource ID = ' || l_Resrc_Require_Rec.Resource_Id);

Line 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

2433: --Assign workorder
2434: l_Resrc_Require_Rec.workorder_id := l_workorder_id;
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;

Line 2447: IF (l_Resrc_Require_Rec.RESOURCE_NAME IS NULL OR l_Resrc_Require_Rec.RESOURCE_NAME = Fnd_Api.G_MISS_CHAR) THEN

2443: END IF;
2444:
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;

Line 2488: l_Resrc_Require_Rec.UOM_NAME <> Fnd_Api.G_MISS_CHAR

2484: Ahl_Debug_Pub.debug ( l_full_name || ' UOM Code = ' || l_Resrc_Require_Rec.UOM_CODE);
2485: END IF;
2486: -- For Units of Measure
2487: IF l_Resrc_Require_Rec.UOM_NAME IS NOT NULL AND
2488: l_Resrc_Require_Rec.UOM_NAME <> Fnd_Api.G_MISS_CHAR
2489: THEN
2490: OPEN c_UOM(l_Resrc_Require_Rec.UOM_NAME);
2491: FETCH c_UOM INTO l_Resrc_Require_Rec.UOM_CODE;
2492: IF c_UOM%NOTFOUND THEN

Line 2514: l_Resrc_Require_Rec.CHARGE_TYPE_NAME <> Fnd_Api.G_MISS_CHAR )

2510: Ahl_Debug_Pub.debug ( l_full_name || ' AutoCharge Code = ' || l_Resrc_Require_Rec.CHARGE_TYPE_CODE);
2511: END IF;
2512: -- For AutoCharge Type
2513: IF ( l_Resrc_Require_Rec.CHARGE_TYPE_NAME IS NOT NULL AND
2514: l_Resrc_Require_Rec.CHARGE_TYPE_NAME <> Fnd_Api.G_MISS_CHAR )
2515: THEN
2516: Check_Lookup_Name_Or_Id (
2517: p_lookup_type => 'BOM_AUTOCHARGE_TYPE',
2518: p_lookup_code => NULL,

Line 2528: RAISE Fnd_Api.G_EXC_ERROR;

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
2532: Ahl_Debug_Pub.debug ( l_full_name || ' AutoCharge Code = ' || l_Resrc_Require_Rec.CHARGE_TYPE_CODE);

Line 2538: l_Resrc_Require_Rec.COST_BASIS_NAME <> Fnd_Api.G_MISS_CHAR )

2534: Ahl_Debug_Pub.debug ( l_full_name || ' COST BASIS CODE = ' || l_Resrc_Require_Rec.COST_BASIS_CODE);
2535: END IF;
2536: -- For Cost Basis
2537: IF ( l_Resrc_Require_Rec.COST_BASIS_NAME IS NOT NULL AND
2538: l_Resrc_Require_Rec.COST_BASIS_NAME <> Fnd_Api.G_MISS_CHAR )
2539: THEN
2540: Check_Lookup_Name_Or_Id (
2541: p_lookup_type => 'CST_BASIS',
2542: p_lookup_code => NULL,

Line 2552: RAISE Fnd_Api.G_EXC_ERROR;

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
2556: Ahl_Debug_Pub.debug ( l_full_name || ' COST BASIS CODE = ' || l_Resrc_Require_Rec.COST_BASIS_CODE);

Line 2562: l_Resrc_Require_Rec.SCHEDULED_TYPE_NAME <> Fnd_Api.G_MISS_CHAR )

2558: Ahl_Debug_Pub.debug ( l_full_name || ' SCHEDULED TYPE CODE = ' || l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE);
2559: END IF;
2560: -- For Scheduled Type
2561: IF ( l_Resrc_Require_Rec.SCHEDULED_TYPE_NAME IS NOT NULL AND
2562: l_Resrc_Require_Rec.SCHEDULED_TYPE_NAME <> Fnd_Api.G_MISS_CHAR )
2563: THEN
2564: Check_Lookup_Name_Or_Id (
2565: p_lookup_type => 'BOM_RESOURCE_SCHEDULE_TYPE',
2566: p_lookup_code => NULL,

Line 2576: RAISE Fnd_Api.G_EXC_ERROR;

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
2580: Ahl_Debug_Pub.debug ( l_full_name || ' SCHEDULED TYPE CODE = ' || l_Resrc_Require_Rec.SCHEDULED_TYPE_CODE);

Line 2585: l_Resrc_Require_Rec.STD_RATE_FLAG_CODE <> Fnd_Api.G_MISS_NUM) THEN

2581: Ahl_Debug_Pub.debug ( l_full_name || ' STANDARD RATE FLAG = ' || l_Resrc_Require_Rec.STD_RATE_FLAG_CODE);
2582: END IF;
2583: -- To find meaning for fnd_lookups code
2584: IF (l_Resrc_Require_Rec.STD_RATE_FLAG_CODE IS NOT NULL AND
2585: l_Resrc_Require_Rec.STD_RATE_FLAG_CODE <> Fnd_Api.G_MISS_NUM) THEN
2586: SELECT meaning
2587: INTO l_std_rate_flag
2588: FROM MFG_LOOKUPS
2589: WHERE lookup_code = l_Resrc_Require_Rec.STD_RATE_FLAG_CODE

Line 2611: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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;
2612: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2613: END IF;
2614:
2615: --

Line 2612: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

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;
2612: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2613: END IF;
2614:
2615: --
2616: IF l_Resrc_Require_Rec.Operation_Resource_id <> FND_API.G_MISS_NUM OR l_Resrc_Require_Rec.Operation_Resource_Id IS NOT NULL

Line 2616: IF l_Resrc_Require_Rec.Operation_Resource_id <> FND_API.G_MISS_NUM OR l_Resrc_Require_Rec.Operation_Resource_Id IS NOT NULL

2612: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2613: END IF;
2614:
2615: --
2616: IF l_Resrc_Require_Rec.Operation_Resource_id <> FND_API.G_MISS_NUM OR l_Resrc_Require_Rec.Operation_Resource_Id IS NOT NULL
2617: THEN
2618: -- These conditions are Required for optional fields
2619:
2620: -- Last Updated Date

Line 2621: IF l_Resrc_Require_Rec.last_update_login = FND_API.G_MISS_NUM

2617: THEN
2618: -- These conditions are Required for optional fields
2619:
2620: -- Last Updated Date
2621: IF l_Resrc_Require_Rec.last_update_login = FND_API.G_MISS_NUM
2622: THEN
2623: l_Resrc_Require_Rec.last_update_login := NULL;
2624: ELSE
2625: l_Resrc_Require_Rec.last_update_login := l_Resrc_Require_Rec.last_update_login;

Line 2628: IF l_Resrc_Require_Rec.attribute_category = FND_API.G_MISS_CHAR

2624: ELSE
2625: l_Resrc_Require_Rec.last_update_login := l_Resrc_Require_Rec.last_update_login;
2626: END IF;
2627: -- Attribute Category
2628: IF l_Resrc_Require_Rec.attribute_category = FND_API.G_MISS_CHAR
2629: THEN
2630: l_Resrc_Require_Rec.attribute_category := NULL;
2631: ELSE
2632: l_Resrc_Require_Rec.attribute_category := l_Resrc_Require_Rec.attribute_category;

Line 2635: IF l_Resrc_Require_Rec.attribute1 = FND_API.G_MISS_CHAR

2631: ELSE
2632: l_Resrc_Require_Rec.attribute_category := l_Resrc_Require_Rec.attribute_category;
2633: END IF;
2634: -- Attribute1
2635: IF l_Resrc_Require_Rec.attribute1 = FND_API.G_MISS_CHAR
2636: THEN
2637: l_Resrc_Require_Rec.attribute1 := NULL;
2638: ELSE
2639: l_Resrc_Require_Rec.attribute1 := l_Resrc_Require_Rec.attribute1;

Line 2642: IF l_Resrc_Require_Rec.attribute2 = FND_API.G_MISS_CHAR

2638: ELSE
2639: l_Resrc_Require_Rec.attribute1 := l_Resrc_Require_Rec.attribute1;
2640: END IF;
2641: -- Attribute2
2642: IF l_Resrc_Require_Rec.attribute2 = FND_API.G_MISS_CHAR
2643: THEN
2644: l_Resrc_Require_Rec.attribute2 := NULL;
2645: ELSE
2646: l_Resrc_Require_Rec.attribute2 := l_Resrc_Require_Rec.attribute2;

Line 2649: IF l_Resrc_Require_Rec.attribute3 = FND_API.G_MISS_CHAR

2645: ELSE
2646: l_Resrc_Require_Rec.attribute2 := l_Resrc_Require_Rec.attribute2;
2647: END IF;
2648: -- Attribute3
2649: IF l_Resrc_Require_Rec.attribute3 = FND_API.G_MISS_CHAR
2650: THEN
2651: l_Resrc_Require_Rec.attribute3 := NULL;
2652: ELSE
2653: l_Resrc_Require_Rec.attribute3 := l_Resrc_Require_Rec.attribute3;

Line 2656: IF l_Resrc_Require_Rec.attribute4 = FND_API.G_MISS_CHAR

2652: ELSE
2653: l_Resrc_Require_Rec.attribute3 := l_Resrc_Require_Rec.attribute3;
2654: END IF;
2655: -- Attribute4
2656: IF l_Resrc_Require_Rec.attribute4 = FND_API.G_MISS_CHAR
2657: THEN
2658: l_Resrc_Require_Rec.attribute4 := NULL;
2659: ELSE
2660: l_Resrc_Require_Rec.attribute4 := l_Resrc_Require_Rec.attribute4;

Line 2663: IF l_Resrc_Require_Rec.attribute5 = FND_API.G_MISS_CHAR

2659: ELSE
2660: l_Resrc_Require_Rec.attribute4 := l_Resrc_Require_Rec.attribute4;
2661: END IF;
2662: -- Attribute5
2663: IF l_Resrc_Require_Rec.attribute5 = FND_API.G_MISS_CHAR
2664: THEN
2665: l_Resrc_Require_Rec.attribute5 := NULL;
2666: ELSE
2667: l_Resrc_Require_Rec.attribute5 := l_Resrc_Require_Rec.attribute5;

Line 2670: IF l_Resrc_Require_Rec.attribute6 = FND_API.G_MISS_CHAR

2666: ELSE
2667: l_Resrc_Require_Rec.attribute5 := l_Resrc_Require_Rec.attribute5;
2668: END IF;
2669: -- Attribute6
2670: IF l_Resrc_Require_Rec.attribute6 = FND_API.G_MISS_CHAR
2671: THEN
2672: l_Resrc_Require_Rec.attribute6 := NULL;
2673: ELSE
2674: l_Resrc_Require_Rec.attribute6 := l_Resrc_Require_Rec.attribute6;

Line 2677: IF l_Resrc_Require_Rec.attribute7 = FND_API.G_MISS_CHAR

2673: ELSE
2674: l_Resrc_Require_Rec.attribute6 := l_Resrc_Require_Rec.attribute6;
2675: END IF;
2676: -- Attribute7
2677: IF l_Resrc_Require_Rec.attribute7 = FND_API.G_MISS_CHAR
2678: THEN
2679: l_Resrc_Require_Rec.attribute7 := NULL;
2680: ELSE
2681: l_Resrc_Require_Rec.attribute7 := l_Resrc_Require_Rec.attribute7;

Line 2684: IF l_Resrc_Require_Rec.attribute8 = FND_API.G_MISS_CHAR

2680: ELSE
2681: l_Resrc_Require_Rec.attribute7 := l_Resrc_Require_Rec.attribute7;
2682: END IF;
2683: -- Attribute8
2684: IF l_Resrc_Require_Rec.attribute8 = FND_API.G_MISS_CHAR
2685: THEN
2686: l_Resrc_Require_Rec.attribute8 := NULL;
2687: ELSE
2688: l_Resrc_Require_Rec.attribute8 := l_Resrc_Require_Rec.attribute8;

Line 2691: IF l_Resrc_Require_Rec.attribute9 = FND_API.G_MISS_CHAR

2687: ELSE
2688: l_Resrc_Require_Rec.attribute8 := l_Resrc_Require_Rec.attribute8;
2689: END IF;
2690: -- Attribute9
2691: IF l_Resrc_Require_Rec.attribute9 = FND_API.G_MISS_CHAR
2692: THEN
2693: l_Resrc_Require_Rec.attribute9 := NULL;
2694: ELSE
2695: l_Resrc_Require_Rec.attribute9 := l_Resrc_Require_Rec.attribute9;

Line 2698: IF l_Resrc_Require_Rec.attribute10 = FND_API.G_MISS_CHAR

2694: ELSE
2695: l_Resrc_Require_Rec.attribute9 := l_Resrc_Require_Rec.attribute9;
2696: END IF;
2697: -- Attribute10
2698: IF l_Resrc_Require_Rec.attribute10 = FND_API.G_MISS_CHAR
2699: THEN
2700: l_Resrc_Require_Rec.attribute10 := NULL;
2701: ELSE
2702: l_Resrc_Require_Rec.attribute10 := l_Resrc_Require_Rec.attribute10;

Line 2705: IF l_Resrc_Require_Rec.attribute11 = FND_API.G_MISS_CHAR

2701: ELSE
2702: l_Resrc_Require_Rec.attribute10 := l_Resrc_Require_Rec.attribute10;
2703: END IF;
2704: -- Attribute11
2705: IF l_Resrc_Require_Rec.attribute11 = FND_API.G_MISS_CHAR
2706: THEN
2707: l_Resrc_Require_Rec.attribute11 := NULL;
2708: ELSE
2709: l_Resrc_Require_Rec.attribute11 := l_Resrc_Require_Rec.attribute11;

Line 2712: IF l_Resrc_Require_Rec.attribute12 = FND_API.G_MISS_CHAR

2708: ELSE
2709: l_Resrc_Require_Rec.attribute11 := l_Resrc_Require_Rec.attribute11;
2710: END IF;
2711: -- Attribute12
2712: IF l_Resrc_Require_Rec.attribute12 = FND_API.G_MISS_CHAR
2713: THEN
2714: l_Resrc_Require_Rec.attribute12 := NULL;
2715: ELSE
2716: l_Resrc_Require_Rec.attribute12 := l_Resrc_Require_Rec.attribute12;

Line 2719: IF l_Resrc_Require_Rec.attribute13 = FND_API.G_MISS_CHAR

2715: ELSE
2716: l_Resrc_Require_Rec.attribute12 := l_Resrc_Require_Rec.attribute12;
2717: END IF;
2718: -- Attribute13
2719: IF l_Resrc_Require_Rec.attribute13 = FND_API.G_MISS_CHAR
2720: THEN
2721: l_Resrc_Require_Rec.attribute13 := NULL;
2722: ELSE
2723: l_Resrc_Require_Rec.attribute13 := l_Resrc_Require_Rec.attribute13;

Line 2726: IF l_Resrc_Require_Rec.attribute14 = FND_API.G_MISS_CHAR

2722: ELSE
2723: l_Resrc_Require_Rec.attribute13 := l_Resrc_Require_Rec.attribute13;
2724: END IF;
2725: -- Attribute14
2726: IF l_Resrc_Require_Rec.attribute14 = FND_API.G_MISS_CHAR
2727: THEN
2728: l_Resrc_Require_Rec.attribute14 := NULL;
2729: ELSE
2730: l_Resrc_Require_Rec.attribute14 := l_Resrc_Require_Rec.attribute14;

Line 2733: IF l_Resrc_Require_Rec.attribute15 = FND_API.G_MISS_CHAR

2729: ELSE
2730: l_Resrc_Require_Rec.attribute14 := l_Resrc_Require_Rec.attribute14;
2731: END IF;
2732: -- Attribute15
2733: IF l_Resrc_Require_Rec.attribute15 = FND_API.G_MISS_CHAR
2734: THEN
2735: l_Resrc_Require_Rec.attribute15 := NULL;
2736: ELSE
2737: l_Resrc_Require_Rec.attribute15 := l_Resrc_Require_Rec.attribute15;

Line 2750: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

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:
2754: END IF;

Line 2836: IF l_Resrc_Require_Rec.Operation_Resource_id <> FND_API.G_MISS_NUM

2832: IF p_x_resrc_Require_tbl.COUNT > 0 THEN
2833: FOR i IN p_x_resrc_Require_tbl.FIRST..p_x_resrc_Require_tbl.LAST
2834: LOOP
2835: l_Resrc_Require_Rec := p_x_resrc_Require_tbl(i);
2836: IF l_Resrc_Require_Rec.Operation_Resource_id <> FND_API.G_MISS_NUM
2837: THEN
2838: IF G_DEBUG='Y' THEN
2839: Ahl_Debug_Pub.debug ( l_full_name || 'after WORKORDER_OPERATION_ID = ' || l_Resrc_Require_Rec.WORKORDER_OPERATION_ID);
2840: Ahl_Debug_Pub.debug ( l_full_name || 'after RESOURCE_ID = ' || l_Resrc_Require_Rec.RESOURCE_ID);

Line 2918: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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;
2919: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2920: END IF;
2921:
2922: --Standard check for commit

Line 2919: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

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;
2919: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2920: END IF;
2921:
2922: --Standard check for commit
2923: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

Line 2923: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

2919: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
2920: END IF;
2921:
2922: --Standard check for commit
2923: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
2924: COMMIT;
2925: END IF;
2926:
2927: -- Debug info

Line 2935: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2931: -- Check if API is called in debug mode. If yes, disable debug.
2932: Ahl_Debug_Pub.disable_debug;
2933: END IF;
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,

Line 2937: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2933: END IF;
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

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 2949: WHEN FND_API.G_EXC_ERROR THEN

2945:
2946: -- Check if API is called in debug mode. If yes, disable debug.
2947: AHL_DEBUG_PUB.disable_debug;
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,

Line 2951: X_return_status := FND_API.G_RET_STS_ERROR;

2947: AHL_DEBUG_PUB.disable_debug;
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

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 2966: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2962: --
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',

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 2995: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

2991: -- Get a particular Resource Requirement with all details
2992: --------------------------------------------------------------------
2993: PROCEDURE Get_Resource_Requirement (
2994: p_api_version IN NUMBER,
2995: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
2996: p_commit IN VARCHAR2 := Fnd_Api.g_false,
2997: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
2998: p_module_type IN VARCHAR2 := 'JSP',
2999: p_x_resrc_Require_Tbl IN OUT NOCOPY AHL_PP_RESRC_Require_PVT.Resrc_Require_Tbl_Type,

Line 2996: p_commit IN VARCHAR2 := Fnd_Api.g_false,

2992: --------------------------------------------------------------------
2993: PROCEDURE Get_Resource_Requirement (
2994: p_api_version IN NUMBER,
2995: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
2996: p_commit IN VARCHAR2 := Fnd_Api.g_false,
2997: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
2998: p_module_type IN VARCHAR2 := 'JSP',
2999: p_x_resrc_Require_Tbl IN OUT NOCOPY AHL_PP_RESRC_Require_PVT.Resrc_Require_Tbl_Type,
3000: x_return_status OUT NOCOPY VARCHAR2,

Line 2997: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

2993: PROCEDURE Get_Resource_Requirement (
2994: p_api_version IN NUMBER,
2995: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
2996: p_commit IN VARCHAR2 := Fnd_Api.g_false,
2997: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
2998: p_module_type IN VARCHAR2 := 'JSP',
2999: p_x_resrc_Require_Tbl IN OUT NOCOPY AHL_PP_RESRC_Require_PVT.Resrc_Require_Tbl_Type,
3000: x_return_status OUT NOCOPY VARCHAR2,
3001: x_msg_count OUT NOCOPY NUMBER,

Line 3109: IF Fnd_Api.to_boolean(p_init_msg_list)

3105: Ahl_Debug_Pub.debug ( l_full_name || ' Start ');
3106: END IF;
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:

Line 3115: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

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;
3116:
3117: -- Initialize message list if p_init_msg_list is set to TRUE.
3118: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
3119: p_api_version,

Line 3118: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,

3114: -- Initialize API return status to success
3115: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3116:
3117: -- Initialize message list if p_init_msg_list is set to TRUE.
3118: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
3119: p_api_version,
3120: l_api_name,G_PKG_NAME)
3121: THEN
3122: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

Line 3122: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

3118: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
3119: p_api_version,
3120: l_api_name,G_PKG_NAME)
3121: THEN
3122: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3123: END IF;
3124:
3125: IF p_x_resrc_Require_tbl.COUNT > 0 THEN
3126: FOR i IN p_x_resrc_Require_tbl.FIRST..p_x_resrc_Require_tbl.LAST

Line 3263: p_encoded => Fnd_Api.g_false);

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:
3265: -- Check if API is called in debug mode. If yes, enable debug.
3266: IF G_DEBUG='Y' THEN
3267: Ahl_Debug_Pub.enable_debug;

Line 3279: WHEN Fnd_Api.G_EXC_ERROR THEN

3275: Ahl_Debug_Pub.disable_debug;
3276: RETURN;
3277:
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,

Line 3280: x_return_status := Fnd_Api.G_RET_STS_ERROR;

3276: RETURN;
3277:
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);

Line 3284: p_encoded => Fnd_Api.g_false);

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:
3287: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
3288: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

Line 3287: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

3283: p_data => x_msg_data,
3284: p_encoded => Fnd_Api.g_false);
3285:
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,

Line 3288: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3284: p_encoded => Fnd_Api.g_false);
3285:
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);

Line 3292: p_encoded => Fnd_Api.g_false);

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
3295: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3296: ROLLBACK TO Get_Resource_Requirement;

Line 3295: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3291: p_data => x_msg_data,
3292: p_encoded => Fnd_Api.g_false);
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);

Line 3303: p_encoded => Fnd_Api.g_false);

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: --
3306: PROCEDURE Remove_Resource_Requirement (
3307: p_api_version IN NUMBER,

Line 3308: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

3304: END Get_Resource_Requirement;
3305: --
3306: PROCEDURE Remove_Resource_Requirement (
3307: p_api_version IN NUMBER,
3308: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
3309: p_commit IN VARCHAR2 := Fnd_Api.g_false,
3310: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
3311: p_module_type IN VARCHAR2 := 'JSP',
3312: p_interface_flag IN VARCHAR2,

Line 3309: p_commit IN VARCHAR2 := Fnd_Api.g_false,

3305: --
3306: PROCEDURE Remove_Resource_Requirement (
3307: p_api_version IN NUMBER,
3308: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
3309: p_commit IN VARCHAR2 := Fnd_Api.g_false,
3310: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
3311: p_module_type IN VARCHAR2 := 'JSP',
3312: p_interface_flag IN VARCHAR2,
3313: p_x_resrc_Require_Tbl IN OUT NOCOPY AHL_PP_RESRC_Require_PVT.Resrc_Require_Tbl_Type,

Line 3310: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

3306: PROCEDURE Remove_Resource_Requirement (
3307: p_api_version IN NUMBER,
3308: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
3309: p_commit IN VARCHAR2 := Fnd_Api.g_false,
3310: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
3311: p_module_type IN VARCHAR2 := 'JSP',
3312: p_interface_flag IN VARCHAR2,
3313: p_x_resrc_Require_Tbl IN OUT NOCOPY AHL_PP_RESRC_Require_PVT.Resrc_Require_Tbl_Type,
3314: x_return_status OUT NOCOPY VARCHAR2,

Line 3428: IF Fnd_Api.to_boolean(p_init_msg_list)

3424: -- Debug info.
3425: Ahl_Debug_Pub.debug( 'Enter ahl_pp_resrc_require_pvt Remove Resource Requirement +APRRP+');
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:

Line 3434: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

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;
3435:
3436: -- Initialize message list if p_init_msg_list is set to TRUE.
3437: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
3438: p_api_version,

Line 3437: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,

3433: -- Initialize API return status to success
3434: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
3435:
3436: -- Initialize message list if p_init_msg_list is set to TRUE.
3437: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
3438: p_api_version,
3439: l_api_name,G_PKG_NAME)
3440: THEN
3441: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

Line 3441: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

3437: IF NOT Fnd_Api.COMPATIBLE_API_CALL(l_api_version,
3438: p_api_version,
3439: l_api_name,G_PKG_NAME)
3440: THEN
3441: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3442: END IF;
3443:
3444: ------------------------Start API Body ---------------------------------
3445:

Line 3455: p_x_resrc_Require_tbl(i).operation_resource_id <> FND_API.G_MISS_NUM)

3451: Ahl_Debug_Pub.debug ( ' p_x_resrc_Require_tbl(i).operation_resource_id = ' || p_x_resrc_Require_tbl(i).operation_resource_id);
3452: END IF;
3453: --
3454: IF (p_x_resrc_Require_tbl(i).operation_resource_id IS NOT NULL AND
3455: p_x_resrc_Require_tbl(i).operation_resource_id <> FND_API.G_MISS_NUM)
3456: THEN
3457: --
3458: OPEN Get_resource_cur (p_x_resrc_Require_tbl(i).operation_resource_id);
3459: FETCH Get_resource_cur INTO l_resource_rec;

Line 3464: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

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;
3467: END IF;
3468: --

Line 3475: p_x_resrc_Require_tbl(i).object_version_number <> FND_API.G_MISS_NUM)

3471: END IF;
3472: --
3473: --Check for object version number
3474: IF (p_x_resrc_Require_tbl(i).object_version_number IS NOT NULL AND
3475: p_x_resrc_Require_tbl(i).object_version_number <> FND_API.G_MISS_NUM)
3476: THEN
3477: IF(p_x_resrc_Require_tbl(i).object_version_number <> l_resource_rec.object_version_number )
3478: THEN
3479: --

Line 3482: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

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: --
3486: --Get workorder id, operation sequence number

Line 3514: IF l_return_status = FND_API.G_TRUE THEN

3510: p_workorder_id => p_x_resrc_require_tbl(i).workorder_id,
3511: p_ue_id => NULL,
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;

Line 3517: RAISE FND_API.G_EXC_ERROR;

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
3521: -- ACL changes

Line 3533: RAISE FND_API.G_EXC_ERROR;

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;
3536:
3537: -- Get operation Resource details

Line 3585: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3581: END IF;
3582:
3583: IF l_msg_count > 0 THEN
3584: X_msg_count := l_msg_count;
3585: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3586: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3587: END IF;
3588:
3589: END LOOP;

Line 3586: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

3582:
3583: IF l_msg_count > 0 THEN
3584: X_msg_count := l_msg_count;
3585: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3586: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3587: END IF;
3588:
3589: END LOOP;
3590: END IF; --Count

Line 3673: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

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;
3674: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3675: END IF;
3676:
3677: --Standard check for commit

Line 3674: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

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;
3674: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3675: END IF;
3676:
3677: --Standard check for commit
3678: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

Line 3678: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

3674: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3675: END IF;
3676:
3677: --Standard check for commit
3678: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
3679: COMMIT;
3680: END IF;
3681:
3682: -- Debug info

Line 3690: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

3686: -- Check if API is called in debug mode. If yes, disable debug.
3687: Ahl_Debug_Pub.disable_debug;
3688: END IF;
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,

Line 3692: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3688: END IF;
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

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 3703: WHEN Fnd_Api.G_EXC_ERROR THEN

3699:
3700: -- Check if API is called in debug mode. If yes, disable debug.
3701: Ahl_Debug_Pub.disable_debug;
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,

Line 3705: X_return_status := Fnd_Api.G_RET_STS_ERROR;

3701: Ahl_Debug_Pub.disable_debug;
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

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 3720: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3716: END IF;
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',

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 3752: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE

3748: -- Parameters :
3749: --
3750: -- Standard IN Parameters :
3751: -- p_api_version IN NUMBER Required
3752: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
3753: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
3754: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
3755: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
3756: -- p_module_type IN VARCHAR2 Default NULL.

Line 3753: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE

3749: --
3750: -- Standard IN Parameters :
3751: -- p_api_version IN NUMBER Required
3752: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
3753: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
3754: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
3755: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
3756: -- p_module_type IN VARCHAR2 Default NULL.
3757: --

Line 3754: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL

3750: -- Standard IN Parameters :
3751: -- p_api_version IN NUMBER Required
3752: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
3753: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
3754: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
3755: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
3756: -- p_module_type IN VARCHAR2 Default NULL.
3757: --
3758: -- Standard OUT Parameters :

Line 3755: -- p_default IN VARCHAR2 Default FND_API.G_TRUE

3751: -- p_api_version IN NUMBER Required
3752: -- p_init_msg_list IN VARCHAR2 Default FND_API.G_FALSE
3753: -- p_commit IN VARCHAR2 Default FND_API.G_FALSE
3754: -- p_validation_level IN NUMBER Default FND_API.G_VALID_LEVEL_FULL
3755: -- p_default IN VARCHAR2 Default FND_API.G_TRUE
3756: -- p_module_type IN VARCHAR2 Default NULL.
3757: --
3758: -- Standard OUT Parameters :
3759: -- x_return_status OUT VARCHAR2 Required

Line 3774: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,

3770: -- End of Comments.
3771:
3772: PROCEDURE Process_Resrc_Require (
3773: p_api_version IN NUMBER,
3774: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
3775: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3776: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
3777: p_module_type IN VARCHAR2 := NULL,
3778: p_operation_flag IN VARCHAR2,

Line 3775: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,

3771:
3772: PROCEDURE Process_Resrc_Require (
3773: p_api_version IN NUMBER,
3774: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
3775: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3776: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
3777: p_module_type IN VARCHAR2 := NULL,
3778: p_operation_flag IN VARCHAR2,
3779: p_interface_flag IN VARCHAR2,

Line 3776: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,

3772: PROCEDURE Process_Resrc_Require (
3773: p_api_version IN NUMBER,
3774: p_init_msg_list IN VARCHAR2 := Fnd_Api.G_FALSE,
3775: p_commit IN VARCHAR2 := Fnd_Api.G_FALSE,
3776: p_validation_level IN NUMBER := Fnd_Api.G_VALID_LEVEL_FULL,
3777: p_module_type IN VARCHAR2 := NULL,
3778: p_operation_flag IN VARCHAR2,
3779: p_interface_flag IN VARCHAR2,
3780: p_x_resrc_Require_tbl IN OUT NOCOPY AHL_PP_RESRC_Require_PVT.Resrc_Require_Tbl_Type,

Line 3818: IF FND_API.to_boolean(p_init_msg_list)

3814: -- Debug info.
3815: Ahl_Debug_Pub.debug( 'Enter AHL_PP_RESRC_Require.process_resrc_Require +PPResrc_Require_Pvt+');
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

Line 3823: x_return_status := FND_API.G_RET_STS_SUCCESS;

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.
3825: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
3826: p_api_version,
3827: l_api_name,G_PKG_NAME)

Line 3825: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,

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.
3825: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
3826: p_api_version,
3827: l_api_name,G_PKG_NAME)
3828: THEN
3829: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 3829: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3825: IF NOT FND_API.COMPATIBLE_API_CALL(l_api_version,
3826: p_api_version,
3827: l_api_name,G_PKG_NAME)
3828: THEN
3829: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3830: END IF;
3831: --------------------Start of API Body-----------------------------------
3832: IF p_operation_flag = 'C' THEN
3833: --

Line 3930: p_init_msg_list => FND_API.G_FALSE ,

3926:
3927: AHL_PRD_WORKORDER_PVT.update_job
3928: (
3929: p_api_version => 1.0 ,
3930: p_init_msg_list => FND_API.G_FALSE ,
3931: p_commit => FND_API.G_FALSE ,
3932: p_validation_level => FND_API.G_VALID_LEVEL_FULL ,
3933: p_default => FND_API.G_TRUE ,
3934: p_module_type => NULL ,

Line 3931: p_commit => FND_API.G_FALSE ,

3927: AHL_PRD_WORKORDER_PVT.update_job
3928: (
3929: p_api_version => 1.0 ,
3930: p_init_msg_list => FND_API.G_FALSE ,
3931: p_commit => FND_API.G_FALSE ,
3932: p_validation_level => FND_API.G_VALID_LEVEL_FULL ,
3933: p_default => FND_API.G_TRUE ,
3934: p_module_type => NULL ,
3935: x_return_status => l_return_status ,

Line 3932: p_validation_level => FND_API.G_VALID_LEVEL_FULL ,

3928: (
3929: p_api_version => 1.0 ,
3930: p_init_msg_list => FND_API.G_FALSE ,
3931: p_commit => FND_API.G_FALSE ,
3932: p_validation_level => FND_API.G_VALID_LEVEL_FULL ,
3933: p_default => FND_API.G_TRUE ,
3934: p_module_type => NULL ,
3935: x_return_status => l_return_status ,
3936: x_msg_count => l_msg_count ,

Line 3933: p_default => FND_API.G_TRUE ,

3929: p_api_version => 1.0 ,
3930: p_init_msg_list => FND_API.G_FALSE ,
3931: p_commit => FND_API.G_FALSE ,
3932: p_validation_level => FND_API.G_VALID_LEVEL_FULL ,
3933: p_default => FND_API.G_TRUE ,
3934: p_module_type => NULL ,
3935: x_return_status => l_return_status ,
3936: x_msg_count => l_msg_count ,
3937: x_msg_data => l_msg_data ,

Line 3943: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN

3939: p_x_prd_workorder_rec => l_up_workorder_rec ,
3940: p_x_prd_workoper_tbl => l_up_workoper_tbl
3941: );
3942:
3943: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
3944: RAISE FND_API.G_EXC_ERROR;
3945: END IF;
3946:
3947: END IF;

Line 3944: RAISE FND_API.G_EXC_ERROR;

3940: p_x_prd_workoper_tbl => l_up_workoper_tbl
3941: );
3942:
3943: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS ) THEN
3944: RAISE FND_API.G_EXC_ERROR;
3945: END IF;
3946:
3947: END IF;
3948: END LOOP;

Line 3953: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

3949: END IF;
3950:
3951: IF l_msg_count > 0 THEN
3952: x_msg_count := l_msg_count;
3953: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3954: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3955: END IF;
3956:
3957: --Standard check for commit

Line 3954: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

3950:
3951: IF l_msg_count > 0 THEN
3952: x_msg_count := l_msg_count;
3953: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
3954: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3955: END IF;
3956:
3957: --Standard check for commit
3958: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

Line 3958: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

3954: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
3955: END IF;
3956:
3957: --Standard check for commit
3958: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
3959: COMMIT;
3960: END IF;
3961: IF G_DEBUG='Y' THEN
3962: -- Debug info

Line 3969: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3965: -- Check if API is called in debug mode. If yes, disable debug.
3966: Ahl_Debug_Pub.disable_debug;
3967: END IF;
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,

Line 3971: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3967: END IF;
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

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 3981: WHEN FND_API.G_EXC_ERROR THEN

3977: x_msg_count, x_msg_data, 'ERROR' );
3978: -- Check if API is called in debug mode. If yes, disable debug.
3979: AHL_DEBUG_PUB.disable_debug;
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,

Line 3983: X_return_status := FND_API.G_RET_STS_ERROR;

3979: AHL_DEBUG_PUB.disable_debug;
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

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 3996: X_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3992: AHL_DEBUG_PUB.disable_debug;
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',

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.