[Home] [Help]
92: IF (l_debug = 1) THEN
93: mydebug('create_mo: call to WMS_Task_Dispatch_put_away.create_mo failed');
94: END IF;
95:
96: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
97: WHEN OTHERS THEN
98: x_return_status := fnd_api.g_ret_sts_unexp_error;
99:
100: IF (l_debug = 1) THEN
100: IF (l_debug = 1) THEN
101: mydebug('create_mo: call to WMS_Task_Dispatch_put_away.create_mo failed');
102: END IF;
103:
104: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
105: END create_mo;
106:
107: PROCEDURE insert_task(
108: p_org_id IN NUMBER
198: EXCEPTION
199: WHEN OTHERS THEN
200: x_return_status := fnd_api.g_ret_sts_unexp_error;
201: fnd_message.set_name('WMS', 'WMS_TD_INSERT_TASK');
202: fnd_msg_pub.ADD;
203: END insert_task;
204:
205: PROCEDURE next_task(
206: p_sign_on_emp_id IN NUMBER
321: mydebug('next_task: Period is invalid');
322: END IF;
323:
324: fnd_message.set_name('INV', 'INV_NO_OPEN_PERIOD');
325: fnd_msg_pub.ADD;
326: RAISE fnd_api.g_exc_unexpected_error;
327: END IF;
328:
329: IF (l_debug = 1) THEN
912:
913: COMMIT;
914: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
915: fnd_message.set_name('WMS', 'WMS_TD_TDENG_ERROR');
916: fnd_msg_pub.ADD;
917: RAISE fnd_api.g_exc_unexpected_error;
918: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
919: IF (l_debug = 1) THEN
920: mydebug('next_task: Setting status to S');
959: COMMIT;
960: EXCEPTION
961: WHEN fnd_api.g_exc_error THEN
962: x_return_status := fnd_api.g_ret_sts_error;
963: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
964: ROLLBACK TO sp_td_gen_next_task;
965: WHEN OTHERS THEN
966: x_return_status := fnd_api.g_ret_sts_unexp_error;
967: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
963: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
964: ROLLBACK TO sp_td_gen_next_task;
965: WHEN OTHERS THEN
966: x_return_status := fnd_api.g_ret_sts_unexp_error;
967: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
968: ROLLBACK TO sp_td_gen_next_task;
969: END next_task;
970:
971: -- Cluster Picking Enhancments.
1092: mydebug('next_CP_task: Period is invalid');
1093: END IF;
1094:
1095: fnd_message.set_name('INV', 'INV_NO_OPEN_PERIOD');
1096: fnd_msg_pub.ADD;
1097: RAISE fnd_api.g_exc_unexpected_error;
1098: END IF;
1099:
1100: IF (l_debug = 1) THEN
1467:
1468: COMMIT;
1469: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
1470: fnd_message.set_name('WMS', 'WMS_TD_TDENG_ERROR');
1471: fnd_msg_pub.ADD;
1472: RAISE fnd_api.g_exc_unexpected_error;
1473: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
1474: IF (l_debug = 1) THEN
1475: mydebug('next_CP_task: Setting status to S');
1513: COMMIT;
1514: EXCEPTION
1515: WHEN fnd_api.g_exc_error THEN
1516: x_return_status := fnd_api.g_ret_sts_error;
1517: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1518: ROLLBACK TO sp_td_gen_next_cp_task;
1519: WHEN OTHERS THEN
1520: x_return_status := fnd_api.g_ret_sts_unexp_error;
1521: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1517: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1518: ROLLBACK TO sp_td_gen_next_cp_task;
1519: WHEN OTHERS THEN
1520: x_return_status := fnd_api.g_ret_sts_unexp_error;
1521: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1522: ROLLBACK TO sp_td_gen_next_cp_task;
1523: END next_cluster_pick_task;
1524:
1525: --p_loc, p_sub are user inputs
1810: , p_source => WMS_CONTAINER_PUB.LPN_CONTEXT_PREGENERATED --Bug#4864812.
1811: , p_cost_group_id => NULL
1812: , x_lpn_id => l_lpn_id
1813: );
1814: fnd_msg_pub.count_and_get(p_count => l_msg_cnt, p_data => l_msg_data);
1815:
1816: IF (l_msg_cnt = 0) THEN
1817: IF (l_debug = 1) THEN
1818: mydebug('complete_pick: Successful');
1827: mydebug('complete_pick: Not Successful2');
1828: END IF;
1829:
1830: FOR i IN 1 .. l_msg_cnt LOOP
1831: l_msg_data := fnd_msg_pub.get(i, 'F');
1832:
1833: IF (l_debug = 1) THEN
1834: mydebug(REPLACE(l_msg_data, fnd_global.local_chr(0), ' '));
1835: END IF;
1837: END IF;
1838:
1839: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
1840: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
1841: fnd_msg_pub.ADD;
1842: RAISE fnd_api.g_exc_unexpected_error;
1843: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
1844: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
1845: fnd_msg_pub.ADD;
1841: fnd_msg_pub.ADD;
1842: RAISE fnd_api.g_exc_unexpected_error;
1843: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
1844: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
1845: fnd_msg_pub.ADD;
1846: RAISE fnd_api.g_exc_error;
1847: END IF;
1848: ELSE
1849: -- LPN exists. Get LPN ID
1949: x_return_status := fnd_api.g_ret_sts_success;
1950: EXCEPTION
1951: WHEN fnd_api.g_exc_error THEN
1952: x_return_status := fnd_api.g_ret_sts_error;
1953: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1954: WHEN OTHERS THEN
1955: x_return_status := fnd_api.g_ret_sts_unexp_error;
1956: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1957: END complete_pick;
1952: x_return_status := fnd_api.g_ret_sts_error;
1953: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1954: WHEN OTHERS THEN
1955: x_return_status := fnd_api.g_ret_sts_unexp_error;
1956: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
1957: END complete_pick;
1958:
1959: FUNCTION get_primary_quantity(p_item_id IN NUMBER, p_organization_id IN NUMBER, p_from_quantity IN NUMBER, p_from_unit IN VARCHAR2)
1960: RETURN NUMBER IS
2573: x_return_status := fnd_api.g_ret_sts_success;
2574: EXCEPTION
2575: WHEN OTHERS THEN
2576: x_return_status := fnd_api.g_ret_sts_unexp_error;
2577: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
2578: END process_lot_serial;
2579:
2580: -- Given a lot_number, this returns the qty for the specific lpn and the lot_number
2581:
2759: mydebug('lpn_match: lpn does not exist in org');
2760: END IF;
2761:
2762: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LPN');
2763: fnd_msg_pub.ADD;
2764: RAISE fnd_api.g_exc_error;
2765: END;
2766:
2767: IF l_lpn_exists = 0
2771: mydebug('lpn_match: lpn does not exist in org');
2772: END IF;
2773:
2774: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LPN');
2775: fnd_msg_pub.ADD;
2776: RAISE fnd_api.g_exc_error;
2777: END IF;
2778:
2779: IF (l_debug = 1) THEN
2801:
2802: IF l_loaded > 0 THEN
2803: x_match := 7;
2804: fnd_message.set_name('WMS', 'WMS_LOADED_ERROR');
2805: fnd_msg_pub.ADD;
2806: RAISE fnd_api.g_exc_error;
2807: END IF;
2808:
2809: -- Check if locator is valid
2831: -- The calling java code treats this condition as an error
2832:
2833: x_match := 10;
2834: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SUB');
2835: fnd_msg_pub.ADD;
2836: RAISE fnd_api.g_exc_error;
2837: END IF;
2838:
2839: -- bug 2398247
2847:
2848: IF l_sub_active = 0 THEN
2849: x_match := 10;
2850: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SUB');
2851: fnd_msg_pub.ADD;
2852: RAISE fnd_api.g_exc_error;
2853: END IF;
2854:
2855: -- verify if locator is active
2863:
2864: IF l_loc_active = 0 THEN
2865: x_match := 10;
2866: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LOC');
2867: fnd_msg_pub.ADD;
2868: RAISE fnd_api.g_exc_error;
2869: END IF;
2870: -- Begin fix for 2774506
2871:
2893:
2894: if ((l_mil_proj_id <> l_mmtt_proj_id ) or ( l_mil_task_id <> l_mmtt_task_id )) then
2895: mydebug('lpn : the project/tak information does not match');
2896: FND_MESSAGE.SET_NAME('WMS','WMS_CONT_INVALID_LPN');
2897: FND_MSG_PUB.ADD;
2898: RAISE FND_API.G_EXC_ERROR;
2899: end if ;
2900:
2901: -- End fix for 2774506
2907: EXCEPTION
2908: WHEN NO_DATA_FOUND THEN
2909: x_match := 6;
2910: fnd_message.set_name('WMS', 'WMS_TD_LPN_LOC_NOT_FOUND');
2911: fnd_msg_pub.ADD;
2912: RAISE fnd_api.g_exc_error;
2913: END;
2914:
2915: IF (l_debug = 1) THEN
2938:
2939: IF l_so_cnt > 0 THEN
2940: x_match := 12;
2941: fnd_message.set_name('WMS', 'WMS_LPN_STAGED');
2942: fnd_msg_pub.ADD;
2943: RAISE fnd_api.g_exc_error;
2944: END IF;
2945:
2946: SELECT primary_uom_code
2989: END IF;
2990:
2991: x_match := 5;
2992: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LPN');
2993: fnd_msg_pub.ADD;
2994: RAISE fnd_api.g_exc_error;
2995: END;
2996:
2997: IF l_item_cnt > 0
3020: END IF;
3021:
3022: x_match := 5;
3023: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_LOT_LPN');
3024: fnd_msg_pub.ADD;
3025: RAISE fnd_api.g_exc_error;
3026: END;
3027: END IF;
3028:
3069: mydebug('lpn_match: transaction does not exist in mmtt');
3070: END IF;
3071:
3072: fnd_message.set_name('INV', 'INV_INVALID_TRANSACTION');
3073: fnd_msg_pub.ADD;
3074: RAISE fnd_api.g_exc_error;
3075: END;
3076:
3077: -- clear quantity cache before we create qty tree.
3220: END IF;
3221:
3222: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
3223: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
3224: fnd_msg_pub.ADD;
3225: RAISE fnd_api.g_exc_error;
3226: END IF;
3227: ELSE
3228: inv_quantity_tree_pub.update_quantities(
3263: END IF;
3264:
3265: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
3266: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
3267: fnd_msg_pub.ADD;
3268: RAISE fnd_api.g_exc_error;
3269: END IF;
3270: END IF;
3271:
3335: END IF;
3336:
3337: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
3338: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
3339: fnd_msg_pub.ADD;
3340: RAISE fnd_api.g_exc_error;
3341: END IF;
3342:
3343: IF NVL(l_allocated_lpn_id, 0) = p_lpn THEN
3381: END IF;
3382:
3383: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
3384: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
3385: fnd_msg_pub.ADD;
3386: RAISE fnd_api.g_exc_error;
3387: END IF;
3388: ELSE
3389: inv_quantity_tree_pub.update_quantities(
3424: END IF;
3425:
3426: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
3427: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
3428: fnd_msg_pub.ADD;
3429: RAISE fnd_api.g_exc_error;
3430: END IF;
3431: END IF;
3432: END LOOP;
3460:
3461: -- Serial numbers missing for the transaction
3462: x_match := 9;
3463: fnd_message.set_name('INV', 'INV_INT_SERMISEXP');
3464: fnd_msg_pub.ADD;
3465: RAISE fnd_api.g_exc_error;
3466: END IF;
3467:
3468: SELECT COUNT(fm_serial_number)
3557: END IF;
3558:
3559: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
3560: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
3561: fnd_msg_pub.ADD;
3562: RAISE fnd_api.g_exc_error;
3563: END IF;
3564: ELSE
3565: inv_quantity_tree_pub.update_quantities(
3600: END IF;
3601:
3602: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
3603: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
3604: fnd_msg_pub.ADD;
3605: RAISE fnd_api.g_exc_error;
3606: END IF;
3607: END IF;
3608:
3641: END IF;
3642:
3643: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
3644: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
3645: fnd_msg_pub.ADD;
3646: RAISE fnd_api.g_exc_error;
3647: END IF;
3648:
3649: IF NVL(l_allocated_lpn_id, 0) = p_lpn THEN
3687: END IF;
3688:
3689: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
3690: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
3691: fnd_msg_pub.ADD;
3692: RAISE fnd_api.g_exc_error;
3693: END IF;
3694: ELSE
3695: inv_quantity_tree_pub.update_quantities(
3730: END IF;
3731:
3732: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
3733: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
3734: fnd_msg_pub.ADD;
3735: RAISE fnd_api.g_exc_error;
3736: END IF;
3737: END IF;
3738: END IF;
3794:
3795: -- Serial numbers missing for the transaction
3796: x_match := 9;
3797: fnd_message.set_name('INV', 'INV_INT_SERMISEXP');
3798: fnd_msg_pub.ADD;
3799: RAISE fnd_api.g_exc_error;
3800: END IF;
3801: END IF;
3802:
3940: END IF;
3941:
3942: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
3943: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
3944: fnd_msg_pub.ADD;
3945: RAISE fnd_api.g_exc_error;
3946: END IF;
3947: ELSE
3948: inv_quantity_tree_pub.update_quantities(
3983: END IF;
3984:
3985: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
3986: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
3987: fnd_msg_pub.ADD;
3988: RAISE fnd_api.g_exc_error;
3989: END IF;
3990: END IF;
3991:
4066: END IF;
4067:
4068: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
4069: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
4070: fnd_msg_pub.ADD;
4071: RAISE fnd_api.g_exc_error;
4072: END IF;
4073:
4074: IF l_lot_match <> 0
4161: END IF;
4162:
4163: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
4164: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
4165: fnd_msg_pub.ADD;
4166: RAISE fnd_api.g_exc_error;
4167: END IF;
4168: ELSE
4169: inv_quantity_tree_pub.update_quantities(
4204: END IF;
4205:
4206: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
4207: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
4208: fnd_msg_pub.ADD;
4209: RAISE fnd_api.g_exc_error;
4210: END IF;
4211: END IF;
4212: END LOOP;
4290:
4291: -- Serial numbers missing for the transaction
4292: x_match := 9;
4293: fnd_message.set_name('INV', 'INV_INT_SERMISEXP');
4294: fnd_msg_pub.ADD;
4295: RAISE fnd_api.g_exc_error;
4296: END IF;
4297: END IF;
4298:
4390: END IF;
4391:
4392: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
4393: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
4394: fnd_msg_pub.ADD;
4395: RAISE fnd_api.g_exc_error;
4396: END IF;
4397: ELSE
4398: inv_quantity_tree_pub.update_quantities(
4433: END IF;
4434:
4435: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
4436: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
4437: fnd_msg_pub.ADD;
4438: RAISE fnd_api.g_exc_error;
4439: END IF;
4440: END IF;
4441:
4514: END IF;
4515:
4516: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
4517: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
4518: fnd_msg_pub.ADD;
4519: RAISE fnd_api.g_exc_error;
4520: END IF;
4521:
4522: IF NVL(l_allocated_lpn_id, 0) = p_lpn THEN
4560: END IF;
4561:
4562: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
4563: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
4564: fnd_msg_pub.ADD;
4565: RAISE fnd_api.g_exc_error;
4566: END IF;
4567: ELSE
4568: inv_quantity_tree_pub.update_quantities(
4603: END IF;
4604:
4605: fnd_message.set_name('INV', 'INV_INVALID_QUANTITY_TYPE');
4606: fnd_message.set_token('ROUTINE', 'INV_QUANTITY_TREE_PUB.QUERY_QUANTITIES');
4607: fnd_msg_pub.ADD;
4608: RAISE fnd_api.g_exc_error;
4609: END IF;
4610: END IF;
4611:
4688: x_match := 11;
4689: CLOSE ser_csr;
4690: fnd_message.set_name('INV', 'INV_SER_STATUS_NA');
4691: fnd_message.set_token('TOKEN', l_serial_number);
4692: fnd_msg_pub.ADD;
4693: RAISE fnd_api.g_exc_error;
4694: END IF;
4695: END LOOP;
4696:
4717: -- LPN status is invalid for this operation
4718:
4719: fnd_message.set_name('INV', 'INV_INVALID_LPN_STATUS');
4720: fnd_message.set_token('TOKEN1', TO_CHAR(p_lpn));
4721: fnd_msg_pub.ADD;
4722: RAISE fnd_api.g_exc_error;
4723: END IF;
4724: END IF;
4725: END IF;
4802: mydebug('lpn_match: Serial numbers should not be allocated');
4803: END IF;
4804: x_match := 9;
4805: FND_MESSAGE.SET_NAME('INV','INV_INT_SERMISEXP');
4806: FND_MSG_PUB.ADD;
4807: RAISE FND_API.G_EXC_ERROR;
4808:
4809: END IF;
4810:
4912: );
4913:
4914: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4915: fnd_message.set_name('WMS', 'WMS_MULT_LPN_ERROR');
4916: fnd_msg_pub.ADD;
4917: RAISE fnd_api.g_exc_unexpected_error;
4918: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
4919: fnd_message.set_name('WMS', 'WMS_MULT_LPN_ERROR');
4920: fnd_msg_pub.ADD;
4916: fnd_msg_pub.ADD;
4917: RAISE fnd_api.g_exc_unexpected_error;
4918: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
4919: fnd_message.set_name('WMS', 'WMS_MULT_LPN_ERROR');
4920: fnd_msg_pub.ADD;
4921: RAISE fnd_api.g_exc_error;
4922: END IF;
4923:
4924: IF (l_debug = 1) THEN
5042: mydebug('lpn_match: Exception raised');
5043: END IF;
5044:
5045: x_return_status := fnd_api.g_ret_sts_error;
5046: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
5047: WHEN OTHERS THEN
5048: IF (l_debug = 1) THEN
5049: mydebug('lpn_match: Other exception raised : ' || SQLERRM);
5050: END IF;
5049: mydebug('lpn_match: Other exception raised : ' || SQLERRM);
5050: END IF;
5051:
5052: x_return_status := fnd_api.g_ret_sts_unexp_error;
5053: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
5054: END lpn_match;
5055:
5056: FUNCTION can_pickdrop(txn_temp_id IN NUMBER) RETURN VARCHAR2 IS
5057: l_ret VARCHAR2(1) := 'X';
5253: , p_source => 8
5254: , p_cost_group_id => NULL
5255: , x_lpn_id => l_to_lpn_id
5256: );
5257: fnd_msg_pub.count_and_get(p_count => l_msg_cnt, p_data => l_msg_data);
5258:
5259: IF (l_msg_cnt = 0) THEN
5260: IF (l_debug = 1) THEN
5261: mydebug('load_pick: Successful');
5270: mydebug('load_pick: Not Successful2');
5271: END IF;
5272:
5273: FOR i IN 1 .. l_msg_cnt LOOP
5274: l_msg_data := fnd_msg_pub.get(i, 'F');
5275:
5276: IF (l_debug = 1) THEN
5277: mydebug(REPLACE(l_msg_data, fnd_global.local_chr(0), ' '));
5278: END IF;
5280: END IF;
5281:
5282: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5283: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
5284: fnd_msg_pub.ADD;
5285: RAISE fnd_api.g_exc_unexpected_error;
5286: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
5287: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
5288: fnd_msg_pub.ADD;
5284: fnd_msg_pub.ADD;
5285: RAISE fnd_api.g_exc_unexpected_error;
5286: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
5287: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
5288: fnd_msg_pub.ADD;
5289: RAISE fnd_api.g_exc_error;
5290: END IF;
5291: ELSE
5292: IF (l_debug = 1) THEN
5321: mydebug('load_pick: LPN ' || p_from_lpn_id || ' has been already loaded so error out');
5322: END IF;
5323:
5324: fnd_message.set_name('WMS', 'WMS_LPN_LOADED_ERROR');
5325: fnd_msg_pub.ADD;
5326: RAISE fnd_api.g_exc_error;
5327: END;
5328: END IF;
5329:
5568: END IF;
5569:
5570: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5571: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
5572: fnd_msg_pub.ADD;
5573: RAISE fnd_api.g_exc_unexpected_error;
5574: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
5575: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
5576: fnd_msg_pub.ADD;
5572: fnd_msg_pub.ADD;
5573: RAISE fnd_api.g_exc_unexpected_error;
5574: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
5575: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
5576: fnd_msg_pub.ADD;
5577: RAISE fnd_api.g_exc_error;
5578: END IF;
5579: END IF;
5580:
5610: END IF;
5611:
5612: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5613: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
5614: fnd_msg_pub.ADD;
5615: RAISE fnd_api.g_exc_unexpected_error;
5616: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
5617: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
5618: fnd_msg_pub.ADD;
5614: fnd_msg_pub.ADD;
5615: RAISE fnd_api.g_exc_unexpected_error;
5616: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
5617: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
5618: fnd_msg_pub.ADD;
5619: RAISE fnd_api.g_exc_error;
5620: END IF;
5621: END IF;
5622:
5675: mydebug('load_pick : Error callinf WF wrapper');
5676: END IF;
5677:
5678: fnd_message.set_name('WMS', 'WMS_WORK_FLOW_FAIL');
5679: fnd_msg_pub.ADD;
5680: RAISE fnd_api.g_exc_unexpected_error;
5681: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
5682: IF (l_debug = 1) THEN
5683: mydebug('load_pick : Error calling WF wrapper');
5683: mydebug('load_pick : Error calling WF wrapper');
5684: END IF;
5685:
5686: fnd_message.set_name('WMS', 'WMS_WORK_FLOW_FAIL');
5687: fnd_msg_pub.ADD;
5688: RAISE fnd_api.g_exc_error;
5689: END IF;
5690: END IF;
5691:
6063: END IF;
6064: EXCEPTION
6065: WHEN fnd_api.g_exc_error THEN
6066: x_return_status := fnd_api.g_ret_sts_error;
6067: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6068:
6069: IF (l_debug = 1) THEN
6070: mydebug('load_pick: Error in load_pick API: ' || SQLERRM);
6071: END IF;
6070: mydebug('load_pick: Error in load_pick API: ' || SQLERRM);
6071: END IF;
6072: WHEN OTHERS THEN
6073: x_return_status := fnd_api.g_ret_sts_unexp_error;
6074: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6075:
6076: IF (l_debug = 1) THEN
6077: mydebug('load_pick: Unexpected Error in load_pick API: ' || SQLERRM);
6078: END IF;
6180: , p_source => 1
6181: , p_cost_group_id => NULL
6182: , x_lpn_id => l_transfer_lpn_id
6183: );
6184: fnd_msg_pub.count_and_get(p_count => l_msg_cnt, p_data => l_msg_data);
6185:
6186: IF (l_msg_cnt = 0) THEN
6187: IF (l_debug = 1) THEN
6188: mydebug('insert_mmtt_pack: Successful');
6197: mydebug('insert_mmtt_pack: Not Successful2');
6198: END IF;
6199:
6200: FOR i IN 1 .. l_msg_cnt LOOP
6201: l_msg_data := fnd_msg_pub.get(i, 'F');
6202:
6203: IF (l_debug = 1) THEN
6204: mydebug(REPLACE(l_msg_data, fnd_global.local_chr(0), ' '));
6205: END IF;
6207: END IF;
6208:
6209: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
6210: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
6211: fnd_msg_pub.ADD;
6212: RAISE fnd_api.g_exc_unexpected_error;
6213: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
6214: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
6215: fnd_msg_pub.ADD;
6211: fnd_msg_pub.ADD;
6212: RAISE fnd_api.g_exc_unexpected_error;
6213: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
6214: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
6215: fnd_msg_pub.ADD;
6216: RAISE fnd_api.g_exc_error;
6217: END IF;
6218: ELSE
6219: -- LPN exists. Get LPN ID
6622: x_return_status := fnd_api.g_ret_sts_success;
6623: EXCEPTION
6624: WHEN fnd_api.g_exc_error THEN
6625: x_return_status := fnd_api.g_ret_sts_error;
6626: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6627: WHEN OTHERS THEN
6628: x_return_status := fnd_api.g_ret_sts_unexp_error;
6629: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6630: END insert_mmtt_pack;
6625: x_return_status := fnd_api.g_ret_sts_error;
6626: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6627: WHEN OTHERS THEN
6628: x_return_status := fnd_api.g_ret_sts_unexp_error;
6629: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6630: END insert_mmtt_pack;
6631:
6632: PROCEDURE change_lpn(
6633: p_org_id IN NUMBER
6789: );
6790:
6791: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
6792: fnd_message.set_name('WMS', 'WMS_TD_MODIFY_LPN_ERROR');
6793: fnd_msg_pub.ADD;
6794: RAISE fnd_api.g_exc_unexpected_error;
6795: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
6796: fnd_message.set_name('WMS', 'WMS_TD_MODIFY_LPN_ERROR');
6797: fnd_msg_pub.ADD;
6793: fnd_msg_pub.ADD;
6794: RAISE fnd_api.g_exc_unexpected_error;
6795: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
6796: fnd_message.set_name('WMS', 'WMS_TD_MODIFY_LPN_ERROR');
6797: fnd_msg_pub.ADD;
6798: RAISE fnd_api.g_exc_error;
6799: END IF;
6800: END IF;
6801:
6803: x_return_status := fnd_api.g_ret_sts_success;
6804: EXCEPTION
6805: WHEN fnd_api.g_exc_error THEN
6806: x_return_status := fnd_api.g_ret_sts_error;
6807: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6808: WHEN OTHERS THEN
6809: x_return_status := fnd_api.g_ret_sts_unexp_error;
6810: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6811: END change_lpn;
6806: x_return_status := fnd_api.g_ret_sts_error;
6807: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6808: WHEN OTHERS THEN
6809: x_return_status := fnd_api.g_ret_sts_unexp_error;
6810: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
6811: END change_lpn;
6812:
6813: PROCEDURE multiple_lpn_pick(
6814: p_lpn_id IN NUMBER
7866: END IF;
7867: EXCEPTION
7868: WHEN fnd_api.g_exc_error THEN
7869: x_return_status := fnd_api.g_ret_sts_error;
7870: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7871:
7872: IF lpn_ser_cur%ISOPEN THEN
7873: CLOSE lpn_ser_cur;
7874: END IF;
7887: mydebug('multiple_lpn_pick: raise FND_API.G_EXC_ERROR');
7888: END IF;
7889: WHEN OTHERS THEN
7890: x_return_status := fnd_api.g_ret_sts_unexp_error;
7891: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
7892:
7893: IF lpn_ser_cur%ISOPEN THEN
7894: CLOSE lpn_ser_cur;
7895: END IF;
8066: -- Standard call to check for call compatibility
8067: --
8068: IF NOT fnd_api.compatible_api_call(l_api_version_number, p_api_version_number, l_api_name, g_pkg_name) THEN
8069: fnd_message.set_name('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
8070: fnd_msg_pub.ADD;
8071: RAISE fnd_api.g_exc_error;
8072: END IF;
8073:
8074: --
8074: --
8075: -- Initialize message list.
8076: --
8077: IF fnd_api.to_boolean(p_init_msg_lst) THEN
8078: fnd_msg_pub.initialize;
8079: END IF;
8080:
8081: --
8082: -- Initialize API return status to success
8194: mydebug(' l_mmtt_mo_type => ' || l_mmtt_mo_type);
8195: mydebug(' l_mo_type_in_lpn => ' || l_mo_type_in_lpn);
8196: END IF;
8197: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_MO_TYPE');
8198: fnd_msg_pub.ADD;
8199: RAISE fnd_api.g_exc_error;
8200: ELSIF l_mmtt_txn_type_id = 35
8201: OR l_mmtt_txn_type_id = 51 THEN -- Mfg pick
8202: IF l_mmtt_wip_entity_type <> l_wip_entity_type_in_lpn THEN
8204: mydebug('validate_pick_to_lpn: This is a manufacturing component pick.');
8205: mydebug('WIP entity type IS NOT the same AS that OF the old mmtt RECORD');
8206: END IF;
8207: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_MFG_MODE');
8208: fnd_msg_pub.ADD;
8209: RAISE fnd_api.g_exc_error;
8210: END IF;
8211: END IF;
8212: -- *********************End of bug fix 2078002,2095080 ********************
8275: mydebug('validate_pick_to_lpn: Cannot add picks not going to the same sub');
8276: END IF;
8277:
8278: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_SUBINV');
8279: fnd_msg_pub.ADD;
8280: RAISE fnd_api.g_exc_error;
8281: END IF;
8282: ELSE
8283: --
8316: mydebug('validate_pick_to_lpn: Drop LPN has pick(s) for an LPN-controlled sub');
8317: END IF;
8318:
8319: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_SUBINV');
8320: fnd_msg_pub.ADD;
8321: RAISE fnd_api.g_exc_error;
8322: END IF;
8323: END IF;
8324:
8346: mydebug('validate_pick_to_lpn: Drop LPN is associated with material FOR a different operation plan');
8347: END IF;
8348:
8349: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_OPER_PLAN');
8350: fnd_msg_pub.ADD;
8351: RAISE fnd_api.g_exc_error;
8352: END IF;
8353:
8354:
8395: mydebug('validate_pick_to_lpn: can NOT find move order line for current task');
8396: END IF;
8397:
8398: fnd_message.set_name('WMS', 'WMS_NO_MOL');
8399: fnd_msg_pub.ADD;
8400: RAISE fnd_api.g_exc_error;
8401: END IF;
8402:
8403: IF l_current_carton_grouping_id IS NOT NULL THEN -- found carton_grouping_id
8440: mydebug('validate_pick_to_lpn: can NOT find either wdd or wda for tasks in the lpn');
8441: END IF;
8442:
8443: fnd_message.set_name('WMS', 'WMS_NO_WDD_WDA');
8444: fnd_msg_pub.ADD;
8445: RAISE fnd_api.g_exc_error;
8446: END IF;
8447:
8448: IF l_pick_to_lpn_delivery_id IS NULL THEN
8457: mydebug('validate_pick_to_lpn: other tasks in lpn have different deliveries');
8458: END IF;
8459:
8460: fnd_message.set_name('WMS', 'WMS_PICK_TO_LPN_DIFF_DELIV');
8461: fnd_msg_pub.ADD;
8462: RAISE fnd_api.g_exc_error;
8463: END IF;
8464: ELSE -- they have different carton_grouping_id
8465: IF (l_debug = 1) THEN
8511: END IF;
8512: END;
8513: IF (l_same_carton_grouping = FALSE) then
8514: fnd_message.set_name('WMS', 'WMS_DIFF_CARTON_GROUP');
8515: fnd_msg_pub.ADD;
8516: RAISE fnd_api.g_exc_error;
8517: END IF; --End of fix for bug#4440585.
8518:
8519: END IF;
8522: mydebug('validate_pick_to_lpn: some of tasks in lpn have NULL carton_grouping_id');
8523: END IF;
8524:
8525: fnd_message.set_name('WMS', 'WMS_CARTON_GROUP_NULL');
8526: fnd_msg_pub.ADD;
8527: RAISE fnd_api.g_exc_error;
8528: END IF;
8529: ELSE --carton_grouping_id is null
8530: IF (l_debug = 1) THEN
8532: END IF;
8533: --bug3481923 only fail if it is not requisition on repl mo
8534: if (l_mmtt_mo_type not in(1,2)) then
8535: fnd_message.set_name('WMS', 'WMS_CARTON_GROUP_NULL');
8536: fnd_msg_pub.ADD;
8537: RAISE fnd_api.g_exc_error;
8538: end if;
8539: END IF;
8540: END IF;
8563: mydebug('validate_pick_to_lpn: Picked LPN and current MMTT go to different deliveries.');
8564: END IF;
8565:
8566: fnd_message.set_name('WMS', 'WMS_PICK_TO_LPN_DIFF_DELIV');
8567: fnd_msg_pub.ADD;
8568: RAISE fnd_api.g_exc_error;
8569: END IF;
8570: ELSIF l_pick_to_lpn_delivery_id2 IS NULL THEN
8571: IF (l_debug = 1) THEN
8578: mydebug('validate_pick_to_lpn: Picked LPN does not have delivery and current task has delivery.');
8579: END IF;
8580:
8581: fnd_message.set_name('WMS', 'WMS_PICK_TO_LPN_DIFF_DELIV');
8582: fnd_msg_pub.ADD;
8583: RAISE fnd_api.g_exc_error;
8584: END IF;
8585: ELSIF l_pick_to_lpn_delivery_id2 = -999 THEN
8586: IF (l_debug = 1) THEN
8609: mydebug('validate_pick_to_lpn: Picked LPN and current MMTT go to different deliveries.');
8610: END IF;
8611:
8612: fnd_message.set_name('WMS', 'WMS_PICK_TO_LPN_DIFF_DELIV');
8613: fnd_msg_pub.ADD;
8614: RAISE fnd_api.g_exc_error;
8615: ELSE
8616: --
8617: -- Picked LPN and current MMTT are on the same delivery
8656: mydebug('validate_pick_to_lpn: LPNs are on diff deliveries.');
8657: END IF;
8658:
8659: fnd_message.set_name('WMS', 'WMS_PICK_TO_LPN_DIFF_DELIV');
8660: fnd_msg_pub.ADD;
8661: RAISE fnd_api.g_exc_error;
8662: ELSE
8663: --
8664: -- Child LPN has the delivery as the current MMTT, return success
8718: EXCEPTION
8719: WHEN fnd_api.g_exc_error THEN
8720: x_return_status := fnd_api.g_ret_sts_error;
8721: -- Get message count and data
8722: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8723:
8724: IF (l_debug = 1) THEN
8725: mydebug('validate_pick_to_lpn: @' || x_msg_data || '@');
8726: END IF;
8762: END IF;
8763: WHEN OTHERS THEN
8764: x_return_status := fnd_api.g_ret_sts_unexp_error;
8765:
8766: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
8767: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
8768: END IF;
8769:
8770: -- Get message count and data
8763: WHEN OTHERS THEN
8764: x_return_status := fnd_api.g_ret_sts_unexp_error;
8765:
8766: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
8767: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
8768: END IF;
8769:
8770: -- Get message count and data
8771: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8767: fnd_msg_pub.add_exc_msg(g_pkg_name, l_api_name);
8768: END IF;
8769:
8770: -- Get message count and data
8771: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
8772:
8773: IF others_in_mmtt_delivery_cursor%ISOPEN THEN
8774: CLOSE others_in_mmtt_delivery_cursor;
8775: END IF;
9183: , p_source => 8
9184: , p_cost_group_id => NULL
9185: , x_lpn_id => l_to_lpn_id
9186: );
9187: fnd_msg_pub.count_and_get(p_count => l_msg_cnt, p_data => l_msg_data);
9188:
9189: IF (l_msg_cnt = 0) THEN
9190: IF (l_debug = 1) THEN
9191: mydebug('multiple_pick: Successful');
9200: mydebug('multiple_pick: Not Successful2');
9201: END IF;
9202:
9203: FOR i IN 1 .. l_msg_cnt LOOP
9204: l_msg_data := fnd_msg_pub.get(i, 'F');
9205:
9206: IF (l_debug = 1) THEN
9207: mydebug(REPLACE(l_msg_data, fnd_global.local_chr(0), ' '));
9208: END IF;
9210: END IF;
9211:
9212: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
9213: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
9214: fnd_msg_pub.ADD;
9215: RAISE fnd_api.g_exc_unexpected_error;
9216: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
9217: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
9218: fnd_msg_pub.ADD;
9214: fnd_msg_pub.ADD;
9215: RAISE fnd_api.g_exc_unexpected_error;
9216: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
9217: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
9218: fnd_msg_pub.ADD;
9219: RAISE fnd_api.g_exc_error;
9220: END IF;
9221: ELSIF p_to_lpn <> '-999' THEN
9222: IF (l_debug = 1) THEN
9325: l_progress := '160';
9326:
9327: IF l_pick_qty_remaining > l_mtl_reservation_tbl(1).primary_reservation_quantity THEN
9328: FND_MESSAGE.SET_NAME('INV','INV_INSUFF_QTY_RSV');
9329: FND_MSG_PUB.Add;
9330: RAISE fnd_api.g_exc_unexpected_error;
9331: END IF;
9332:
9333: --Update loc, sub and locator in new reservation
9353:
9354: -- Return an error if the transfer reservations call failed
9355: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9356: FND_MESSAGE.SET_NAME('INV','INV_TRANSFER_RSV_FAILED');
9357: FND_MSG_PUB.Add;
9358: RAISE fnd_api.g_exc_unexpected_error;
9359: END IF;
9360:
9361: ELSE
9370: mydebug('multiple_pick: Cannot transfer detailed reservation as confirmed sub is NOT reservable. cannot pick FROM NEW location. throw error');
9371: END IF;
9372:
9373: FND_MESSAGE.SET_NAME('INV','INV_TRANSFER_RSV_FAILED');
9374: FND_MSG_PUB.ADD;
9375: RAISE FND_API.g_exc_unexpected_error;
9376:
9377: END IF;
9378:
9378:
9379: END IF;
9380: */
9381: fnd_message.set_name('INV', 'INV_TRANSFER_RSV_FAILED');
9382: fnd_msg_pub.ADD;
9383: RAISE fnd_api.g_exc_unexpected_error;
9384: END IF;
9385: END IF;
9386:
10163:
10164: /*Bug#3957819.IF the serial number is already used , throw an error*/
10165: IF l_serial_count > 1 THEN
10166: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SER');
10167: fnd_msg_pub.ADD;
10168: RAISE fnd_api.g_exc_error;
10169: END IF;
10170: /*End of fix for Bug#3957819 */
10171:
10245:
10246: /*Bug#3957819.IF the serial number is already used , throw an error*/
10247: IF l_serial_count > 1 THEN
10248: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SER');
10249: fnd_msg_pub.ADD;
10250: RAISE fnd_api.g_exc_error;
10251: END IF;
10252: /*End of fix for Bug#3957819 */
10253:
10344:
10345: /*Bug#3957819.IF the serial number is already used , throw an error*/
10346: IF l_serial_count > 1 THEN
10347: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SER');
10348: fnd_msg_pub.ADD;
10349: RAISE fnd_api.g_exc_error;
10350: END IF;
10351: /*End of fix for Bug#3957819 */
10352:
10417:
10418: /*Bug#3957819.IF the serial number is already used , throw an error*/
10419: IF l_serial_count > 1 THEN
10420: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SER');
10421: fnd_msg_pub.ADD;
10422: RAISE fnd_api.g_exc_error;
10423: END IF;
10424: /*End of fix for Bug#3957819 */
10425:
10475: END IF;
10476: EXCEPTION
10477: WHEN fnd_api.g_exc_error THEN
10478: x_return_status := fnd_api.g_ret_sts_error;
10479: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
10480: ROLLBACK TO sp_multiple_pick;
10481:
10482: IF (l_debug = 1) THEN
10483: mydebug('multiple_pick : raise FND_API.G_EXC_ERROR: ' || SQLERRM);
10484: mydebug('l_progress = ' || l_progress);
10485: END IF;
10486: WHEN OTHERS THEN
10487: x_return_status := fnd_api.g_ret_sts_unexp_error;
10488: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
10489: ROLLBACK TO sp_multiple_pick;
10490:
10491: IF (l_debug = 1) THEN
10492: mydebug('multiple_pick : raise OTHER exception: ' || SQLERRM);
10547: , p_organization_id => p_organization_id
10548: , x_lpn_id => p_lpn_id
10549: , p_source => 3
10550: );
10551: fnd_msg_pub.count_and_get(p_count => l_msg_count, p_data => x_msg_data);
10552:
10553: IF (l_msg_count = 0) THEN
10554: IF (l_debug = 1) THEN
10555: mydebug('Successful');
10564: mydebug('Not Successful2');
10565: END IF;
10566:
10567: FOR i IN 1 .. l_msg_count LOOP
10568: x_msg_data := fnd_msg_pub.get(i, 'F');
10569:
10570: IF (l_debug = 1) THEN
10571: mydebug(REPLACE(x_msg_data, fnd_global.local_chr(0), ' '));
10572: END IF;
10574: END IF;
10575:
10576: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
10577: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
10578: fnd_msg_pub.ADD;
10579: RAISE fnd_api.g_exc_unexpected_error;
10580: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
10581: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
10582: fnd_msg_pub.ADD;
10578: fnd_msg_pub.ADD;
10579: RAISE fnd_api.g_exc_unexpected_error;
10580: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
10581: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
10582: fnd_msg_pub.ADD;
10583: RAISE fnd_api.g_exc_error;
10584: END IF;
10585: ELSE -- lpn exists
10586: SELECT lpn_id
10592: x_return_status := fnd_api.g_ret_sts_success;
10593: EXCEPTION
10594: WHEN fnd_api.g_exc_error THEN
10595: x_return_status := fnd_api.g_ret_sts_error;
10596: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
10597: WHEN OTHERS THEN
10598: x_return_status := fnd_api.g_ret_sts_unexp_error;
10599: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
10600: END create_lpn;
10595: x_return_status := fnd_api.g_ret_sts_error;
10596: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
10597: WHEN OTHERS THEN
10598: x_return_status := fnd_api.g_ret_sts_unexp_error;
10599: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
10600: END create_lpn;
10601:
10602: -- p sub, p_loc are user entered values
10603: -- p_orig_sub, p_orig_loc are system suggested values
11079: IF (l_debug = 1) THEN
11080: mydebug('pick_drop: Insert MMTT pack Unexpected error');
11081: END IF;
11082:
11083: fnd_msg_pub.ADD;
11084: RAISE fnd_api.g_exc_unexpected_error;
11085: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
11086: IF (l_debug = 1) THEN
11087: mydebug('pick_drop: Insert MMTT pack error');
11086: IF (l_debug = 1) THEN
11087: mydebug('pick_drop: Insert MMTT pack error');
11088: END IF;
11089:
11090: fnd_msg_pub.ADD;
11091: RAISE fnd_api.g_exc_error;
11092: END IF;
11093: END IF;
11094:
11269: mydebug('pick_drop: Period is invalid');
11270: END IF;
11271:
11272: fnd_message.set_name('INV', 'INV_NO_OPEN_PERIOD');
11273: fnd_msg_pub.ADD;
11274: RAISE fnd_api.g_exc_unexpected_error;
11275: END IF;
11276:
11277: -- call workflow for location discrepancy
11320: END IF;
11321:
11322: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
11323: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
11324: fnd_msg_pub.ADD;
11325: RAISE fnd_api.g_exc_unexpected_error;
11326: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
11327: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
11328: fnd_msg_pub.ADD;
11324: fnd_msg_pub.ADD;
11325: RAISE fnd_api.g_exc_unexpected_error;
11326: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
11327: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
11328: fnd_msg_pub.ADD;
11329: RAISE fnd_api.g_exc_error;
11330: END IF;
11331:
11332: END LOOP;
11392: mydebug('pick_drop : Error callinf WF wrapper');
11393: END IF;
11394:
11395: fnd_message.set_name('WMS', 'WMS_WORK_FLOW_FAIL');
11396: fnd_msg_pub.ADD;
11397: RAISE fnd_api.g_exc_unexpected_error;
11398: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
11399: IF (l_debug = 1) THEN
11400: mydebug('pick_drop : Error calling WF wrapper');
11400: mydebug('pick_drop : Error calling WF wrapper');
11401: END IF;
11402:
11403: fnd_message.set_name('WMS', 'WMS_WORK_FLOW_FAIL');
11404: fnd_msg_pub.ADD;
11405: RAISE fnd_api.g_exc_error;
11406: END IF;
11407: END IF;
11408: END IF;
11538: END IF;
11539:
11540: IF l_txn_ret <> 0 THEN
11541: fnd_message.set_name('WMS', 'WMS_TD_TXNMGR_ERROR');
11542: fnd_msg_pub.ADD;
11543: RAISE fnd_api.g_exc_unexpected_error;
11544: END IF;
11545: ELSE
11546: --
11561: END IF;
11562:
11563: IF l_return_status <> fnd_api.g_ret_sts_success THEN
11564: fnd_message.set_name('WMS', 'WMS_TD_TXNMGR_ERROR');
11565: fnd_msg_pub.ADD;
11566: RAISE fnd_api.g_exc_unexpected_error;
11567: END IF;
11568: END IF; -- end if release J
11569: ELSE
11594: ' contains delivery details lines that have been ship confirmed.');
11595: END IF;
11596:
11597: fnd_message.set_name('WMS', 'WMS_STG_MV_LPN_SHIPPED');
11598: fnd_msg_pub.ADD;
11599: RAISE fnd_api.g_exc_unexpected_error;
11600: END IF;
11601: END IF;
11602:
11695: END IF;
11696:
11697: IF l_txn_ret <> 0 THEN
11698: fnd_message.set_name('WMS', 'WMS_TD_TXNMGR_ERROR');
11699: fnd_msg_pub.ADD;
11700: RAISE fnd_api.g_exc_unexpected_error;
11701: END IF;
11702: END IF; -- for l_tran_type_id <> 35
11703:
12249: IF (l_debug = 1) THEN
12250: mydebug('pick_drop: modify_lpn_wrapper Unexpected error');
12251: END IF;
12252:
12253: fnd_msg_pub.ADD;
12254: RAISE fnd_api.g_exc_unexpected_error;
12255: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
12256: IF (l_debug = 1) THEN
12257: mydebug('pick_drop: modify_lpn_wrapper error');
12256: IF (l_debug = 1) THEN
12257: mydebug('pick_drop: modify_lpn_wrapper error');
12258: END IF;
12259:
12260: fnd_msg_pub.ADD;
12261: RAISE fnd_api.g_exc_error;
12262: END IF;
12263:
12264: -- Bug 4238917 no longer update lpn_context to 11 outside of TM
12400: mydebug('pick_drop: Error in pick_drop API: ' || SQLERRM);
12401: END IF;
12402:
12403: fnd_message.set_name('WMS', 'WMS_TD_PICK_DROP_FAIL');
12404: fnd_msg_pub.ADD;
12405: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12406: WHEN OTHERS THEN
12407: x_return_status := fnd_api.g_ret_sts_error;
12408:
12401: END IF;
12402:
12403: fnd_message.set_name('WMS', 'WMS_TD_PICK_DROP_FAIL');
12404: fnd_msg_pub.ADD;
12405: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12406: WHEN OTHERS THEN
12407: x_return_status := fnd_api.g_ret_sts_error;
12408:
12409: IF (l_debug = 1) THEN
12410: mydebug('pick_drop: Unexpected Error in pick_drop API: ' || SQLERRM);
12411: END IF;
12412:
12413: fnd_message.set_name('WMS', 'WMS_TD_PICK_DROP_FAIL');
12414: fnd_msg_pub.ADD;
12415: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12416: END pick_drop;
12417:
12418: PROCEDURE pick_by_label(
12411: END IF;
12412:
12413: fnd_message.set_name('WMS', 'WMS_TD_PICK_DROP_FAIL');
12414: fnd_msg_pub.ADD;
12415: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12416: END pick_drop;
12417:
12418: PROCEDURE pick_by_label(
12419: p_sign_on_emp_id IN NUMBER
12724:
12725: COMMIT;
12726: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
12727: fnd_message.set_name('WMS', 'WMS_TD_TDENG_ERROR');
12728: fnd_msg_pub.ADD;
12729: RAISE fnd_api.g_exc_unexpected_error;
12730: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
12731: IF (l_debug = 1) THEN
12732: mydebug('pick_by_label: Setting status to S');
12758: x_return_status := fnd_api.g_ret_sts_success;
12759: EXCEPTION
12760: WHEN fnd_api.g_exc_error THEN
12761: x_return_status := fnd_api.g_ret_sts_error;
12762: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12763: WHEN OTHERS THEN
12764: x_return_status := fnd_api.g_ret_sts_unexp_error;
12765: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12766: END pick_by_label;
12761: x_return_status := fnd_api.g_ret_sts_error;
12762: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12763: WHEN OTHERS THEN
12764: x_return_status := fnd_api.g_ret_sts_unexp_error;
12765: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12766: END pick_by_label;
12767:
12768: PROCEDURE manual_pick(
12769: p_sign_on_emp_id IN NUMBER
12889: END IF;
12890:
12891: l_mmtt_rowcnt := 0;
12892: fnd_message.set_name('WMS', 'WMS_INVALID_PICKID');
12893: fnd_msg_pub.ADD;
12894: RAISE fnd_api.g_exc_error;
12895: END;
12896:
12897: IF (l_debug = 1) THEN
12919: mydebug('manual_pick: Task has been assigned to somebody else');
12920: END IF;
12921:
12922: fnd_message.set_name('WMS', 'WMS_TASK_UNAVAIL');
12923: fnd_msg_pub.ADD;
12924: RAISE fnd_api.g_exc_error;
12925: ELSE
12926: IF (l_debug = 1) THEN
12927: mydebug('manual_pick: getting Resource ID....');
13137: x_return_status := fnd_api.g_ret_sts_success;
13138: EXCEPTION
13139: WHEN fnd_api.g_exc_error THEN
13140: x_return_status := fnd_api.g_ret_sts_error;
13141: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13142: WHEN OTHERS THEN
13143: x_return_status := fnd_api.g_ret_sts_unexp_error;
13144: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13145: END manual_pick;
13140: x_return_status := fnd_api.g_ret_sts_error;
13141: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13142: WHEN OTHERS THEN
13143: x_return_status := fnd_api.g_ret_sts_unexp_error;
13144: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13145: END manual_pick;
13146:
13147: PROCEDURE check_carton(
13148: p_carton_id IN NUMBER
13221: x_return_status := fnd_api.g_ret_sts_success;
13222: EXCEPTION
13223: WHEN fnd_api.g_exc_error THEN
13224: x_return_status := fnd_api.g_ret_sts_error;
13225: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13226: WHEN OTHERS THEN
13227: x_return_status := fnd_api.g_ret_sts_unexp_error;
13228: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13229: END check_carton;
13224: x_return_status := fnd_api.g_ret_sts_error;
13225: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13226: WHEN OTHERS THEN
13227: x_return_status := fnd_api.g_ret_sts_unexp_error;
13228: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13229: END check_carton;
13230:
13231:
13232:
13290: ) THEN
13291: IF (l_debug = 1) THEN
13292: mydebug('check_pack_lpn: LPN already exists but with different context or Org');
13293: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_CNTXT_ORG');
13294: fnd_msg_pub.ADD;
13295: END IF;
13296:
13297: x_return_status := fnd_api.g_ret_sts_error;
13298: RETURN;
13328: mydebug('check_pack_lpn: Not Successful2');
13329: END IF;
13330:
13331: FOR i IN 1 .. l_msg_count LOOP
13332: x_msg_data := fnd_msg_pub.get(i, 'F');
13333:
13334: IF (l_debug = 1) THEN
13335: mydebug(REPLACE(x_msg_data, fnd_global.local_chr(0), ' '));
13336: END IF;
13339:
13340: IF l_return_status = fnd_api.g_ret_sts_unexp_error
13341: OR l_return_status = fnd_api.g_ret_sts_error THEN
13342: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
13343: fnd_msg_pub.ADD;
13344: RAISE fnd_api.g_exc_unexpected_error;
13345: END IF;
13346:
13347: END IF;
13353: END IF;
13354: EXCEPTION
13355: WHEN fnd_api.g_exc_error THEN
13356: x_return_status := fnd_api.g_ret_sts_error;
13357: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13358: WHEN OTHERS THEN
13359: x_return_status := fnd_api.g_ret_sts_unexp_error;
13360: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13361: END check_pack_lpn;
13356: x_return_status := fnd_api.g_ret_sts_error;
13357: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13358: WHEN OTHERS THEN
13359: x_return_status := fnd_api.g_ret_sts_unexp_error;
13360: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13361: END check_pack_lpn;
13362:
13363: PROCEDURE mydebug(msg IN VARCHAR2) IS
13364: l_msg VARCHAR2(5100);
13406: EXCEPTION
13407: WHEN OTHERS THEN
13408: x_return_status := fnd_api.g_ret_sts_unexp_error;
13409:
13410: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
13411: fnd_msg_pub.add_exc_msg(g_pkg_name, 'Check_Is_Reservable_SUB');
13412: END IF;
13413: END check_is_reservable_sub;
13414: -- Bug 2924823 H to I added delete allocation
13407: WHEN OTHERS THEN
13408: x_return_status := fnd_api.g_ret_sts_unexp_error;
13409:
13410: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
13411: fnd_msg_pub.add_exc_msg(g_pkg_name, 'Check_Is_Reservable_SUB');
13412: END IF;
13413: END check_is_reservable_sub;
13414: -- Bug 2924823 H to I added delete allocation
13415:
13629: );
13630:
13631: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
13632: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
13633: fnd_msg_pub.ADD;
13634: RAISE fnd_api.g_exc_unexpected_error;
13635: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
13636: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
13637: fnd_msg_pub.ADD;
13633: fnd_msg_pub.ADD;
13634: RAISE fnd_api.g_exc_unexpected_error;
13635: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
13636: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
13637: fnd_msg_pub.ADD;
13638: RAISE fnd_api.g_exc_error;
13639: END IF;
13640:
13641: mydebug('CLEANUP_TASK : Calling WorkFlow with Calling Program as **cleanup_task: Pick zero**');
13906: COMMIT;
13907: EXCEPTION
13908: WHEN OTHERS THEN
13909: x_return_status := fnd_api.g_ret_sts_error;
13910: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13911: IF c_mmtt_info%ISOPEN THEN
13912: CLOSE c_mmtt_info;
13913: END IF;
13914: IF (l_debug = 1) THEN
14149: IF (l_debug = 1) THEN
14150: mydebug('validate_sub_loc_status: Error - ' || SQLERRM);
14151: END IF;
14152:
14153: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14154: WHEN OTHERS THEN
14155: x_return_status := fnd_api.g_ret_sts_unexp_error;
14156:
14157: IF (l_debug = 1) THEN
14157: IF (l_debug = 1) THEN
14158: mydebug('validate_sub_loc_status: Unexpected Error - ' || SQLERRM);
14159: END IF;
14160:
14161: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14162: END validate_sub_loc_status;
14163:
14164: PROCEDURE validate_pick_drop_sub(
14165: p_temp_id IN NUMBER
14227:
14228: IF l_lpn_controlled_flag = wms_globals.g_lpn_controlled_sub THEN
14229: IF (l_mmtt_mo_type = 5) THEN
14230: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SUB');
14231: fnd_msg_pub.ADD;
14232: RAISE fnd_api.g_exc_error;
14233: END IF;
14234:
14235: IF (l_debug = 1) THEN
14259: mydebug('validate_pick_drop_sub: Drop LPN is going to a different sub');
14260: END IF;
14261:
14262: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SUB');
14263: fnd_msg_pub.ADD;
14264: RAISE fnd_api.g_exc_error;
14265: END IF;
14266: END IF;
14267:
14275: IF (l_debug = 1) THEN
14276: mydebug('validate_pick_drop_sub: Error - ' || SQLERRM);
14277: END IF;
14278:
14279: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14280: WHEN OTHERS THEN
14281: x_return_status := fnd_api.g_ret_sts_unexp_error;
14282:
14283: IF (l_debug = 1) THEN
14283: IF (l_debug = 1) THEN
14284: mydebug('validate_pick_drop_sub: Unexpected Error - ' || SQLERRM);
14285: END IF;
14286:
14287: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14288: END validate_pick_drop_sub;
14289:
14290: PROCEDURE create_lock_mmtt_temp_id(lock_name IN VARCHAR2, x_return_status OUT NOCOPY VARCHAR2) IS
14291: l_lock_id VARCHAR2(50);
14317: mydebug('timeout for the creation of user lock or deadlock');
14318: END IF;
14319:
14320: fnd_message.set_name('WMS', 'WMS_RECORD_BEING_CHANGED');
14321: fnd_msg_pub.ADD;
14322: RAISE fnd_api.g_exc_error;
14323: END IF;
14324: EXCEPTION
14325: WHEN fnd_api.g_exc_error THEN
15010:
15011: EXCEPTION
15012: WHEN OTHERS THEN
15013: x_return_status := fnd_api.g_ret_sts_unexp_error;
15014: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
15015:
15016: IF (l_debug = 1) THEN
15017: mydebug('Unexpected Error occurred - ' || SQLERRM);
15018: END IF;
15080: -- Bug 2924823 H to I
15081: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
15082: mydebug('call_workflow : Error callinf WF wrapper');
15083: FND_MESSAGE.SET_NAME('WMS','WMS_WORK_FLOW_FAIL');
15084: FND_MSG_PUB.ADD;
15085: RAISE FND_API.g_exc_unexpected_error;
15086:
15087: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
15088: mydebug('call_workflow : Error calling WF wrapper');
15086:
15087: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
15088: mydebug('call_workflow : Error calling WF wrapper');
15089: FND_MESSAGE.SET_NAME('WMS','WMS_WORK_FLOW_FAIL');
15090: FND_MSG_PUB.ADD;
15091: RAISE FND_API.G_EXC_ERROR;
15092: END IF;
15093: END IF;
15094: END IF;
15577: , l_api_name
15578: , G_PKG_NAME
15579: ) THEN
15580: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
15581: FND_MSG_PUB.ADD;
15582: RAISE FND_API.G_EXC_ERROR;
15583: END IF;
15584:
15585:
15588: -- Initialize message list.
15589: --
15590:
15591: IF fnd_api.to_boolean(p_init_msg_lst) THEN
15592: fnd_msg_pub.initialize;
15593: END IF;
15594:
15595:
15596: BEGIN