144: IF l_row_id IS NULL THEN
145: RAISE routing_creation_failure;
146: END IF;
147: /* Get the messgae list and count generated by this API */
148: fnd_msg_pub.count_and_get (
149: p_count => x_message_count
150: ,p_encoded => FND_API.g_false
151: ,p_data => x_message_list);
152:
160: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'API not complete');
161: END IF;
162: FND_MESSAGE.SET_NAME('GMD', 'GMD_UNEXPECTED_ERROR');
163: FND_MESSAGE.SET_TOKEN('ERROR', sqlerrm);
164: FND_MSG_PUB.ADD;
165: x_return_status := FND_API.G_RET_STS_ERROR;
166: fnd_msg_pub.count_and_get (
167: p_count => x_message_count
168: ,p_encoded => FND_API.g_false
162: FND_MESSAGE.SET_NAME('GMD', 'GMD_UNEXPECTED_ERROR');
163: FND_MESSAGE.SET_TOKEN('ERROR', sqlerrm);
164: FND_MSG_PUB.ADD;
165: x_return_status := FND_API.G_RET_STS_ERROR;
166: fnd_msg_pub.count_and_get (
167: p_count => x_message_count
168: ,p_encoded => FND_API.g_false
169: ,p_data => x_message_list);
170: WHEN setup_failure THEN
168: ,p_encoded => FND_API.g_false
169: ,p_data => x_message_list);
170: WHEN setup_failure THEN
171: x_return_status := FND_API.G_RET_STS_ERROR;
172: fnd_msg_pub.count_and_get (
173: p_count => x_message_count
174: ,p_encoded => FND_API.g_false
175: ,p_data => x_message_list);
176: WHEN OTHERS THEN
176: WHEN OTHERS THEN
177: IF (l_debug = 'Y') THEN
178: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
179: END IF;
180: fnd_msg_pub.add_exc_msg (gmd_routings_PUB.m_pkg_name, l_api_name);
181: x_return_status := FND_API.g_ret_sts_unexp_error;
182: fnd_msg_pub.count_and_get (
183: p_count => x_message_count
184: ,p_encoded => FND_API.g_false
178: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
179: END IF;
180: fnd_msg_pub.add_exc_msg (gmd_routings_PUB.m_pkg_name, l_api_name);
181: x_return_status := FND_API.g_ret_sts_unexp_error;
182: fnd_msg_pub.count_and_get (
183: p_count => x_message_count
184: ,p_encoded => FND_API.g_false
185: ,p_data => x_message_list);
186: END insert_routing;
284: OPEN get_old_routing_rec(p_routing_id);
285: FETCH get_old_routing_rec INTO l_old_routing_rec;
286: IF get_old_routing_rec%NOTFOUND THEN
287: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_INVALID');
288: FND_MSG_PUB.ADD;
289: CLOSE get_old_routing_rec;
290: RAISE routing_update_failure;
291: END IF;
292: CLOSE get_old_routing_rec;
462: END IF;
463:
464: IF l_vr_start_date < l_old_routing_rec.effective_start_date THEN
465: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_DATE_IN_VR_DATE');
466: FND_MSG_PUB.ADD;
467: RAISE routing_update_failure;
468: END IF;
469:
470: IF (l_vr_end_date = trunc(SYSDATE + 999999) ) THEN
480:
481: IF (l_vr_end_date IS NULL) AND
482: (l_old_routing_rec.effective_end_date IS NOT NULL) THEN
483: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_DATE_IN_VR_DATE');
484: FND_MSG_PUB.ADD;
485: RAISE routing_update_failure;
486: END IF;
487:
488: IF l_vr_end_date > l_old_routing_rec.effective_end_date THEN
486: END IF;
487:
488: IF l_vr_end_date > l_old_routing_rec.effective_end_date THEN
489: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_DATE_IN_VR_DATE');
490: FND_MSG_PUB.ADD;
491: RAISE routing_update_failure;
492: END IF;
493: END IF;
494: CLOSE Get_vr_start_end_dates;
560: RAISE routing_update_failure;
561: END IF; /* IF x_return_status <> FND_API.G_RET_STS_SUCCESS */
562:
563: /* Get the messgae list and count generated by this API */
564: fnd_msg_pub.count_and_get (
565: p_count => x_message_count
566: ,p_encoded => FND_API.g_false
567: ,p_data => x_message_list);
568:
575: IF (l_debug = 'Y') THEN
576: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'API not complete');
577: END IF;
578: x_return_status := FND_API.G_RET_STS_ERROR;
579: fnd_msg_pub.count_and_get (
580: p_count => x_message_count
581: ,p_encoded => FND_API.g_false
582: ,p_data => x_message_list);
583: WHEN last_update_date_failure THEN
582: ,p_data => x_message_list);
583: WHEN last_update_date_failure THEN
584: x_return_status := FND_API.G_RET_STS_ERROR;
585: FND_MESSAGE.SET_NAME('FND', 'FND_RECORD_CHANGED_ERROR');
586: FND_MSG_PUB.ADD;
587: fnd_msg_pub.count_and_get (
588: p_count => x_message_count
589: ,p_encoded => FND_API.g_false
590: ,p_data => x_message_list);
583: WHEN last_update_date_failure THEN
584: x_return_status := FND_API.G_RET_STS_ERROR;
585: FND_MESSAGE.SET_NAME('FND', 'FND_RECORD_CHANGED_ERROR');
586: FND_MSG_PUB.ADD;
587: fnd_msg_pub.count_and_get (
588: p_count => x_message_count
589: ,p_encoded => FND_API.g_false
590: ,p_data => x_message_list);
591: WHEN setup_failure THEN
589: ,p_encoded => FND_API.g_false
590: ,p_data => x_message_list);
591: WHEN setup_failure THEN
592: x_return_status := FND_API.G_RET_STS_ERROR;
593: fnd_msg_pub.count_and_get (
594: p_count => x_message_count
595: ,p_encoded => FND_API.g_false
596: ,p_data => x_message_list);
597: WHEN OTHERS THEN
597: WHEN OTHERS THEN
598: IF (l_debug = 'Y') THEN
599: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
600: END IF;
601: fnd_msg_pub.add_exc_msg (gmd_routings_PUB.m_pkg_name, l_api_name);
602: x_return_status := FND_API.g_ret_sts_unexp_error;
603: fnd_msg_pub.count_and_get (
604: p_count => x_message_count
605: ,p_encoded => FND_API.g_false
599: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
600: END IF;
601: fnd_msg_pub.add_exc_msg (gmd_routings_PUB.m_pkg_name, l_api_name);
602: x_return_status := FND_API.g_ret_sts_unexp_error;
603: fnd_msg_pub.count_and_get (
604: p_count => x_message_count
605: ,p_encoded => FND_API.g_false
606: ,p_data => x_message_list);
607: END update_routing;
645: 'must be less then end date ( '||
646: p_effective_end_date||' ) ');
647: END IF;
648: FND_MESSAGE.SET_NAME('GMD', 'QC_MIN_MAX_DATE');
649: FND_MSG_PUB.ADD;
650: RETURN -1;
651: END IF;
652:
653: -- Comparing Routing and Operation Dates
661: ' Oprn Start Date = '||l_oprn_start_date);
662: END IF;
663: IF l_oprn_start_date > p_effective_start_date THEN
664: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_DATE_IN_OPRN_DATE');
665: FND_MSG_PUB.ADD;
666: RETURN -1;
667: END IF;
668:
669: IF (l_debug = 'Y') THEN
675: END IF;
676: IF (l_oprn_end_date IS NOT NULL) AND
677: (p_effective_end_date IS NULL) THEN
678: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUT_EFF_END_DATE');
679: FND_MSG_PUB.ADD;
680: RETURN -1;
681: END IF;
682:
683: IF l_oprn_end_date < p_effective_end_date THEN
681: END IF;
682:
683: IF l_oprn_end_date < p_effective_end_date THEN
684: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_DATE_IN_OPRN_DATE');
685: FND_MSG_PUB.ADD;
686: RETURN -1;
687: END IF;
688: END IF;
689: CLOSE Get_oprn_start_end_dates;