[Home] [Help]
480: END IF;
481:
482: IF p_lot_controlled <> 'Y' AND p_serial_controlled <> 'Y' THEN -- No Lot or serial control
483: fnd_message.set_token('ROUTINE', '- proc_insert_update_task' );
484: fnd_msg_pub.ADD;
485: l_primary_quantity := Round(p_transaction_quantity/l_conversion_factor, l_g_decimal_precision);
486: l_secondary_quantity := p_secondary_quantity;
487: ELSE
488: proc_parse_lot_serial_catchwt
514: -- Internal Error $ROUTINE
515: fnd_message.set_token('ROUTINE', ' - proc_parse_lot_serial_catchwt API ' );
516: mydebug('Error parsing lot/serial/catch weight string' );
517: -- "Error reserving Serial Number/s"
518: fnd_msg_pub.ADD;
519: RAISE fnd_api.g_exc_error;
520: END IF;
521:
522: IF p_lot_controlled = 'Y' AND p_serial_controlled <> 'Y' THEN -- Lot Controlled only
1161:
1162: EXCEPTION
1163: WHEN fnd_api.g_exc_error THEN
1164: x_return_status := l_g_ret_sts_error;
1165: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1166:
1167: IF (l_debug = 1) THEN
1168: mydebug('Error', 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1169: END IF;
1170: ROLLBACK;
1171:
1172: WHEN OTHERS THEN
1173: x_return_status := l_g_ret_sts_unexp_error;
1174: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1175: IF (l_debug = 1) THEN
1176: mydebug('Error: ' || Sqlerrm, 'WMS_TASK_LOAD.UPDATE_LOADED_PART');
1177: END IF;
1178: ROLLBACK ;
1397: IF x_cms_check = 'FAIL'
1398: THEN
1399: --fnd_message.set_name('WMS', 'WMS_CANCELLED_SOURCE');
1400: -- Source of the task is cancelled by source.. F2 to rollback
1401: --fnd_msg_pub.ADD;
1402: RAISE fnd_api.g_exc_error;
1403: END IF;
1404: END IF;
1405:
1433: IF SQL%NOTFOUND THEN
1434: mydebug ('Cannot find LPNs to update the context' );
1435: fnd_message.set_name('WMS', 'WMS_WRONG_FROM_LPN_CONTEXT');
1436: -- FROM LPN Context is not valid '
1437: fnd_msg_pub.ADD;
1438: RAISE fnd_api.g_exc_error;
1439:
1440: END IF;
1441: EXCEPTION
1457: IF SQL%NOTFOUND THEN
1458: mydebug ('Cannot find LPNs to update the context' );
1459: fnd_message.set_name('WMS', 'WMS_WRONG_FROM_LPN_CONTEXT');
1460: -- FROM LPN Context is not valid '
1461: fnd_msg_pub.ADD;
1462: RAISE fnd_api.g_exc_error;
1463:
1464: END IF;
1465: EXCEPTION
1493: IF SQL%NOTFOUND THEN
1494: mydebug ('Cannot find LPNs to update the context' );
1495: fnd_message.set_name('WMS', 'WMS_WRONG_TO_LPN_CONTEXT');
1496: -- To LPN Context is not valid
1497: fnd_msg_pub.ADD;
1498:
1499: RAISE fnd_api.g_exc_error;
1500: END IF;
1501: EXCEPTION
1637: mydebug('End .. ' || l_proc_name);
1638: EXCEPTION
1639: WHEN fnd_api.g_exc_error THEN
1640: x_return_status := l_g_ret_sts_error;
1641: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1642: mydebug('ROLLBACK ' );
1643: ROLLBACK ;
1644: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
1645: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
1645: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
1646: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
1647: WHEN fnd_api.g_exc_unexpected_error THEN
1648: x_return_status := fnd_api.g_ret_sts_unexp_error;
1649: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1650: mydebug('ROLLBACK ' );
1651: ROLLBACK ;
1652: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
1653: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
1653: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
1654: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
1655: WHEN OTHERS THEN
1656: x_return_status := l_g_ret_sts_unexp_error;
1657: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1658: mydebug('ROLLBACK ' );
1659: ROLLBACK ;
1660: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
1661: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
1795: myDebug('Error inserting a new task using WDT record for : '|| p_temp_id);
1796: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR'); --NEWMSG
1797: -- Internal Error $ROUTINE
1798: fnd_message.set_token('ROUTINE', '- proc_insert_update_task' );
1799: fnd_msg_pub.ADD;
1800: RAISE fnd_api.G_EXC_ERROR;
1801: END IF;
1802: ELSE
1803: l_progress := '200';
1821: myDebug('Error updating task for : '|| l_transaction_temp_id);
1822: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR'); --NEWMSG
1823: -- Internal Error $ROUTINE
1824: fnd_message.set_token('ROUTINE', '- proc_insert_update_task' );
1825: fnd_msg_pub.ADD;
1826: RAISE fnd_api.G_EXC_ERROR;
1827: END IF;
1828: IF p_update = 'Y2' AND p_action = l_g_action_load_multiple THEN
1829: fnd_message.set_token('ROUTINE', '- proc_insert_update_task' );
1826: RAISE fnd_api.G_EXC_ERROR;
1827: END IF;
1828: IF p_update = 'Y2' AND p_action = l_g_action_load_multiple THEN
1829: fnd_message.set_token('ROUTINE', '- proc_insert_update_task' );
1830: fnd_msg_pub.ADD;
1831: l_progress := '300';
1832: mydebug('l_progress: ' || l_progress );
1833: -- delete the original one with p_transaction_temp_id
1834: DELETE wms_dispatched_tasks
1837: myDebug('Error deleting task for : '|| l_transaction_temp_id);
1838: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR'); --NEWMSG
1839: -- Internal Error $ROUTINE
1840: fnd_message.set_token('ROUTINE', '- proc_insert_update_task' );
1841: fnd_msg_pub.ADD;
1842: RAISE fnd_api.G_EXC_ERROR;
1843: END IF;
1844: END IF;
1845:
1848: mydebug('End .. ' || l_proc_name);
1849: EXCEPTION
1850: WHEN fnd_api.g_exc_error THEN
1851: x_return_status := l_g_ret_sts_error;
1852: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1853: mydebug('ROLLBACK ' );
1854: ROLLBACK ;
1855: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
1856: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
1855: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
1856: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
1857: WHEN fnd_api.g_exc_unexpected_error THEN
1858: x_return_status := fnd_api.g_ret_sts_unexp_error;
1859: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1860: mydebug('ROLLBACK ' );
1861: ROLLBACK ;
1862: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
1863: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
1863: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
1864: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
1865: WHEN OTHERS THEN
1866: x_return_status := l_g_ret_sts_unexp_error;
1867: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1868: mydebug('ROLLBACK ' );
1869: ROLLBACK ;
1870: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
1871: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
2150:
2151: ELSE --Quantity tree errored out
2152: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
2153: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
2154: fnd_msg_pub.ADD;
2155: RAISE fnd_api.g_exc_error;
2156: END IF;--}
2157: ELSE --fulfillment base is 'P'
2158:
2335:
2336: ELSE --Quantity tree errored out
2337: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
2338: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
2339: fnd_msg_pub.ADD;
2340: RAISE fnd_api.g_exc_error;
2341: END IF;--}
2342: ELSE --fulfillment base is 'P'
2343: IF p_primary_uom <> p_confirmed_uom THEN
2384: EXCEPTION
2385: WHEN fnd_api.g_exc_error THEN
2386: mydebug('Expected Exception raised');
2387: x_return_status := fnd_api.g_ret_sts_error;
2388: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2389: mydebug(' ROLLBACK' );
2390: ROLLBACK ;
2391:
2392: WHEN OTHERS THEN
2390: ROLLBACK ;
2391:
2392: WHEN OTHERS THEN
2393: x_return_status := l_g_ret_sts_unexp_error;
2394: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2395: mydebug('ROLLBACK ' );
2396: ROLLBACK ;
2397: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
2398: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
3089: IF SQL%NOTFOUND THEN
3090: mydebug (' p_transaction_temp_id: NOT found : ' || p_transaction_temp_id);
3091: fnd_message.set_name('WMS', 'WMS_INSERT_ALLOCATION'); -- NEWMSG
3092: -- "Error Inserting Allocation ."
3093: fnd_msg_pub.ADD;
3094: RAISE fnd_api.G_EXC_ERROR;
3095: END IF;
3096: l_progress := '120';
3097: mydebug ('l_progress: ' || l_progress );
3173: IF x_return_status <> l_g_ret_sts_success THEN
3174: mydebug('proc_process_confirmed_lots.x_return_status : ' || x_return_status);
3175: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR');
3176: fnd_message.set_token('ROUTINE', '- proc_process_confirmed_lots API' );
3177: fnd_msg_pub.ADD;
3178: RAISE fnd_api.g_exc_error;
3179: END IF;
3180: mydebug ('Return from proc_process_confirmed_lots ' );
3181: END IF;
3219: mydebug('proc_process_confirmed_serials.x_return_status : ' || x_return_status);
3220: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR'); --NEWMSG
3221: -- Internal Error $ROUTINE
3222: fnd_message.set_token('ROUTINE', '- proc_process_confirmed_serials API' );
3223: fnd_msg_pub.ADD;
3224: RAISE fnd_api.g_exc_error;
3225: END IF;
3226: l_progress := '330';
3227: mydebug ('l_progress: ' || l_progress );
3402:
3403: EXCEPTION
3404: WHEN fnd_api.g_exc_error THEN
3405: x_return_status := l_g_ret_sts_error;
3406: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
3407: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
3408: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
3409: mydebug('ROLLBACK ' );
3410: ROLLBACK ;
3409: mydebug('ROLLBACK ' );
3410: ROLLBACK ;
3411: WHEN fnd_api.g_exc_unexpected_error THEN
3412: x_return_status := fnd_api.g_ret_sts_unexp_error;
3413: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
3414: mydebug('ROLLBACK ' );
3415: ROLLBACK ;
3416: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
3417: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
3417: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
3418: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
3419: WHEN OTHERS THEN
3420: x_return_status := l_g_ret_sts_unexp_error;
3421: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
3422: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
3423: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
3424: mydebug('ROLLBACK ' );
3425: ROLLBACK ;
4112: mydebug('End .. ' || l_proc_name);
4113: EXCEPTION
4114: WHEN fnd_api.g_exc_error THEN
4115: x_return_status := l_g_ret_sts_error;
4116: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
4117: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
4118: mydebug('fnd_api.g_exc_error: ' || SQLERRM);
4119: mydebug('ROLLBACK ' );
4120: ROLLBACK ;
4119: mydebug('ROLLBACK ' );
4120: ROLLBACK ;
4121: WHEN fnd_api.g_exc_unexpected_error THEN
4122: x_return_status := fnd_api.g_ret_sts_unexp_error;
4123: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
4124: mydebug('ROLLBACK ' );
4125: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
4126: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
4127: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
4127: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
4128: ROLLBACK ;
4129: WHEN OTHERS THEN
4130: x_return_status := l_g_ret_sts_unexp_error;
4131: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
4132: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
4133: mydebug('fnd_api.g_exc_error: ' || SQLERRM);
4134: mydebug('ROLLBACK ' );
4135: ROLLBACK ;
4460: mydebug('End of processing of confirmed serials.. ' || l_proc_name);
4461: EXCEPTION
4462: WHEN fnd_api.g_exc_error THEN
4463: x_return_status := l_g_ret_sts_error;
4464: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
4465: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
4466: mydebug('fnd_api.g_exc_error: ' || SQLERRM);
4467: mydebug('ROLLBACK ' );
4468: ROLLBACK ;
4467: mydebug('ROLLBACK ' );
4468: ROLLBACK ;
4469: WHEN fnd_api.g_exc_unexpected_error THEN
4470: x_return_status := fnd_api.g_ret_sts_unexp_error;
4471: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
4472: mydebug('ROLLBACK ' );
4473: ROLLBACK ;
4474: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
4475: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
4475: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
4476: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
4477: WHEN OTHERS THEN
4478: x_return_status := l_g_ret_sts_unexp_error;
4479: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
4480: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
4481: mydebug('fnd_api.g_exc_error: ' || SQLERRM);
4482: mydebug('ROLLBACK ' );
4483: ROLLBACK ;
4722: mydebug('End.. ' || l_proc_name);
4723: EXCEPTION
4724: WHEN fnd_api.g_exc_error THEN
4725: x_return_status := l_g_ret_sts_error;
4726: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
4727: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
4728: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
4729: mydebug('ROLLBACK ' );
4730: ROLLBACK ;
4729: mydebug('ROLLBACK ' );
4730: ROLLBACK ;
4731: WHEN fnd_api.g_exc_unexpected_error THEN
4732: x_return_status := fnd_api.g_ret_sts_unexp_error;
4733: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
4734: mydebug('ROLLBACK ' );
4735: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
4736: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
4737: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
4737: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
4738: ROLLBACK ;
4739: WHEN OTHERS THEN
4740: x_return_status := l_g_ret_sts_unexp_error;
4741: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
4742: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
4743: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
4744: mydebug('ROLLBACK ' );
4745: ROLLBACK ;
4809: WHEN No_Data_Found THEN
4810: mydebug ('ERROR !!! MSN and MOQD mismatch exists.' );
4811: fnd_message.set_name('WMS', 'WMS_LOT_SER_VALIDATION_FAIL');
4812: fnd_message.set_token('ROUTINE', '- MSN and MOQD mismatch error !' );
4813: fnd_msg_pub.ADD;
4814: RAISE fnd_api.g_exc_error;
4815: WHEN OTHERS THEN
4816: mydebug ('ERROR while checking MSN and MOQD mismatch.' );
4817: RAISE fnd_api.g_exc_unexpected_error;
5202: mydebug('End .. ' || l_proc_name);
5203: EXCEPTION
5204: WHEN fnd_api.g_exc_error THEN
5205: x_return_status := l_g_ret_sts_error;
5206: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
5207: mydebug('ROLLBACK ' );
5208: ROLLBACK ;
5209: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
5210: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
5209: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
5210: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
5211: WHEN fnd_api.g_exc_unexpected_error THEN
5212: x_return_status := fnd_api.g_ret_sts_unexp_error;
5213: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
5214: mydebug('ROLLBACK ' );
5215: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
5216: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
5217: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
5217: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
5218: ROLLBACK ;
5219: WHEN OTHERS THEN
5220: x_return_status := l_g_ret_sts_unexp_error;
5221: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
5222: mydebug('ROLLBACK ' );
5223: ROLLBACK ;
5224: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
5225: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
5269:
5270: IF SQL%NOTFOUND THEN
5271: fnd_message.set_name('WMS', 'WMS_ERROR_MARKING_SERIAL'); --NEWMSG
5272: -- "Error reserving Serial Number/s"
5273: fnd_msg_pub.ADD;
5274: RAISE fnd_api.G_EXC_ERROR;
5275: END IF;
5276: ELSE
5277: l_progress := '300';
5291:
5292: IF SQL%NOTFOUND THEN
5293: fnd_message.set_name('WMS', 'WMS_ERROR_MARKING_SERIAL'); --NEWMSG
5294: -- "Error reserving Serial Number/s"
5295: fnd_msg_pub.ADD;
5296: RAISE fnd_api.G_EXC_ERROR;
5297: END IF;
5298: END IF;
5299:
5300: mydebug('End .. ' || l_proc_name);
5301: EXCEPTION
5302: WHEN fnd_api.g_exc_error THEN
5303: x_return_status := l_g_ret_sts_error;
5304: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
5305: mydebug('ROLLBACK ' );
5306: ROLLBACK ;
5307: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
5308: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
5307: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
5308: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
5309: WHEN fnd_api.g_exc_unexpected_error THEN
5310: x_return_status := fnd_api.g_ret_sts_unexp_error;
5311: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
5312: mydebug('ROLLBACK ' );
5313: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
5314: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
5315: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
5315: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
5316: ROLLBACK ;
5317: WHEN OTHERS THEN
5318: x_return_status := l_g_ret_sts_unexp_error;
5319: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
5320: mydebug('ROLLBACK ' );
5321: ROLLBACK ;
5322: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
5323: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
5366: mydebug('End .. ' || l_proc_name);
5367: EXCEPTION
5368: WHEN fnd_api.g_exc_error THEN
5369: x_return_status := l_g_ret_sts_error;
5370: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
5371: mydebug('ROLLBACK ' );
5372: ROLLBACK ;
5373: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
5374: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
5373: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
5374: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
5375: WHEN fnd_api.g_exc_unexpected_error THEN
5376: x_return_status := fnd_api.g_ret_sts_unexp_error;
5377: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
5378: mydebug('ROLLBACK ' );
5379: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
5380: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
5381: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
5381: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
5382: ROLLBACK ;
5383: WHEN OTHERS THEN
5384: x_return_status := l_g_ret_sts_unexp_error;
5385: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
5386: mydebug('ROLLBACK ' );
5387: ROLLBACK ;
5388: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
5389: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
5651:
5652: IF rec_mmtt1.item_primary_uom_code IS NULL THEN
5653: fnd_message.set_name('WMS', 'WMS_NULL_PRIM_UOM');
5654: -- Item primary UOM is null for this task
5655: fnd_msg_pub.ADD;
5656: RAISE fnd_api.g_exc_unexpected_error;
5657: END IF;
5658: -- this global temp table will have a list of transaction_temp_ids of MMTTs that
5659: -- are confirmed to stay back in MMTT. Later we will use this list to decide on which
6403: x_return_status := l_g_ret_sts_error;
6404: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR'); --NEWMSG
6405: -- Internal Error $ROUTINE
6406: fnd_message.set_token('ROUTINE', '- Process_f2 API' );
6407: fnd_msg_pub.ADD;
6408: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6409: mydebug('ROLLBACK ' );
6410: ROLLBACK ;
6411: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6404: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR'); --NEWMSG
6405: -- Internal Error $ROUTINE
6406: fnd_message.set_token('ROUTINE', '- Process_f2 API' );
6407: fnd_msg_pub.ADD;
6408: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6409: mydebug('ROLLBACK ' );
6410: ROLLBACK ;
6411: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6412: mydebug('fnd_api.g_exc_error: ' || SQLERRM);
6414: x_return_status := fnd_api.g_ret_sts_unexp_error;
6415: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR'); --NEWMSG
6416: -- Internal Error $ROUTINE
6417: fnd_message.set_token('ROUTINE', '- Process_f2 API' );
6418: fnd_msg_pub.ADD;
6419: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6420: mydebug('ROLLBACK ' );
6421: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6422: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
6415: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR'); --NEWMSG
6416: -- Internal Error $ROUTINE
6417: fnd_message.set_token('ROUTINE', '- Process_f2 API' );
6418: fnd_msg_pub.ADD;
6419: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6420: mydebug('ROLLBACK ' );
6421: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6422: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
6423: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
6426: x_return_status := l_g_ret_sts_unexp_error;
6427: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR'); --NEWMSG
6428: -- Internal Error $ROUTINE
6429: fnd_message.set_token('ROUTINE', '- Process_f2 API' );
6430: fnd_msg_pub.ADD;
6431: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6432: mydebug('ROLLBACK ' );
6433: ROLLBACK ;
6434: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6427: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR'); --NEWMSG
6428: -- Internal Error $ROUTINE
6429: fnd_message.set_token('ROUTINE', '- Process_f2 API' );
6430: fnd_msg_pub.ADD;
6431: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6432: mydebug('ROLLBACK ' );
6433: ROLLBACK ;
6434: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6435: mydebug('fnd_api.g_exc_error: ' || SQLERRM);
6528: mydebug ('END : ' || l_proc_name);
6529: EXCEPTION
6530: WHEN fnd_api.g_exc_error THEN
6531: x_return_status := l_g_ret_sts_error;
6532: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6533: mydebug('ROLLBACK ' );
6534: ROLLBACK ;
6535: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6536: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
6535: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6536: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
6537: WHEN fnd_api.g_exc_unexpected_error THEN
6538: x_return_status := fnd_api.g_ret_sts_unexp_error;
6539: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6540: mydebug('ROLLBACK ' );
6541: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6542: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
6543: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
6543: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
6544: ROLLBACK ;
6545: WHEN OTHERS THEN
6546: x_return_status := l_g_ret_sts_unexp_error;
6547: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6548: mydebug('ROLLBACK ' );
6549: ROLLBACK ;
6550: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6551: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
6663: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR'); --NEWMSG
6664: -- Internal Error $ROUTINE
6665: fnd_message.set_token('ROUTINE', '-proc_process_cancelled_MOLs' );
6666: myDebug('Error updating MTRL in proc_process_cancelled_MOLs for line: ' || rec_cancelled_mols.line_id);
6667: fnd_msg_pub.ADD;
6668: END IF;
6669: END LOOP;
6670: mydebug('END = ' || l_proc_name );
6671: EXCEPTION
6670: mydebug('END = ' || l_proc_name );
6671: EXCEPTION
6672: WHEN fnd_api.g_exc_error THEN
6673: x_return_status := l_g_ret_sts_error;
6674: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6675: mydebug('ROLLBACK ' );
6676: ROLLBACK ;
6677: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6678: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
6677: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6678: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
6679: WHEN fnd_api.g_exc_unexpected_error THEN
6680: x_return_status := fnd_api.g_ret_sts_unexp_error;
6681: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6682: mydebug('ROLLBACK ' );
6683: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6684: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
6685: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
6685: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
6686: ROLLBACK ;
6687: WHEN OTHERS THEN
6688: x_return_status := l_g_ret_sts_unexp_error;
6689: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6690: mydebug('ROLLBACK ' );
6691: ROLLBACK ;
6692: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6693: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
6839: mydebug('END = ' || l_proc_name );
6840: EXCEPTION
6841: WHEN fnd_api.g_exc_error THEN
6842: x_return_status := l_g_ret_sts_error;
6843: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6844: mydebug('ROLLBACK ' );
6845: ROLLBACK ;
6846: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6847: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
6846: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6847: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
6848: WHEN fnd_api.g_exc_unexpected_error THEN
6849: x_return_status := fnd_api.g_ret_sts_unexp_error;
6850: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6851: mydebug('ROLLBACK ' );
6852: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6853: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
6854: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
6854: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
6855: ROLLBACK ;
6856: WHEN OTHERS THEN
6857: x_return_status := l_g_ret_sts_unexp_error;
6858: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6859: mydebug('ROLLBACK ' );
6860: ROLLBACK ;
6861: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
6862: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
7005: mydebug('END = ' || l_proc_name );
7006: EXCEPTION
7007: WHEN fnd_api.g_exc_error THEN
7008: x_return_status := l_g_ret_sts_error;
7009: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7010: mydebug('ROLLBACK ' );
7011: ROLLBACK ;
7012: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
7013: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
7012: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
7013: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
7014: WHEN fnd_api.g_exc_unexpected_error THEN
7015: x_return_status := fnd_api.g_ret_sts_unexp_error;
7016: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7017: mydebug('ROLLBACK ' );
7018: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
7019: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
7020: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
7020: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
7021: ROLLBACK ;
7022: WHEN OTHERS THEN
7023: x_return_status := l_g_ret_sts_unexp_error;
7024: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7025: mydebug('ROLLBACK ' );
7026: ROLLBACK ;
7027: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
7028: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
7160: mydebug('END = ' || l_proc_name );
7161: EXCEPTION
7162: WHEN fnd_api.g_exc_error THEN
7163: x_return_status := l_g_ret_sts_error;
7164: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7165: mydebug('ROLLBACK ' );
7166: ROLLBACK ;
7167: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
7168: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
7167: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
7168: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
7169: WHEN fnd_api.g_exc_unexpected_error THEN
7170: x_return_status := fnd_api.g_ret_sts_unexp_error;
7171: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7172: mydebug('ROLLBACK ' );
7173: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
7174: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
7175: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
7175: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
7176: ROLLBACK ;
7177: WHEN OTHERS THEN
7178: x_return_status := l_g_ret_sts_unexp_error;
7179: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7180: mydebug('ROLLBACK ' );
7181: ROLLBACK ;
7182: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
7183: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
7435: mydebug('END = ' || l_proc_name );
7436: EXCEPTION
7437: WHEN OTHERS THEN
7438: x_return_status := l_g_ret_sts_unexp_error;
7439: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7440: mydebug('ROLLBACK ' );
7441: ROLLBACK ;
7442: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
7443: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
7637: IF p_confirmed_qty = 0 AND p_exception <> l_g_exception_short
7638: THEN
7639: fnd_message.set_name('WMS', 'WMS_PICK_ZERO_QTY');
7640: -- Confirmed qty for this task is zero
7641: fnd_msg_pub.ADD;
7642: RAISE fnd_api.g_exc_unexpected_error;
7643: END IF;
7644: BEGIN
7645: wms_picking_pkg.g_previous_task_status.delete(p_temp_id);
7749: THEN
7750: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR');
7751: -- Internal Error $ROUTINE
7752: fnd_message.set_token('ROUTINE', '-INSERT_SERIAL API - ' || p_action);
7753: fnd_msg_pub.ADD;
7754: RAISE fnd_api.g_exc_unexpected_error;
7755: ELSE
7756: IF (l_debug = 1) THEN
7757: mydebug ('the serial number is: '|| serial_rec.serial_number);
7782: THEN
7783: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR');
7784: -- Internal Error $ROUTINE
7785: fnd_message.set_token('ROUTINE', '- INSERT_SERIAL API - ');
7786: fnd_msg_pub.ADD;
7787: RAISE fnd_api.g_exc_unexpected_error;
7788: ELSE
7789: IF (l_debug = 1) THEN
7790: mydebug ('the serial number is: '|| serial_rec.serial_number);
7844: THEN
7845: fnd_message.set_name('WMS', 'WMS_INTERNAL_ERROR');
7846: -- Internal Error $ROUTINE
7847: fnd_message.set_token('ROUTINE', '-Task_Merge_Split API - ' || p_action);
7848: fnd_msg_pub.ADD;
7849: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
7850: RAISE fnd_api.g_exc_unexpected_error;
7851: ELSE
7852: RAISE fnd_api.g_exc_error;
8003: mydebug ('x_return_status: ' || x_return_status );
8004: END IF;
8005: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
8006: --fnd_message.set_name('WMS', 'WMS_MULT_LPN_ERROR');
8007: --fnd_msg_pub.ADD;
8008: RAISE fnd_api.g_exc_unexpected_error;
8009: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
8010: --fnd_message.set_name('WMS', 'WMS_MULT_LPN_ERROR');
8011: --fnd_msg_pub.ADD;
8007: --fnd_msg_pub.ADD;
8008: RAISE fnd_api.g_exc_unexpected_error;
8009: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
8010: --fnd_message.set_name('WMS', 'WMS_MULT_LPN_ERROR');
8011: --fnd_msg_pub.ADD;
8012: RAISE fnd_api.g_exc_error;
8013: END IF;
8014:
8015: /* -- Bug #: 6908598 Commenting else part as we are calling the label printing irrespective of whether it is a bulk task or not */
8178:
8179: EXCEPTION
8180: WHEN fnd_api.g_exc_error THEN
8181: x_return_status := l_g_ret_sts_error;
8182: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8183: mydebug('ROLLBACK ' );
8184: ROLLBACK ;
8185: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
8186: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
8186: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
8187: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
8188: WHEN fnd_api.g_exc_unexpected_error THEN
8189: x_return_status := fnd_api.g_ret_sts_unexp_error;
8190: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8191: mydebug('ROLLBACK ' );
8192: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
8193: mydebug('RAISE fnd_api.g_exc_unexpected_error: ' || SQLERRM);
8194: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
8194: mydebug('x_msg_count/Data = ' || x_msg_count || '/'|| x_msg_data);
8195: ROLLBACK ;
8196: WHEN OTHERS THEN
8197: x_return_status := l_g_ret_sts_unexp_error;
8198: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8199: mydebug('ROLLBACK ' );
8200: ROLLBACK ;
8201: mydebug('l_progress = ' || l_proc_name || ':'|| l_progress);
8202: mydebug('RAISE fnd_api.g_exc_error: ' || SQLERRM);
8659: mydebug('lpn does not exist in org');
8660: END IF;
8661:
8662: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LPN');
8663: fnd_msg_pub.ADD;
8664: RAISE fnd_api.g_exc_error;
8665: END;
8666:
8667: IF l_lpn_exists = 0
8671: mydebug('LPN does not exist in org');
8672: END IF;
8673:
8674: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LPN');
8675: fnd_msg_pub.ADD;
8676: RAISE fnd_api.g_exc_error;
8677: END IF;
8678:
8679: IF (l_debug = 1) THEN
8701:
8702: IF l_loaded > 0 THEN
8703: x_match := 7;
8704: fnd_message.set_name('WMS', 'WMS_LOADED_ERROR');
8705: fnd_msg_pub.ADD;
8706: RAISE fnd_api.g_exc_error;
8707: END IF;
8708:
8709: -- Check if locator is valid
8731: -- The calling java code treats this condition as an error
8732:
8733: x_match := 10;
8734: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SUB');
8735: fnd_msg_pub.ADD;
8736: RAISE fnd_api.g_exc_error;
8737: END IF;
8738:
8739: -- bug 2398247
8747:
8748: IF l_sub_active = 0 THEN
8749: x_match := 10;
8750: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SUB');
8751: fnd_msg_pub.ADD;
8752: RAISE fnd_api.g_exc_error;
8753: END IF;
8754:
8755: -- verify if locator is active
8763:
8764: IF l_loc_active = 0 THEN
8765: x_match := 10;
8766: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LOC');
8767: fnd_msg_pub.ADD;
8768: RAISE fnd_api.g_exc_error;
8769: END IF;
8770: -- Begin fix for 2774506
8771:
8801:
8802: IF ((l_mil_proj_id <> l_mmtt_proj_id ) or ( l_mil_task_id <> l_mmtt_task_id )) THEN
8803: mydebug('lpn : the project/tak information does not match');
8804: FND_MESSAGE.SET_NAME('WMS','WMS_CONT_INVALID_LPN');
8805: FND_MSG_PUB.ADD;
8806: RAISE FND_API.G_EXC_ERROR;
8807: END IF;
8808:
8809: -- End fix for 2774506
8815: EXCEPTION
8816: WHEN NO_DATA_FOUND THEN
8817: x_match := 6;
8818: fnd_message.set_name('WMS', 'WMS_TD_LPN_LOC_NOT_FOUND');
8819: fnd_msg_pub.ADD;
8820: RAISE fnd_api.g_exc_error;
8821: END;
8822:
8823: IF (l_debug = 1) THEN
8846:
8847: IF l_so_cnt > 0 THEN
8848: x_match := 12;
8849: fnd_message.set_name('WMS', 'WMS_LPN_STAGED');
8850: fnd_msg_pub.ADD;
8851: RAISE fnd_api.g_exc_error;
8852: END IF;
8853:
8854: -- SELECT primary_uom_code
8902: END IF;
8903:
8904: x_match := 13;
8905: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LPN');
8906: fnd_msg_pub.ADD;
8907: RAISE fnd_api.g_exc_error;
8908: END;
8909:
8910: -- Modified for 14699845 (Flexible Lot Allocation)
8939: END IF;
8940:
8941: x_match := 5;
8942: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LOT_LPN');
8943: fnd_msg_pub.ADD;
8944: RAISE fnd_api.g_exc_error;
8945: END;
8946: END IF;
8947:
8992: mydebug('transaction does not exist in mmtt');
8993: END IF;
8994:
8995: fnd_message.set_name('INV', 'INV_INVALID_TRANSACTION');
8996: fnd_msg_pub.ADD;
8997: RAISE fnd_api.g_exc_error;
8998: END;
8999:
9000: -- clear quantity cache before we create qty tree.
9079:
9080: -- Serial numbers missing for the transaction
9081: x_match := 9;
9082: fnd_message.set_name('INV', 'INV_INT_SERMISEXP');
9083: fnd_msg_pub.ADD;
9084: RAISE fnd_api.g_exc_error;
9085: END IF;
9086: END IF;
9087:
9149: END IF;
9150:
9151: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
9152: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
9153: fnd_msg_pub.ADD;
9154: RAISE fnd_api.g_exc_error;
9155: END IF;
9156: --Bug#5649056: only update if subinventory and locator match
9157: ELSIF ( l_lpn_sub = l_mmtt_sub AND l_lpn_loc = l_mmtt_loc ) THEN
9201: END IF;
9202:
9203: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
9204: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
9205: fnd_msg_pub.ADD;
9206: RAISE fnd_api.g_exc_error;
9207: END IF;
9208: END IF; --}
9209:
9306: END IF;
9307:
9308: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
9309: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
9310: fnd_msg_pub.ADD;
9311: RAISE fnd_api.g_exc_error;
9312: END IF; --}
9313:
9314: IF NVL(l_allocated_lpn_id, 0) = p_fromlpn_id THEN --{
9360: END IF;
9361:
9362: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
9363: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
9364: fnd_msg_pub.ADD;
9365: RAISE fnd_api.g_exc_error;
9366: END IF;
9367: --Bug#5649056: only update if subinventory and locator match
9368: ELSIF ( l_lpn_sub = l_mmtt_sub AND l_lpn_loc = l_mmtt_loc ) THEN
9412: END IF;
9413:
9414: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
9415: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
9416: fnd_msg_pub.ADD;
9417: RAISE fnd_api.g_exc_error;
9418: END IF;
9419: END IF; --}
9420:
9469:
9470: -- Serial numbers missing for the transaction
9471: x_match := 9;
9472: fnd_message.set_name('INV', 'INV_INT_SERMISEXP');
9473: fnd_msg_pub.ADD;
9474: RAISE fnd_api.g_exc_error;
9475: END IF;
9476: END IF;
9477: -- end of bug 4277869
9529: END IF;
9530:
9531: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
9532: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
9533: fnd_msg_pub.ADD;
9534: RAISE fnd_api.g_exc_error;
9535: END IF;
9536: --Bug#5649056: only update if subinventory and locator match
9537: ELSIF ( l_lpn_sub = l_mmtt_sub AND l_lpn_loc = l_mmtt_loc ) THEN
9581: END IF;
9582:
9583: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
9584: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
9585: fnd_msg_pub.ADD;
9586: RAISE fnd_api.g_exc_error;
9587: END IF;
9588: END IF; --}
9589:
9654: END IF;
9655:
9656: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
9657: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
9658: fnd_msg_pub.ADD;
9659: RAISE fnd_api.g_exc_error;
9660: END IF;
9661:
9662: IF NVL(l_allocated_lpn_id, 0) = p_fromlpn_id THEN --{
9708: END IF;
9709:
9710: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
9711: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
9712: fnd_msg_pub.ADD;
9713: RAISE fnd_api.g_exc_error;
9714: END IF;
9715: --Bug#5649056: only update if subinventory and locator match
9716: ELSIF ( l_lpn_sub = l_mmtt_sub AND l_lpn_loc = l_mmtt_loc ) THEN
9760: END IF;
9761:
9762: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
9763: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
9764: fnd_msg_pub.ADD;
9765: RAISE fnd_api.g_exc_error;
9766: END IF;
9767: END IF; --}
9768: END IF; --}
9827:
9828: -- Serial numbers missing for the transaction
9829: x_match := 9;
9830: fnd_message.set_name('INV', 'INV_INT_SERMISEXP');
9831: fnd_msg_pub.ADD;
9832: RAISE fnd_api.g_exc_error;
9833: END IF;
9834: END IF; --}
9835:
9908: END IF;
9909:
9910: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
9911: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
9912: fnd_msg_pub.ADD;
9913: RAISE fnd_api.g_exc_error;
9914: END IF;
9915: --Bug#5649056: only update if subinventory and locator match
9916: ELSIF ( l_lpn_sub = l_mmtt_sub AND l_lpn_loc = l_mmtt_loc ) THEN
9960: END IF;
9961:
9962: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
9963: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
9964: fnd_msg_pub.ADD;
9965: RAISE fnd_api.g_exc_error;
9966: END IF;
9967: END IF;--}
9968:
10083: END IF;
10084:
10085: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
10086: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
10087: fnd_msg_pub.ADD;
10088: RAISE fnd_api.g_exc_error;
10089: END IF; --}
10090:
10091: IF (l_debug = 1) THEN
10260: END IF;
10261:
10262: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
10263: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
10264: fnd_msg_pub.ADD;
10265: RAISE fnd_api.g_exc_error;
10266: END IF;
10267: --Bug#5649056: only update if subinventory and locator match
10268: ELSIF ( l_lpn_sub = l_mmtt_sub AND l_lpn_loc = l_mmtt_loc ) THEN
10312: END IF;
10313:
10314: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
10315: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
10316: fnd_msg_pub.ADD;
10317: RAISE fnd_api.g_exc_error;
10318: END IF;
10319: END IF; --}
10320:
10427:
10428: -- Serial numbers missing for the transaction
10429: x_match := 9;
10430: fnd_message.set_name('INV', 'INV_INT_SERMISEXP');
10431: fnd_msg_pub.ADD;
10432: RAISE fnd_api.g_exc_error;
10433: END IF;
10434: END IF; --}
10435:
10488: END IF;
10489:
10490: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
10491: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
10492: fnd_msg_pub.ADD;
10493: RAISE fnd_api.g_exc_error;
10494: END IF;
10495: --Bug#5649056: only update if subinventory and locator match
10496: ELSIF ( l_lpn_sub = l_mmtt_sub AND l_lpn_loc = l_mmtt_loc ) THEN
10541: END IF;
10542:
10543: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
10544: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
10545: fnd_msg_pub.ADD;
10546: RAISE fnd_api.g_exc_error;
10547: END IF;
10548: END IF; --}
10549:
10648: END IF;
10649:
10650: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
10651: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
10652: fnd_msg_pub.ADD;
10653: RAISE fnd_api.g_exc_error;
10654: END IF; --}
10655:
10656: IF NVL(l_allocated_lpn_id, 0) = p_fromlpn_id THEN --{
10702: END IF;
10703:
10704: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
10705: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
10706: fnd_msg_pub.ADD;
10707: RAISE fnd_api.g_exc_error;
10708: END IF;
10709: --Bug#5649056: only update if subinventory and locator match
10710: ELSIF ( l_lpn_sub = l_mmtt_sub AND l_lpn_loc = l_mmtt_loc ) THEN
10754: END IF;
10755:
10756: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
10757: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
10758: fnd_msg_pub.ADD;
10759: RAISE fnd_api.g_exc_error;
10760: END IF;
10761: END IF; --}
10762:
10892: END IF;
10893:
10894: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
10895: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
10896: fnd_msg_pub.ADD;
10897: RAISE fnd_api.g_exc_error;
10898: END IF;
10899:
10900: ELSIF ( l_lpn_sub = l_mmtt_sub AND l_lpn_loc = l_mmtt_loc ) THEN
10942: END IF;
10943:
10944: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
10945: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
10946: fnd_msg_pub.ADD;
10947: RAISE fnd_api.g_exc_error;
10948: END IF;
10949: END IF;
10950: END IF;
11138: END IF;
11139:
11140: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
11141: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
11142: fnd_msg_pub.ADD;
11143: RAISE fnd_api.g_exc_error;
11144: END IF;
11145: ELSIF ( l_lpn_sub = l_mmtt_sub AND l_lpn_loc = l_mmtt_loc ) THEN
11146: inv_quantity_tree_pub.update_quantities(
11187: END IF;
11188:
11189: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
11190: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
11191: fnd_msg_pub.ADD;
11192: RAISE fnd_api.g_exc_error;
11193: END IF;
11194: END IF;
11195: END IF;
11411: x_match := 11;
11412: CLOSE ser_csr;
11413: fnd_message.set_name('INV', 'INV_SER_STATUS_NA');
11414: fnd_message.set_token('TOKEN', l_serial_number);
11415: fnd_msg_pub.ADD;
11416: RAISE fnd_api.g_exc_error;
11417: END IF;
11418: END LOOP;
11419:
11440: -- LPN status is invalid for this operation
11441:
11442: fnd_message.set_name('INV', 'INV_INVALID_LPN_STATUS');
11443: fnd_message.set_token('TOKEN1', TO_CHAR(p_fromlpn_id));
11444: fnd_msg_pub.ADD;
11445: RAISE fnd_api.g_exc_error;
11446: END IF;
11447: END IF;
11448: END IF;
11875: IF SQLCODE = -54 THEN -- ORA-0054: resource busy and acquire with NOWAIT specified
11876: mydebug('LPN record is locked by another user... cannot pick this LPN' );
11877: fnd_message.set_name('WMS', 'WMS_LPN_LOCKED_ERROR');
11878: -- LPN is in use by another user
11879: fnd_msg_pub.ADD;
11880: RAISE fnd_api.g_exc_error;
11881: ELSE
11882: RAISE fnd_api.g_exc_unexpected_error;
11883: END IF;
11963: IF (l_debug = 1) THEN
11964: mydebug(' Expected Exception raised');
11965: END IF;
11966: x_return_status := fnd_api.g_ret_sts_error;
11967: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
11968: WHEN fnd_api.g_exc_unexpected_error THEN
11969: IF (l_debug = 1) THEN
11970: mydebug(' Unexpected Exception raised');
11971: END IF;
11969: IF (l_debug = 1) THEN
11970: mydebug(' Unexpected Exception raised');
11971: END IF;
11972: x_return_status := fnd_api.g_ret_sts_unexp_error;
11973: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
11974: WHEN OTHERS THEN
11975: IF (l_debug = 1) THEN
11976: mydebug('Other exception raised : ' || SQLERRM);
11977: END IF;
11976: mydebug('Other exception raised : ' || SQLERRM);
11977: END IF;
11978:
11979: x_return_status := fnd_api.g_ret_sts_unexp_error;
11980: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
11981: END lpn_match;
11982:
11983:
11984: -- during the picking process. If the user does not specifies
12454: mydebug('calling qty tree 1st time failed ');
12455: END IF;
12456: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
12457: fnd_message.set_token('ROUTINE','INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
12458: fnd_msg_pub.ADD;
12459: RAISE fnd_api.g_exc_error;
12460: END IF; --}
12461:
12462: EXIT WHEN p_is_lot_control ='false';
12585: mydebug('Exception raised');
12586: END IF;
12587:
12588: x_return_status := fnd_api.g_ret_sts_error;
12589: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12590: WHEN OTHERS THEN
12591: IF (l_debug = 1) THEN
12592: mydebug('Other exception raised : ' || SQLERRM);
12593: END IF;
12592: mydebug('Other exception raised : ' || SQLERRM);
12593: END IF;
12594:
12595: x_return_status := fnd_api.g_ret_sts_unexp_error;
12596: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12597: END LOOSE_MATCH;
12598:
12599:
12600: FUNCTION can_pickdrop(p_transaction_temp_id IN NUMBER) RETURN VARCHAR2 IS
12693: IF (l_debug = 1) THEN
12694: mydebug('check_pack_lpn: LPN already exists but with different context or Org');
12695: END IF;--bug9165521
12696: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_ORG');
12697: fnd_msg_pub.ADD;
12698:
12699:
12700: x_return_status := fnd_api.g_ret_sts_error;
12701: RETURN;
12738: IF (l_debug = 1) THEN
12739: mydebug('check_pack_lpn: LPN already exists but with different context or Org');
12740: END IF;--bug9165521
12741: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_CONTEXT');
12742: fnd_msg_pub.ADD;
12743:
12744:
12745: x_return_status := fnd_api.g_ret_sts_error;
12746: RETURN;
12762: IF (l_debug = 1) THEN
12763: mydebug('check_pack_lpn: LPN already exists but with different context or Org');
12764: END IF;--bug9165521
12765: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_CONTEXT');
12766: fnd_msg_pub.ADD;
12767:
12768:
12769: x_return_status := fnd_api.g_ret_sts_error;
12770: RETURN;
12803: mydebug('check_pack_lpn: Not Successful2');
12804: END IF;
12805:
12806: FOR i IN 1 .. l_msg_count LOOP
12807: x_msg_data := fnd_msg_pub.get(i, 'F');
12808:
12809: IF (l_debug = 1) THEN
12810: mydebug(REPLACE(x_msg_data, fnd_global.local_chr(0), ' '));
12811: END IF;
12814:
12815: IF l_return_status = fnd_api.g_ret_sts_unexp_error
12816: OR l_return_status = fnd_api.g_ret_sts_error THEN
12817: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
12818: fnd_msg_pub.ADD;
12819: RAISE fnd_api.g_exc_unexpected_error;
12820: END IF;
12821:
12822: END IF;
12828: END IF;
12829: EXCEPTION
12830: WHEN fnd_api.g_exc_error THEN
12831: x_return_status := fnd_api.g_ret_sts_error;
12832: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12833: IF DBMS_SQL.IS_Open(l_cursorID) THEN
12834: DBMS_SQL.Close_Cursor(l_cursorID);
12835: END IF;
12836: WHEN OTHERS THEN
12834: DBMS_SQL.Close_Cursor(l_cursorID);
12835: END IF;
12836: WHEN OTHERS THEN
12837: x_return_status := fnd_api.g_ret_sts_unexp_error;
12838: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12839: IF DBMS_SQL.IS_Open(l_cursorID) THEN
12840: DBMS_SQL.Close_Cursor(l_cursorID);
12841: END IF;
12842: END check_pack_lpn;
13063: -- Standard call to check for call compatibility
13064: --
13065: IF NOT fnd_api.compatible_api_call(l_api_version_number, p_api_version_number, l_api_name, g_pkg_name) THEN
13066: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
13067: fnd_msg_pub.ADD;
13068: RAISE fnd_api.g_exc_error;
13069: END IF;
13070:
13071: --
13071: --
13072: -- Initialize message list.
13073: --
13074: IF fnd_api.to_boolean(p_init_msg_lst) THEN
13075: fnd_msg_pub.initialize;
13076: END IF;
13077:
13078: --
13079: -- Initialize API return status to success
13184: RAISE fnd_api.g_exc_error;
13185: END IF;
13186: ELSE
13187: fnd_message.set_name('WMS','WMS_INVALID_PACK_DELIVERY');
13188: fnd_msg_pub.ADD;
13189: RAISE fnd_api.g_exc_error;
13190: END IF;
13191: END;
13192: CLOSE c_wdd_exists;
13223: WHEN no_data_found THEN
13224: -- error out and assuming it should exist
13225: -- tolpn doesn't existing or if existing, but has wrong context
13226: fnd_message.set_name('WMS', 'WMS_LPN_NOT_FOUND');
13227: fnd_msg_pub.ADD;
13228: RAISE fnd_api.g_exc_error;
13229: END;
13230: IF (l_debug = 1) THEN
13231: mydebug('l_container_item_id:'||l_container_item_id);
13235: mydebug('LPN does not use any container');
13236: END IF;
13237: fnd_message.set_name('WMS', 'WMS_LPN_NOT_LINKTO_CONT');
13238: fnd_message.set_token('LPN', p_pick_to_lpn );
13239: fnd_msg_pub.ADD;
13240: RAISE fnd_api.g_exc_error;
13241: ELSIF (l_container_item_id <> p_container_item_id) THEN
13242: IF (l_debug = 1) THEN
13243: mydebug('The container, with which LPN associated, is different from confirmed container');
13254: END;
13255: fnd_message.set_name('WMS', 'WMS_LPN_ASSOC_WITH_CONT');
13256: fnd_message.set_token('LPN', p_pick_to_lpn );
13257: fnd_message.set_token('CONTAINER', l_concatenated_segments);
13258: fnd_msg_pub.ADD;
13259: RAISE fnd_api.g_exc_error;
13260: END IF;
13261: ELSE
13262: IF (l_debug = 1) THEN
13272: END IF;
13273: fnd_message.set_name('WMS', 'WMS_LPN_ASSOC_WITH_CONT');
13274: fnd_message.set_token('LPN', p_pick_to_lpn );
13275: fnd_message.set_token('CONTAINER', p_suggested_container_item );
13276: fnd_msg_pub.ADD;
13277: RAISE fnd_api.g_exc_error;
13278: END IF;
13279: END IF;
13280: END IF;
13339: IF (l_debug = 1) THEN
13340: mydebug('Cost group commigle exist.');
13341: END IF;
13342: fnd_message.set_name('WMS', 'WMS_CG_COMMINGLE');
13343: fnd_msg_pub.ADD;
13344: RAISE fnd_api.g_exc_error;
13345: ELSE
13346: IF (l_debug = 1) THEN
13347: mydebug('passed cost group commigle check.');
13393: where transfer_lpn_id = pick_to_lpn_rec.lpn_id
13394: and transaction_header_id <>l_transaction_header_id);
13395:
13396: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_NOT_NEW'); -- new message
13397: fnd_msg_pub.ADD;
13398: RAISE fnd_api.g_exc_error;
13399: EXCEPTION
13400: WHEN NO_DATA_FOUND THEN RETURN; -- this lpn is fine and no need to do all
13401: -- the following checks
13410: where transfer_lpn_id = pick_to_lpn_rec.lpn_id
13411: and transaction_temp_id = parent_line_id -- bulk task
13412: );
13413: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_BULK');
13414: fnd_msg_pub.ADD;
13415: RAISE fnd_api.g_exc_error;
13416: EXCEPTION
13417: WHEN NO_DATA_FOUND THEN null;
13418: END;
13470: mydebug(' l_mo_type_in_lpn => ' || l_mo_type_in_lpn);
13471: END IF;
13472:
13473: fnd_message.set_name('WMS', 'WMS_LPN_FB_COMINGLE');
13474: fnd_msg_pub.ADD;
13475: RAISE fnd_api.g_exc_error;
13476: ELSIF l_mmtt_txn_type_id = 35
13477: OR l_mmtt_txn_type_id = 51 THEN -- Mfg pick
13478: IF l_mmtt_wip_entity_type <> l_wip_entity_type_in_lpn THEN
13480: mydebug('validate_pick_to_lpn: This is a manufacturing component pick.');
13481: mydebug('WIP entity type IS NOT the same AS that OF the old mmtt RECORD');
13482: END IF;
13483: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_MFG_MODE');
13484: fnd_msg_pub.ADD;
13485: RAISE fnd_api.g_exc_error;
13486: END IF;
13487: END IF;
13488: END IF;
13551: mydebug('validate_pick_to_lpn: Cannot add picks not going to the same sub');
13552: END IF;
13553:
13554: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_SUBINV');
13555: fnd_msg_pub.ADD;
13556: RAISE fnd_api.g_exc_error;
13557: END IF;
13558: ELSE
13559: --
13592: mydebug('validate_pick_to_lpn: Drop LPN has pick(s) for an LPN-controlled sub');
13593: END IF;
13594:
13595: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_SUBINV');
13596: fnd_msg_pub.ADD;
13597: RAISE fnd_api.g_exc_error;
13598: END IF;
13599: END IF;
13600:
13625: mydebug('validate_pick_to_lpn: Txfer LPN is associated with material FOR a different fulfillment base');
13626: END IF;
13627:
13628: fnd_message.set_name('WMS', 'WMS_LPN_FB_COMINGLE');
13629: fnd_msg_pub.ADD;
13630: RAISE fnd_api.g_exc_error;
13631: END IF;
13632:
13633:
13655: mydebug('validate_pick_to_lpn: Drop LPN is associated with material FOR a different operation plan');
13656: END IF;
13657:
13658: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_OPER_PLAN');
13659: fnd_msg_pub.ADD;
13660: RAISE fnd_api.g_exc_error;
13661: END IF;
13662:
13663:
13705: mydebug('validate_pick_to_lpn: can NOT find move order line for current task');
13706: END IF;
13707:
13708: fnd_message.set_name('WMS', 'WMS_NO_MOL');
13709: fnd_msg_pub.ADD;
13710: RAISE fnd_api.g_exc_error;
13711: END IF;
13712:
13713: IF l_current_carton_grouping_id IS NOT NULL THEN -- found carton_grouping_id
13750: mydebug('validate_pick_to_lpn: can NOT find either wdd or wda for tasks in the lpn');
13751: END IF;
13752:
13753: fnd_message.set_name('WMS', 'WMS_NO_WDD_WDA');
13754: fnd_msg_pub.ADD;
13755: RAISE fnd_api.g_exc_error;
13756: END IF;
13757:
13758: IF l_pick_to_lpn_delivery_id IS NULL THEN
13767: mydebug('validate_pick_to_lpn: other tasks in lpn have different deliveries');
13768: END IF;
13769:
13770: fnd_message.set_name('WMS', 'WMS_PICK_TO_LPN_DIFF_DELIV');
13771: fnd_msg_pub.ADD;
13772: RAISE fnd_api.g_exc_error;
13773: END IF;
13774: ELSE -- they have different carton_grouping_id
13775: --{
13831: END;
13832: --
13833: IF (l_same_carton_grouping = FALSE) then
13834: fnd_message.set_name('WMS', 'WMS_DIFF_CARTON_GROUP');
13835: fnd_msg_pub.ADD;
13836: RAISE fnd_api.g_exc_error;
13837: END IF;
13838: --
13839: -- End : R12 bug 4454837.
13843: IF (l_debug = 1) THEN
13844: mydebug('validate_pick_to_lpn: some of tasks in lpn have NULL carton_grouping_id');
13845: END IF;
13846: fnd_message.set_name('WMS', 'WMS_CARTON_GROUP_NULL');
13847: fnd_msg_pub.ADD;
13848: RAISE fnd_api.g_exc_error;
13849: END IF;
13850: ELSE --carton_grouping_id is null
13851: IF (l_debug = 1) THEN
13853: END IF;
13854: --bug3481923 only fail if it is not requisition on repl mo
13855: if (l_mmtt_mo_type not in(1,2)) then
13856: fnd_message.set_name('WMS', 'WMS_CARTON_GROUP_NULL');
13857: fnd_msg_pub.ADD;
13858: RAISE fnd_api.g_exc_error;
13859: end if;
13860: END IF;
13861: END IF;
13886: mydebug('validate_pick_to_lpn: Picked LPN and current MMTT go to different deliveries.');
13887: END IF;
13888:
13889: fnd_message.set_name('WMS', 'WMS_PICK_TO_LPN_DIFF_DELIV');
13890: fnd_msg_pub.ADD;
13891: RAISE fnd_api.g_exc_error;
13892: END IF;
13893: ELSIF l_pick_to_lpn_delivery_id2 IS NULL THEN
13894: IF (l_debug = 1) THEN
13901: mydebug('validate_pick_to_lpn: Picked LPN does not have delivery and current task has delivery.');
13902: END IF;
13903:
13904: fnd_message.set_name('WMS', 'WMS_PICK_TO_LPN_DIFF_DELIV');
13905: fnd_msg_pub.ADD;
13906: RAISE fnd_api.g_exc_error;
13907: END IF;
13908: ELSIF l_pick_to_lpn_delivery_id2 = -999 THEN
13909: IF (l_debug = 1) THEN
13935: mydebug('validate_pick_to_lpn: Picked LPN and current MMTT go to different deliveries.');
13936: END IF;
13937:
13938: fnd_message.set_name('WMS', 'WMS_PICK_TO_LPN_DIFF_DELIV');
13939: fnd_msg_pub.ADD;
13940: RAISE fnd_api.g_exc_error;
13941: NULL;
13942: ELSE
13943: --
13983: mydebug('validate_pick_to_lpn: LPNs are on diff deliveries.');
13984: END IF;
13985:
13986: fnd_message.set_name('WMS', 'WMS_PICK_TO_LPN_DIFF_DELIV');
13987: fnd_msg_pub.ADD;
13988: RAISE fnd_api.g_exc_error;
13989: ELSE
13990: --
13991: -- Child LPN has the delivery as the current MMTT, return success
14045: EXCEPTION
14046: WHEN fnd_api.g_exc_error THEN
14047: x_return_status := fnd_api.g_ret_sts_error;
14048: -- Get message count and data
14049: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14050:
14051: IF (l_debug = 1) THEN
14052: mydebug('validate_pick_to_lpn: @' || x_msg_data || '@');
14053: END IF;
14085: END IF;
14086: WHEN OTHERS THEN
14087: x_return_status := fnd_api.g_ret_sts_unexp_error;
14088:
14089: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
14090: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
14091: END IF;
14092:
14093: -- Get message count and data
14086: WHEN OTHERS THEN
14087: x_return_status := fnd_api.g_ret_sts_unexp_error;
14088:
14089: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
14090: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
14091: END IF;
14092:
14093: -- Get message count and data
14094: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14090: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
14091: END IF;
14092:
14093: -- Get message count and data
14094: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14095:
14096: IF others_in_mmtt_delivery_cursor%ISOPEN THEN
14097: CLOSE others_in_mmtt_delivery_cursor;
14098: END IF;
14212: IF (l_debug = 1) THEN
14213: mydebug('validate_sub_loc_status: Error - ' || SQLERRM);
14214: END IF;
14215:
14216: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14217: WHEN OTHERS THEN
14218: x_return_status := fnd_api.g_ret_sts_unexp_error;
14219:
14220: IF (l_debug = 1) THEN
14220: IF (l_debug = 1) THEN
14221: mydebug('validate_sub_loc_status: Unexpected Error - ' || SQLERRM);
14222: END IF;
14223:
14224: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14225: END validate_sub_loc_status;
14226:
14227: PROCEDURE insert_serial(
14228: p_serial_transaction_temp_id IN OUT NOCOPY NUMBER,
14279: END;
14280:
14281: IF l_count <> 0 THEN
14282: fnd_message.set_name('INV', 'INVALID_SERIAL_NUMBER');
14283: fnd_msg_pub.ADD;
14284: RAISE fnd_api.g_exc_error;
14285: END IF;
14286:
14287: l_progress := '30';
14369: IF (l_debug = 1) THEN
14370: mydebug('Exitting insert_serial - execution error:'|| l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);
14371: END IF;
14372: -- Get message count and data
14373: fnd_msg_pub.count_and_get(p_encoded => fnd_api.g_false, p_count => l_msg_count, p_data => x_msg_data);
14374: WHEN OTHERS THEN
14375: x_return_status := fnd_api.g_ret_sts_unexp_error;
14376:
14377: IF SQLCODE IS NOT NULL THEN
14382: mydebug('Exitting insert_serial - other exception:'|| l_progress || ' ' || TO_CHAR(SYSDATE, 'YYYY-MM-DD HH:DD:SS'), 1);
14383: END IF;
14384:
14385: --
14386: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
14387: fnd_msg_pub.add_exc_msg(g_pkg_name, 'insert_serial');
14388: END IF;
14389:
14390: END insert_serial;
14383: END IF;
14384:
14385: --
14386: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
14387: fnd_msg_pub.add_exc_msg(g_pkg_name, 'insert_serial');
14388: END IF;
14389:
14390: END insert_serial;
14391:
15713: CLOSE get_item_details;
15714: FND_MESSAGE.SET_NAME('INV','ITEM_NOT_FOUND');
15715: FND_MESSAGE.SET_TOKEN('ORGANIZATION_ID', p_org_id);
15716: FND_MESSAGE.SET_TOKEN('INVENTORY_ITEM_ID', p_inventory_item_id);
15717: FND_MSG_PUB.ADD;
15718: RAISE FND_API.G_EXC_ERROR;
15719: END IF;
15720:
15721: CLOSE get_item_details;
16001: END IF;
16002:
16003: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
16004: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
16005: fnd_msg_pub.ADD;
16006: RAISE fnd_api.g_exc_error;
16007: END IF;
16008:
16009: ELSIF ( Nvl(l_lpn_sub, p_confirmed_sub) = l_mmtt_sub AND Nvl(l_lpn_loc, p_confirmed_loc_id) = l_mmtt_loc ) THEN
16051: END IF;
16052:
16053: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
16054: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
16055: fnd_msg_pub.ADD;
16056: RAISE fnd_api.g_exc_error;
16057: END IF;
16058: END IF;
16059: END IF;