[Home] [Help]
328: END IF;
329:
330: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
331: fnd_message.set_name('WMS', 'WMS_TD_MOL_ERROR');
332: fnd_msg_pub.ADD;
333: RAISE fnd_api.g_exc_unexpected_error;
334: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
335: fnd_message.set_name('WMS', 'WMS_TD_MOL_ERROR');
336: fnd_msg_pub.ADD;
332: fnd_msg_pub.ADD;
333: RAISE fnd_api.g_exc_unexpected_error;
334: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
335: fnd_message.set_name('WMS', 'WMS_TD_MOL_ERROR');
336: fnd_msg_pub.ADD;
337: RAISE fnd_api.g_exc_error;
338: END IF;
339:
340: l_cg_line := l_trolin_tbl(1).line_id;
384: mydebug('create_mo_line: CG: ' || l_cg_id);
385: mydebug('create_mo_line: TCG: ' || l_tcg_id);
386: END IF;
387:
388: fnd_msg_pub.count_and_get(p_count => l_msg_count, p_data => l_msg_data);
389:
390: IF (l_msg_count = 0) THEN
391: IF (l_debug = 1) THEN
392: mydebug('create_mo_line: Successful');
401: mydebug('create_mo_line: Not Successful2');
402: END IF;
403:
404: FOR i IN 1 .. l_msg_count LOOP
405: l_msg_data := fnd_msg_pub.get(i, 'F');
406:
407: IF (l_debug = 1) THEN
408: mydebug('create_mo_line: ' || REPLACE(l_msg_data, fnd_global.local_chr(0), ' '));
409: END IF;
411: END IF;
412:
413: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
414: fnd_message.set_name('WMS', 'WMS_TD_CG_ERROR');
415: fnd_msg_pub.ADD;
416: RAISE fnd_api.g_exc_unexpected_error;
417: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
418: fnd_message.set_name('WMS', 'WMS_TD_CG_ERROR');
419: fnd_msg_pub.ADD;
415: fnd_msg_pub.ADD;
416: RAISE fnd_api.g_exc_unexpected_error;
417: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
418: fnd_message.set_name('WMS', 'WMS_TD_CG_ERROR');
419: fnd_msg_pub.ADD;
420: RAISE fnd_api.g_exc_error;
421: END IF;
422: END IF;
423:
424: x_return_status := fnd_api.g_ret_sts_success;
425: EXCEPTION
426: WHEN fnd_api.g_exc_error THEN
427: x_return_status := fnd_api.g_ret_sts_error;
428: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
429: WHEN OTHERS THEN
430: x_return_status := fnd_api.g_ret_sts_unexp_error;
431: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
432: END create_mo_line;
427: x_return_status := fnd_api.g_ret_sts_error;
428: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
429: WHEN OTHERS THEN
430: x_return_status := fnd_api.g_ret_sts_unexp_error;
431: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
432: END create_mo_line;
433:
434: PROCEDURE create_mo(
435: p_org_id IN NUMBER
563: exception
564: when others then
565: mydebug('In exception -- select fails' ) ;
566: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LPN');
567: fnd_msg_pub.ADD;
568: RAISE fnd_api.g_exc_error;
569: end;
570: end if;
571: end if;
589: AND NVL(project_id, -1) <> NVL(p_project_id, -1)
590: AND NVL(task_id, -1) <> NVL(p_task_id, -1));
591:
592: fnd_message.set_name('WMS', 'WMS_PROJ_LPN_COMINGLE');
593: fnd_msg_pub.ADD;
594: RAISE fnd_api.g_exc_error;
595: EXCEPTION
596: WHEN NO_DATA_FOUND THEN
597: NULL;
612: END IF;
613:
614: IF (l_lot_code = 2 AND l_lot_number IS NULL) THEN
615: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LOT');
616: fnd_msg_pub.ADD;
617: RAISE fnd_api.g_exc_error;
618: END IF;
619:
620: IF l_serial_control_code NOT IN (1,6) THEN
674:
675: IF (l_serial_count <> p_qty) THEN
676: mydebug('Discrepancy in Serial qty and qty recd');
677: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SER');
678: fnd_msg_pub.ADD;
679: RAISE fnd_api.g_exc_error;
680: END IF;
681:
682: END IF; --13695803
807: , x_trohdr_val_rec => l_trohdr_val_rec
808: , x_trolin_tbl => l_trolin_tbl
809: , x_trolin_val_tbl => l_trolin_val_tbl
810: );
811: fnd_msg_pub.count_and_get(p_count => l_msg_count, p_data => l_msg_data);
812:
813: IF (l_msg_count = 0) THEN
814: IF (l_debug = 1) THEN
815: mydebug('create_mo: Successful');
824: mydebug('create_mo: Not Successful2');
825: END IF;
826:
827: FOR i IN 1 .. l_msg_count LOOP
828: l_msg_data := fnd_msg_pub.get(i, 'F');
829:
830: IF (l_debug = 1) THEN
831: mydebug('create_mo: ' || REPLACE(l_msg_data, fnd_global.local_chr(0), ' '));
832: END IF;
834: END IF;
835:
836: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
837: fnd_message.set_name('WMS', 'WMS_TD_MO_ERROR');
838: fnd_msg_pub.ADD;
839: RAISE fnd_api.g_exc_unexpected_error;
840: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
841: fnd_message.set_name('WMS', 'WMS_TD_MO_ERROR');
842: fnd_msg_pub.ADD;
838: fnd_msg_pub.ADD;
839: RAISE fnd_api.g_exc_unexpected_error;
840: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
841: fnd_message.set_name('WMS', 'WMS_TD_MO_ERROR');
842: fnd_msg_pub.ADD;
843: RAISE fnd_api.g_exc_error;
844: END IF;
845:
846: /* Get header and line ids */
907: mydebug('create_mo: UnexpError In CG');
908: END IF;
909:
910: fnd_message.set_name('WMS', 'WMS_TD_CG_ERROR');
911: fnd_msg_pub.ADD;
912: RAISE fnd_api.g_exc_unexpected_error;
913: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
914: IF (l_debug = 1) THEN
915: mydebug('create_mo: Error In CG');
915: mydebug('create_mo: Error In CG');
916: END IF;
917:
918: fnd_message.set_name('WMS', 'WMS_TD_CG_ERROR');
919: fnd_msg_pub.ADD;
920: RAISE fnd_api.g_exc_error;
921: END IF;
922: END IF;
923: ELSE
954: );
955:
956: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
957: fnd_message.set_name('WMS', 'WMS_TD_MO_ERROR');
958: fnd_msg_pub.ADD;
959: RAISE fnd_api.g_exc_unexpected_error;
960: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
961: fnd_message.set_name('WMS', 'WMS_TD_MO_ERROR');
962: fnd_msg_pub.ADD;
958: fnd_msg_pub.ADD;
959: RAISE fnd_api.g_exc_unexpected_error;
960: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
961: fnd_message.set_name('WMS', 'WMS_TD_MO_ERROR');
962: fnd_msg_pub.ADD;
963: RAISE fnd_api.g_exc_error;
964: END IF;
965: END IF;
966:
967: x_return_status := fnd_api.g_ret_sts_success;
968: EXCEPTION
969: WHEN fnd_api.g_exc_error THEN
970: x_return_status := fnd_api.g_ret_sts_error;
971: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
972: WHEN OTHERS THEN
973: x_return_status := fnd_api.g_ret_sts_unexp_error;
974:
975: IF SQLCODE IS NOT NULL THEN
975: IF SQLCODE IS NOT NULL THEN
976: inv_mobile_helper_functions.sql_error('WMS_Task_Dispatch_put_away.create_mo', '10', SQLCODE);
977: END IF;
978:
979: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
980: END create_mo;
981:
982: -- added for bug 3401817
983: -- An autonomous_transaction wrapper arount wms_putaway_suggestions.cleanup_suggestions
1379: mydebug('suggestions_pub: Not an INV LPN');
1380: END IF;
1381:
1382: fnd_message.set_name('WMS', 'WMS_MO_NOT_FOUND');
1383: fnd_msg_pub.ADD;
1384: RAISE fnd_api.g_exc_error;
1385: END IF;
1386: END IF; -- (l_rcount=0) -- fixed in ATF
1387:
1618: , p_sec_uom => l_sec_uom -- Added for OPM Convergance
1619: );
1620: -- bug fix 2271470
1621: l_m_hdr := NULL;
1622: fnd_msg_pub.count_and_get(p_count => l_msg_count, p_data => l_msg_data);
1623:
1624: IF (l_msg_count = 0) THEN
1625: IF (l_debug = 1) THEN
1626: mydebug('suggestions_pub: Successful');
1635: mydebug('suggestions_pub: Not Successful2');
1636: END IF;
1637:
1638: FOR i IN 1 .. l_msg_count LOOP
1639: l_msg_data := fnd_msg_pub.get(i, 'F');
1640:
1641: IF (l_debug = 1) THEN
1642: mydebug('suggestions_pub: ' || REPLACE(l_msg_data, fnd_global.local_chr(0), ' '));
1643: END IF;
1645: END IF;
1646:
1647: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
1648: fnd_message.set_name('WMS', 'WMS_TD_CMO_ERROR');
1649: fnd_msg_pub.ADD;
1650: RAISE fnd_api.g_exc_error;
1651: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
1652: fnd_message.set_name('WMS', 'WMS_TD_CMO_ERROR');
1653: fnd_msg_pub.ADD;
1649: fnd_msg_pub.ADD;
1650: RAISE fnd_api.g_exc_error;
1651: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
1652: fnd_message.set_name('WMS', 'WMS_TD_CMO_ERROR');
1653: fnd_msg_pub.ADD;
1654: RAISE fnd_api.g_exc_error;
1655: END IF;
1656:
1657: IF (l_debug = 1) THEN
2005:
2006: -- 13995073 starts
2007:
2008: fnd_message.set_name('WMS', 'WMS_MOL_WLC_QTY_MISMATCH');
2009: fnd_msg_pub.add;
2010: RAISE fnd_api.g_exc_error;
2011: END IF; -- IF l_wlc_mol_missmatch_flag = 'Y'
2012: --13995073 ends
2013:
2072: mydebug('suggestions_pub: Finished calling crossdock API');
2073: END IF;
2074:
2075: -- See if there are any error messages returned from the API
2076: fnd_msg_pub.count_and_get(p_count => l_msg_count, p_data => l_msg_data);
2077:
2078: IF (l_msg_count = 0) THEN
2079: IF (l_debug = 1) THEN
2080: mydebug('suggestions_pub: Successful');
2089: mydebug('suggestions_pub: Not Successful2');
2090: END IF;
2091:
2092: FOR i IN 1 .. l_msg_count LOOP
2093: l_msg_data := fnd_msg_pub.get(i, 'F');
2094:
2095: IF (l_debug = 1) THEN
2096: mydebug('suggestions_pub: ' || REPLACE(l_msg_data, fnd_global.local_chr(0), ' '));
2097: END IF;
2232: , p_reservations => l_mtl_reservation
2233: , p_suggest_serial => l_serial_flag
2234: , p_quick_pick_flag => l_quick_pick_flag
2235: );
2236: -- fnd_msg_pub.count_and_get(p_count => l_msg_count, p_data => l_msg_data);
2237:
2238: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
2239: IF (l_debug = 1) THEN
2240: mydebug('suggestions_pub: unexpected error in inv_ppengine_pvt.create_suggestions');
2240: mydebug('suggestions_pub: unexpected error in inv_ppengine_pvt.create_suggestions');
2241: END IF;
2242:
2243: fnd_message.set_name('WMS', 'WMS_ALLOCATE_FAIL');
2244: fnd_msg_pub.ADD;
2245: RAISE fnd_api.g_exc_error;
2246: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
2247: IF (l_debug = 1) THEN
2248: mydebug('suggestions_pub: expected error in inv_ppengine_pvt.create_suggestions');
2248: mydebug('suggestions_pub: expected error in inv_ppengine_pvt.create_suggestions');
2249: END IF;
2250:
2251: fnd_message.set_name('WMS', 'WMS_ALLOCATE_FAIL');
2252: fnd_msg_pub.ADD;
2253: RAISE fnd_api.g_exc_error;
2254: END IF;
2255:
2256: IF (l_debug = 1) THEN
2349: -- doesn't seem to be a valid seeded message.
2350: --ROLLBACK TO mtl_stat_chk;
2351: --FND_MESSAGE.SET_NAME('INV', 'INV_INVALID_STATUS');
2352: fnd_message.set_name('WMS', 'WMS_INVALID_LPN_ITEM_STATUS');
2353: fnd_msg_pub.ADD;
2354: RAISE fnd_api.g_exc_error;
2355: END IF;
2356:
2357: /* nsinghi - GME-WMS Integration. Added the following select stmt to determine if Process Org.
2532: -- Bug# 2744186
2533: -- Perform a rollback in the exception blocks
2534: ROLLBACK TO suggestions_pub_sp;
2535: x_return_status := fnd_api.g_ret_sts_error;
2536: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2537:
2538: IF (l_debug = 1) THEN
2539: mydebug('suggestions_pub: Excecution error - ' || SQLERRM);
2540: END IF;
2556: END IF;
2557: WHEN fnd_api.g_exc_unexpected_error THEN
2558: ROLLBACK TO suggestions_pub_sp;
2559: x_return_status := fnd_api.g_ret_sts_unexp_error;
2560: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2561:
2562: IF (l_debug = 1) THEN
2563: mydebug('suggestions_pub: Unexpected error - ' || SQLERRM);
2564: END IF;
2580: END IF;
2581: WHEN OTHERS THEN
2582: ROLLBACK TO suggestions_pub_sp;
2583: x_return_status := fnd_api.g_ret_sts_unexp_error;
2584: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2585:
2586: IF (l_debug = 1) THEN
2587: mydebug('suggestions_pub: Others exception - ' || SQLERRM);
2588: END IF;
3194: , p_secondary_quantity => p_secondary_quantity --OPM Convergence
3195: );
3196:
3197: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3198: fnd_msg_pub.count_and_get(p_count => l_msg_count, p_data => l_msg_data);
3199: IF (l_debug = 1) THEN
3200: mydebug('insert_mtli_helper: Error occurred while creating interface lots: ' || l_msg_data);
3201: END IF;
3202: RETURN FALSE;
3263: , p_att_exist => l_yes
3264: , p_update_msn => l_no);
3265:
3266: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
3267: fnd_msg_pub.count_and_get(p_count => l_msg_count, p_data => l_msg_data);
3268: IF (l_debug = 1) THEN
3269: mydebug('insert_msni_helper: Error occurred while creating interface serials: ' || l_msg_data);
3270: END IF;
3271: RETURN FALSE;
3310: err_code => l_errCode,
3311: err_msg => l_errMsg);
3312: IF(l_cst_ret <> 1) THEN
3313: fnd_message.set_name('BOM', 'CST_SNAPSHOT_FAILED');
3314: fnd_msg_pub.ADD;
3315: IF (l_debug = 1) THEN
3316: mydebug('complete_putaway: Error from CSTACOSN.op_snapshot ');
3317: END IF;
3318: raise fnd_api.g_exc_unexpected_error;
3994: IF (l_debug = 1) THEN
3995: mydebug('complete_putaway: Current release is above J. Disallow 0 quantity.');
3996: END IF;
3997: fnd_message.set_name('INV', 'INV_QTY_MUST_EXCEED_ZERO');
3998: fnd_msg_pub.ADD;
3999:
4000: RAISE fnd_api.g_exc_error;
4001: END IF; --IF l_qty <= 0 THEN
4002:
4117: , p_source => 1
4118: , p_cost_group_id => NULL
4119: , x_lpn_id => l_to_lpn_id
4120: );
4121: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
4122:
4123: IF (x_msg_count = 0) THEN
4124: IF (l_debug = 1) THEN
4125: mydebug('complete_putaway: Successful');
4134: mydebug('complete_putaway: Not Successful2');
4135: END IF;
4136:
4137: FOR i IN 1 .. x_msg_count LOOP
4138: x_msg_data := fnd_msg_pub.get(i, 'F');
4139:
4140: IF (l_debug = 1) THEN
4141: mydebug('complete_putaway: ' || REPLACE(x_msg_data, fnd_global.local_chr(0), ' '));
4142: END IF;
4144: END IF;
4145:
4146: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
4147: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
4148: fnd_msg_pub.ADD;
4149: RAISE fnd_api.g_exc_unexpected_error;
4150: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
4151: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
4152: fnd_msg_pub.ADD;
4148: fnd_msg_pub.ADD;
4149: RAISE fnd_api.g_exc_unexpected_error;
4150: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
4151: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
4152: fnd_msg_pub.ADD;
4153: RAISE fnd_api.g_exc_error;
4154: END IF;
4155: ELSE
4156: -- LPN exists. Get LPN ID
5012: );
5013:
5014: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
5015: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
5016: fnd_msg_pub.ADD;
5017: RAISE fnd_api.g_exc_unexpected_error;
5018: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
5019: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
5020: fnd_msg_pub.ADD;
5016: fnd_msg_pub.ADD;
5017: RAISE fnd_api.g_exc_unexpected_error;
5018: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
5019: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
5020: fnd_msg_pub.ADD;
5021: RAISE fnd_api.g_exc_error;
5022: END IF;
5023: END IF;
5024:
5053: );
5054:
5055: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
5056: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
5057: fnd_msg_pub.ADD;
5058: RAISE fnd_api.g_exc_unexpected_error;
5059: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
5060: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
5061: fnd_msg_pub.ADD;
5057: fnd_msg_pub.ADD;
5058: RAISE fnd_api.g_exc_unexpected_error;
5059: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
5060: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
5061: fnd_msg_pub.ADD;
5062: RAISE fnd_api.g_exc_error;
5063: END IF;
5064: END IF;
5065:
5192: mydebug('complete_putaway : Error callinf WF wrapper');
5193: END IF;
5194:
5195: fnd_message.set_name('WMS', 'WMS_WORK_FLOW_FAIL');
5196: fnd_msg_pub.ADD;
5197: RAISE fnd_api.g_exc_unexpected_error;
5198: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
5199: IF (l_debug = 1) THEN
5200: mydebug('complete_putaway : Error calling WF wrapper');
5200: mydebug('complete_putaway : Error calling WF wrapper');
5201: END IF;
5202:
5203: fnd_message.set_name('WMS', 'WMS_WORK_FLOW_FAIL');
5204: fnd_msg_pub.ADD;
5205: RAISE fnd_api.g_exc_error;
5206: END IF;
5207: END IF;
5208: END IF;
5274: mydebug('complete_putaway : Error callinf WF wrapper');
5275: END IF;
5276:
5277: fnd_message.set_name('WMS', 'WMS_WORK_FLOW_FAIL');
5278: fnd_msg_pub.ADD;
5279: RAISE fnd_api.g_exc_unexpected_error;
5280: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
5281: IF (l_debug = 1) THEN
5282: mydebug('complete_putaway : Error calling WF wrapper');
5282: mydebug('complete_putaway : Error calling WF wrapper');
5283: END IF;
5284:
5285: fnd_message.set_name('WMS', 'WMS_WORK_FLOW_FAIL');
5286: fnd_msg_pub.ADD;
5287: RAISE fnd_api.g_exc_error;
5288: END IF;
5289: END IF;--END IF l_wf > 0 THEN
5290: END IF; -- END IF IF (( l_wf_process IS NOT NULL AND l_wf_process <> 'WMS_N_STEP_PUTAWAY') OR l_operation_plan_id IS NULL)
5329: , p_subinventory_code => p_sub);
5330:
5331: IF (l_drop_sub_type < 0) THEN
5332: fnd_message.set_name('WMS', 'WMS_TASK_ERROR');
5333: fnd_msg_pub.add;
5334: IF (l_debug = 1) THEN
5335: mydebug('complete_putaway: Error fetching drop subinventory type');
5336: END IF;
5337: RAISE fnd_api.g_exc_error;
5384: END IF;
5385:
5386: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
5387: fnd_message.set_name('WMS', 'WMS_TD_DEL_ERROR');
5388: fnd_msg_pub.ADD;
5389: RAISE fnd_api.g_exc_unexpected_error;
5390: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
5391: fnd_message.set_name('WMS', 'WMS_TD_DEL_ERROR');
5392: fnd_msg_pub.ADD;
5388: fnd_msg_pub.ADD;
5389: RAISE fnd_api.g_exc_unexpected_error;
5390: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
5391: fnd_message.set_name('WMS', 'WMS_TD_DEL_ERROR');
5392: fnd_msg_pub.ADD;
5393: RAISE fnd_api.g_exc_error;
5394: END IF;
5395: --Receiving subinventory - Call Transfer API
5396: ELSE
5431: END IF;
5432:
5433: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
5434: fnd_message.set_name('WMS', 'WMS_TASK_ERROR');
5435: fnd_msg_pub.ADD;
5436: RAISE fnd_api.g_exc_unexpected_error;
5437: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
5438: fnd_message.set_name('WMS', 'WMS_TASK_ERROR');
5439: fnd_msg_pub.ADD;
5435: fnd_msg_pub.ADD;
5436: RAISE fnd_api.g_exc_unexpected_error;
5437: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
5438: fnd_message.set_name('WMS', 'WMS_TASK_ERROR');
5439: fnd_msg_pub.ADD;
5440: RAISE fnd_api.g_exc_error;
5441: END IF;
5442: END IF; --END IF check sub type to call the corresponding API
5443: --14487832
5540: open_past_period => l_open_past_period);
5541:
5542: IF l_acct_period_id <= 0 THEN
5543: fnd_message.set_name('INV', 'INV_NO_OPEN_PERIOD');
5544: fnd_msg_pub.ADD;
5545: RAISE fnd_api.g_exc_unexpected_error;
5546: END IF;
5547: --End of changes for bug 5403420
5548:
5665: mydebug('complete_putaway : Error callinf WF wrapper');
5666: END IF;
5667:
5668: fnd_message.set_name('WMS', 'WMS_WORK_FLOW_FAIL');
5669: fnd_msg_pub.ADD;
5670: RAISE fnd_api.g_exc_unexpected_error;
5671: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
5672: IF (l_debug = 1) THEN
5673: mydebug('complete_putaway : Error calling WF wrapper');
5673: mydebug('complete_putaway : Error calling WF wrapper');
5674: END IF;
5675:
5676: fnd_message.set_name('WMS', 'WMS_WORK_FLOW_FAIL');
5677: fnd_msg_pub.ADD;
5678: RAISE fnd_api.g_exc_error;
5679: END IF;
5680: END IF; --IF l_wf > 0 THEN
5681: END IF;--IF (p_qty_reason_id > 0) THEN
5759: mydebug('complete_putaway : Error callinf WF wrapper');
5760: END IF;
5761:
5762: fnd_message.set_name('WMS', 'WMS_WORK_FLOW_FAIL');
5763: fnd_msg_pub.ADD;
5764: RAISE fnd_api.g_exc_unexpected_error;
5765: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
5766: IF (l_debug = 1) THEN
5767: mydebug('complete_putaway : Error calling WF wrapper');
5767: mydebug('complete_putaway : Error calling WF wrapper');
5768: END IF;
5769:
5770: fnd_message.set_name('WMS', 'WMS_WORK_FLOW_FAIL');
5771: fnd_msg_pub.ADD;
5772: RAISE fnd_api.g_exc_error;
5773: END IF;
5774: END IF;--END IF l_wf > 0 THEN
5775: END IF; --IF (( l_wf_process IS NOT NULL AND l_wf_process <> 'WMS_N_STEP_PUTAWAY') OR l_operation_plan_id IS NULL) THEN
5882: -- Bug# 2744170
5883: -- Perform a rollback in the exception blocks
5884: ROLLBACK TO complete_putaway_sp;
5885: x_return_status := fnd_api.g_ret_sts_error;
5886: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
5887: IF ser_csr%ISOPEN THEN
5888: CLOSE ser_csr;
5889: END IF;
5890: -- ER 7307189 changes start
5901: WHEN OTHERS THEN
5902:
5903: ROLLBACK TO complete_putaway_sp;
5904: x_return_status := fnd_api.g_ret_sts_unexp_error;
5905: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
5906: IF ser_csr%ISOPEN THEN
5907: CLOSE ser_csr;
5908: END IF;
5909: -- ER 7307189 changes start
6116: IF (l_debug = 1) THEN
6117: mydebug('check_lpn_validity: LPN does not belong to ' || l_org_id || ' organization');
6118: END IF;
6119: fnd_message.set_name('INV', 'INV_NO_RESULT_FOUND');
6120: fnd_msg_pub.ADD;
6121: RAISE fnd_api.g_exc_unexpected_error;
6122: END;
6123:
6124: mydebug('check_lpn_validity: LPN Context' || l_lpn_context);
6169:
6170: END IF;
6171:
6172: fnd_message.set_name('INV', 'INVALID LPN');
6173: fnd_msg_pub.ADD;
6174: RAISE fnd_api.g_exc_unexpected_error;
6175: END IF ;
6176: END IF ;
6177:
6194: mydebug('check_lpn_validity: LPN does not belong to ' || l_org_id || ' organization');
6195: END IF;
6196:
6197: fnd_message.set_name('INV', 'INV_NO_RESULT_FOUND');
6198: fnd_msg_pub.ADD;
6199: RAISE fnd_api.g_exc_unexpected_error;
6200: WHEN record_locked THEN
6201: IF (l_debug = 1) THEN
6202: mydebug('check_lpn_validity: LPN not available. locked by someone else');
6202: mydebug('check_lpn_validity: LPN not available. locked by someone else');
6203: END IF;
6204:
6205: fnd_message.set_name('WMS', 'WMS_LPN_UNAVAIL');
6206: fnd_msg_pub.ADD;
6207: RAISE fnd_api.g_exc_unexpected_error;
6208: END;
6209: END IF;
6210:
6527: END IF;
6528:
6529: x_ret := 3;
6530: fnd_message.set_name('WMS', 'WMS_LPN_UNAVAIL');
6531: fnd_msg_pub.ADD;
6532: RAISE fnd_api.g_exc_unexpected_error;
6533: END IF;
6534: END IF;
6535: END IF;
6541: x_return_status := fnd_api.g_ret_sts_success;
6542: EXCEPTION
6543: WHEN OTHERS THEN
6544: x_return_status := fnd_api.g_ret_sts_unexp_error;
6545: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6546: END check_lpn_validity;
6547:
6548: PROCEDURE archive_task(
6549: p_temp_id IN NUMBER
6661: EXCEPTION
6662: WHEN OTHERS THEN
6663: x_return_status := fnd_api.g_ret_sts_error;
6664: fnd_message.set_name('WMS', 'WMS_TD_AT_FAIL');
6665: fnd_msg_pub.ADD;
6666: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6667: END archive_task;
6668:
6669: PROCEDURE archive_task(
6662: WHEN OTHERS THEN
6663: x_return_status := fnd_api.g_ret_sts_error;
6664: fnd_message.set_name('WMS', 'WMS_TD_AT_FAIL');
6665: fnd_msg_pub.ADD;
6666: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6667: END archive_task;
6668:
6669: PROCEDURE archive_task(
6670: p_temp_id IN NUMBER
6795: END IF;
6796:
6797: x_return_status := fnd_api.g_ret_sts_error;
6798: fnd_message.set_name('WMS', 'WMS_TD_AT_FAIL');
6799: fnd_msg_pub.ADD;
6800: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6801: END archive_task;
6802:
6803: PROCEDURE putaway_cleanup(
6796:
6797: x_return_status := fnd_api.g_ret_sts_error;
6798: fnd_message.set_name('WMS', 'WMS_TD_AT_FAIL');
6799: fnd_msg_pub.ADD;
6800: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6801: END archive_task;
6802:
6803: PROCEDURE putaway_cleanup(
6804: p_temp_id IN NUMBER
7099: EXCEPTION
7100: WHEN OTHERS THEN
7101: x_return_status := fnd_api.g_ret_sts_error;
7102: fnd_message.set_name('WMS', 'WMS_TD_PUT_CLEAN_FAIL');
7103: fnd_msg_pub.ADD;
7104: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7105: END putaway_cleanup;
7106:
7107: PROCEDURE validate_putaway_to_lpn(
7100: WHEN OTHERS THEN
7101: x_return_status := fnd_api.g_ret_sts_error;
7102: fnd_message.set_name('WMS', 'WMS_TD_PUT_CLEAN_FAIL');
7103: fnd_msg_pub.ADD;
7104: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7105: END putaway_cleanup;
7106:
7107: PROCEDURE validate_putaway_to_lpn(
7108: p_org_id IN NUMBER
7167: );
7168:
7169: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
7170: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
7171: fnd_msg_pub.ADD;
7172: RAISE fnd_api.g_exc_unexpected_error;
7173: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
7174: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
7175: fnd_msg_pub.ADD;
7171: fnd_msg_pub.ADD;
7172: RAISE fnd_api.g_exc_unexpected_error;
7173: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
7174: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
7175: fnd_msg_pub.ADD;
7176: RAISE fnd_api.g_exc_error;
7177: END IF;
7178:
7179: x_return := 1;
7419: END IF;
7420:
7421: x_return_status := fnd_api.g_ret_sts_error;
7422: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LPN');
7423: fnd_msg_pub.ADD;
7424: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7425: END validate_putaway_to_lpn;
7426:
7427: /* This API will check the status of the mmtt lines
7420:
7421: x_return_status := fnd_api.g_ret_sts_error;
7422: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LPN');
7423: fnd_msg_pub.ADD;
7424: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7425: END validate_putaway_to_lpn;
7426:
7427: /* This API will check the status of the mmtt lines
7428: This will be called from the suggestions_api, as part of the putaway
7876: p_sec_uom => l_m_sec_uom --BUG12796808
7877: );
7878:
7879: l_m_hdr := NULL;
7880: fnd_msg_pub.count_and_get(p_count => l_msg_count, p_data => l_msg_data);
7881:
7882: IF (l_msg_count = 0) THEN
7883: IF (l_debug = 1) THEN
7884: mydebug('create_mo_lpn: Successful');
7893: mydebug('create_mo_lpn: Not Successful2');
7894: END IF;
7895:
7896: FOR i IN 1 .. l_msg_count LOOP
7897: l_msg_data := fnd_msg_pub.get(i, 'F');
7898:
7899: IF (l_debug = 1) THEN
7900: mydebug('create_mo_lpn: ' || REPLACE(l_msg_data, fnd_global.local_chr(0), ' '));
7901: END IF;
7903: END IF;
7904:
7905: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
7906: fnd_message.set_name('WMS', 'WMS_TD_CMO_ERROR');
7907: fnd_msg_pub.ADD;
7908: RAISE fnd_api.g_exc_error;
7909: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
7910: fnd_message.set_name('WMS', 'WMS_TD_CMO_ERROR');
7911: fnd_msg_pub.ADD;
7907: fnd_msg_pub.ADD;
7908: RAISE fnd_api.g_exc_error;
7909: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
7910: fnd_message.set_name('WMS', 'WMS_TD_CMO_ERROR');
7911: fnd_msg_pub.ADD;
7912: RAISE fnd_api.g_exc_error;
7913: END IF;
7914:
7915: IF (l_debug = 1) THEN
7925:
7926: EXCEPTION
7927: WHEN fnd_api.g_exc_error THEN
7928: x_return_status := fnd_api.g_ret_sts_error;
7929: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7930: WHEN OTHERS THEN
7931: x_return_status := fnd_api.g_ret_sts_unexp_error;
7932: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7933: END create_mo_lpn;
7928: x_return_status := fnd_api.g_ret_sts_error;
7929: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7930: WHEN OTHERS THEN
7931: x_return_status := fnd_api.g_ret_sts_unexp_error;
7932: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7933: END create_mo_lpn;
7934:
7935:
7936: PROCEDURE validate_against_rules(
8343: WHEN fnd_api.g_exc_error THEN
8344: ROLLBACK TO validate_rules_sp;
8345: x_validation_passed := 'N';
8346: x_return_status := fnd_api.g_ret_sts_error;
8347: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8348:
8349: IF (l_debug = 1) THEN
8350: mydebug('Exiting validate_against_rules - Execution error: ' || l_progress || ' '
8351: || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'));
8353: WHEN fnd_api.g_exc_unexpected_error THEN
8354: ROLLBACK TO validate_rules_sp;
8355: x_validation_passed := 'N';
8356: x_return_status := fnd_api.g_ret_sts_unexp_error;
8357: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8358:
8359: IF (l_debug = 1) THEN
8360: mydebug('Exiting validate_against_rules - Unexpected error: ' || l_progress || ' '
8361: || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'));
8364: ROLLBACK TO validate_rules_sp;
8365: x_validation_passed := 'N';
8366: x_return_status := fnd_api.g_ret_sts_unexp_error;
8367:
8368: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
8369: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
8370: END IF;
8371:
8372: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8365: x_validation_passed := 'N';
8366: x_return_status := fnd_api.g_ret_sts_unexp_error;
8367:
8368: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
8369: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
8370: END IF;
8371:
8372: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8373:
8368: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
8369: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
8370: END IF;
8371:
8372: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8373:
8374: IF (l_debug = 1) THEN
8375: mydebug('Exiting validate_against_rules - Others exception: ' || l_progress || ' '
8376: || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'));
8974: EXCEPTION
8975: WHEN fnd_api.g_exc_error THEN
8976: ROLLBACK TO create_suggestions_sp;
8977: x_return_status := fnd_api.g_ret_sts_error;
8978: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8979:
8980: IF (l_debug = 1) THEN
8981: mydebug('Exiting create_user_suggestions - Execution error: ' || l_progress || ' '
8982: || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'));
8983: END IF;
8984: WHEN fnd_api.g_exc_unexpected_error THEN
8985: ROLLBACK TO create_suggestions_sp;
8986: x_return_status := fnd_api.g_ret_sts_unexp_error;
8987: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8988:
8989: IF (l_debug = 1) THEN
8990: mydebug('Exiting create_user_suggestions - Unexpected error: ' || l_progress || ' '
8991: || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'));
8993: WHEN OTHERS THEN
8994: ROLLBACK TO create_suggestions_sp;
8995: x_return_status := fnd_api.g_ret_sts_unexp_error;
8996:
8997: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
8998: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
8999: END IF;
9000:
9001: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8994: ROLLBACK TO create_suggestions_sp;
8995: x_return_status := fnd_api.g_ret_sts_unexp_error;
8996:
8997: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
8998: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
8999: END IF;
9000:
9001: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9002:
8997: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
8998: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
8999: END IF;
9000:
9001: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9002:
9003: IF (l_debug = 1) THEN
9004: mydebug('Exiting create_user_suggestions - Others exception: ' || l_progress || ' '
9005: || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'));
9205: WHEN fnd_api.g_exc_error THEN
9206: ROLLBACK TO validate_status_sp;
9207: x_validation_passed := 'N';
9208: x_return_status := fnd_api.g_ret_sts_error;
9209: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9210:
9211: IF (l_debug = 1) THEN
9212: mydebug('Exiting validate_lot_serial_status - Execution error: ' || l_progress || ' '
9213: || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'));
9215: WHEN fnd_api.g_exc_unexpected_error THEN
9216: ROLLBACK TO validate_status_sp;
9217: x_validation_passed := 'N';
9218: x_return_status := fnd_api.g_ret_sts_unexp_error;
9219: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9220:
9221: IF (l_debug = 1) THEN
9222: mydebug('Exiting validate_lot_serial_status - Unexpected error: ' || l_progress || ' '
9223: || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'));
9226: ROLLBACK TO validate_status_sp;
9227: x_validation_passed := 'N';
9228: x_return_status := fnd_api.g_ret_sts_unexp_error;
9229:
9230: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
9231: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
9232: END IF;
9233:
9234: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9227: x_validation_passed := 'N';
9228: x_return_status := fnd_api.g_ret_sts_unexp_error;
9229:
9230: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
9231: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
9232: END IF;
9233:
9234: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9235:
9230: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
9231: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
9232: END IF;
9233:
9234: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9235:
9236: IF (l_debug = 1) THEN
9237: mydebug('Exiting validate_lot_serial_status - Others exception: ' || l_progress || ' '
9238: || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'));
9386: EXCEPTION
9387: WHEN fnd_api.g_exc_error THEN
9388: ROLLBACK TO revert_capacity_sp;
9389: x_return_status := fnd_api.g_ret_sts_error;
9390: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9391:
9392: IF (l_debug = 1) THEN
9393: mydebug(
9394: 'Exiting revert_loc_suggested_capacity - Execution error: ' || l_progress || ' '
9397: END IF;
9398: WHEN fnd_api.g_exc_unexpected_error THEN
9399: ROLLBACK TO revert_capacity_sp;
9400: x_return_status := fnd_api.g_ret_sts_unexp_error;
9401: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9402:
9403: IF (l_debug = 1) THEN
9404: mydebug(
9405: 'Exiting revert_loc_suggested_capacity - Unexpected error: ' || l_progress || ' '
9409: WHEN OTHERS THEN
9410: ROLLBACK TO revert_capacity_sp;
9411: x_return_status := fnd_api.g_ret_sts_unexp_error;
9412:
9413: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
9414: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
9415: END IF;
9416:
9417: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9410: ROLLBACK TO revert_capacity_sp;
9411: x_return_status := fnd_api.g_ret_sts_unexp_error;
9412:
9413: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
9414: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
9415: END IF;
9416:
9417: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9418:
9413: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
9414: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
9415: END IF;
9416:
9417: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9418:
9419: IF (l_debug = 1) THEN
9420: mydebug(
9421: 'Exiting revert_loc_suggested_capacity - Others exception: ' || l_progress || ' '
9501: END IF;
9502:
9503: l_progress := '30';
9504: -- See if there are any error messages returned from the API
9505: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9506:
9507: IF (x_msg_count = 0) THEN
9508: IF (l_debug = 1) THEN
9509: mydebug('Successful');
9518: mydebug('Not Successful2');
9519: END IF;
9520:
9521: FOR i IN 1 .. x_msg_count LOOP
9522: x_msg_data := fnd_msg_pub.get(i, 'F');
9523:
9524: IF (l_debug = 1) THEN
9525: mydebug('Error messages: ' || REPLACE(x_msg_data, fnd_global.local_chr(0), ' '));
9526: END IF;
9585: WHEN fnd_api.g_exc_error THEN
9586: ROLLBACK TO check_crossdock_sp;
9587: x_crossdock := 'N';
9588: x_return_status := fnd_api.g_ret_sts_error;
9589: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9590:
9591: IF (l_debug = 1) THEN
9592: mydebug('Exiting check_for_crossdock - Execution error: ' ||
9593: l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'));
9595: WHEN fnd_api.g_exc_unexpected_error THEN
9596: ROLLBACK TO check_crossdock_sp;
9597: x_crossdock := 'N';
9598: x_return_status := fnd_api.g_ret_sts_unexp_error;
9599: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9600:
9601: IF (l_debug = 1) THEN
9602: mydebug('Exiting check_for_crossdock - Unexpected error: ' ||
9603: l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'));
9606: ROLLBACK TO check_crossdock_sp;
9607: x_crossdock := 'N';
9608: x_return_status := fnd_api.g_ret_sts_unexp_error;
9609:
9610: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
9611: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
9612: END IF;
9613:
9614: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9607: x_crossdock := 'N';
9608: x_return_status := fnd_api.g_ret_sts_unexp_error;
9609:
9610: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
9611: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
9612: END IF;
9613:
9614: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9615:
9610: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
9611: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
9612: END IF;
9613:
9614: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
9615:
9616: IF (l_debug = 1) THEN
9617: mydebug('Exiting check_for_crossdock - Others exception: ' ||
9618: l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'));