[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:
10171:
10172: /*Bug#3957819.IF the serial number is already used , throw an error*/
10173: IF l_serial_count > 1 THEN
10174: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SER');
10175: fnd_msg_pub.ADD;
10176: RAISE fnd_api.g_exc_error;
10177: END IF;
10178: /*End of fix for Bug#3957819 */
10179:
10258:
10259: /*Bug#3957819.IF the serial number is already used , throw an error*/
10260: IF l_serial_count > 1 THEN
10261: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SER');
10262: fnd_msg_pub.ADD;
10263: RAISE fnd_api.g_exc_error;
10264: END IF;
10265: /*End of fix for Bug#3957819 */
10266:
10365:
10366: /*Bug#3957819.IF the serial number is already used , throw an error*/
10367: IF l_serial_count > 1 THEN
10368: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SER');
10369: fnd_msg_pub.ADD;
10370: RAISE fnd_api.g_exc_error;
10371: END IF;
10372: /*End of fix for Bug#3957819 */
10373:
10443:
10444: /*Bug#3957819.IF the serial number is already used , throw an error*/
10445: IF l_serial_count > 1 THEN
10446: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SER');
10447: fnd_msg_pub.ADD;
10448: RAISE fnd_api.g_exc_error;
10449: END IF;
10450: /*End of fix for Bug#3957819 */
10451:
10501: END IF;
10502: EXCEPTION
10503: WHEN fnd_api.g_exc_error THEN
10504: x_return_status := fnd_api.g_ret_sts_error;
10505: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
10506: ROLLBACK TO sp_multiple_pick;
10507:
10508: IF (l_debug = 1) THEN
10509: mydebug('multiple_pick : raise FND_API.G_EXC_ERROR: ' || SQLERRM);
10510: mydebug('l_progress = ' || l_progress);
10511: END IF;
10512: WHEN OTHERS THEN
10513: x_return_status := fnd_api.g_ret_sts_unexp_error;
10514: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
10515: ROLLBACK TO sp_multiple_pick;
10516:
10517: IF (l_debug = 1) THEN
10518: mydebug('multiple_pick : raise OTHER exception: ' || SQLERRM);
10573: , p_organization_id => p_organization_id
10574: , x_lpn_id => p_lpn_id
10575: , p_source => 3
10576: );
10577: fnd_msg_pub.count_and_get(p_count => l_msg_count, p_data => x_msg_data);
10578:
10579: IF (l_msg_count = 0) THEN
10580: IF (l_debug = 1) THEN
10581: mydebug('Successful');
10590: mydebug('Not Successful2');
10591: END IF;
10592:
10593: FOR i IN 1 .. l_msg_count LOOP
10594: x_msg_data := fnd_msg_pub.get(i, 'F');
10595:
10596: IF (l_debug = 1) THEN
10597: mydebug(REPLACE(x_msg_data, fnd_global.local_chr(0), ' '));
10598: END IF;
10600: END IF;
10601:
10602: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
10603: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
10604: fnd_msg_pub.ADD;
10605: RAISE fnd_api.g_exc_unexpected_error;
10606: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
10607: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
10608: fnd_msg_pub.ADD;
10604: fnd_msg_pub.ADD;
10605: RAISE fnd_api.g_exc_unexpected_error;
10606: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
10607: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
10608: fnd_msg_pub.ADD;
10609: RAISE fnd_api.g_exc_error;
10610: END IF;
10611: ELSE -- lpn exists
10612: SELECT lpn_id
10618: x_return_status := fnd_api.g_ret_sts_success;
10619: EXCEPTION
10620: WHEN fnd_api.g_exc_error THEN
10621: x_return_status := fnd_api.g_ret_sts_error;
10622: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
10623: WHEN OTHERS THEN
10624: x_return_status := fnd_api.g_ret_sts_unexp_error;
10625: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
10626: END create_lpn;
10621: x_return_status := fnd_api.g_ret_sts_error;
10622: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
10623: WHEN OTHERS THEN
10624: x_return_status := fnd_api.g_ret_sts_unexp_error;
10625: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
10626: END create_lpn;
10627:
10628: -- p sub, p_loc are user entered values
10629: -- p_orig_sub, p_orig_loc are system suggested values
11148: IF (l_debug = 1) THEN
11149: mydebug('pick_drop: Insert MMTT pack Unexpected error');
11150: END IF;
11151:
11152: fnd_msg_pub.ADD;
11153: RAISE fnd_api.g_exc_unexpected_error;
11154: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
11155: IF (l_debug = 1) THEN
11156: mydebug('pick_drop: Insert MMTT pack error');
11155: IF (l_debug = 1) THEN
11156: mydebug('pick_drop: Insert MMTT pack error');
11157: END IF;
11158:
11159: fnd_msg_pub.ADD;
11160: RAISE fnd_api.g_exc_error;
11161: END IF;
11162: END IF; -- Added for bug 12853197
11163: END IF;
11340: mydebug('pick_drop: Period is invalid');
11341: END IF;
11342:
11343: fnd_message.set_name('INV', 'INV_NO_OPEN_PERIOD');
11344: fnd_msg_pub.ADD;
11345: RAISE fnd_api.g_exc_unexpected_error;
11346: END IF;
11347:
11348: -- call workflow for location discrepancy
11391: END IF;
11392:
11393: IF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
11394: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
11395: fnd_msg_pub.ADD;
11396: RAISE fnd_api.g_exc_unexpected_error;
11397: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
11398: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
11399: fnd_msg_pub.ADD;
11395: fnd_msg_pub.ADD;
11396: RAISE fnd_api.g_exc_unexpected_error;
11397: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
11398: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
11399: fnd_msg_pub.ADD;
11400: RAISE fnd_api.g_exc_error;
11401: END IF;
11402:
11403: END LOOP;
11463: mydebug('pick_drop : Error callinf WF wrapper');
11464: END IF;
11465:
11466: fnd_message.set_name('WMS', 'WMS_WORK_FLOW_FAIL');
11467: fnd_msg_pub.ADD;
11468: RAISE fnd_api.g_exc_unexpected_error;
11469: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
11470: IF (l_debug = 1) THEN
11471: mydebug('pick_drop : Error calling WF wrapper');
11471: mydebug('pick_drop : Error calling WF wrapper');
11472: END IF;
11473:
11474: fnd_message.set_name('WMS', 'WMS_WORK_FLOW_FAIL');
11475: fnd_msg_pub.ADD;
11476: RAISE fnd_api.g_exc_error;
11477: END IF;
11478: END IF;
11479: END IF;
11674: END IF;
11675:
11676: IF l_txn_ret <> 0 THEN
11677: fnd_message.set_name('WMS', 'WMS_TD_TXNMGR_ERROR');
11678: fnd_msg_pub.ADD;
11679: RAISE fnd_api.g_exc_unexpected_error;
11680: END IF;
11681: ELSE
11682: --
11697: END IF;
11698:
11699: IF l_return_status <> fnd_api.g_ret_sts_success THEN
11700: fnd_message.set_name('WMS', 'WMS_TD_TXNMGR_ERROR');
11701: fnd_msg_pub.ADD;
11702: RAISE fnd_api.g_exc_unexpected_error;
11703: END IF;
11704: END IF; -- end if release J
11705: ELSE
11743: ' contains delivery details lines that have been ship confirmed.');
11744: END IF;
11745:
11746: fnd_message.set_name('WMS', 'WMS_STG_MV_LPN_SHIPPED');
11747: fnd_msg_pub.ADD;
11748: RAISE fnd_api.g_exc_unexpected_error;
11749: END IF;
11750: END IF;
11751:
11844: END IF;
11845:
11846: IF l_txn_ret <> 0 THEN
11847: fnd_message.set_name('WMS', 'WMS_TD_TXNMGR_ERROR');
11848: fnd_msg_pub.ADD;
11849: RAISE fnd_api.g_exc_unexpected_error;
11850: END IF;
11851: END IF; -- for l_tran_type_id <> 35
11852:
12495: IF (l_debug = 1) THEN
12496: mydebug('pick_drop: modify_lpn_wrapper Unexpected error');
12497: END IF;
12498:
12499: fnd_msg_pub.ADD;
12500: RAISE fnd_api.g_exc_unexpected_error;
12501: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
12502: IF (l_debug = 1) THEN
12503: mydebug('pick_drop: modify_lpn_wrapper error');
12502: IF (l_debug = 1) THEN
12503: mydebug('pick_drop: modify_lpn_wrapper error');
12504: END IF;
12505:
12506: fnd_msg_pub.ADD;
12507: RAISE fnd_api.g_exc_error;
12508: END IF;
12509:
12510: -- Bug 4238917 no longer update lpn_context to 11 outside of TM
12652: mydebug('pick_drop: Error in pick_drop API: ' || SQLERRM);
12653: END IF;
12654:
12655: fnd_message.set_name('WMS', 'WMS_TD_PICK_DROP_FAIL');
12656: fnd_msg_pub.ADD;
12657: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12658: WHEN OTHERS THEN
12659: x_return_status := fnd_api.g_ret_sts_error;
12660:
12653: END IF;
12654:
12655: fnd_message.set_name('WMS', 'WMS_TD_PICK_DROP_FAIL');
12656: fnd_msg_pub.ADD;
12657: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12658: WHEN OTHERS THEN
12659: x_return_status := fnd_api.g_ret_sts_error;
12660:
12661: IF (l_debug = 1) THEN
12662: mydebug('pick_drop: Unexpected Error in pick_drop API: ' || SQLERRM);
12663: END IF;
12664:
12665: fnd_message.set_name('WMS', 'WMS_TD_PICK_DROP_FAIL');
12666: fnd_msg_pub.ADD;
12667: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12668: END pick_drop;
12669:
12670: PROCEDURE pick_by_label(
12663: END IF;
12664:
12665: fnd_message.set_name('WMS', 'WMS_TD_PICK_DROP_FAIL');
12666: fnd_msg_pub.ADD;
12667: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
12668: END pick_drop;
12669:
12670: PROCEDURE pick_by_label(
12671: p_sign_on_emp_id IN NUMBER
12976:
12977: COMMIT;
12978: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
12979: fnd_message.set_name('WMS', 'WMS_TD_TDENG_ERROR');
12980: fnd_msg_pub.ADD;
12981: RAISE fnd_api.g_exc_unexpected_error;
12982: ELSIF l_return_status = fnd_api.g_ret_sts_error THEN
12983: IF (l_debug = 1) THEN
12984: mydebug('pick_by_label: Setting status to S');
13010: x_return_status := fnd_api.g_ret_sts_success;
13011: EXCEPTION
13012: WHEN fnd_api.g_exc_error THEN
13013: x_return_status := fnd_api.g_ret_sts_error;
13014: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13015: WHEN OTHERS THEN
13016: x_return_status := fnd_api.g_ret_sts_unexp_error;
13017: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13018: END pick_by_label;
13013: x_return_status := fnd_api.g_ret_sts_error;
13014: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13015: WHEN OTHERS THEN
13016: x_return_status := fnd_api.g_ret_sts_unexp_error;
13017: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13018: END pick_by_label;
13019:
13020: PROCEDURE manual_pick(
13021: p_sign_on_emp_id IN NUMBER
13141: END IF;
13142:
13143: l_mmtt_rowcnt := 0;
13144: fnd_message.set_name('WMS', 'WMS_INVALID_PICKID');
13145: fnd_msg_pub.ADD;
13146: RAISE fnd_api.g_exc_error;
13147: END;
13148:
13149: IF (l_debug = 1) THEN
13171: mydebug('manual_pick: Task has been assigned to somebody else');
13172: END IF;
13173:
13174: fnd_message.set_name('WMS', 'WMS_TASK_UNAVAIL');
13175: fnd_msg_pub.ADD;
13176: RAISE fnd_api.g_exc_error;
13177: ELSE
13178: IF (l_debug = 1) THEN
13179: mydebug('manual_pick: getting Resource ID....');
13389: x_return_status := fnd_api.g_ret_sts_success;
13390: EXCEPTION
13391: WHEN fnd_api.g_exc_error THEN
13392: x_return_status := fnd_api.g_ret_sts_error;
13393: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13394: WHEN OTHERS THEN
13395: x_return_status := fnd_api.g_ret_sts_unexp_error;
13396: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13397: END manual_pick;
13392: x_return_status := fnd_api.g_ret_sts_error;
13393: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13394: WHEN OTHERS THEN
13395: x_return_status := fnd_api.g_ret_sts_unexp_error;
13396: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13397: END manual_pick;
13398:
13399: PROCEDURE check_carton(
13400: p_carton_id IN NUMBER
13473: x_return_status := fnd_api.g_ret_sts_success;
13474: EXCEPTION
13475: WHEN fnd_api.g_exc_error THEN
13476: x_return_status := fnd_api.g_ret_sts_error;
13477: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13478: WHEN OTHERS THEN
13479: x_return_status := fnd_api.g_ret_sts_unexp_error;
13480: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13481: END check_carton;
13476: x_return_status := fnd_api.g_ret_sts_error;
13477: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13478: WHEN OTHERS THEN
13479: x_return_status := fnd_api.g_ret_sts_unexp_error;
13480: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13481: END check_carton;
13482:
13483:
13484:
13543: IF (l_debug = 1) THEN
13544: mydebug('check_pack_lpn: LPN already exists but with different context or Org');
13545: END IF;--bug9165521
13546: fnd_message.set_name('WMS', 'WMS_INVLD_PICKTO_LPN_CNTXT_ORG');
13547: fnd_msg_pub.ADD;
13548:
13549:
13550: x_return_status := fnd_api.g_ret_sts_error;
13551: RETURN;
13581: mydebug('check_pack_lpn: Not Successful2');
13582: END IF;
13583:
13584: FOR i IN 1 .. l_msg_count LOOP
13585: x_msg_data := fnd_msg_pub.get(i, 'F');
13586:
13587: IF (l_debug = 1) THEN
13588: mydebug(REPLACE(x_msg_data, fnd_global.local_chr(0), ' '));
13589: END IF;
13592:
13593: IF l_return_status = fnd_api.g_ret_sts_unexp_error
13594: OR l_return_status = fnd_api.g_ret_sts_error THEN
13595: fnd_message.set_name('WMS', 'WMS_TD_CREATE_LPN_ERROR');
13596: fnd_msg_pub.ADD;
13597: RAISE fnd_api.g_exc_unexpected_error;
13598: END IF;
13599:
13600: END IF;
13606: END IF;
13607: EXCEPTION
13608: WHEN fnd_api.g_exc_error THEN
13609: x_return_status := fnd_api.g_ret_sts_error;
13610: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13611: WHEN OTHERS THEN
13612: x_return_status := fnd_api.g_ret_sts_unexp_error;
13613: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13614: END check_pack_lpn;
13609: x_return_status := fnd_api.g_ret_sts_error;
13610: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13611: WHEN OTHERS THEN
13612: x_return_status := fnd_api.g_ret_sts_unexp_error;
13613: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
13614: END check_pack_lpn;
13615:
13616: PROCEDURE mydebug(msg IN VARCHAR2) IS
13617: l_msg VARCHAR2(5100);
13659: EXCEPTION
13660: WHEN OTHERS THEN
13661: x_return_status := fnd_api.g_ret_sts_unexp_error;
13662:
13663: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
13664: fnd_msg_pub.add_exc_msg(g_pkg_name, 'Check_Is_Reservable_SUB');
13665: END IF;
13666: END check_is_reservable_sub;
13667: -- Bug 2924823 H to I added delete allocation
13660: WHEN OTHERS THEN
13661: x_return_status := fnd_api.g_ret_sts_unexp_error;
13662:
13663: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
13664: fnd_msg_pub.add_exc_msg(g_pkg_name, 'Check_Is_Reservable_SUB');
13665: END IF;
13666: END check_is_reservable_sub;
13667: -- Bug 2924823 H to I added delete allocation
13668:
13882: );
13883:
13884: IF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
13885: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
13886: fnd_msg_pub.ADD;
13887: RAISE fnd_api.g_exc_unexpected_error;
13888: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
13889: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
13890: fnd_msg_pub.ADD;
13886: fnd_msg_pub.ADD;
13887: RAISE fnd_api.g_exc_unexpected_error;
13888: ELSIF x_return_status = fnd_api.g_ret_sts_error THEN
13889: fnd_message.set_name('WMS', 'WMS_LOG_EXCEPTION_FAIL');
13890: fnd_msg_pub.ADD;
13891: RAISE fnd_api.g_exc_error;
13892: END IF;
13893:
13894: mydebug('CLEANUP_TASK : Calling WorkFlow with Calling Program as **cleanup_task: Pick zero**');
14159: COMMIT;
14160: EXCEPTION
14161: WHEN OTHERS THEN
14162: x_return_status := fnd_api.g_ret_sts_error;
14163: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14164: IF c_mmtt_info%ISOPEN THEN
14165: CLOSE c_mmtt_info;
14166: END IF;
14167: IF (l_debug = 1) THEN
14402: IF (l_debug = 1) THEN
14403: mydebug('validate_sub_loc_status: Error - ' || SQLERRM);
14404: END IF;
14405:
14406: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14407: WHEN OTHERS THEN
14408: x_return_status := fnd_api.g_ret_sts_unexp_error;
14409:
14410: IF (l_debug = 1) THEN
14410: IF (l_debug = 1) THEN
14411: mydebug('validate_sub_loc_status: Unexpected Error - ' || SQLERRM);
14412: END IF;
14413:
14414: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14415: END validate_sub_loc_status;
14416:
14417: PROCEDURE validate_pick_drop_sub(
14418: p_temp_id IN NUMBER
14496: FETCH get_wip_entity_type INTO l_wip_entity_type;
14497: CLOSE get_wip_entity_type;
14498: IF (l_wip_entity_type not in (9,10)) THEN
14499: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SUB');
14500: fnd_msg_pub.ADD;
14501: RAISE fnd_api.g_exc_error;
14502: END IF;
14503: END IF;
14504:
14529: mydebug('validate_pick_drop_sub: Drop LPN is going to a different sub');
14530: END IF;
14531:
14532: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SUB');
14533: fnd_msg_pub.ADD;
14534: RAISE fnd_api.g_exc_error;
14535: END IF;
14536: END IF;
14537:
14545: IF (l_debug = 1) THEN
14546: mydebug('validate_pick_drop_sub: Error - ' || SQLERRM);
14547: END IF;
14548:
14549: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14550: WHEN OTHERS THEN
14551: x_return_status := fnd_api.g_ret_sts_unexp_error;
14552:
14553: IF (l_debug = 1) THEN
14553: IF (l_debug = 1) THEN
14554: mydebug('validate_pick_drop_sub: Unexpected Error - ' || SQLERRM);
14555: END IF;
14556:
14557: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14558: END validate_pick_drop_sub;
14559:
14560: -- Added for bug 12853197
14561: PROCEDURE validate_pick_drop_sub(
14627:
14628: IF l_lpn_controlled_flag = wms_globals.g_lpn_controlled_sub THEN
14629: IF (l_mmtt_mo_type = 5) THEN
14630: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SUB');
14631: fnd_msg_pub.ADD;
14632: RAISE fnd_api.g_exc_error;
14633: END IF;
14634:
14635: IF (l_debug = 1) THEN
14659: mydebug('validate_pick_drop_sub: Drop LPN is going to a different sub');
14660: END IF;
14661:
14662: fnd_message.set_name('WMS', 'WMS_CONT_INVALID_SUB');
14663: fnd_msg_pub.ADD;
14664: RAISE fnd_api.g_exc_error;
14665: END IF;
14666: END IF;
14667:
14675: IF (l_debug = 1) THEN
14676: mydebug('validate_pick_drop_sub: Error - ' || SQLERRM);
14677: END IF;
14678:
14679: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14680: WHEN OTHERS THEN
14681: x_return_status := fnd_api.g_ret_sts_unexp_error;
14682:
14683: IF (l_debug = 1) THEN
14683: IF (l_debug = 1) THEN
14684: mydebug('validate_pick_drop_sub: Unexpected Error - ' || SQLERRM);
14685: END IF;
14686:
14687: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
14688: END validate_pick_drop_sub;
14689:
14690: PROCEDURE create_lock_mmtt_temp_id(lock_name IN VARCHAR2, x_return_status OUT NOCOPY VARCHAR2) IS
14691: l_lock_id VARCHAR2(50);
14717: mydebug('timeout for the creation of user lock or deadlock');
14718: END IF;
14719:
14720: fnd_message.set_name('WMS', 'WMS_RECORD_BEING_CHANGED');
14721: fnd_msg_pub.ADD;
14722: RAISE fnd_api.g_exc_error;
14723: END IF;
14724: EXCEPTION
14725: WHEN fnd_api.g_exc_error THEN
15410:
15411: EXCEPTION
15412: WHEN OTHERS THEN
15413: x_return_status := fnd_api.g_ret_sts_unexp_error;
15414: fnd_msg_pub.count_and_get(p_count => x_msg_count, p_data => x_msg_data);
15415:
15416: IF (l_debug = 1) THEN
15417: mydebug('Unexpected Error occurred - ' || SQLERRM);
15418: END IF;
15480: -- Bug 2924823 H to I
15481: IF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
15482: mydebug('call_workflow : Error callinf WF wrapper');
15483: FND_MESSAGE.SET_NAME('WMS','WMS_WORK_FLOW_FAIL');
15484: FND_MSG_PUB.ADD;
15485: RAISE FND_API.g_exc_unexpected_error;
15486:
15487: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
15488: mydebug('call_workflow : Error calling WF wrapper');
15486:
15487: ELSIF x_return_status = FND_API.G_RET_STS_ERROR THEN
15488: mydebug('call_workflow : Error calling WF wrapper');
15489: FND_MESSAGE.SET_NAME('WMS','WMS_WORK_FLOW_FAIL');
15490: FND_MSG_PUB.ADD;
15491: RAISE FND_API.G_EXC_ERROR;
15492: END IF;
15493: END IF;
15494: END IF;
15977: , l_api_name
15978: , G_PKG_NAME
15979: ) THEN
15980: FND_MESSAGE.SET_NAME('WMS', 'WMS_CONT_INCOMPATIBLE_API_CALL');
15981: FND_MSG_PUB.ADD;
15982: RAISE FND_API.G_EXC_ERROR;
15983: END IF;
15984:
15985:
15988: -- Initialize message list.
15989: --
15990:
15991: IF fnd_api.to_boolean(p_init_msg_lst) THEN
15992: fnd_msg_pub.initialize;
15993: END IF;
15994:
15995:
15996: BEGIN