[Home] [Help]
100: x_return_status := FND_API.G_RET_STS_SUCCESS;
101:
102: /* Initialize message list and count if needed */
103: IF p_init_msg_list THEN
104: fnd_msg_pub.initialize;
105: END IF;
106:
107: /* Intialize the setup fields */
108: IF NOT gmd_api_grp.setup_done THEN
136: ,xReturn_status => l_return_status);
137: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
138: /* it indicates that this routing does'ntexists */
139: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_INVALID');
140: FND_MSG_PUB.ADD;
141: RAISE routing_step_creation_failure;
142: END IF;
143: ELSE /* usually in this case user must have passed routing_no and version */
144: GMDRTVAL_PUB.check_routing(pRouting_no => p_routing_no
148:
149: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
150: /* it indicates that this routing does'ntexists */
151: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_INVALID');
152: FND_MSG_PUB.ADD;
153: RAISE routing_step_creation_failure;
154: END IF;
155: END IF;
156:
160: gmd_debug.put_line('Routing id is required');
161: END IF;
162: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
163: FND_MESSAGE.SET_TOKEN ('MISSING', 'ROUTING_ID');
164: FND_MSG_PUB.ADD;
165: RAISE routing_step_creation_failure;
166: END IF;
167:
168: /* Routing Security Validation */
184: gmd_debug.put_line('Routing step number is required');
185: END IF;
186: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
187: FND_MESSAGE.SET_TOKEN ('MISSING', 'ROUTINGSTEP_NO');
188: FND_MSG_PUB.ADD;
189: RAISE routing_step_creation_failure;
190: END IF;
191:
192: /* Check the oprn id is not null */
196: 'Operation id is required');
197: END IF;
198: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
199: FND_MESSAGE.SET_TOKEN ('MISSING', 'OPRN_ID');
200: FND_MSG_PUB.ADD;
201: RAISE routing_step_creation_failure;
202: END IF;
203:
204: IF x_return_status <> FND_API.g_ret_sts_success THEN
214: IF p_routing_step_rec.routingstep_no IS NOT NULL THEN
215: IF GMDRTVAL_PUB.check_routingstep_no(proutingstep_no => p_routing_step_rec.routingstep_no
216: ,prouting_id => p_routing_id) <> 0 THEN
217: FND_MESSAGE.SET_NAME('GMD', 'FM_RTSTEPERR');
218: FND_MSG_PUB.ADD;
219: RAISE routing_step_creation_failure;
220: END IF;
221: END IF;
222:
246: and Routing is not logically deleted */
247: IF NOT GMD_COMMON_VAL.UPDATE_ALLOWED(Entity => 'ROUTING',
248: Entity_id => l_routing_id ) THEN
249: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUT_NOT_VALID');
250: FND_MSG_PUB.ADD;
251: RAISE routing_step_creation_failure;
252: END IF;
253: -- Bug# 3558478 KMOTUPAL
254: -- Commented the code for validation of Operation
256: and Operation is not logically deleted */
257: /* IF NOT GMD_COMMON_VAL.UPDATE_ALLOWED(Entity => 'OPERATION',
258: Entity_id => p_routing_step_rec.oprn_id ) THEN
259: FND_MESSAGE.SET_NAME('GMD', 'GMD_OPRN_NOT_VALID');
260: FND_MSG_PUB.ADD;
261: RAISE routing_step_creation_failure;
262: END IF; */
263:
264: /* Validation : Operation effective dates fall within the routing effective date range */
267: IF get_rout_start_date%NOTFOUND THEN
268: /* Routing has not been created correctly */
269: CLOSE get_rout_start_date;
270: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUT_DATES_INVALID');
271: FND_MSG_PUB.ADD;
272: RAISE routing_step_creation_failure;
273: END IF;
274: CLOSE get_rout_start_date;
275:
276: OPEN Get_oprn_details(p_routing_step_rec.oprn_id);
277: FETCH Get_oprn_details INTO l_oprn_no, l_oprn_vers;
278: IF Get_oprn_details%NOTFOUND THEN
279: FND_MESSAGE.SET_NAME('GMD', 'GMD_MISSING_OPRN');
280: FND_MSG_PUB.ADD;
281: CLOSE Get_oprn_details;
282: RAISE routing_step_creation_failure;
283: END IF;
284: CLOSE Get_oprn_details;
385: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
386: RAISE routing_step_creation_failure;
387: END IF; /* IF x_return_status <> FND_API.G_RET_STS_SUCCESS */
388:
389: fnd_msg_pub.count_and_get (
390: p_count => x_message_count
391: ,p_encoded => FND_API.g_false
392: ,p_data => x_message_list);
393:
411: ROLLBACK TO SAVEPOINT create_routing_steps;
412: IF (l_debug = 'Y') THEN
413: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'API not complete '||SQLERRM);
414: END IF;
415: fnd_msg_pub.count_and_get (
416: p_count => x_message_count
417: ,p_encoded => FND_API.g_false
418: ,p_data => x_message_list);
419: x_return_status := FND_API.G_RET_STS_ERROR;
419: x_return_status := FND_API.G_RET_STS_ERROR;
420: WHEN setup_failure THEN
421: ROLLBACK TO SAVEPOINT create_routing_steps;
422: x_return_status := FND_API.G_RET_STS_ERROR;
423: fnd_msg_pub.count_and_get (
424: p_count => x_message_count
425: ,p_encoded => FND_API.g_false
426: ,p_data => x_message_list);
427: WHEN routing_step_dep_failure THEN
428: ROLLBACK TO SAVEPOINT create_routing_steps;
429: IF (l_debug = 'Y') THEN
430: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'failure due to insert step dep'||SQLERRM);
431: END IF;
432: fnd_msg_pub.count_and_get (
433: p_count => x_message_count
434: ,p_encoded => FND_API.g_false
435: ,p_data => x_message_list);
436: x_return_status := FND_API.G_RET_STS_ERROR;
435: ,p_data => x_message_list);
436: x_return_status := FND_API.G_RET_STS_ERROR;
437: WHEN OTHERS THEN
438: ROLLBACK TO SAVEPOINT create_routing_steps;
439: fnd_msg_pub.add_exc_msg (gmd_routing_steps_PUB.m_pkg_name, l_api_name);
440: IF (l_debug = 'Y') THEN
441: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
442: END IF;
443: fnd_msg_pub.count_and_get (
439: fnd_msg_pub.add_exc_msg (gmd_routing_steps_PUB.m_pkg_name, l_api_name);
440: IF (l_debug = 'Y') THEN
441: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
442: END IF;
443: fnd_msg_pub.count_and_get (
444: p_count => x_message_count
445: ,p_encoded => FND_API.g_false
446: ,p_data => x_message_list);
447: x_return_status := FND_API.g_ret_sts_unexp_error;
492: x_return_status := FND_API.G_RET_STS_SUCCESS;
493:
494: /* Initialize message list and count if needed */
495: IF p_init_msg_list THEN
496: fnd_msg_pub.initialize;
497: END IF;
498:
499: /* Intialize the setup fields */
500: IF NOT gmd_api_grp.setup_done THEN
519: gmd_debug.put_line('routing step number required');
520: END IF;
521: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
522: FND_MESSAGE.SET_TOKEN ('MISSING', 'ROUTINGSTEP_NO');
523: FND_MSG_PUB.ADD;
524: RAISE routing_step_dep_failure;
525: END IF;
526:
527: /* Routingstp number must be passed, otherwise give error */
530: gmd_debug.put_line('dep routing step number required');
531: END IF;
532: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
533: FND_MESSAGE.SET_TOKEN ('MISSING', 'DEP_ROUTINGSTEP_NO');
534: FND_MSG_PUB.ADD;
535: RAISE routing_step_dep_failure;
536: END IF;
537:
538: /* routingstep_no_uom must be passed, otherwise give error */
541: gmd_debug.put_line('Item uom required');
542: END IF;
543: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
544: FND_MESSAGE.SET_TOKEN ('MISSING', 'ROUTINGSTEP_NO_UOM');
545: FND_MSG_PUB.ADD;
546: RAISE routing_step_dep_failure;
547: /* call common function to check if um passed is valid */
548: ELSIF (NOT(gmd_api_grp.validate_um(p_routings_step_dep_tbl(1).routingstep_no_uom))) THEN
549: IF (l_debug = 'Y') THEN
549: IF (l_debug = 'Y') THEN
550: gmd_debug.put_line('Item uom invalid');
551: END IF;
552: FND_MESSAGE.SET_NAME('GMA', 'SY_INVALID_UM_CODE');
553: FND_MSG_PUB.ADD;
554: RAISE routing_step_dep_failure;
555: END IF;
556:
557: /* transfer pct value should be in between 0 and 100 */
559: IF (l_debug = 'Y') THEN
560: gmd_debug.put_line('Transfer percent should be positive value');
561: END IF;
562: FND_MESSAGE.SET_NAME ('GMD', 'FM_INVALID');
563: FND_MSG_PUB.ADD;
564: RAISE routing_step_dep_failure;
565: END IF;
566:
567: /* dep_type value should be either 0 or 1 */
569: IF (l_debug = 'Y') THEN
570: gmd_debug.put_line('Invalid value for dep_type field');
571: END IF;
572: FND_MESSAGE.SET_NAME ('GMD', 'GMD_DEP_TYPE_INVALID');
573: FND_MSG_PUB.ADD;
574: RAISE routing_step_dep_failure;
575: END IF;
576:
577: IF (l_debug = 'Y') THEN
587:
588: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
589: /* it indicates that this routing does'ntexists */
590: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_INVALID');
591: FND_MSG_PUB.ADD;
592: RAISE routing_step_dep_failure;
593: END IF;
594: ELSE /* usually in this case use must have passed routing_no and version */
595: GMDRTVAL_PUB.check_routing(pRouting_no => p_routing_no
599:
600: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
601: /* it indicates that this routing does'ntexists */
602: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_INVALID');
603: FND_MSG_PUB.ADD;
604: RAISE routing_step_dep_failure;
605: END IF;
606: END IF;
607:
611: gmd_debug.put_line('Routing id is required');
612: END IF;
613: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
614: FND_MESSAGE.SET_TOKEN ('MISSING', 'ROUTING_ID');
615: FND_MSG_PUB.ADD;
616: x_return_status := FND_API.g_ret_sts_error;
617: END IF;
618:
619: /* Routing Security Validation */
631: and Routing is not logically deleted */
632: IF NOT GMD_COMMON_VAL.UPDATE_ALLOWED(Entity => 'ROUTING',
633: Entity_id => l_routing_id ) THEN
634: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUT_NOT_VALID');
635: FND_MSG_PUB.ADD;
636: RAISE routing_step_dep_failure;
637: END IF;
638:
639: /* Validation : Check if this step dep exist */
649:
650: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
651: /* it indicates that this routing does'ntexists */
652: FND_MESSAGE.SET_NAME('GME', 'PC_RECORD_EXISTS');
653: FND_MSG_PUB.ADD;
654: RAISE routing_step_dep_failure;
655: END IF;
656: END LOOP; /* End loop for p_routings_step_dep_tbl.count */
657:
672: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
673: RAISE routing_step_dep_failure;
674: END IF; /* IF x_return_status <> FND_API.G_RET_STS_SUCCESS */
675:
676: fnd_msg_pub.count_and_get (
677: p_count => x_message_count
678: ,p_encoded => FND_API.g_false
679: ,p_data => x_message_list);
680:
697: ROLLBACK TO SAVEPOINT create_step_dependencies;
698: IF (l_debug = 'Y') THEN
699: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'API not complete');
700: END IF;
701: fnd_msg_pub.count_and_get (
702: p_count => x_message_count
703: ,p_encoded => FND_API.g_false
704: ,p_data => x_message_list);
705: x_return_status := FND_API.G_RET_STS_ERROR;
705: x_return_status := FND_API.G_RET_STS_ERROR;
706: WHEN setup_failure THEN
707: ROLLBACK TO SAVEPOINT create_step_dependencies;
708: x_return_status := FND_API.G_RET_STS_ERROR;
709: fnd_msg_pub.count_and_get (
710: p_count => x_message_count
711: ,p_encoded => FND_API.g_false
712: ,p_data => x_message_list);
713: WHEN OTHERS THEN
711: ,p_encoded => FND_API.g_false
712: ,p_data => x_message_list);
713: WHEN OTHERS THEN
714: ROLLBACK TO SAVEPOINT create_step_dependencies;
715: fnd_msg_pub.add_exc_msg (gmd_routing_steps_PUB.m_pkg_name, l_api_name);
716: IF (l_debug = 'Y') THEN
717: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
718: END IF;
719: fnd_msg_pub.count_and_get (
715: fnd_msg_pub.add_exc_msg (gmd_routing_steps_PUB.m_pkg_name, l_api_name);
716: IF (l_debug = 'Y') THEN
717: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
718: END IF;
719: fnd_msg_pub.count_and_get (
720: p_count => x_message_count
721: ,p_encoded => FND_API.g_false
722: ,p_data => x_message_list);
723: x_return_status := FND_API.g_ret_sts_unexp_error;
791: x_return_status := FND_API.G_RET_STS_SUCCESS;
792:
793: /* Initialize message list and count if needed */
794: IF p_init_msg_list THEN
795: fnd_msg_pub.initialize;
796: END IF;
797:
798: /* Intialize the setup fields */
799: IF NOT gmd_api_grp.setup_done THEN
828:
829: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
830: /* it indicates that this routing does'ntexists */
831: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_INVALID');
832: FND_MSG_PUB.ADD;
833: RAISE routing_update_step_failure;
834: END IF;
835: ELSE /* usually in this case user must have passed routing_no and version */
836: GMDRTVAL_PUB.check_routing(pRouting_no => p_routing_no
840:
841: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
842: /* it indicates that this routing does'ntexists */
843: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_INVALID');
844: FND_MSG_PUB.ADD;
845: RAISE routing_update_step_failure;
846: END IF;
847: END IF;
848:
852: gmd_debug.put_line('Routing id is required');
853: END IF;
854: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
855: FND_MESSAGE.SET_TOKEN ('MISSING', 'ROUTING_ID');
856: FND_MSG_PUB.ADD;
857: RAISE routing_update_step_failure;
858: END IF;
859:
860: /* Routing Security fix */
887: END IF;
888: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
889: /* it indicates that this routing does'ntexists */
890: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTINGSTEP_INVALID');
891: FND_MSG_PUB.ADD;
892: RAISE routing_update_step_failure;
893: END IF;
894: ELSE
895: /* hopefully the Routing step no was passed in .. */
900: ,x_return_status => l_return_status );
901: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
902: -- it indicates that this routing does not exists
903: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTINGSTEP_INVALID');
904: FND_MSG_PUB.ADD;
905: RAISE routing_update_step_failure;
906: END IF;
907: END IF;
908:
912: gmd_debug.put_line('Routing step id is required');
913: END IF;
914: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
915: FND_MESSAGE.SET_TOKEN ('MISSING', 'ROUTINGSTEP_ID');
916: FND_MSG_PUB.ADD;
917: RAISE routing_update_step_failure;
918: END IF;
919:
920: /* Validation : Routing status is not On Hold nor Obsolete/Archived
921: and Routing is not logically deleted */
922: IF NOT GMD_COMMON_VAL.UPDATE_ALLOWED(Entity => 'ROUTING',
923: Entity_id => l_routing_id ) THEN
924: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUT_NOT_VALID');
925: FND_MSG_PUB.ADD;
926: RAISE routing_update_step_failure;
927: END IF;
928:
929: /* Validation : Operation status is not On Hold nor Obsolete/Archived
937: CLOSE get_oprn_id;
938: IF NOT GMD_COMMON_VAL.UPDATE_ALLOWED(Entity => 'OPERATION',
939: Entity_id => l_oprn_id ) THEN
940: FND_MESSAGE.SET_NAME('GMD', 'GMD_OPRN_NOT_VALID');
941: FND_MSG_PUB.ADD;
942: RAISE routing_update_step_failure;
943: END IF;
944:
945: /* KSHUKLA added the following validation as per as 4376301
984: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
985: RAISE routing_update_step_failure;
986: END IF; /* IF x_return_status <> FND_API.G_RET_STS_SUCCESS */
987:
988: fnd_msg_pub.count_and_get (
989: p_count => x_message_count
990: ,p_encoded => FND_API.g_false
991: ,p_data => x_message_list);
992:
1008: ROLLBACK TO SAVEPOINT update_routing_details;
1009: IF (l_debug = 'Y') THEN
1010: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'API not complete');
1011: END IF;
1012: fnd_msg_pub.count_and_get (
1013: p_count => x_message_count
1014: ,p_encoded => FND_API.g_false
1015: ,p_data => x_message_list);
1016: x_return_status := FND_API.G_RET_STS_ERROR;
1016: x_return_status := FND_API.G_RET_STS_ERROR;
1017: WHEN setup_failure THEN
1018: ROLLBACK TO SAVEPOINT update_routing_details;
1019: x_return_status := FND_API.G_RET_STS_ERROR;
1020: fnd_msg_pub.count_and_get (
1021: p_count => x_message_count
1022: ,p_encoded => FND_API.g_false
1023: ,p_data => x_message_list);
1024: WHEN VALID_DATE_EXCEPTION THEN
1023: ,p_data => x_message_list);
1024: WHEN VALID_DATE_EXCEPTION THEN
1025: ROLLBACK TO SAVEPOINT update_routing_details;
1026: x_return_status := FND_API.G_RET_STS_ERROR;
1027: fnd_msg_pub.count_and_get (
1028: p_count => x_message_count
1029: ,p_encoded => FND_API.g_false
1030: ,p_data => x_message_list);
1031: WHEN OTHERS THEN
1029: ,p_encoded => FND_API.g_false
1030: ,p_data => x_message_list);
1031: WHEN OTHERS THEN
1032: ROLLBACK TO SAVEPOINT update_routing_details;
1033: fnd_msg_pub.add_exc_msg (gmd_routing_steps_PUB.m_pkg_name, l_api_name);
1034: IF (l_debug = 'Y') THEN
1035: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
1036: END IF;
1037: fnd_msg_pub.count_and_get (
1033: fnd_msg_pub.add_exc_msg (gmd_routing_steps_PUB.m_pkg_name, l_api_name);
1034: IF (l_debug = 'Y') THEN
1035: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
1036: END IF;
1037: fnd_msg_pub.count_and_get (
1038: p_count => x_message_count
1039: ,p_encoded => FND_API.g_false
1040: ,p_data => x_message_list);
1041: x_return_status := FND_API.g_ret_sts_unexp_error;
1095: x_return_status := FND_API.G_RET_STS_SUCCESS;
1096:
1097: /* Initialize message list and count if needed */
1098: IF p_init_msg_list THEN
1099: fnd_msg_pub.initialize;
1100: END IF;
1101:
1102: /* Intialize the setup fields */
1103: IF NOT gmd_api_grp.setup_done THEN
1138: IF (l_debug = 'Y') THEN
1139: gmd_debug.put_line ('Transfer pct value should be positive');
1140: END IF;
1141: FND_MESSAGE.SET_NAME ('GMD', 'FM_INVALID');
1142: FND_MSG_PUB.ADD;
1143: RAISE routing_update_dep_failure;
1144: END IF;
1145:
1146: /* standard delay value should be in = or > 0 */
1148: IF (l_debug = 'Y') THEN
1149: gmd_debug.put_line ('Transfer pct value should be positive');
1150: END IF;
1151: FND_MESSAGE.SET_NAME ('GMD', 'FM_INVALID');
1152: FND_MSG_PUB.ADD;
1153: RAISE routing_update_dep_failure;
1154: END IF;
1155:
1156: /* dep_type value should be either 0 or 1 */
1158: IF (l_debug = 'Y') THEN
1159: gmd_debug.put_line('Invalid value for dep_type field');
1160: END IF;
1161: FND_MESSAGE.SET_NAME ('GMD', 'GMD_DEP_TYPE_INVALID');
1162: FND_MSG_PUB.ADD;
1163: RAISE routing_update_dep_failure;
1164: END IF;
1165:
1166: /* Validation : Check if routing header exists in the database */
1173:
1174: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1175: /* it indicates that this routing does'ntexists */
1176: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_INVALID');
1177: FND_MSG_PUB.ADD;
1178: RAISE routing_update_dep_failure;
1179: END IF;
1180: ELSE /* usually in this case user must have passed routing_no and version */
1181: GMDRTVAL_PUB.check_routing(pRouting_no => p_routing_no
1185:
1186: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1187: /* it indicates that this routing does'ntexists */
1188: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_INVALID');
1189: FND_MSG_PUB.ADD;
1190: RAISE routing_update_dep_failure;
1191: END IF;
1192: END IF;
1193:
1197: gmd_debug.put_line('Routing id is required');
1198: END IF;
1199: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
1200: FND_MESSAGE.SET_TOKEN ('MISSING', 'ROUTING_ID');
1201: FND_MSG_PUB.ADD;
1202: RAISE routing_update_dep_failure;
1203: END IF;
1204:
1205: /* Routing Security fix */
1226: ,x_return_status => l_return_status );
1227: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1228: /* it indicates that this routing does'ntexists */
1229: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTINGSTEP_INVALID');
1230: FND_MSG_PUB.ADD;
1231: RAISE routing_update_dep_failure;
1232: END IF;
1233: ELSE
1234: /* hopefully the Routing step id was passed in .. */
1238: ,x_return_status => l_return_status );
1239: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1240: /* it indicates that this routing does'ntexists */
1241: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTINGSTEP_INVALID');
1242: FND_MSG_PUB.ADD;
1243: RAISE routing_update_dep_failure;
1244: END IF;
1245: END IF;
1246:
1250: gmd_debug.put_line('Routing id is required');
1251: END IF;
1252: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
1253: FND_MESSAGE.SET_TOKEN ('MISSING', 'ROUTINGSTEP_NO');
1254: FND_MSG_PUB.ADD;
1255: RAISE routing_update_dep_failure;
1256: END IF;
1257:
1258: IF x_return_status <> FND_API.g_ret_sts_success THEN
1263: and Routing is not logically deleted */
1264: IF NOT GMD_COMMON_VAL.UPDATE_ALLOWED(Entity => 'ROUTING',
1265: Entity_id => l_routing_id ) THEN
1266: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUT_NOT_VALID');
1267: FND_MSG_PUB.ADD;
1268: RAISE routing_update_dep_failure;
1269: END IF;
1270:
1271: GMD_ROUTING_STEPS_PVT.update_step_dependencies
1279: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1280: RAISE routing_update_dep_failure;
1281: END IF; /* IF x_return_status <> FND_API.G_RET_STS_SUCCESS */
1282:
1283: fnd_msg_pub.count_and_get (
1284: p_count => x_message_count
1285: ,p_encoded => FND_API.g_false
1286: ,p_data => x_message_list);
1287:
1304: ROLLBACK TO SAVEPOINT update_step_dependency;
1305: IF (l_debug = 'Y') THEN
1306: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'API not complete');
1307: END IF;
1308: fnd_msg_pub.count_and_get (
1309: p_count => x_message_count
1310: ,p_encoded => FND_API.g_false
1311: ,p_data => x_message_list);
1312: x_return_status := FND_API.G_RET_STS_ERROR;
1312: x_return_status := FND_API.G_RET_STS_ERROR;
1313: WHEN setup_failure THEN
1314: ROLLBACK TO SAVEPOINT update_step_dependency;
1315: x_return_status := FND_API.G_RET_STS_ERROR;
1316: fnd_msg_pub.count_and_get (
1317: p_count => x_message_count
1318: ,p_encoded => FND_API.g_false
1319: ,p_data => x_message_list);
1320: WHEN OTHERS THEN
1318: ,p_encoded => FND_API.g_false
1319: ,p_data => x_message_list);
1320: WHEN OTHERS THEN
1321: ROLLBACK TO SAVEPOINT update_routing_details;
1322: fnd_msg_pub.add_exc_msg (gmd_routing_steps_PUB.m_pkg_name, l_api_name);
1323: IF (l_debug = 'Y') THEN
1324: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
1325: END IF;
1326: fnd_msg_pub.count_and_get (
1322: fnd_msg_pub.add_exc_msg (gmd_routing_steps_PUB.m_pkg_name, l_api_name);
1323: IF (l_debug = 'Y') THEN
1324: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
1325: END IF;
1326: fnd_msg_pub.count_and_get (
1327: p_count => x_message_count
1328: ,p_encoded => FND_API.g_false
1329: ,p_data => x_message_list);
1330: x_return_status := FND_API.g_ret_sts_unexp_error;
1389: x_return_status := FND_API.G_RET_STS_SUCCESS;
1390:
1391: /* Initialize message list and count if needed */
1392: IF p_init_msg_list THEN
1393: fnd_msg_pub.initialize;
1394: END IF;
1395:
1396: /* Intialize the setup fields */
1397: IF NOT gmd_api_grp.setup_done THEN
1425:
1426: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1427: /* it indicates that this routing does'ntexists */
1428: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_INVALID');
1429: FND_MSG_PUB.ADD;
1430: RAISE routing_delete_step_failure;
1431: END IF;
1432: ELSE /* usually in this case user must have passed routing_no and version */
1433: GMDRTVAL_PUB.check_routing(pRouting_no => p_routing_no
1437:
1438: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1439: /* it indicates that this routing does'ntexists */
1440: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_INVALID');
1441: FND_MSG_PUB.ADD;
1442: RAISE routing_delete_step_failure;
1443: END IF;
1444: END IF;
1445:
1449: gmd_debug.put_line('Routing id is required');
1450: END IF;
1451: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
1452: FND_MESSAGE.SET_TOKEN ('MISSING', 'ROUTING_ID');
1453: FND_MSG_PUB.ADD;
1454: x_return_status := FND_API.g_ret_sts_error;
1455: END IF;
1456:
1457: /* Routing Security Validation */
1482: END IF;
1483: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1484: /* it indicates that this routing does'ntexists */
1485: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTINGSTEP_INVALID');
1486: FND_MSG_PUB.ADD;
1487: RAISE routing_delete_step_failure;
1488: END IF;
1489: ELSE
1490: IF (l_debug = 'Y') THEN
1497: ,x_return_status => l_return_status );
1498: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1499: /* it indicates that this routing does'ntexists */
1500: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTINGSTEP_INVALID');
1501: FND_MSG_PUB.ADD;
1502: RAISE routing_delete_step_failure;
1503: END IF;
1504: END IF;
1505:
1509: gmd_debug.put_line('Routing step id is required');
1510: END IF;
1511: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
1512: FND_MESSAGE.SET_TOKEN ('MISSING', 'ROUTINGSTEP_ID');
1513: FND_MSG_PUB.ADD;
1514: RAISE routing_delete_step_failure;
1515: END IF;
1516:
1517: /* Validation : Check if this step is used in recipe override table and
1517: /* Validation : Check if this step is used in recipe override table and
1518: step material association table. If it is then delete is not allowed */
1519: IF GMDRTVAL_PUB.Check_routing_override_exists(l_routingstep_id) THEN
1520: FND_MESSAGE.SET_NAME('GMD', 'GMD_STEP_USED_IN_RECIPE');
1521: FND_MSG_PUB.ADD;
1522: RAISE routing_delete_step_failure;
1523: END IF;
1524:
1525: /* Validation : Routing status is not On Hold nor Obsolete/Archived
1526: and Routing is not logically deleted */
1527: IF NOT GMD_COMMON_VAL.UPDATE_ALLOWED(Entity => 'ROUTING',
1528: Entity_id => l_routing_id ) THEN
1529: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUT_NOT_VALID');
1530: FND_MSG_PUB.ADD;
1531: RAISE routing_delete_step_failure;
1532: END IF;
1533:
1534: IF (l_debug = 'Y') THEN
1540: , p_routing_id => l_routing_id
1541: , x_return_status => x_return_status
1542: );
1543:
1544: fnd_msg_pub.count_and_get (
1545: p_count => x_message_count
1546: ,p_encoded => FND_API.g_false
1547: ,p_data => x_message_list);
1548:
1565: ROLLBACK TO SAVEPOINT delete_routing_step;
1566: IF (l_debug = 'Y') THEN
1567: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'API not complete');
1568: END IF;
1569: fnd_msg_pub.count_and_get (
1570: p_count => x_message_count
1571: ,p_encoded => FND_API.g_false
1572: ,p_data => x_message_list);
1573: x_return_status := FND_API.G_RET_STS_ERROR;
1573: x_return_status := FND_API.G_RET_STS_ERROR;
1574: WHEN setup_failure THEN
1575: ROLLBACK TO SAVEPOINT delete_routing_step;
1576: x_return_status := FND_API.G_RET_STS_ERROR;
1577: fnd_msg_pub.count_and_get (
1578: p_count => x_message_count
1579: ,p_encoded => FND_API.g_false
1580: ,p_data => x_message_list);
1581: WHEN routing_delete_stepdep_failure THEN
1582: ROLLBACK TO SAVEPOINT delete_routing_step;
1583: IF (l_debug = 'Y') THEN
1584: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'delete step dep API not complete');
1585: END IF;
1586: fnd_msg_pub.count_and_get (
1587: p_count => x_message_count
1588: ,p_encoded => FND_API.g_false
1589: ,p_data => x_message_list);
1590: x_return_status := FND_API.G_RET_STS_ERROR;
1589: ,p_data => x_message_list);
1590: x_return_status := FND_API.G_RET_STS_ERROR;
1591: WHEN OTHERS THEN
1592: ROLLBACK TO SAVEPOINT delete_routing_step;
1593: fnd_msg_pub.add_exc_msg (gmd_routing_steps_PUB.m_pkg_name, l_api_name);
1594: IF (l_debug = 'Y') THEN
1595: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
1596: END IF;
1597: fnd_msg_pub.count_and_get (
1593: fnd_msg_pub.add_exc_msg (gmd_routing_steps_PUB.m_pkg_name, l_api_name);
1594: IF (l_debug = 'Y') THEN
1595: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
1596: END IF;
1597: fnd_msg_pub.count_and_get (
1598: p_count => x_message_count
1599: ,p_encoded => FND_API.g_false
1600: ,p_data => x_message_list);
1601: x_return_status := FND_API.g_ret_sts_unexp_error;
1649: x_return_status := FND_API.G_RET_STS_SUCCESS;
1650:
1651: /* Initialize message list and count if needed */
1652: IF p_init_msg_list THEN
1653: fnd_msg_pub.initialize;
1654: END IF;
1655:
1656: /* Intialize the setup fields */
1657: IF NOT gmd_api_grp.setup_done THEN
1688:
1689: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1690: /* it indicates that this routing does'ntexists */
1691: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_INVALID');
1692: FND_MSG_PUB.ADD;
1693: RAISE routing_delete_dep_failure;
1694: END IF;
1695: ELSE /* usually in this case user must have passed routing_no and version */
1696: GMDRTVAL_PUB.check_routing(pRouting_no => p_routing_no
1700:
1701: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1702: /* it indicates that this routing does'ntexists */
1703: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTING_INVALID');
1704: FND_MSG_PUB.ADD;
1705: RAISE routing_delete_dep_failure;
1706: END IF;
1707: END IF;
1708:
1712: gmd_debug.put_line('Routing id is required');
1713: END IF;
1714: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
1715: FND_MESSAGE.SET_TOKEN ('MISSING', 'ROUTING_ID');
1716: FND_MSG_PUB.ADD;
1717: RAISE routing_delete_dep_failure;
1718: END IF;
1719:
1720: /* Routing Security Validation */
1736: ,x_return_status => l_return_status );
1737: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1738: /* it indicates that this routing does'ntexists */
1739: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUTINGSTEP_INVALID');
1740: FND_MSG_PUB.ADD;
1741: RAISE routing_delete_dep_failure;
1742: END IF;
1743: END IF;
1744:
1748: gmd_debug.put_line('Routing step number is required');
1749: END IF;
1750: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
1751: FND_MESSAGE.SET_TOKEN ('MISSING', 'ROUTINGSTEP_NO');
1752: FND_MSG_PUB.ADD;
1753: RAISE routing_delete_dep_failure;
1754: END IF;
1755:
1756: /* Check the routingstep no is not null */
1759: gmd_debug.put_line('Dep Routing step number is required');
1760: END IF;
1761: FND_MESSAGE.SET_NAME ('GMI', 'GMI_MISSING');
1762: FND_MESSAGE.SET_TOKEN ('MISSING', 'DEP_ROUTINGSTEP_NO');
1763: FND_MSG_PUB.ADD;
1764: RAISE routing_delete_dep_failure;
1765: END IF;
1766:
1767: /* Actual delete in fm_rout_dep table */
1777: and Routing is not logically deleted */
1778: IF NOT GMD_COMMON_VAL.UPDATE_ALLOWED(Entity => 'ROUTING',
1779: Entity_id => l_routing_id ) THEN
1780: FND_MESSAGE.SET_NAME('GMD', 'GMD_ROUT_NOT_VALID');
1781: FND_MSG_PUB.ADD;
1782: RAISE routing_delete_dep_failure;
1783: END IF;
1784:
1785: GMD_ROUTING_STEPS_PVT.delete_step_dependencies
1793: IF SQL%ROWCOUNT = 0 THEN
1794: RAISE routing_delete_dep_failure;
1795: END IF; /* IF x_return_status <> FND_API.G_RET_STS_SUCCESS */
1796:
1797: fnd_msg_pub.count_and_get (
1798: p_count => x_message_count
1799: ,p_encoded => FND_API.g_false
1800: ,p_data => x_message_list);
1801:
1818: ROLLBACK TO SAVEPOINT delete_step_dependency;
1819: IF (l_debug = 'Y') THEN
1820: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'API not complete');
1821: END IF;
1822: fnd_msg_pub.count_and_get (
1823: p_count => x_message_count
1824: ,p_encoded => FND_API.g_false
1825: ,p_data => x_message_list);
1826: x_return_status := FND_API.G_RET_STS_ERROR;
1826: x_return_status := FND_API.G_RET_STS_ERROR;
1827: WHEN setup_failure THEN
1828: ROLLBACK TO SAVEPOINT delete_step_dependency;
1829: x_return_status := FND_API.G_RET_STS_ERROR;
1830: fnd_msg_pub.count_and_get (
1831: p_count => x_message_count
1832: ,p_encoded => FND_API.g_false
1833: ,p_data => x_message_list);
1834: WHEN OTHERS THEN
1832: ,p_encoded => FND_API.g_false
1833: ,p_data => x_message_list);
1834: WHEN OTHERS THEN
1835: ROLLBACK TO SAVEPOINT delete_step_dependency;
1836: fnd_msg_pub.add_exc_msg (gmd_routing_steps_PUB.m_pkg_name, l_api_name);
1837: IF (l_debug = 'Y') THEN
1838: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
1839: END IF;
1840: fnd_msg_pub.count_and_get (
1836: fnd_msg_pub.add_exc_msg (gmd_routing_steps_PUB.m_pkg_name, l_api_name);
1837: IF (l_debug = 'Y') THEN
1838: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
1839: END IF;
1840: fnd_msg_pub.count_and_get (
1841: p_count => x_message_count
1842: ,p_encoded => FND_API.g_false
1843: ,p_data => x_message_list);
1844: x_return_status := FND_API.g_ret_sts_unexp_error;