[Home] [Help]
19: g_main_tab(3).field_value := NULL;
20: g_main_tab(4).field_name := 'CATEGORY_SET_ID';
21: g_main_tab(4).field_value := NULL;
22: g_main_tab(5).field_name := 'COMPLETED';
23: g_main_tab(5).field_value := FND_API.G_FALSE;
24: g_main_tab(6).field_name := 'CUSTOMER_CATEGORY';
25: g_main_tab(6).field_value := NULL;
26: g_main_tab(7).field_name := 'CUSTOMER_ID';
27: g_main_tab(7).field_value := NULL;
27: g_main_tab(7).field_value := NULL;
28: g_main_tab(8).field_name := 'CYCLE_COUNT_NAME';
29: g_main_tab(8).field_value := NULL;
30: g_main_tab(9).field_name := 'CYCLE_COUNT_TASKS';
31: g_main_tab(9).field_value := FND_API.G_TRUE;
32: g_main_tab(10).field_name := 'DELIVERY_ID';
33: g_main_tab(10).field_value := NULL;
34: g_main_tab(11).field_name := 'DEPARTMENT_ID';
35: g_main_tab(11).field_value := NULL;
33: g_main_tab(10).field_value := NULL;
34: g_main_tab(11).field_name := 'DEPARTMENT_ID';
35: g_main_tab(11).field_value := NULL;
36: g_main_tab(12).field_name := 'DISPATCHED';
37: g_main_tab(12).field_value := FND_API.G_FALSE;
38: g_main_tab(13).field_name := 'EMPLOYEE_ID';
39: g_main_tab(13).field_value := NULL;
40: ---add equipment
41: g_main_tab(14).field_name := 'EQUIPMENT';
80: g_main_tab(33).field_value := NULL;
81: g_main_tab(34).field_name := 'FROM_TRANSFER_ISSUE_MO'; --33
82: g_main_tab(34).field_value := NULL;
83: g_main_tab(35).field_name := 'INBOUND'; --34
84: g_main_tab(35).field_value := FND_API.G_FALSE;
85: g_main_tab(36).field_name := 'INDEPENDENT_TASKS'; --35
86: g_main_tab(36).field_value := FND_API.G_TRUE;
87: g_main_tab(37).field_name := 'INVENTORY_ITEM_ID'; --36
88: g_main_tab(37).field_value := NULL;
82: g_main_tab(34).field_value := NULL;
83: g_main_tab(35).field_name := 'INBOUND'; --34
84: g_main_tab(35).field_value := FND_API.G_FALSE;
85: g_main_tab(36).field_name := 'INDEPENDENT_TASKS'; --35
86: g_main_tab(36).field_value := FND_API.G_TRUE;
87: g_main_tab(37).field_name := 'INVENTORY_ITEM_ID'; --36
88: g_main_tab(37).field_value := NULL;
89: g_main_tab(38).field_name := 'ITEM_CATEGORY_ID'; --37
90: g_main_tab(38).field_value := NULL;
88: g_main_tab(37).field_value := NULL;
89: g_main_tab(38).field_name := 'ITEM_CATEGORY_ID'; --37
90: g_main_tab(38).field_value := NULL;
91: g_main_tab(39).field_name := 'LOADED'; --38
92: g_main_tab(39).field_value := FND_API.G_FALSE;
93: g_main_tab(40).field_name := 'LOCATOR_ID'; --39
94: g_main_tab(40).field_value := NULL;
95: g_main_tab(41).field_name := 'LPN_PUTAWAY_TASKS'; --40
96: g_main_tab(41).field_value := FND_API.G_TRUE;
92: g_main_tab(39).field_value := FND_API.G_FALSE;
93: g_main_tab(40).field_name := 'LOCATOR_ID'; --39
94: g_main_tab(40).field_value := NULL;
95: g_main_tab(41).field_name := 'LPN_PUTAWAY_TASKS'; --40
96: g_main_tab(41).field_value := FND_API.G_TRUE;
97: g_main_tab(42).field_name := 'MANUFACTURING'; --41
98: g_main_tab(42).field_value := FND_API.G_FALSE;
99: g_main_tab(43).field_name := 'MANUFACTURING_TYPE'; --42
100: g_main_tab(43).field_value := NULL;
94: g_main_tab(40).field_value := NULL;
95: g_main_tab(41).field_name := 'LPN_PUTAWAY_TASKS'; --40
96: g_main_tab(41).field_value := FND_API.G_TRUE;
97: g_main_tab(42).field_name := 'MANUFACTURING'; --41
98: g_main_tab(42).field_value := FND_API.G_FALSE;
99: g_main_tab(43).field_name := 'MANUFACTURING_TYPE'; --42
100: g_main_tab(43).field_value := NULL;
101: g_main_tab(44).field_name := 'MO_ISSUE_TASKS'; --43
102: g_main_tab(44).field_value := FND_API.G_TRUE;
98: g_main_tab(42).field_value := FND_API.G_FALSE;
99: g_main_tab(43).field_name := 'MANUFACTURING_TYPE'; --42
100: g_main_tab(43).field_value := NULL;
101: g_main_tab(44).field_name := 'MO_ISSUE_TASKS'; --43
102: g_main_tab(44).field_value := FND_API.G_TRUE;
103: g_main_tab(45).field_name := 'MO_TRANSFER_TASKS'; --44
104: g_main_tab(45).field_value := FND_API.G_TRUE;
105: g_main_tab(46).field_name := 'OP_PLAN_ACTIVITY_ID'; --45
106: g_main_tab(46).field_value := NULL;
100: g_main_tab(43).field_value := NULL;
101: g_main_tab(44).field_name := 'MO_ISSUE_TASKS'; --43
102: g_main_tab(44).field_value := FND_API.G_TRUE;
103: g_main_tab(45).field_name := 'MO_TRANSFER_TASKS'; --44
104: g_main_tab(45).field_value := FND_API.G_TRUE;
105: g_main_tab(46).field_name := 'OP_PLAN_ACTIVITY_ID'; --45
106: g_main_tab(46).field_value := NULL;
107: g_main_tab(47).field_name := 'OP_PLAN_ID'; --46
108: g_main_tab(47).field_value := NULL;
111: ---add ORDER_TYPE
112: g_main_tab(49).field_name := 'ORDER_TYPE';
113: g_main_tab(49).field_value := NULL;
114: g_main_tab(50).field_name := 'OUTBOUND'; ---48
115: g_main_tab(50).field_value := FND_API.G_FALSE;
116: g_main_tab(51).field_name := 'PENDING'; --49
117: g_main_tab(51).field_value := FND_API.G_FALSE;
118: g_main_tab(52).field_name := 'PERSON_RESOURCE_ID'; --50
119: g_main_tab(52).field_value := NULL;
113: g_main_tab(49).field_value := NULL;
114: g_main_tab(50).field_name := 'OUTBOUND'; ---48
115: g_main_tab(50).field_value := FND_API.G_FALSE;
116: g_main_tab(51).field_name := 'PENDING'; --49
117: g_main_tab(51).field_value := FND_API.G_FALSE;
118: g_main_tab(52).field_name := 'PERSON_RESOURCE_ID'; --50
119: g_main_tab(52).field_value := NULL;
120: g_main_tab(53).field_name := 'PLAN_ABORTED'; --51
121: g_main_tab(53).field_value := FND_API.G_FALSE;
117: g_main_tab(51).field_value := FND_API.G_FALSE;
118: g_main_tab(52).field_name := 'PERSON_RESOURCE_ID'; --50
119: g_main_tab(52).field_value := NULL;
120: g_main_tab(53).field_name := 'PLAN_ABORTED'; --51
121: g_main_tab(53).field_value := FND_API.G_FALSE;
122: g_main_tab(54).field_name := 'PLAN_CANCELLED'; --52
123: g_main_tab(54).field_value := FND_API.G_FALSE;
124: g_main_tab(55).field_name := 'PLAN_COMPLETED'; --53
125: g_main_tab(55).field_value := FND_API.G_FALSE;
119: g_main_tab(52).field_value := NULL;
120: g_main_tab(53).field_name := 'PLAN_ABORTED'; --51
121: g_main_tab(53).field_value := FND_API.G_FALSE;
122: g_main_tab(54).field_name := 'PLAN_CANCELLED'; --52
123: g_main_tab(54).field_value := FND_API.G_FALSE;
124: g_main_tab(55).field_name := 'PLAN_COMPLETED'; --53
125: g_main_tab(55).field_value := FND_API.G_FALSE;
126: g_main_tab(56).field_name := 'PLAN_IN_PROGRESS'; --54
127: g_main_tab(56).field_value := FND_API.G_FALSE;
121: g_main_tab(53).field_value := FND_API.G_FALSE;
122: g_main_tab(54).field_name := 'PLAN_CANCELLED'; --52
123: g_main_tab(54).field_value := FND_API.G_FALSE;
124: g_main_tab(55).field_name := 'PLAN_COMPLETED'; --53
125: g_main_tab(55).field_value := FND_API.G_FALSE;
126: g_main_tab(56).field_name := 'PLAN_IN_PROGRESS'; --54
127: g_main_tab(56).field_value := FND_API.G_FALSE;
128: g_main_tab(57).field_name := 'PLAN_PENDING'; --55
129: g_main_tab(57).field_value := FND_API.G_FALSE;
123: g_main_tab(54).field_value := FND_API.G_FALSE;
124: g_main_tab(55).field_name := 'PLAN_COMPLETED'; --53
125: g_main_tab(55).field_value := FND_API.G_FALSE;
126: g_main_tab(56).field_name := 'PLAN_IN_PROGRESS'; --54
127: g_main_tab(56).field_value := FND_API.G_FALSE;
128: g_main_tab(57).field_name := 'PLAN_PENDING'; --55
129: g_main_tab(57).field_value := FND_API.G_FALSE;
130: g_main_tab(58).field_name := 'PLANNED_TASKS'; --56
131: g_main_tab(58).field_value := FND_API.G_TRUE;
125: g_main_tab(55).field_value := FND_API.G_FALSE;
126: g_main_tab(56).field_name := 'PLAN_IN_PROGRESS'; --54
127: g_main_tab(56).field_value := FND_API.G_FALSE;
128: g_main_tab(57).field_name := 'PLAN_PENDING'; --55
129: g_main_tab(57).field_value := FND_API.G_FALSE;
130: g_main_tab(58).field_name := 'PLANNED_TASKS'; --56
131: g_main_tab(58).field_value := FND_API.G_TRUE;
132: g_main_tab(59).field_name := 'QUEUED'; --57
133: g_main_tab(59).field_value := FND_API.G_FALSE;
127: g_main_tab(56).field_value := FND_API.G_FALSE;
128: g_main_tab(57).field_name := 'PLAN_PENDING'; --55
129: g_main_tab(57).field_value := FND_API.G_FALSE;
130: g_main_tab(58).field_name := 'PLANNED_TASKS'; --56
131: g_main_tab(58).field_value := FND_API.G_TRUE;
132: g_main_tab(59).field_name := 'QUEUED'; --57
133: g_main_tab(59).field_value := FND_API.G_FALSE;
134: g_main_tab(60).field_name := 'REPLENISHMENT_TASKS'; --58
135: g_main_tab(60).field_value := FND_API.G_TRUE;
129: g_main_tab(57).field_value := FND_API.G_FALSE;
130: g_main_tab(58).field_name := 'PLANNED_TASKS'; --56
131: g_main_tab(58).field_value := FND_API.G_TRUE;
132: g_main_tab(59).field_name := 'QUEUED'; --57
133: g_main_tab(59).field_value := FND_API.G_FALSE;
134: g_main_tab(60).field_name := 'REPLENISHMENT_TASKS'; --58
135: g_main_tab(60).field_value := FND_API.G_TRUE;
136: g_main_tab(61).field_name := 'SHIP_METHOD_CODE'; --59
137: g_main_tab(61).field_value := NULL;
131: g_main_tab(58).field_value := FND_API.G_TRUE;
132: g_main_tab(59).field_name := 'QUEUED'; --57
133: g_main_tab(59).field_value := FND_API.G_FALSE;
134: g_main_tab(60).field_name := 'REPLENISHMENT_TASKS'; --58
135: g_main_tab(60).field_value := FND_API.G_TRUE;
136: g_main_tab(61).field_name := 'SHIP_METHOD_CODE'; --59
137: g_main_tab(61).field_value := NULL;
138: g_main_tab(62).field_name := 'SHIP_TO_COUNTRY'; --60
139: g_main_tab(62).field_value := NULL;
143: g_main_tab(64).field_value := NULL;
144: g_main_tab(65).field_name := 'SHIPMENT_PRIORITY'; --63
145: g_main_tab(65).field_value := NULL;
146: g_main_tab(66).field_name := 'STAGING_MOVE'; --64
147: g_main_tab(66).field_value := FND_API.G_FALSE;
148: g_main_tab(67).field_name := 'SUBINVENTORY'; --65
149: g_main_tab(67).field_value := NULL;
150: g_main_tab(68).field_name := 'TO_CREATION_DATE'; --66
151: g_main_tab(68).field_value := NULL;
191: g_main_tab(88).field_value := NULL;
192: g_main_tab(89).field_name := 'TRIP_ID'; --87
193: g_main_tab(89).field_value := NULL;
194: g_main_tab(90).field_name := 'UNRELEASED'; --88
195: g_main_tab(90).field_value := FND_API.G_FALSE;
196: g_main_tab(91).field_name := 'USER_TASK_TYPE_ID'; --89
197: g_main_tab(91).field_value := NULL;
198: g_main_tab(92).field_name := 'WAREHOUSING'; --90
199: g_main_tab(92).field_value := FND_API.G_FALSE;
195: g_main_tab(90).field_value := FND_API.G_FALSE;
196: g_main_tab(91).field_name := 'USER_TASK_TYPE_ID'; --89
197: g_main_tab(91).field_value := NULL;
198: g_main_tab(92).field_name := 'WAREHOUSING'; --90
199: g_main_tab(92).field_value := FND_API.G_FALSE;
200: g_main_tab(93).field_name := 'CROSSDOCK'; --91--Munish added column for crossdock
201: g_main_tab(93).field_value := FND_API.G_FALSE; --Munish initialized column value for crossdock
202: END initialize_main_table;
203:
197: g_main_tab(91).field_value := NULL;
198: g_main_tab(92).field_name := 'WAREHOUSING'; --90
199: g_main_tab(92).field_value := FND_API.G_FALSE;
200: g_main_tab(93).field_name := 'CROSSDOCK'; --91--Munish added column for crossdock
201: g_main_tab(93).field_value := FND_API.G_FALSE; --Munish initialized column value for crossdock
202: END initialize_main_table;
203:
204: -------------------------------------------------------------------------------------------------------------------
205: /*Procedure to log error message to the x_updated_tasks rec*/
304: l_delivery_id NUMBER;
305: l_carton_lpn_itm_id NUMBER;
306:
307: BEGIN
308: x_return_status := fnd_api.g_ret_sts_success;
309: OPEN carton_lpn_csr(p_new_carton_lpn_id);
310: FETCH carton_lpn_csr INTO l_carton_lpn_ctx,l_carton_lpn_org,l_carton_lpn_itm_id;
311: CLOSE carton_lpn_csr;
312: --if carton lpn is passed and is not valid then no need to proceed further
310: FETCH carton_lpn_csr INTO l_carton_lpn_ctx,l_carton_lpn_org,l_carton_lpn_itm_id;
311: CLOSE carton_lpn_csr;
312: --if carton lpn is passed and is not valid then no need to proceed further
313: IF(l_carton_lpn_ctx NOT IN (5,8)) THEN
314: x_return_status := fnd_api.g_ret_sts_error;
315: fnd_message.set_name('WMS', 'WMS_CARTON_LPN_CTX_ERR');
316: fnd_msg_pub.ADD;
317: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => x_error_msg );
318: l_error_msg :='Invalid context for Carton LPN:'||p_new_carton_lpn_id;
313: IF(l_carton_lpn_ctx NOT IN (5,8)) THEN
314: x_return_status := fnd_api.g_ret_sts_error;
315: fnd_message.set_name('WMS', 'WMS_CARTON_LPN_CTX_ERR');
316: fnd_msg_pub.ADD;
317: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => x_error_msg );
318: l_error_msg :='Invalid context for Carton LPN:'||p_new_carton_lpn_id;
319: IF(l_debug = 1) THEN
320: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
321: END IF;
320: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
321: END IF;
322: RETURN;
323: ELSIF (l_carton_lpn_itm_id is NULL) THEN
324: x_return_status := fnd_api.g_ret_sts_error;
325: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
326: fnd_msg_pub.ADD;
327: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => x_error_msg );
328: l_error_msg :='Inventory item id is not present in carton LPN';
323: ELSIF (l_carton_lpn_itm_id is NULL) THEN
324: x_return_status := fnd_api.g_ret_sts_error;
325: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
326: fnd_msg_pub.ADD;
327: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => x_error_msg );
328: l_error_msg :='Inventory item id is not present in carton LPN';
329: IF(l_debug = 1) THEN
330: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
331: END IF;
361: END IF;
362: FOR i IN 1..p_task_table.count
363: LOOP
364: IF (p_task_table(i).organization_id <> l_carton_lpn_org) THEN
365: x_return_status := fnd_api.g_ret_sts_error;
366: fnd_message.set_name('WMS', 'WMS_CARTON_LPN_ORG_ERR');
367: fnd_msg_pub.ADD;
368: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => x_error_msg );
369: l_error_msg :='Organization is not same for Carton LPN and Task';
364: IF (p_task_table(i).organization_id <> l_carton_lpn_org) THEN
365: x_return_status := fnd_api.g_ret_sts_error;
366: fnd_message.set_name('WMS', 'WMS_CARTON_LPN_ORG_ERR');
367: fnd_msg_pub.ADD;
368: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => x_error_msg );
369: l_error_msg :='Organization is not same for Carton LPN and Task';
370: IF(l_debug = 1) THEN
371: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
372: END IF;
377: FETCH c_bulk_task INTO l_bulk_task;
378: IF c_bulk_task%NOTFOUND THEN
379: CLOSE c_bulk_task;
380: ELSE
381: x_return_status := fnd_api.g_ret_sts_error;
382: fnd_message.set_name('WMS', 'WMS_CARTON_BULK_ERR');
383: fnd_msg_pub.ADD;
384: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => x_error_msg );
385: l_error_msg :='Bulk Tasks cannot be cartonized';
380: ELSE
381: x_return_status := fnd_api.g_ret_sts_error;
382: fnd_message.set_name('WMS', 'WMS_CARTON_BULK_ERR');
383: fnd_msg_pub.ADD;
384: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => x_error_msg );
385: l_error_msg :='Bulk Tasks cannot be cartonized';
386: IF(l_debug = 1) THEN
387: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
388: END IF;
406: WHEN OTHERS THEN
407: l_temp_del_detail_id := NULL;
408: END;
409: IF (l_temp_del_detail_id IS NULL) THEN
410: x_return_status := fnd_api.g_ret_sts_error;
411: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
412: fnd_msg_pub.ADD;
413: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
414: l_error_msg :='Data not present in WDD for the corresponding task :'||p_task_table(i).transaction_number;
409: IF (l_temp_del_detail_id IS NULL) THEN
410: x_return_status := fnd_api.g_ret_sts_error;
411: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
412: fnd_msg_pub.ADD;
413: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
414: l_error_msg :='Data not present in WDD for the corresponding task :'||p_task_table(i).transaction_number;
415: IF(l_debug = 1) THEN
416: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
417: END IF;
459: IF l_return_status = 'S' then
460: -- check if all the values in l_grouping_rows are same.
461: FOR i in 1..l_grouping_rows.COUNT LOOP
462: IF (l_grouping_rows(1) <> l_grouping_rows(i)) THEN
463: x_return_status := fnd_api.g_ret_sts_error;
464: fnd_message.set_name('WMS', 'WMS_CARTON_DEL_GP_ERR');
465: fnd_msg_pub.ADD;
466: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
467: l_error_msg :='Delivery grouping mismatch,cartonization cannot be done';
462: IF (l_grouping_rows(1) <> l_grouping_rows(i)) THEN
463: x_return_status := fnd_api.g_ret_sts_error;
464: fnd_message.set_name('WMS', 'WMS_CARTON_DEL_GP_ERR');
465: fnd_msg_pub.ADD;
466: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
467: l_error_msg :='Delivery grouping mismatch,cartonization cannot be done';
468: IF(l_debug = 1) THEN
469: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
470: END IF;
477: ELSE --l_del_id_Tab_new.count > 0
478: --check if the delivery_id's that are present in l_del_id_tab_new are all same.
479: FOR i in 1..l_del_id_tab_new.COUNT LOOP
480: IF (l_del_id_tab_new(1) <> l_del_id_tab_new(i)) THEN
481: x_return_status := fnd_api.g_ret_sts_error;
482: fnd_message.set_name('WMS', 'WMS_CARTON_DEL_ERR');
483: fnd_msg_pub.ADD;
484: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
485: l_error_msg :='Delivery mismatch,cartonization cannot be done';
480: IF (l_del_id_tab_new(1) <> l_del_id_tab_new(i)) THEN
481: x_return_status := fnd_api.g_ret_sts_error;
482: fnd_message.set_name('WMS', 'WMS_CARTON_DEL_ERR');
483: fnd_msg_pub.ADD;
484: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
485: l_error_msg :='Delivery mismatch,cartonization cannot be done';
486: IF(l_debug = 1) THEN
487: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
488: END IF;
499: l_delivery_id := l_del_id_tab_new(1);
500:
501: wsh_delivery_details_grp.detail_to_delivery(
502: p_api_version => 1.0,
503: p_init_msg_list => FND_API.G_FALSE,
504: p_commit => FND_API.G_FALSE,
505: p_validation_level => l_validation_level,
506: x_return_status => l_return_status,
507: x_msg_count => l_msg_count,
500:
501: wsh_delivery_details_grp.detail_to_delivery(
502: p_api_version => 1.0,
503: p_init_msg_list => FND_API.G_FALSE,
504: p_commit => FND_API.G_FALSE,
505: p_validation_level => l_validation_level,
506: x_return_status => l_return_status,
507: x_msg_count => l_msg_count,
508: x_msg_data => l_msg_data,
514:
515: IF l_return_status <> 'S' THEN
516: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
517: fnd_msg_pub.ADD;
518: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
519: l_error_msg :='Error returned from WSH API';
520: IF(l_debug = 1) THEN
521: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
522: END IF;
636: END;
637: IF l_count > 0 THEN
638: fnd_message.set_name('WMS', 'WMS_ATF_INVALID_TASK_STATUS');--new message WMS_ATF_ACTIVE_TASK_EXP
639: fnd_msg_pub.ADD;
640: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
641: l_msg := 'Active task can be updated if tasks assigned to user is logged off the system';
642: IF(l_debug = 1) THEN
643: inv_trx_util_pub.trace(l_api_name|| ': '||l_msg);
644: END IF;
685: END;
686: IF (l_count > 0 ) THEN --ANY OF GROUP TASK IS active
687: fnd_message.set_name('WMS', 'WMS_ATF_INVALID_TASK_STATUS');--new message WMS_ATF_DISPATCH_TASK_EXP
688: fnd_msg_pub.ADD;
689: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
690: l_msg := 'Dispatcher task can be updated only if any of the task in group is not in Active status';
691: IF(l_debug = 1) THEN
692: inv_trx_util_pub.trace(l_api_name|| ': '||l_msg);
693: END IF;
705: p_output_task_rec.status_id := p_new_task_status;
706: ELSE
707: fnd_message.set_name('WMS', 'WMS_ATF_INVALID_TASK_STATUS');
708: fnd_msg_pub.ADD;
709: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
710: l_msg := 'Active task can be moved only to Pending or Unreleased state';
711: IF(l_debug = 1) THEN
712: inv_trx_util_pub.trace(l_api_name|| ': '||l_msg);
713: END IF;
720: p_output_task_rec.status_id := p_new_task_status;
721: ELSE
722: fnd_message.set_name('WMS', 'WMS_ATF_INVALID_TASK_STATUS');
723: fnd_msg_pub.ADD;
724: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
725: l_msg := 'Dispatcher task can be moved only to Pending or Unreleased state';
726: IF(l_debug = 1) THEN
727: inv_trx_util_pub.trace(l_api_name|| ': '||l_msg);
728: END IF;
735: p_output_task_rec.status_id := p_new_task_status;
736: ELSE
737: fnd_message.set_name('WMS', 'WMS_ATF_INVALID_TASK_STATUS');
738: fnd_msg_pub.ADD;
739: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
740: l_msg := 'Unreleased task can be moved only to Pending or Queued state';
741: IF(l_debug = 1) THEN
742: inv_trx_util_pub.trace(l_api_name|| ': '||l_msg);
743: END IF;
750: p_output_task_rec.status_id := p_new_task_status;
751: ELSE
752: fnd_message.set_name('WMS', 'WMS_ATF_INVALID_TASK_STATUS');
753: fnd_msg_pub.ADD;
754: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
755: l_msg := 'Pending task can be moved only to Queued state';
756: IF(l_debug = 1) THEN
757: inv_trx_util_pub.trace(l_api_name|| ': '||l_msg);
758: END IF;
762: END IF;
763: ELSE
764: fnd_message.set_name('WMS', 'WMS_ATF_INVALID_TASK_STATUS');
765: fnd_msg_pub.ADD;
766: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
767: l_msg := 'Invalid task status';
768: IF(l_debug = 1) THEN
769: inv_trx_util_pub.trace(l_api_name|| ': '||l_msg);
770: END IF;
780: p_output_task_rec.priority := p_new_task_priority;
781: ELSE
782: fnd_message.set_name('WMS', 'WMS_INVALID_TASK');
783: fnd_msg_pub.ADD;
784: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
785: l_msg := 'Inbound task priority cannot be updated';
786: IF(l_debug = 1) THEN
787: inv_trx_util_pub.trace(l_api_name|| ': '||l_msg);
788: END IF;
805: FETCH c_usr_task_type INTO l_usr_task_type_id;
806: IF c_usr_task_type%NOTFOUND THEN
807: fnd_message.set_name('WMS', 'WMS_INVALID_USER_TASK');--new message
808: fnd_msg_pub.ADD;
809: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
810: l_msg := 'Standard task type associated with the user task is different from the current standard task type';
811: IF(l_debug = 1) THEN
812: inv_trx_util_pub.trace(l_api_name|| ': '||l_msg);
813: END IF;
824: IF (p_task_rec.organization_id <> p_op_plan_rec.organization_id) THEN
825: IF(p_op_plan_rec.common_to_all_org <> 'Y') THEN
826: fnd_message.set_name('WMS', 'WMS_OPER_PLAN_ORG_INVALID');--new message
827: fnd_msg_pub.ADD;
828: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
829: p_output_task_rec.RESULT := 'E';
830: p_output_task_rec.ERROR := l_err_msg;
831: l_msg := 'Organization associated with the operation plan is different from that of the task';
832: IF(l_debug = 1) THEN
854: p_output_task_rec.operation_plan_id := p_new_operation_plan_id;
855: ELSE
856: fnd_message.set_name('WMS', 'WMS_OPERTN_PLAN_ID_INVALID');--new message
857: fnd_msg_pub.ADD;
858: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
859: p_output_task_rec.RESULT := 'E';
860: p_output_task_rec.ERROR := l_err_msg;
861: l_msg := 'Inspection/Standard operation plan can only be replaced with another Inspection/Standard operation plan
862: and cross dock operation can be replaced with another cross dock operation plan or non-cross dock Operation plan ';
867: END IF;
868: ELSE
869: fnd_message.set_name('WMS', 'WMS_OPERTN_PLAN_ID_INVALID');--new message
870: fnd_msg_pub.ADD;
871: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
872: p_output_task_rec.RESULT := 'E';
873: p_output_task_rec.ERROR := l_err_msg;
874: l_msg := 'Current or new operation plan type is NULL';
875: IF(l_debug = 1) THEN
883: IF ( p_op_plan_rec.activity_type_id = 1) THEN --INBOUND CASE
884: IF(p_task_rec.task_type_id <> 2) THEN --putaway
885: fnd_message.set_name('WMS', 'WMS_INVALID_OP_PLAN_ACTIVITY');--new message
886: fnd_msg_pub.ADD;
887: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
888: p_output_task_rec.ERROR := l_err_msg;
889: p_output_task_rec.RESULT := 'E';
890: l_msg := 'Mismatch in the operation plan activity type and task type';
891: IF(l_debug = 1) THEN
907: IF (l_debug=1) THEN
908: inv_trx_util_pub.trace('Records not found in WMS_OP_PLANS_B for given p_new_operation_plan_id');
909: fnd_message.set_name('WMS', ' WMS_INVALID_TASK');--new message
910: fnd_msg_pub.ADD;
911: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
912: l_msg := 'No of Records found in WMS_OP_PLANS_B for given operation plan id';
913: IF(l_debug = 1) THEN
914: inv_trx_util_pub.trace(l_api_name|| ': '||l_msg);
915: END IF;
938: IF (l_debug=1) THEN
939: inv_trx_util_pub.trace('Records not found in WMS_OP_PLAN_DETAILS for given operation plan id');
940: fnd_message.set_name('WMS', ' WMS_INVALID_TASK');--new message
941: fnd_msg_pub.ADD;
942: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
943: l_msg := 'No of Records found in WMS_OP_PLAN_DETAILS for given operation plan id';
944: IF(l_debug = 1) THEN
945: inv_trx_util_pub.trace(l_api_name|| ': '||l_msg);
946: END IF;
968:
969: ELSE
970: fnd_message.set_name('WMS', ' WMS_INVALID_TASK');--new message
971: fnd_msg_pub.ADD;
972: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
973: l_msg := 'STATUS in wms_op_plan_instances is not pending';
974: IF(l_debug = 1) THEN
975: inv_trx_util_pub.trace(l_api_name|| ': '||l_msg);
976: END IF;
1011: --just updating the plan id should be enough.needs to be investigated further
1012: IF (p_task_rec.task_type_id <> 1) THEN --if not a pick task then error out
1013: fnd_message.set_name('WMS', 'WMS_INVALID_OP_PLAN_ACTIVITY');--new message
1014: fnd_msg_pub.ADD;
1015: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_err_msg );
1016: l_msg := 'Mismatch in the operation plan activity type and task type';
1017: IF(l_debug = 1) THEN
1018: inv_trx_util_pub.trace(l_api_name|| ': '||l_msg);
1019: END IF;
1155: x_validation_status:= 'E';
1156: END IF;
1157: END IF;
1158: -- 6850212 End
1159: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
1160: EXCEPTION
1161: WHEN OTHERS THEN
1162: x_return_status := 'E';
1163: END validate_task_id ;
1263: l_api_name VARCHAR2(1000) := 'CHECK_CARTONIZATION';
1264: l_error_msg VARCHAR2(2000);
1265: l_msg_count NUMBER;
1266: BEGIN
1267: x_return_status := fnd_api.g_ret_sts_success;
1268: OPEN carton_lpn_csr(p_new_carton_lpn_id);
1269: FETCH carton_lpn_csr INTO l_carton_lpn_ctx,l_carton_lpn_org;
1270: CLOSE carton_lpn_csr;
1271: --if carton lpn is passed and is not valid then no need to proceed further
1269: FETCH carton_lpn_csr INTO l_carton_lpn_ctx,l_carton_lpn_org;
1270: CLOSE carton_lpn_csr;
1271: --if carton lpn is passed and is not valid then no need to proceed further
1272: IF(l_carton_lpn_ctx NOT IN (5,8)) THEN
1273: x_return_status := fnd_api.g_ret_sts_error;
1274: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
1275: fnd_msg_pub.ADD;
1276: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
1277: l_error_msg :='Invalid context for Carton LPN:'||p_new_carton_lpn_id;
1272: IF(l_carton_lpn_ctx NOT IN (5,8)) THEN
1273: x_return_status := fnd_api.g_ret_sts_error;
1274: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
1275: fnd_msg_pub.ADD;
1276: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
1277: l_error_msg :='Invalid context for Carton LPN:'||p_new_carton_lpn_id;
1278: IF(l_debug = 1) THEN
1279: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
1280: END IF;
1301: END IF;
1302: FOR i IN 1..p_task_table.count
1303: LOOP
1304: IF (p_task_table(i).organization_id <> l_carton_lpn_org) THEN
1305: x_return_status := fnd_api.g_ret_sts_error;
1306: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
1307: fnd_msg_pub.ADD;
1308: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
1309: l_error_msg :='Organization is not same for Carton LPN and Task';
1304: IF (p_task_table(i).organization_id <> l_carton_lpn_org) THEN
1305: x_return_status := fnd_api.g_ret_sts_error;
1306: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
1307: fnd_msg_pub.ADD;
1308: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
1309: l_error_msg :='Organization is not same for Carton LPN and Task';
1310: IF(l_debug = 1) THEN
1311: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
1312: END IF;
1317: FETCH c_bulk_task INTO l_bulk_task;
1318: IF c_bulk_task%NOTFOUND THEN
1319: CLOSE c_bulk_task;
1320: ELSE
1321: x_return_status := fnd_api.g_ret_sts_error;
1322: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
1323: fnd_msg_pub.ADD;
1324: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
1325: l_error_msg :='Bulk Tasks cannot be cartonized';
1320: ELSE
1321: x_return_status := fnd_api.g_ret_sts_error;
1322: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
1323: fnd_msg_pub.ADD;
1324: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
1325: l_error_msg :='Bulk Tasks cannot be cartonized';
1326: IF(l_debug = 1) THEN
1327: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
1328: END IF;
1346: WHEN OTHERS THEN
1347: l_temp_del_detail_id := NULL;
1348: END;
1349: IF (l_temp_del_detail_id IS NULL) THEN
1350: x_return_status := fnd_api.g_ret_sts_error;
1351: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
1352: fnd_msg_pub.ADD;
1353: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
1354: l_error_msg :='Data not present in WDD for the corresponding task :'||p_task_table(i).transaction_number;
1349: IF (l_temp_del_detail_id IS NULL) THEN
1350: x_return_status := fnd_api.g_ret_sts_error;
1351: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
1352: fnd_msg_pub.ADD;
1353: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
1354: l_error_msg :='Data not present in WDD for the corresponding task :'||p_task_table(i).transaction_number;
1355: IF(l_debug = 1) THEN
1356: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
1357: END IF;
1380: IF l_del_det_id_tab.COUNT > 1 THEN
1381: FOR i IN 1..l_del_id_tab.COUNT
1382: LOOP
1383: IF nvl(l_del_id_tab(1),-999) <> nvl(l_del_id_tab(i),-999) THEN
1384: x_return_status := fnd_api.g_ret_sts_error;
1385: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
1386: fnd_msg_pub.ADD;
1387: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
1388: l_error_msg :='Delivery mismatch,cartonization cannot be done';
1383: IF nvl(l_del_id_tab(1),-999) <> nvl(l_del_id_tab(i),-999) THEN
1384: x_return_status := fnd_api.g_ret_sts_error;
1385: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
1386: fnd_msg_pub.ADD;
1387: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
1388: l_error_msg :='Delivery mismatch,cartonization cannot be done';
1389: IF(l_debug = 1) THEN
1390: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
1391: END IF;
1412: END LOOP;
1413: FOR i IN 1..l_carton_grp_id_tab.COUNT
1414: LOOP
1415: IF nvl(l_carton_grp_id_tab(1),-999) <> nvl(l_carton_grp_id_tab(i),-999) THEN
1416: x_return_status := fnd_api.g_ret_sts_error;
1417: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
1418: fnd_msg_pub.ADD;
1419: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
1420: l_error_msg :='Carton group mismatch,cartonization cannot be done';
1415: IF nvl(l_carton_grp_id_tab(1),-999) <> nvl(l_carton_grp_id_tab(i),-999) THEN
1416: x_return_status := fnd_api.g_ret_sts_error;
1417: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERR');
1418: fnd_msg_pub.ADD;
1419: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => x_error_msg );
1420: l_error_msg :='Carton group mismatch,cartonization cannot be done';
1421: IF(l_debug = 1) THEN
1422: inv_trx_util_pub.trace(l_api_name|| ': '||l_error_msg);
1423: END IF;
3061: /*FUNCTION query_rows()
3062: This function gets the move order record for the move order line passed.
3063: */
3064: -------------------------------------------------------------------------------------------------------------------
3065: FUNCTION query_rows(p_line_id IN NUMBER := fnd_api.g_miss_num)
3066: RETURN inv_move_order_pub.trolin_tbl_type IS
3067:
3068: l_trolin_rec inv_move_order_pub.trolin_rec_type;
3069: l_trolin_tbl inv_move_order_pub.trolin_tbl_type;
3153: FROM mtl_txn_request_lines
3154: WHERE line_id = p_line_id;
3155: BEGIN
3156: debug_print( 'p_line_id ' || p_line_id);
3157: IF (p_line_id IS NOT NULL AND p_line_id <> fnd_api.g_miss_num ) THEN
3158: -- Loop over fetched records
3159: FOR l_implicit_rec IN l_trolin_csr
3160: LOOP
3161: l_trolin_rec.attribute1 := l_implicit_rec.attribute1;
3241: l_trolin_rec.required_quantity := l_implicit_rec.required_quantity;
3242: l_trolin_tbl(l_trolin_tbl.COUNT + 1) := l_trolin_rec;
3243: END LOOP;
3244: END IF;
3245: IF (p_line_id IS NOT NULL AND p_line_id <> fnd_api.g_miss_num ) AND (l_trolin_tbl.COUNT = 0) THEN
3246: debug_print('no data found');
3247: RAISE NO_DATA_FOUND;
3248: END IF;
3249: -- Return fetched table
3248: END IF;
3249: -- Return fetched table
3250: RETURN l_trolin_tbl;
3251: EXCEPTION
3252: WHEN fnd_api.g_exc_unexpected_error THEN
3253: RAISE fnd_api.g_exc_unexpected_error;
3254: WHEN OTHERS THEN
3255: RAISE fnd_api.g_exc_unexpected_error;
3256: END query_rows;
3249: -- Return fetched table
3250: RETURN l_trolin_tbl;
3251: EXCEPTION
3252: WHEN fnd_api.g_exc_unexpected_error THEN
3253: RAISE fnd_api.g_exc_unexpected_error;
3254: WHEN OTHERS THEN
3255: RAISE fnd_api.g_exc_unexpected_error;
3256: END query_rows;
3257:
3251: EXCEPTION
3252: WHEN fnd_api.g_exc_unexpected_error THEN
3253: RAISE fnd_api.g_exc_unexpected_error;
3254: WHEN OTHERS THEN
3255: RAISE fnd_api.g_exc_unexpected_error;
3256: END query_rows;
3257:
3258: -------------------------------------------------------------------------------------------------------------------
3259: /*PROCEDURE delete_transaction()
3294: AND msi.inventory_item_id = mmtt.inventory_item_id
3295: AND msi.organization_id = mmtt.organization_id;
3296: BEGIN
3297: l_debug := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
3298: x_return_status := fnd_api.g_ret_sts_success;
3299: SAVEPOINT deltxn;
3300: IF l_debug = 1 THEN
3301: debug_print( 'Cleaning up MMTT, MTLT and MSNT for Txn Temp ID = ' || p_transaction_temp_id);
3302: END IF;
3316: IF l_parent_line_id IS NOT NULL AND p_update_parent THEN
3317: IF l_debug = 1 THEN
3318: debug_print( 'Child Record... Updating the Parent: TxnTempID = ' || l_parent_line_id);
3319: END IF;
3320: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3321: IF l_debug = 1 THEN
3322: debug_print('Error occurred while updating parent line in MMTT');
3323: END IF;
3324: ROLLBACK TO deltxn;
3469: debug_print('In the exception for could not delete a record. Returning staus as E');
3470: END IF;
3471: x_return_status := 'E';
3472: WHEN OTHERS THEN
3473: x_return_status := fnd_api.g_ret_sts_unexp_error;
3474: IF l_debug = 1 THEN
3475: debug_print( 'Exception Occurred = ' || SQLERRM);
3476: END IF;
3477: ROLLBACK TO deltxn;
3511: g_retain_ato_profile VARCHAR2(1) := fnd_profile.VALUE('WSH_RETAIN_ATO_RESERVATIONS');
3512: exc_not_deleted EXCEPTION;
3513: BEGIN
3514: l_debug := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
3515: x_return_status := fnd_api.g_ret_sts_success;
3516: SAVEPOINT delete_details;
3517: IF (l_debug = 1) THEN
3518: debug_print( 'Transaction Temp ID = ' || p_transaction_temp_id);
3519: debug_print( 'Move Order Line ID = ' || p_move_order_line_id);
3535: debug_print( 'x_return_status = ' || x_return_status);
3536: debug_print( 'l_error_code = ' || l_error_code);
3537: debug_print( 'l_mtl_reservation_tbl_count = ' || l_mtl_reservation_tbl_count);
3538: END IF;
3539: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3540: IF l_debug = 1 THEN
3541: debug_print('delete_mo: Error occurred while deleting MMTT');
3542: END IF;
3543: ROLLBACK TO delete_details;
3611: p_to_serial_number => l_to_serial_number);
3612: IF l_debug = 1 THEN
3613: debug_print('x_return_status' || x_return_status);
3614: END IF;
3615: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3616: IF l_debug = 1 THEN
3617: debug_print('delete_mo: Error occurred while updating reservations');
3618: END IF;
3619: ROLLBACK TO delete_details;
3666:
3667: IF l_debug = 1 THEN
3668: debug_print( 'x_return_status from inv_reservation_pub.update_reservation ' || x_return_status);
3669: END IF;
3670: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3671: IF l_debug = 1 THEN
3672: debug_print('delete_mo: Error occurred while updating reservations');
3673: END IF;
3674: ROLLBACK TO delete_details;
3687: p_update_parent => FALSE);
3688: IF l_debug = 1 THEN
3689: debug_print( 'x_return_status ' || x_return_status);
3690: END IF;
3691: IF x_return_status = fnd_api.g_ret_sts_error THEN
3692: IF l_debug = 1 THEN
3693: debug_print('delete_mo: Error occurred while deleting MMTT');
3694: END IF;
3695: ROLLBACK TO delete_details;
3693: debug_print('delete_mo: Error occurred while deleting MMTT');
3694: END IF;
3695: ROLLBACK TO delete_details;
3696: RAISE exc_not_deleted ;
3697: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
3698: IF l_debug = 1 THEN
3699: debug_print('delete_mo: Error occurred while deleting MMTT');
3700: END IF;
3701: ROLLBACK TO delete_details;
3706: debug_print('In the exception for could not delete a record. Returning staus as E');
3707: END IF;
3708: x_return_status := 'E';
3709: WHEN OTHERS THEN
3710: x_return_status := fnd_api.g_ret_sts_unexp_error;
3711: ROLLBACK TO delete_details;
3712: END delete_details;
3713:
3714: -------------------------------------------------------------------------------------------------------------------
3739: AND move_order_line_id IS NOT NULL
3740: AND released_status = 'S';
3741: BEGIN
3742: SAVEPOINT backorder_source;
3743: x_return_status := fnd_api.g_ret_sts_success;
3744: l_debug := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
3745: l_qty_to_backorder := p_qty_to_backorder;
3746: IF l_qty_to_backorder < 0 THEN
3747: l_qty_to_backorder := 0;
3763: CLOSE c_wsh_info;
3764: IF l_debug = 1 THEN
3765: debug_print('NOTFOUND c_wsh_info' );
3766: END IF;
3767: RAISE fnd_api.g_exc_error;
3768: END IF;
3769: CLOSE c_wsh_info;
3770: IF l_debug = 1 THEN
3771: debug_print('finished fetching' );
3797: x_return_status => x_return_status );
3798: IF (l_debug = 1) THEN
3799: debug_print( 'Updated Shipping Attributes - Return Status = ' || x_return_status);
3800: END IF;
3801: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3802: ROLLBACK TO backorder_source;
3803: RAISE exc_not_deleted ;
3804: END IF;
3805: ELSIF p_move_order_type = inv_globals.g_move_order_mfg_pick THEN
3821:
3822: IF (l_debug = 1) THEN
3823: debug_print( 'Unallocated WIP Material - Return Status = ' || x_return_status);
3824: END IF;
3825: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3826: ROLLBACK TO backorder_source;
3827: RAISE exc_not_deleted ;
3828: END IF;
3829: END IF;
3833: debug_print('In the exception for could not delete a record. Returning staus as E');
3834: END IF;
3835: x_return_status := 'E';
3836: WHEN OTHERS THEN
3837: x_return_status := fnd_api.g_ret_sts_unexp_error;
3838: ROLLBACK TO backorder_source;
3839: END backorder_source;
3840:
3841: -------------------------------------------------------------------------------------------------------------------
3890: WHERE t.parent_line_id = mmtt.transaction_temp_id
3891: )
3892: FOR UPDATE NOWAIT;
3893: BEGIN
3894: x_return_status := fnd_api.g_ret_sts_success;
3895: l_debug := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
3896: -- Set savepoint
3897: SAVEPOINT backorder;
3898: IF (l_debug = 1) THEN
3948:
3949: IF l_debug = 1 THEN
3950: debug_print( 'x_return_status ' || x_return_status);
3951: END IF;
3952: IF x_return_status = fnd_api.g_ret_sts_error THEN
3953: IF l_debug = 1 THEN
3954: debug_print('Error occurred while back ordering');
3955: END IF;
3956: ROLLBACK TO backorder;
3954: debug_print('Error occurred while back ordering');
3955: END IF;
3956: ROLLBACK TO backorder;
3957: RAISE exc_not_deleted ;
3958: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
3959: IF l_debug = 1 THEN
3960: debug_print('Unexpected error occurred while back ordering');
3961: END IF;
3962: ROLLBACK TO backorder;
3976:
3977: IF l_debug = 1 THEN
3978: debug_print( 'x_return_status ' || x_return_status);
3979: END IF;
3980: IF x_return_status = fnd_api.g_ret_sts_error THEN
3981: IF l_debug = 1 THEN
3982: debug_print('Error occurred while back ordering');
3983: END IF;
3984: ROLLBACK TO backorder;
3982: debug_print('Error occurred while back ordering');
3983: END IF;
3984: ROLLBACK TO backorder;
3985: RAISE exc_not_deleted ;
3986: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
3987: IF l_debug = 1 THEN
3988: debug_print('Unexpected Error occurred while back ordering');
3989: END IF;
3990: ROLLBACK TO backorder;
4021:
4022: IF l_debug = 1 THEN
4023: debug_print( 'x_return_status ' || x_return_status);
4024: END IF;
4025: IF x_return_status <> fnd_api.g_ret_sts_success THEN
4026: IF l_debug = 1 THEN
4027: debug_print( 'Error occurred while cleaning reservation ');
4028: END IF;
4029: ROLLBACK TO backorder;
4036: debug_print('In the exception for could not delete a record. Returning staus as E');
4037: END IF;
4038: x_return_status := 'E';
4039: WHEN OTHERS THEN
4040: x_return_status := fnd_api.g_ret_sts_unexp_error;
4041: ROLLBACK TO backorder;
4042: END backorder;
4043:
4044: -------------------------------------------------------------------------------------------------------------------
4056: l_progress VARCHAR2(30) := '100';
4057: l_update_parent BOOLEAN := FALSE ; -- No need to call update_parent_mmtt
4058: x_msg_count NUMBER;
4059: x_msg_data VARCHAR2(50);
4060: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
4061: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
4062: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
4063: l_reservation_id NUMBER;
4064: l_pri_rsv_qty NUMBER;
4057: l_update_parent BOOLEAN := FALSE ; -- No need to call update_parent_mmtt
4058: x_msg_count NUMBER;
4059: x_msg_data VARCHAR2(50);
4060: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
4061: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
4062: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
4063: l_reservation_id NUMBER;
4064: l_pri_rsv_qty NUMBER;
4065: l_rsv_qty NUMBER;
4058: x_msg_count NUMBER;
4059: x_msg_data VARCHAR2(50);
4060: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
4061: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
4062: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
4063: l_reservation_id NUMBER;
4064: l_pri_rsv_qty NUMBER;
4065: l_rsv_qty NUMBER;
4066: l_pri_rsv_uom VARCHAR2(3);
4134: mtl_txn_request_lines mtrl
4135: WHERE mtrl.line_id = l_transaction_record.move_order_line_id
4136: AND mtrh.header_id = mtrl.header_id;
4137: BEGIN
4138: x_return_status := fnd_api.g_ret_sts_success;
4139: l_progress := '110';
4140: l_debug := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
4141: IF (l_debug = 1) THEN
4142: debug_print('IN DELETE_OUTBOUND_TASKS');
4238: IF (l_debug = 1) THEN
4239: debug_print( 'delete_so: Calling update_reservation api : ' );
4240: END IF;
4241: inv_reservation_pub.update_reservation( p_api_version_number => 1.0 ,
4242: p_init_msg_lst => fnd_api.g_false ,
4243: x_return_status => x_return_status ,
4244: x_msg_count => x_msg_count ,
4245: x_msg_data => x_msg_data ,
4246: p_original_rsv_rec => l_old_upd_resv_rec ,
4246: p_original_rsv_rec => l_old_upd_resv_rec ,
4247: p_to_rsv_rec => l_new_upd_resv_rec ,
4248: p_original_serial_number => l_upd_dummy_sn ,
4249: p_to_serial_number => l_upd_dummy_sn ,
4250: p_validation_flag => fnd_api.g_true );
4251:
4252: IF (l_debug = 1) THEN
4253: debug_print( 'delete_so: return of update_reservation api : ' || x_return_status);
4254: END IF;
4251:
4252: IF (l_debug = 1) THEN
4253: debug_print( 'delete_so: return of update_reservation api : ' || x_return_status);
4254: END IF;
4255: IF x_return_status <> fnd_api.g_ret_sts_success THEN
4256: x_task_rec := p_task_rec;
4257: IF (l_debug = 1) THEN
4258: debug_print( 'delete_so: Error updating reservation ' );
4259: END IF;
4269: WHEN OTHERS THEN
4270: IF (l_debug = 1) THEN
4271: debug_print( 'delete_so: OTHERS EXCEPTION !!!! while Updating reservation ' );
4272: END IF;
4273: x_return_status:= fnd_api.g_ret_sts_unexp_error ;
4274: ROLLBACK TO delso;
4275: END;
4276: l_progress := '145';
4277: delete_transaction( x_return_status => x_return_status ,
4282:
4283: IF l_debug = 1 THEN
4284: debug_print( 'x_return_status ' || x_return_status);
4285: END IF;
4286: IF x_return_status = fnd_api.g_ret_sts_error THEN
4287: IF l_debug = 1 THEN
4288: debug_print ( 'delete_so: l_progress: ' || l_progress );
4289: debug_print('delete_so: Error occurred while deleting MMTT');
4290: END IF;
4290: END IF;
4291: x_task_rec := p_task_rec;
4292: ROLLBACK TO delso;
4293: RAISE exc_not_deleted ;
4294: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
4295: IF l_debug = 1 THEN
4296: debug_print('delete_mo: Error occurred while deleting MMTT');
4297: END IF;
4298: ROLLBACK TO delso;
4325: p_move_order_type => l_mo_type ,
4326: p_mo_line_rec => l_mo_line_rec ,
4327: p_qty_to_backorder => l_transaction_record.primary_quantity);
4328:
4329: IF x_return_status = fnd_api.g_ret_sts_error THEN
4330: IF l_debug = 1 THEN
4331: debug_print('delete_so: Error occurred while backordering WDD');
4332: END IF;
4333: x_task_rec := p_task_rec;
4332: END IF;
4333: x_task_rec := p_task_rec;
4334: ROLLBACK TO delso;
4335: RAISE exc_not_deleted ;
4336: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
4337: IF l_debug = 1 THEN
4338: debug_print('Unexpected Error occurred while backordering WDD');
4339: END IF;
4340: ROLLBACK TO delso;
4367: backorder( p_line_id => l_transaction_record.move_order_line_id ,p_transaction_temp_id => l_transaction_record.transaction_temp_id , x_return_status => x_return_status , x_msg_count => x_msg_count , x_msg_data => x_msg_data );
4368: IF l_debug = 1 THEN
4369: debug_print( 'x_return_status ' || x_return_status);
4370: END IF;
4371: IF x_return_status = fnd_api.g_ret_sts_error THEN
4372: IF l_debug = 1 THEN
4373: debug_print('delete_so: Unexpected error occurrend while calling BackOrder API');
4374: END IF;
4375: x_task_rec := p_task_rec;
4374: END IF;
4375: x_task_rec := p_task_rec;
4376: ROLLBACK TO delso;
4377: RAISE exc_not_deleted ;
4378: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
4379: IF l_debug = 1 THEN
4380: debug_print('delete_so: Unexpected error occurred while calling BackOrder API');
4381: END IF;
4382: ROLLBACK TO delso;
4398:
4399: IF l_debug = 1 THEN
4400: debug_print( 'x_return_status ' || x_return_status);
4401: END IF;
4402: IF x_return_status = fnd_api.g_ret_sts_error THEN
4403: IF l_debug = 1 THEN
4404: debug_print('delete_so: Error occurred while deleting parent line in MMTT');
4405: END IF;
4406: x_task_rec := p_task_rec;
4405: END IF;
4406: x_task_rec := p_task_rec;
4407: ROLLBACK TO delso;
4408: RAISE exc_not_deleted ;
4409: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
4410: IF l_debug = 1 THEN
4411: debug_print('delete_so: Error occurred while deleting MMTT');
4412: END IF;
4413: ROLLBACK TO delso;
4448: l_progress VARCHAR2(30) := '200';
4449: l_update_parent BOOLEAN := FALSE ; -- No need to call update_parent_mmtt
4450: x_msg_count NUMBER;
4451: x_msg_data VARCHAR2(50);
4452: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
4453: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
4454: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
4455: l_reservation_id NUMBER;
4456: l_pri_rsv_qty NUMBER;
4449: l_update_parent BOOLEAN := FALSE ; -- No need to call update_parent_mmtt
4450: x_msg_count NUMBER;
4451: x_msg_data VARCHAR2(50);
4452: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
4453: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
4454: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
4455: l_reservation_id NUMBER;
4456: l_pri_rsv_qty NUMBER;
4457: l_rsv_qty NUMBER;
4450: x_msg_count NUMBER;
4451: x_msg_data VARCHAR2(50);
4452: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
4453: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
4454: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
4455: l_reservation_id NUMBER;
4456: l_pri_rsv_qty NUMBER;
4457: l_rsv_qty NUMBER;
4458: l_pri_rsv_uom VARCHAR2(3);
4514: FROM mtl_material_transactions_temp t1
4515: WHERE t1.parent_line_id = mmtt.transaction_temp_id
4516: );
4517: BEGIN
4518: x_return_status := fnd_api.g_ret_sts_success;
4519: l_progress := '210';
4520: l_debug := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
4521: IF (l_debug = 1) THEN
4522: debug_print('IN DELETE_MO_TASKS');
4584:
4585: IF l_debug = 1 THEN
4586: debug_print( 'x_return_status ' || x_return_status);
4587: END IF;
4588: IF x_return_status = fnd_api.g_ret_sts_error THEN
4589: IF l_debug = 1 THEN
4590: debug_print ( 'delete_mo: l_progress: ' || l_progress );
4591: debug_print('delete_mo: Error occurred while deleting MMTT');
4592: END IF;
4592: END IF;
4593: x_task_rec := p_task_rec;
4594: ROLLBACK TO delmo;
4595: RAISE exc_not_deleted ;
4596: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
4597: IF l_debug = 1 THEN
4598: debug_print('delete_mo: Error occurred while deleting MMTT');
4599: END IF;
4600: ROLLBACK TO delmo;
4629:
4630: IF l_debug = 1 THEN
4631: debug_print( 'x_return_status ' || x_return_status);
4632: END IF;
4633: IF x_return_status = fnd_api.g_ret_sts_error THEN
4634: IF l_debug = 1 THEN
4635: debug_print('delete_mo: Error occurred while deleting MMTT');
4636: END IF;
4637: x_task_rec := p_task_rec;
4636: END IF;
4637: x_task_rec := p_task_rec;
4638: ROLLBACK TO delmo;
4639: RAISE exc_not_deleted ;
4640: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
4641: IF l_debug = 1 THEN
4642: debug_print('delete_mo: Error occurred while deleting MMTT');
4643: END IF;
4644: ROLLBACK TO delmo;
4690: l_move_order_rec mtl_txn_request_lines%rowtype ; --MTRL rec
4691: l_op_plan_rec wms_op_plan_instances%rowtype ; --WOPI rec
4692: exc_not_deleted EXCEPTION;
4693: l_op_plan_status NUMBER ;
4694: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
4695: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
4696: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
4697: CURSOR c_mmtt_info
4698: IS
4691: l_op_plan_rec wms_op_plan_instances%rowtype ; --WOPI rec
4692: exc_not_deleted EXCEPTION;
4693: l_op_plan_status NUMBER ;
4694: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
4695: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
4696: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
4697: CURSOR c_mmtt_info
4698: IS
4699: SELECT mmtt.transaction_temp_id ,
4692: exc_not_deleted EXCEPTION;
4693: l_op_plan_status NUMBER ;
4694: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
4695: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
4696: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
4697: CURSOR c_mmtt_info
4698: IS
4699: SELECT mmtt.transaction_temp_id ,
4700: mmtt.parent_line_id ,
4750: FROM WMS_OP_PLAN_INSTANCES
4751: WHERE source_task_id = l_transaction_record.parent_line_id;
4752: BEGIN
4753: l_debug := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
4754: x_return_status := fnd_api.g_ret_sts_success;
4755: l_progress := '300';
4756: IF (l_debug = 1) THEN
4757: debug_print('IN DELETE_INBOUND_TASKS');
4758: debug_print( 'l_progress: ' || l_progress );
4855: p_transaction_temp_id => l_transaction_record.transaction_temp_id ,p_update_parent => l_update_parent );
4856: IF l_debug = 1 THEN
4857: debug_print( 'x_return_status ' || x_return_status);
4858: END IF;
4859: IF x_return_status = fnd_api.g_ret_sts_error THEN
4860: IF l_debug = 1 THEN
4861: debug_print('delete_inbound_tasks: Error while deleting MMTT/MTLT/MSNT/WDT');
4862: END IF;
4863: x_task_rec := p_task_rec;
4862: END IF;
4863: x_task_rec := p_task_rec;
4864: ROLLBACK TO delinb;
4865: RAISE exc_not_deleted ;
4866: ELSIF x_return_status = fnd_api.g_ret_sts_unexp_error THEN
4867: IF l_debug = 1 THEN
4868: debug_print('delete_inbound_tasks: Error occurred while deleting MMTT');
4869: END IF;
4870: ROLLBACK TO delinb;
4894: p_quantity => l_transaction_record.primary_quantity );
4895: IF l_debug = 1 THEN
4896: debug_print( 'Return status from revert_loc_suggested_capacity ' || x_return_status);
4897: END IF;
4898: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4899: IF l_debug = 1 THEN
4900: debug_print('delete_inbound_tasks: Error while reverting locator capacity');
4901: END IF;
4902: x_task_rec := p_task_rec;
4981: l_update_cyc NUMBER;
4982: l_cyc_task NUMBER;
4983: l_debug NUMBER;
4984: exc_not_deleted EXCEPTION;
4985: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
4986: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
4987: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
4988: BEGIN
4989: x_return_status := fnd_api.g_ret_sts_success;
4982: l_cyc_task NUMBER;
4983: l_debug NUMBER;
4984: exc_not_deleted EXCEPTION;
4985: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
4986: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
4987: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
4988: BEGIN
4989: x_return_status := fnd_api.g_ret_sts_success;
4990: l_debug := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
4983: l_debug NUMBER;
4984: exc_not_deleted EXCEPTION;
4985: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
4986: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
4987: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
4988: BEGIN
4989: x_return_status := fnd_api.g_ret_sts_success;
4990: l_debug := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
4991: l_cc_entry_id := p_task_rec.transaction_number ;
4985: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
4986: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
4987: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
4988: BEGIN
4989: x_return_status := fnd_api.g_ret_sts_success;
4990: l_debug := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
4991: l_cc_entry_id := p_task_rec.transaction_number ;
4992: SAVEPOINT delcyc;
4993: SELECT cycle_count_header_id
5053: /*This Public API takes care of deleting a single task or a table of tasks as is passed to the API.
5054: The types of tasks that this API handles include Inbound, Outbound, Warehouse and Manufacturing Tasks.
5055:
5056: PROCEDURE delete_tasks ( p_transaction_number IN NUMBER DEFAULT NULL ,
5057: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE ,
5058: p_wms_task IN WMS_TASK_MGMT_PUB.task_tab_type ,
5059: x_undeleted_tasks OUT NOCOPY WMS_TASK_MGMT_PUB.task_tab_type ,
5060: x_return_status OUT NOCOPY VARCHAR2 ,
5061: x_msg_count OUT NOCOPY NUMBER ,
5073: X_msg_data This gives the descrption of the messages that got logged during the task deletion process.
5074: -------------------------------------------------------------------------------------------------------------------*/
5075:
5076: PROCEDURE delete_tasks ( p_transaction_number IN NUMBER DEFAULT NULL ,
5077: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE ,
5078: p_wms_task IN WMS_TASK_MGMT_PUB.task_tab_type ,
5079: x_undeleted_tasks OUT NOCOPY WMS_TASK_MGMT_PUB.task_tab_type ,
5080: x_return_status OUT NOCOPY VARCHAR2 ,
5081: x_msg_count OUT NOCOPY NUMBER ,
5090: l_ret_task_table WMS_TASK_MGMT_PUB.task_tab_type ;
5091: l_val_ret_status VARCHAR2(30);
5092: l_task_type NUMBER ;
5093: l_task_exists NUMBER :=0 ;
5094: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
5095: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
5096: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
5097: exec_unexp EXCEPTION;
5098: l_lock_cyc_rec NUMBER;
5091: l_val_ret_status VARCHAR2(30);
5092: l_task_type NUMBER ;
5093: l_task_exists NUMBER :=0 ;
5094: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
5095: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
5096: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
5097: exec_unexp EXCEPTION;
5098: l_lock_cyc_rec NUMBER;
5099: l_debug NUMBER;
5092: l_task_type NUMBER ;
5093: l_task_exists NUMBER :=0 ;
5094: l_g_ret_sts_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_error;
5095: l_g_ret_sts_unexp_error CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_unexp_error;
5096: l_g_ret_sts_success CONSTANT VARCHAR2(30) := fnd_api.g_ret_sts_success;
5097: exec_unexp EXCEPTION;
5098: l_lock_cyc_rec NUMBER;
5099: l_debug NUMBER;
5100: undel_task NUMBER;
5099: l_debug NUMBER;
5100: undel_task NUMBER;
5101: l_msg VARCHAR2(2000);--anjana
5102: BEGIN
5103: x_return_status := fnd_api.g_ret_sts_success;
5104: --anjana
5105: x_msg_count := 0;
5106: l_debug := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
5107: l_val_ret_status :='S' ;
5198: x_undeleted_tasks(undel_task).RESULT := x_task_rec.status;
5199: x_undeleted_tasks(undel_task).error := l_msg;
5200: undel_task :=undel_task+1;
5201: -- FND_MSG_PUB.ADD;
5202: -- fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
5203: END IF;
5204: IF x_return_status ='U' THEN
5205: IF l_debug = 1 THEN
5206: debug_print('The called program returned unexpected error status' );
5216: l_msg := fnd_message.get;
5217: x_msg_count := x_msg_count + 1;
5218: x_msg_data := x_msg_data || l_msg;
5219: -- FND_MSG_PUB.ADD;
5220: -- fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
5221:
5222: x_undeleted_tasks(undel_task).transaction_number:= l_ret_task_table(i).transaction_number ; --6888354 Bug
5223: x_undeleted_tasks(undel_task).RESULT := l_ret_task_table(i).RESULT;
5224: x_undeleted_tasks(undel_task).error := l_msg;
5230: debug_print('Invalid status returned from Validate_Task' );
5231: END IF;
5232: RAISE exec_unexp;
5233: END IF; --End of Validation Status 'S'.
5234: IF p_commit = FND_API.G_TRUE THEN
5235: COMMIT;
5236: END IF ;
5237: EXCEPTION
5238: WHEN exec_unexp THEN
5241: END IF;
5242: x_return_status := l_g_ret_sts_unexp_error;
5243: FND_MESSAGE.SET_NAME('WMS', 'WMS_UNEXPECTED_ERROR');
5244: FND_MSG_PUB.ADD;
5245: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
5246: ROLLBACK TO deltask;
5247: WHEN OTHERS THEN
5248: IF l_debug = 1 THEN
5249: debug_print('In the When Others Exception of Delete_Tasks, Rolling back.' );
5250: END IF;
5251: x_return_status := l_g_ret_sts_unexp_error;
5252: FND_MESSAGE.SET_NAME('WMS', 'WMS_UNEXPECTED_ERROR');
5253: FND_MSG_PUB.ADD;
5254: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
5255: ROLLBACK TO deltask;
5256: END DELETE_TASKS;
5257:
5258: -------------------------------------------------------------------------------------------------------------------
5455: l_err_msg := 'Status returned by API wms_waveplan_tasks_pvt.query_tasks: '||x_return_status;
5456: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
5457: END IF;
5458:
5459: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
5460: /* SELECT * BULK COLLECT
5461: INTO x_task_tab
5462: FROM wms_waveplan_tasks_temp
5463: WHERE transaction_temp_id = p_transaction_number;*/
5657: l_err_msg := 'Status returned by API wms_waveplan_tasks_pvt.query_tasks for cycle count task: '||x_return_status;
5658: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
5659: END IF;
5660:
5661: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
5662: /* SELECT * BULK COLLECT
5663: INTO x_task_tab
5664: FROM wms_waveplan_tasks_temp
5665: WHERE transaction_temp_id = p_transaction_number;*/
5914: l_err_msg := 'Status returned by API wms_waveplan_tasks_pvt.query_tasks: '||x_return_status;
5915: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
5916: END IF;
5917:
5918: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
5919: SELECT
5920: TASK_ID,
5921: TRANSACTION_TEMP_ID,
5922: PARENT_LINE_ID,
6107: l_err_msg := 'Status returned by API wms_waveplan_tasks_pvt.query_tasks: '||x_return_status;
6108: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
6109: END IF;
6110:
6111: IF (x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
6112: SELECT
6113: TASK_ID,
6114: TRANSACTION_TEMP_ID,
6115: PARENT_LINE_ID,
6238: WHEN NO_DATA_FOUND THEN
6239: inv_trx_util_pub.trace('in the exception block of outbond/manufacturing/warehousing complete tasks');
6240: fnd_message.set_name('WMS', 'WMS_INVALID_TASK');
6241: fnd_msg_pub.ADD;
6242: x_return_status := fnd_api.g_ret_sts_unexp_error;
6243: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
6244: l_err_msg := 'Failed to fetch data from MMTT,MCCE,MMT or WDTH tables for transaction number '||p_transaction_number;
6245: IF(l_debug = 1) THEN
6246: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
6239: inv_trx_util_pub.trace('in the exception block of outbond/manufacturing/warehousing complete tasks');
6240: fnd_message.set_name('WMS', 'WMS_INVALID_TASK');
6241: fnd_msg_pub.ADD;
6242: x_return_status := fnd_api.g_ret_sts_unexp_error;
6243: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
6244: l_err_msg := 'Failed to fetch data from MMTT,MCCE,MMT or WDTH tables for transaction number '||p_transaction_number;
6245: IF(l_debug = 1) THEN
6246: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
6247: END IF;
6251: --end the begin block for inbound/crossdock complete tasks
6252: END;
6253: --end the begin block for cycle count tasks
6254: WHEN OTHERS THEN
6255: x_return_status := fnd_api.g_ret_sts_unexp_error;
6256: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
6257: l_err_msg := substr(SQLERRM,1,1000);
6258: IF(l_debug = 1) THEN
6259: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
6252: END;
6253: --end the begin block for cycle count tasks
6254: WHEN OTHERS THEN
6255: x_return_status := fnd_api.g_ret_sts_unexp_error;
6256: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
6257: l_err_msg := substr(SQLERRM,1,1000);
6258: IF(l_debug = 1) THEN
6259: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
6260: END IF;
6300:
6301: --- check the credentials of the query_name passed as input
6302:
6303: ---if 'inbound' task is queried then
6304: --Munish is adding (g_main_tab(93).field_value = FND_API.G_TRUE) to check crossdock task
6305: IF(g_main_tab(35).field_value = FND_API.G_TRUE) OR (g_main_tab(93).field_value = FND_API.G_TRUE) THEN
6306: -- IF(g_main_tab(35).field_value = FND_API.G_TRUE) THEN
6307: ---if its planned or independent task
6308: IF ((g_main_tab(36).field_value = FND_API.G_TRUE)
6301: --- check the credentials of the query_name passed as input
6302:
6303: ---if 'inbound' task is queried then
6304: --Munish is adding (g_main_tab(93).field_value = FND_API.G_TRUE) to check crossdock task
6305: IF(g_main_tab(35).field_value = FND_API.G_TRUE) OR (g_main_tab(93).field_value = FND_API.G_TRUE) THEN
6306: -- IF(g_main_tab(35).field_value = FND_API.G_TRUE) THEN
6307: ---if its planned or independent task
6308: IF ((g_main_tab(36).field_value = FND_API.G_TRUE)
6309: OR (g_main_tab(58).field_value = FND_API.G_TRUE))
6302:
6303: ---if 'inbound' task is queried then
6304: --Munish is adding (g_main_tab(93).field_value = FND_API.G_TRUE) to check crossdock task
6305: IF(g_main_tab(35).field_value = FND_API.G_TRUE) OR (g_main_tab(93).field_value = FND_API.G_TRUE) THEN
6306: -- IF(g_main_tab(35).field_value = FND_API.G_TRUE) THEN
6307: ---if its planned or independent task
6308: IF ((g_main_tab(36).field_value = FND_API.G_TRUE)
6309: OR (g_main_tab(58).field_value = FND_API.G_TRUE))
6310: THEN
6304: --Munish is adding (g_main_tab(93).field_value = FND_API.G_TRUE) to check crossdock task
6305: IF(g_main_tab(35).field_value = FND_API.G_TRUE) OR (g_main_tab(93).field_value = FND_API.G_TRUE) THEN
6306: -- IF(g_main_tab(35).field_value = FND_API.G_TRUE) THEN
6307: ---if its planned or independent task
6308: IF ((g_main_tab(36).field_value = FND_API.G_TRUE)
6309: OR (g_main_tab(58).field_value = FND_API.G_TRUE))
6310: THEN
6311: ---the status has to be either one of the following:
6312: ---unreleased, pending, queued, dispatched,active, loaded, completed
6305: IF(g_main_tab(35).field_value = FND_API.G_TRUE) OR (g_main_tab(93).field_value = FND_API.G_TRUE) THEN
6306: -- IF(g_main_tab(35).field_value = FND_API.G_TRUE) THEN
6307: ---if its planned or independent task
6308: IF ((g_main_tab(36).field_value = FND_API.G_TRUE)
6309: OR (g_main_tab(58).field_value = FND_API.G_TRUE))
6310: THEN
6311: ---the status has to be either one of the following:
6312: ---unreleased, pending, queued, dispatched,active, loaded, completed
6313: IF((g_main_tab(1).field_value = FND_API.G_TRUE)
6309: OR (g_main_tab(58).field_value = FND_API.G_TRUE))
6310: THEN
6311: ---the status has to be either one of the following:
6312: ---unreleased, pending, queued, dispatched,active, loaded, completed
6313: IF((g_main_tab(1).field_value = FND_API.G_TRUE)
6314: OR (g_main_tab(5).field_value = FND_API.G_TRUE)
6315: OR (g_main_tab(12).field_value = FND_API.G_TRUE)
6316: OR (g_main_tab(39).field_value = FND_API.G_TRUE)
6317: OR (g_main_tab(51).field_value = FND_API.G_TRUE)
6310: THEN
6311: ---the status has to be either one of the following:
6312: ---unreleased, pending, queued, dispatched,active, loaded, completed
6313: IF((g_main_tab(1).field_value = FND_API.G_TRUE)
6314: OR (g_main_tab(5).field_value = FND_API.G_TRUE)
6315: OR (g_main_tab(12).field_value = FND_API.G_TRUE)
6316: OR (g_main_tab(39).field_value = FND_API.G_TRUE)
6317: OR (g_main_tab(51).field_value = FND_API.G_TRUE)
6318: OR (g_main_tab(59).field_value = FND_API.G_TRUE)
6311: ---the status has to be either one of the following:
6312: ---unreleased, pending, queued, dispatched,active, loaded, completed
6313: IF((g_main_tab(1).field_value = FND_API.G_TRUE)
6314: OR (g_main_tab(5).field_value = FND_API.G_TRUE)
6315: OR (g_main_tab(12).field_value = FND_API.G_TRUE)
6316: OR (g_main_tab(39).field_value = FND_API.G_TRUE)
6317: OR (g_main_tab(51).field_value = FND_API.G_TRUE)
6318: OR (g_main_tab(59).field_value = FND_API.G_TRUE)
6319: OR (g_main_tab(90).field_value = FND_API.G_TRUE))
6312: ---unreleased, pending, queued, dispatched,active, loaded, completed
6313: IF((g_main_tab(1).field_value = FND_API.G_TRUE)
6314: OR (g_main_tab(5).field_value = FND_API.G_TRUE)
6315: OR (g_main_tab(12).field_value = FND_API.G_TRUE)
6316: OR (g_main_tab(39).field_value = FND_API.G_TRUE)
6317: OR (g_main_tab(51).field_value = FND_API.G_TRUE)
6318: OR (g_main_tab(59).field_value = FND_API.G_TRUE)
6319: OR (g_main_tab(90).field_value = FND_API.G_TRUE))
6320: THEN
6313: IF((g_main_tab(1).field_value = FND_API.G_TRUE)
6314: OR (g_main_tab(5).field_value = FND_API.G_TRUE)
6315: OR (g_main_tab(12).field_value = FND_API.G_TRUE)
6316: OR (g_main_tab(39).field_value = FND_API.G_TRUE)
6317: OR (g_main_tab(51).field_value = FND_API.G_TRUE)
6318: OR (g_main_tab(59).field_value = FND_API.G_TRUE)
6319: OR (g_main_tab(90).field_value = FND_API.G_TRUE))
6320: THEN
6321: l_execute_qry := TRUE;
6314: OR (g_main_tab(5).field_value = FND_API.G_TRUE)
6315: OR (g_main_tab(12).field_value = FND_API.G_TRUE)
6316: OR (g_main_tab(39).field_value = FND_API.G_TRUE)
6317: OR (g_main_tab(51).field_value = FND_API.G_TRUE)
6318: OR (g_main_tab(59).field_value = FND_API.G_TRUE)
6319: OR (g_main_tab(90).field_value = FND_API.G_TRUE))
6320: THEN
6321: l_execute_qry := TRUE;
6322: END IF;
6315: OR (g_main_tab(12).field_value = FND_API.G_TRUE)
6316: OR (g_main_tab(39).field_value = FND_API.G_TRUE)
6317: OR (g_main_tab(51).field_value = FND_API.G_TRUE)
6318: OR (g_main_tab(59).field_value = FND_API.G_TRUE)
6319: OR (g_main_tab(90).field_value = FND_API.G_TRUE))
6320: THEN
6321: l_execute_qry := TRUE;
6322: END IF;
6323: --else if it's not planned or independent task then
6322: END IF;
6323: --else if it's not planned or independent task then
6324: --it has to be either one of plan_pending, plan_in_progress, plan_completed
6325: --plan_cancelled or plan_aborted
6326: ELSIF((g_main_tab(53).field_value = FND_API.G_TRUE)
6327: OR (g_main_tab(54).field_value = FND_API.G_TRUE)
6328: OR (g_main_tab(55).field_value = FND_API.G_TRUE)
6329: OR (g_main_tab(56).field_value = FND_API.G_TRUE)
6330: OR (g_main_tab(57).field_value = FND_API.G_TRUE))
6323: --else if it's not planned or independent task then
6324: --it has to be either one of plan_pending, plan_in_progress, plan_completed
6325: --plan_cancelled or plan_aborted
6326: ELSIF((g_main_tab(53).field_value = FND_API.G_TRUE)
6327: OR (g_main_tab(54).field_value = FND_API.G_TRUE)
6328: OR (g_main_tab(55).field_value = FND_API.G_TRUE)
6329: OR (g_main_tab(56).field_value = FND_API.G_TRUE)
6330: OR (g_main_tab(57).field_value = FND_API.G_TRUE))
6331: THEN
6324: --it has to be either one of plan_pending, plan_in_progress, plan_completed
6325: --plan_cancelled or plan_aborted
6326: ELSIF((g_main_tab(53).field_value = FND_API.G_TRUE)
6327: OR (g_main_tab(54).field_value = FND_API.G_TRUE)
6328: OR (g_main_tab(55).field_value = FND_API.G_TRUE)
6329: OR (g_main_tab(56).field_value = FND_API.G_TRUE)
6330: OR (g_main_tab(57).field_value = FND_API.G_TRUE))
6331: THEN
6332: l_execute_qry := TRUE;
6325: --plan_cancelled or plan_aborted
6326: ELSIF((g_main_tab(53).field_value = FND_API.G_TRUE)
6327: OR (g_main_tab(54).field_value = FND_API.G_TRUE)
6328: OR (g_main_tab(55).field_value = FND_API.G_TRUE)
6329: OR (g_main_tab(56).field_value = FND_API.G_TRUE)
6330: OR (g_main_tab(57).field_value = FND_API.G_TRUE))
6331: THEN
6332: l_execute_qry := TRUE;
6333: ELSE
6326: ELSIF((g_main_tab(53).field_value = FND_API.G_TRUE)
6327: OR (g_main_tab(54).field_value = FND_API.G_TRUE)
6328: OR (g_main_tab(55).field_value = FND_API.G_TRUE)
6329: OR (g_main_tab(56).field_value = FND_API.G_TRUE)
6330: OR (g_main_tab(57).field_value = FND_API.G_TRUE))
6331: THEN
6332: l_execute_qry := TRUE;
6333: ELSE
6334: l_execute_qry := FALSE;
6339: END IF;
6340: END IF;
6341:
6342: --If its either outbound, manufacturing or warehousing tasks
6343: IF ((g_main_tab(50).field_value = FND_API.G_TRUE)
6344: OR(g_main_tab(42).field_value = FND_API.G_TRUE)
6345: OR(g_main_tab(92).field_value = FND_API.G_TRUE))
6346: THEN
6347: ---the status has to be either one of the following:
6340: END IF;
6341:
6342: --If its either outbound, manufacturing or warehousing tasks
6343: IF ((g_main_tab(50).field_value = FND_API.G_TRUE)
6344: OR(g_main_tab(42).field_value = FND_API.G_TRUE)
6345: OR(g_main_tab(92).field_value = FND_API.G_TRUE))
6346: THEN
6347: ---the status has to be either one of the following:
6348: ---unreleased, pending, queued, dispatched,active, loaded, completed
6341:
6342: --If its either outbound, manufacturing or warehousing tasks
6343: IF ((g_main_tab(50).field_value = FND_API.G_TRUE)
6344: OR(g_main_tab(42).field_value = FND_API.G_TRUE)
6345: OR(g_main_tab(92).field_value = FND_API.G_TRUE))
6346: THEN
6347: ---the status has to be either one of the following:
6348: ---unreleased, pending, queued, dispatched,active, loaded, completed
6349: IF((g_main_tab(1).field_value = FND_API.G_TRUE)
6345: OR(g_main_tab(92).field_value = FND_API.G_TRUE))
6346: THEN
6347: ---the status has to be either one of the following:
6348: ---unreleased, pending, queued, dispatched,active, loaded, completed
6349: IF((g_main_tab(1).field_value = FND_API.G_TRUE)
6350: OR (g_main_tab(5).field_value = FND_API.G_TRUE)
6351: OR (g_main_tab(12).field_value = FND_API.G_TRUE)
6352: OR (g_main_tab(39).field_value = FND_API.G_TRUE)
6353: OR (g_main_tab(51).field_value = FND_API.G_TRUE)
6346: THEN
6347: ---the status has to be either one of the following:
6348: ---unreleased, pending, queued, dispatched,active, loaded, completed
6349: IF((g_main_tab(1).field_value = FND_API.G_TRUE)
6350: OR (g_main_tab(5).field_value = FND_API.G_TRUE)
6351: OR (g_main_tab(12).field_value = FND_API.G_TRUE)
6352: OR (g_main_tab(39).field_value = FND_API.G_TRUE)
6353: OR (g_main_tab(51).field_value = FND_API.G_TRUE)
6354: OR (g_main_tab(59).field_value = FND_API.G_TRUE)
6347: ---the status has to be either one of the following:
6348: ---unreleased, pending, queued, dispatched,active, loaded, completed
6349: IF((g_main_tab(1).field_value = FND_API.G_TRUE)
6350: OR (g_main_tab(5).field_value = FND_API.G_TRUE)
6351: OR (g_main_tab(12).field_value = FND_API.G_TRUE)
6352: OR (g_main_tab(39).field_value = FND_API.G_TRUE)
6353: OR (g_main_tab(51).field_value = FND_API.G_TRUE)
6354: OR (g_main_tab(59).field_value = FND_API.G_TRUE)
6355: OR (g_main_tab(90).field_value = FND_API.G_TRUE))
6348: ---unreleased, pending, queued, dispatched,active, loaded, completed
6349: IF((g_main_tab(1).field_value = FND_API.G_TRUE)
6350: OR (g_main_tab(5).field_value = FND_API.G_TRUE)
6351: OR (g_main_tab(12).field_value = FND_API.G_TRUE)
6352: OR (g_main_tab(39).field_value = FND_API.G_TRUE)
6353: OR (g_main_tab(51).field_value = FND_API.G_TRUE)
6354: OR (g_main_tab(59).field_value = FND_API.G_TRUE)
6355: OR (g_main_tab(90).field_value = FND_API.G_TRUE))
6356: THEN
6349: IF((g_main_tab(1).field_value = FND_API.G_TRUE)
6350: OR (g_main_tab(5).field_value = FND_API.G_TRUE)
6351: OR (g_main_tab(12).field_value = FND_API.G_TRUE)
6352: OR (g_main_tab(39).field_value = FND_API.G_TRUE)
6353: OR (g_main_tab(51).field_value = FND_API.G_TRUE)
6354: OR (g_main_tab(59).field_value = FND_API.G_TRUE)
6355: OR (g_main_tab(90).field_value = FND_API.G_TRUE))
6356: THEN
6357: l_execute_qry := TRUE;
6350: OR (g_main_tab(5).field_value = FND_API.G_TRUE)
6351: OR (g_main_tab(12).field_value = FND_API.G_TRUE)
6352: OR (g_main_tab(39).field_value = FND_API.G_TRUE)
6353: OR (g_main_tab(51).field_value = FND_API.G_TRUE)
6354: OR (g_main_tab(59).field_value = FND_API.G_TRUE)
6355: OR (g_main_tab(90).field_value = FND_API.G_TRUE))
6356: THEN
6357: l_execute_qry := TRUE;
6358: END IF;
6351: OR (g_main_tab(12).field_value = FND_API.G_TRUE)
6352: OR (g_main_tab(39).field_value = FND_API.G_TRUE)
6353: OR (g_main_tab(51).field_value = FND_API.G_TRUE)
6354: OR (g_main_tab(59).field_value = FND_API.G_TRUE)
6355: OR (g_main_tab(90).field_value = FND_API.G_TRUE))
6356: THEN
6357: l_execute_qry := TRUE;
6358: END IF;
6359: ---else if its neither one of the following tasks then generate error message
6357: l_execute_qry := TRUE;
6358: END IF;
6359: ---else if its neither one of the following tasks then generate error message
6360: ---outbound, inbound, manufacturing, warehousing
6361: ELSIF ((g_main_tab(50).field_value = FND_API.G_FALSE)
6362: AND(g_main_tab(42).field_value = FND_API.G_FALSE)
6363: AND(g_main_tab(92).field_value = FND_API.G_FALSE)
6364: AND(g_main_tab(35).field_value = FND_API.G_FALSE)
6365: AND (g_main_tab(93).field_value = FND_API.G_FALSE))
6358: END IF;
6359: ---else if its neither one of the following tasks then generate error message
6360: ---outbound, inbound, manufacturing, warehousing
6361: ELSIF ((g_main_tab(50).field_value = FND_API.G_FALSE)
6362: AND(g_main_tab(42).field_value = FND_API.G_FALSE)
6363: AND(g_main_tab(92).field_value = FND_API.G_FALSE)
6364: AND(g_main_tab(35).field_value = FND_API.G_FALSE)
6365: AND (g_main_tab(93).field_value = FND_API.G_FALSE))
6366: THEN
6359: ---else if its neither one of the following tasks then generate error message
6360: ---outbound, inbound, manufacturing, warehousing
6361: ELSIF ((g_main_tab(50).field_value = FND_API.G_FALSE)
6362: AND(g_main_tab(42).field_value = FND_API.G_FALSE)
6363: AND(g_main_tab(92).field_value = FND_API.G_FALSE)
6364: AND(g_main_tab(35).field_value = FND_API.G_FALSE)
6365: AND (g_main_tab(93).field_value = FND_API.G_FALSE))
6366: THEN
6367: l_execute_qry := FALSE;
6360: ---outbound, inbound, manufacturing, warehousing
6361: ELSIF ((g_main_tab(50).field_value = FND_API.G_FALSE)
6362: AND(g_main_tab(42).field_value = FND_API.G_FALSE)
6363: AND(g_main_tab(92).field_value = FND_API.G_FALSE)
6364: AND(g_main_tab(35).field_value = FND_API.G_FALSE)
6365: AND (g_main_tab(93).field_value = FND_API.G_FALSE))
6366: THEN
6367: l_execute_qry := FALSE;
6368: l_err_msg := 'Invalid query criteria';
6361: ELSIF ((g_main_tab(50).field_value = FND_API.G_FALSE)
6362: AND(g_main_tab(42).field_value = FND_API.G_FALSE)
6363: AND(g_main_tab(92).field_value = FND_API.G_FALSE)
6364: AND(g_main_tab(35).field_value = FND_API.G_FALSE)
6365: AND (g_main_tab(93).field_value = FND_API.G_FALSE))
6366: THEN
6367: l_execute_qry := FALSE;
6368: l_err_msg := 'Invalid query criteria';
6369: fnd_message.set_name('WMS', 'WMS_NO_SOURCE_ENTERED');
6430: g_main_tab(32).field_value, ---p_from_task_priority NUMBER DEFAULT NULL,
6431: g_main_tab(86).field_value, ---p_to_task_priority NUMBER DEFAULT NULL,
6432: g_main_tab(16).field_value, ---p_from_creation_date DATE DEFAULT NULL,
6433: g_main_tab(68).field_value, ---p_to_creation_date DATE DEFAULT NULL,
6434: fnd_api.to_boolean(g_main_tab(90).field_value), ---p_is_unreleased BOOLEAN DEFAULT FALSE,
6435: fnd_api.to_boolean(g_main_tab(51).field_value), ---p_is_pending BOOLEAN DEFAULT FALSE,
6436: fnd_api.to_boolean(g_main_tab(59).field_value), ---p_is_queued BOOLEAN DEFAULT FALSE,
6437: fnd_api.to_boolean(g_main_tab(12).field_value), ---p_is_dispatched BOOLEAN DEFAULT FALSE,
6438: fnd_api.to_boolean(g_main_tab(1).field_value), ---p_is_active BOOLEAN DEFAULT FALSE,
6431: g_main_tab(86).field_value, ---p_to_task_priority NUMBER DEFAULT NULL,
6432: g_main_tab(16).field_value, ---p_from_creation_date DATE DEFAULT NULL,
6433: g_main_tab(68).field_value, ---p_to_creation_date DATE DEFAULT NULL,
6434: fnd_api.to_boolean(g_main_tab(90).field_value), ---p_is_unreleased BOOLEAN DEFAULT FALSE,
6435: fnd_api.to_boolean(g_main_tab(51).field_value), ---p_is_pending BOOLEAN DEFAULT FALSE,
6436: fnd_api.to_boolean(g_main_tab(59).field_value), ---p_is_queued BOOLEAN DEFAULT FALSE,
6437: fnd_api.to_boolean(g_main_tab(12).field_value), ---p_is_dispatched BOOLEAN DEFAULT FALSE,
6438: fnd_api.to_boolean(g_main_tab(1).field_value), ---p_is_active BOOLEAN DEFAULT FALSE,
6439: fnd_api.to_boolean(g_main_tab(39).field_value), ---p_is_loaded BOOLEAN DEFAULT FALSE,
6432: g_main_tab(16).field_value, ---p_from_creation_date DATE DEFAULT NULL,
6433: g_main_tab(68).field_value, ---p_to_creation_date DATE DEFAULT NULL,
6434: fnd_api.to_boolean(g_main_tab(90).field_value), ---p_is_unreleased BOOLEAN DEFAULT FALSE,
6435: fnd_api.to_boolean(g_main_tab(51).field_value), ---p_is_pending BOOLEAN DEFAULT FALSE,
6436: fnd_api.to_boolean(g_main_tab(59).field_value), ---p_is_queued BOOLEAN DEFAULT FALSE,
6437: fnd_api.to_boolean(g_main_tab(12).field_value), ---p_is_dispatched BOOLEAN DEFAULT FALSE,
6438: fnd_api.to_boolean(g_main_tab(1).field_value), ---p_is_active BOOLEAN DEFAULT FALSE,
6439: fnd_api.to_boolean(g_main_tab(39).field_value), ---p_is_loaded BOOLEAN DEFAULT FALSE,
6440: fnd_api.to_boolean(g_main_tab(5).field_value), ---p_is_completed BOOLEAN DEFAULT FALSE,
6433: g_main_tab(68).field_value, ---p_to_creation_date DATE DEFAULT NULL,
6434: fnd_api.to_boolean(g_main_tab(90).field_value), ---p_is_unreleased BOOLEAN DEFAULT FALSE,
6435: fnd_api.to_boolean(g_main_tab(51).field_value), ---p_is_pending BOOLEAN DEFAULT FALSE,
6436: fnd_api.to_boolean(g_main_tab(59).field_value), ---p_is_queued BOOLEAN DEFAULT FALSE,
6437: fnd_api.to_boolean(g_main_tab(12).field_value), ---p_is_dispatched BOOLEAN DEFAULT FALSE,
6438: fnd_api.to_boolean(g_main_tab(1).field_value), ---p_is_active BOOLEAN DEFAULT FALSE,
6439: fnd_api.to_boolean(g_main_tab(39).field_value), ---p_is_loaded BOOLEAN DEFAULT FALSE,
6440: fnd_api.to_boolean(g_main_tab(5).field_value), ---p_is_completed BOOLEAN DEFAULT FALSE,
6441: fnd_api.to_boolean(g_main_tab(35).field_value), ---p_include_inbound BOOLEAN DEFAULT FALSE,
6434: fnd_api.to_boolean(g_main_tab(90).field_value), ---p_is_unreleased BOOLEAN DEFAULT FALSE,
6435: fnd_api.to_boolean(g_main_tab(51).field_value), ---p_is_pending BOOLEAN DEFAULT FALSE,
6436: fnd_api.to_boolean(g_main_tab(59).field_value), ---p_is_queued BOOLEAN DEFAULT FALSE,
6437: fnd_api.to_boolean(g_main_tab(12).field_value), ---p_is_dispatched BOOLEAN DEFAULT FALSE,
6438: fnd_api.to_boolean(g_main_tab(1).field_value), ---p_is_active BOOLEAN DEFAULT FALSE,
6439: fnd_api.to_boolean(g_main_tab(39).field_value), ---p_is_loaded BOOLEAN DEFAULT FALSE,
6440: fnd_api.to_boolean(g_main_tab(5).field_value), ---p_is_completed BOOLEAN DEFAULT FALSE,
6441: fnd_api.to_boolean(g_main_tab(35).field_value), ---p_include_inbound BOOLEAN DEFAULT FALSE,
6442: fnd_api.to_boolean(g_main_tab(50).field_value), ---p_include_outbound BOOLEAN DEFAULT FALSE,
6435: fnd_api.to_boolean(g_main_tab(51).field_value), ---p_is_pending BOOLEAN DEFAULT FALSE,
6436: fnd_api.to_boolean(g_main_tab(59).field_value), ---p_is_queued BOOLEAN DEFAULT FALSE,
6437: fnd_api.to_boolean(g_main_tab(12).field_value), ---p_is_dispatched BOOLEAN DEFAULT FALSE,
6438: fnd_api.to_boolean(g_main_tab(1).field_value), ---p_is_active BOOLEAN DEFAULT FALSE,
6439: fnd_api.to_boolean(g_main_tab(39).field_value), ---p_is_loaded BOOLEAN DEFAULT FALSE,
6440: fnd_api.to_boolean(g_main_tab(5).field_value), ---p_is_completed BOOLEAN DEFAULT FALSE,
6441: fnd_api.to_boolean(g_main_tab(35).field_value), ---p_include_inbound BOOLEAN DEFAULT FALSE,
6442: fnd_api.to_boolean(g_main_tab(50).field_value), ---p_include_outbound BOOLEAN DEFAULT FALSE,
6443: fnd_api.to_boolean(g_main_tab(93).field_value), ---p_include_crossdock
6436: fnd_api.to_boolean(g_main_tab(59).field_value), ---p_is_queued BOOLEAN DEFAULT FALSE,
6437: fnd_api.to_boolean(g_main_tab(12).field_value), ---p_is_dispatched BOOLEAN DEFAULT FALSE,
6438: fnd_api.to_boolean(g_main_tab(1).field_value), ---p_is_active BOOLEAN DEFAULT FALSE,
6439: fnd_api.to_boolean(g_main_tab(39).field_value), ---p_is_loaded BOOLEAN DEFAULT FALSE,
6440: fnd_api.to_boolean(g_main_tab(5).field_value), ---p_is_completed BOOLEAN DEFAULT FALSE,
6441: fnd_api.to_boolean(g_main_tab(35).field_value), ---p_include_inbound BOOLEAN DEFAULT FALSE,
6442: fnd_api.to_boolean(g_main_tab(50).field_value), ---p_include_outbound BOOLEAN DEFAULT FALSE,
6443: fnd_api.to_boolean(g_main_tab(93).field_value), ---p_include_crossdock
6444: fnd_api.to_boolean(g_main_tab(42).field_value), ---p_include_manufacturing BOOLEAN DEFAULT FALSE,
6437: fnd_api.to_boolean(g_main_tab(12).field_value), ---p_is_dispatched BOOLEAN DEFAULT FALSE,
6438: fnd_api.to_boolean(g_main_tab(1).field_value), ---p_is_active BOOLEAN DEFAULT FALSE,
6439: fnd_api.to_boolean(g_main_tab(39).field_value), ---p_is_loaded BOOLEAN DEFAULT FALSE,
6440: fnd_api.to_boolean(g_main_tab(5).field_value), ---p_is_completed BOOLEAN DEFAULT FALSE,
6441: fnd_api.to_boolean(g_main_tab(35).field_value), ---p_include_inbound BOOLEAN DEFAULT FALSE,
6442: fnd_api.to_boolean(g_main_tab(50).field_value), ---p_include_outbound BOOLEAN DEFAULT FALSE,
6443: fnd_api.to_boolean(g_main_tab(93).field_value), ---p_include_crossdock
6444: fnd_api.to_boolean(g_main_tab(42).field_value), ---p_include_manufacturing BOOLEAN DEFAULT FALSE,
6445: fnd_api.to_boolean(g_main_tab(92).field_value), ---p_include_warehousing BOOLEAN DEFAULT FALSE,
6438: fnd_api.to_boolean(g_main_tab(1).field_value), ---p_is_active BOOLEAN DEFAULT FALSE,
6439: fnd_api.to_boolean(g_main_tab(39).field_value), ---p_is_loaded BOOLEAN DEFAULT FALSE,
6440: fnd_api.to_boolean(g_main_tab(5).field_value), ---p_is_completed BOOLEAN DEFAULT FALSE,
6441: fnd_api.to_boolean(g_main_tab(35).field_value), ---p_include_inbound BOOLEAN DEFAULT FALSE,
6442: fnd_api.to_boolean(g_main_tab(50).field_value), ---p_include_outbound BOOLEAN DEFAULT FALSE,
6443: fnd_api.to_boolean(g_main_tab(93).field_value), ---p_include_crossdock
6444: fnd_api.to_boolean(g_main_tab(42).field_value), ---p_include_manufacturing BOOLEAN DEFAULT FALSE,
6445: fnd_api.to_boolean(g_main_tab(92).field_value), ---p_include_warehousing BOOLEAN DEFAULT FALSE,
6446: g_main_tab(21).field_value, ---p_from_po_header_id NUMBER DEFAULT NULL,
6439: fnd_api.to_boolean(g_main_tab(39).field_value), ---p_is_loaded BOOLEAN DEFAULT FALSE,
6440: fnd_api.to_boolean(g_main_tab(5).field_value), ---p_is_completed BOOLEAN DEFAULT FALSE,
6441: fnd_api.to_boolean(g_main_tab(35).field_value), ---p_include_inbound BOOLEAN DEFAULT FALSE,
6442: fnd_api.to_boolean(g_main_tab(50).field_value), ---p_include_outbound BOOLEAN DEFAULT FALSE,
6443: fnd_api.to_boolean(g_main_tab(93).field_value), ---p_include_crossdock
6444: fnd_api.to_boolean(g_main_tab(42).field_value), ---p_include_manufacturing BOOLEAN DEFAULT FALSE,
6445: fnd_api.to_boolean(g_main_tab(92).field_value), ---p_include_warehousing BOOLEAN DEFAULT FALSE,
6446: g_main_tab(21).field_value, ---p_from_po_header_id NUMBER DEFAULT NULL,
6447: g_main_tab(74).field_value, ---p_to_po_header_id NUMBER DEFAULT NULL,
6440: fnd_api.to_boolean(g_main_tab(5).field_value), ---p_is_completed BOOLEAN DEFAULT FALSE,
6441: fnd_api.to_boolean(g_main_tab(35).field_value), ---p_include_inbound BOOLEAN DEFAULT FALSE,
6442: fnd_api.to_boolean(g_main_tab(50).field_value), ---p_include_outbound BOOLEAN DEFAULT FALSE,
6443: fnd_api.to_boolean(g_main_tab(93).field_value), ---p_include_crossdock
6444: fnd_api.to_boolean(g_main_tab(42).field_value), ---p_include_manufacturing BOOLEAN DEFAULT FALSE,
6445: fnd_api.to_boolean(g_main_tab(92).field_value), ---p_include_warehousing BOOLEAN DEFAULT FALSE,
6446: g_main_tab(21).field_value, ---p_from_po_header_id NUMBER DEFAULT NULL,
6447: g_main_tab(74).field_value, ---p_to_po_header_id NUMBER DEFAULT NULL,
6448: g_main_tab(22).field_value, ---p_from_purchase_order VARCHAR2 DEFAULT NULL,
6441: fnd_api.to_boolean(g_main_tab(35).field_value), ---p_include_inbound BOOLEAN DEFAULT FALSE,
6442: fnd_api.to_boolean(g_main_tab(50).field_value), ---p_include_outbound BOOLEAN DEFAULT FALSE,
6443: fnd_api.to_boolean(g_main_tab(93).field_value), ---p_include_crossdock
6444: fnd_api.to_boolean(g_main_tab(42).field_value), ---p_include_manufacturing BOOLEAN DEFAULT FALSE,
6445: fnd_api.to_boolean(g_main_tab(92).field_value), ---p_include_warehousing BOOLEAN DEFAULT FALSE,
6446: g_main_tab(21).field_value, ---p_from_po_header_id NUMBER DEFAULT NULL,
6447: g_main_tab(74).field_value, ---p_to_po_header_id NUMBER DEFAULT NULL,
6448: g_main_tab(22).field_value, ---p_from_purchase_order VARCHAR2 DEFAULT NULL,
6449: g_main_tab(75).field_value, ---p_to_purchase_order VARCHAR2 DEFAULT NULL,
6485: g_main_tab(84).field_value, ---p_to_start_date DATE DEFAULT NULL,
6486: g_main_tab(18).field_value, ---p_from_line VARCHAR2 DEFAULT NULL,
6487: g_main_tab(70).field_value, ---p_to_line VARCHAR2 DEFAULT NULL,
6488: g_main_tab(11).field_value, ---p_department_id NUMBER DEFAULT NULL,
6489: fnd_api.to_boolean(g_main_tab(60).field_value), ---p_include_replenishment BOOLEAN DEFAULT TRUE,
6490: g_main_tab(23).field_value, ---p_from_replenishment_mo VARCHAR2 DEFAULT NULL,
6491: g_main_tab(76).field_value, ---p_to_replenishment_mo VARCHAR2 DEFAULT NULL,
6492: fnd_api.to_boolean(g_main_tab(45).field_value), ---p_include_mo_transfer BOOLEAN DEFAULT TRUE,
6493: fnd_api.to_boolean(g_main_tab(44).field_value), ---p_include_mo_issue BOOLEAN DEFAULT TRUE,
6488: g_main_tab(11).field_value, ---p_department_id NUMBER DEFAULT NULL,
6489: fnd_api.to_boolean(g_main_tab(60).field_value), ---p_include_replenishment BOOLEAN DEFAULT TRUE,
6490: g_main_tab(23).field_value, ---p_from_replenishment_mo VARCHAR2 DEFAULT NULL,
6491: g_main_tab(76).field_value, ---p_to_replenishment_mo VARCHAR2 DEFAULT NULL,
6492: fnd_api.to_boolean(g_main_tab(45).field_value), ---p_include_mo_transfer BOOLEAN DEFAULT TRUE,
6493: fnd_api.to_boolean(g_main_tab(44).field_value), ---p_include_mo_issue BOOLEAN DEFAULT TRUE,
6494: g_main_tab(34).field_value, ---p_from_transfer_issue_mo VARCHAR2 DEFAULT NULL,
6495: g_main_tab(88).field_value, ---p_to_transfer_issue_mo VARCHAR2 DEFAULT NULL,
6496: fnd_api.to_boolean(g_main_tab(41).field_value), ---p_include_lpn_putaway BOOLEAN DEFAULT TRUE,
6489: fnd_api.to_boolean(g_main_tab(60).field_value), ---p_include_replenishment BOOLEAN DEFAULT TRUE,
6490: g_main_tab(23).field_value, ---p_from_replenishment_mo VARCHAR2 DEFAULT NULL,
6491: g_main_tab(76).field_value, ---p_to_replenishment_mo VARCHAR2 DEFAULT NULL,
6492: fnd_api.to_boolean(g_main_tab(45).field_value), ---p_include_mo_transfer BOOLEAN DEFAULT TRUE,
6493: fnd_api.to_boolean(g_main_tab(44).field_value), ---p_include_mo_issue BOOLEAN DEFAULT TRUE,
6494: g_main_tab(34).field_value, ---p_from_transfer_issue_mo VARCHAR2 DEFAULT NULL,
6495: g_main_tab(88).field_value, ---p_to_transfer_issue_mo VARCHAR2 DEFAULT NULL,
6496: fnd_api.to_boolean(g_main_tab(41).field_value), ---p_include_lpn_putaway BOOLEAN DEFAULT TRUE,
6497: fnd_api.to_boolean(g_main_tab(66).field_value), ---p_include_staging_move BOOLEAN DEFAULT FALSE,
6492: fnd_api.to_boolean(g_main_tab(45).field_value), ---p_include_mo_transfer BOOLEAN DEFAULT TRUE,
6493: fnd_api.to_boolean(g_main_tab(44).field_value), ---p_include_mo_issue BOOLEAN DEFAULT TRUE,
6494: g_main_tab(34).field_value, ---p_from_transfer_issue_mo VARCHAR2 DEFAULT NULL,
6495: g_main_tab(88).field_value, ---p_to_transfer_issue_mo VARCHAR2 DEFAULT NULL,
6496: fnd_api.to_boolean(g_main_tab(41).field_value), ---p_include_lpn_putaway BOOLEAN DEFAULT TRUE,
6497: fnd_api.to_boolean(g_main_tab(66).field_value), ---p_include_staging_move BOOLEAN DEFAULT FALSE,
6498: fnd_api.to_boolean(g_main_tab(9).field_value), ---p_include_cycle_count BOOLEAN DEFAULT TRUE,
6499: g_main_tab(8).field_value, ---p_cycle_count_name VARCHAR2 DEFAULT NULL,
6500: l_record_count, ---OUT NOCOPY NUMBER,
6493: fnd_api.to_boolean(g_main_tab(44).field_value), ---p_include_mo_issue BOOLEAN DEFAULT TRUE,
6494: g_main_tab(34).field_value, ---p_from_transfer_issue_mo VARCHAR2 DEFAULT NULL,
6495: g_main_tab(88).field_value, ---p_to_transfer_issue_mo VARCHAR2 DEFAULT NULL,
6496: fnd_api.to_boolean(g_main_tab(41).field_value), ---p_include_lpn_putaway BOOLEAN DEFAULT TRUE,
6497: fnd_api.to_boolean(g_main_tab(66).field_value), ---p_include_staging_move BOOLEAN DEFAULT FALSE,
6498: fnd_api.to_boolean(g_main_tab(9).field_value), ---p_include_cycle_count BOOLEAN DEFAULT TRUE,
6499: g_main_tab(8).field_value, ---p_cycle_count_name VARCHAR2 DEFAULT NULL,
6500: l_record_count, ---OUT NOCOPY NUMBER,
6501: x_return_status, ---OUT NOCOPY VARCHAR2,
6494: g_main_tab(34).field_value, ---p_from_transfer_issue_mo VARCHAR2 DEFAULT NULL,
6495: g_main_tab(88).field_value, ---p_to_transfer_issue_mo VARCHAR2 DEFAULT NULL,
6496: fnd_api.to_boolean(g_main_tab(41).field_value), ---p_include_lpn_putaway BOOLEAN DEFAULT TRUE,
6497: fnd_api.to_boolean(g_main_tab(66).field_value), ---p_include_staging_move BOOLEAN DEFAULT FALSE,
6498: fnd_api.to_boolean(g_main_tab(9).field_value), ---p_include_cycle_count BOOLEAN DEFAULT TRUE,
6499: g_main_tab(8).field_value, ---p_cycle_count_name VARCHAR2 DEFAULT NULL,
6500: l_record_count, ---OUT NOCOPY NUMBER,
6501: x_return_status, ---OUT NOCOPY VARCHAR2,
6502: x_msg_data, ---OUT NOCOPY VARCHAR2,
6500: l_record_count, ---OUT NOCOPY NUMBER,
6501: x_return_status, ---OUT NOCOPY VARCHAR2,
6502: x_msg_data, ---OUT NOCOPY VARCHAR2,
6503: x_msg_count, ---OUT NOCOPY NUMBER,
6504: fnd_api.to_boolean(g_main_tab(36).field_value), ---p_query_independent_tasks BOOLEAN DEFAULT TRUE,
6505: fnd_api.to_boolean(g_main_tab(58).field_value), ---p_query_planned_tasks BOOLEAN DEFAULT TRUE,
6506: fnd_api.to_boolean(g_main_tab(57).field_value), ---p_is_pending_plan BOOLEAN DEFAULT FALSE,
6507: fnd_api.to_boolean(g_main_tab(56).field_value), ---p_is_inprogress_plan BOOLEAN DEFAULT FALSE,
6508: fnd_api.to_boolean(g_main_tab(55).field_value), ---p_is_completed_plan BOOLEAN DEFAULT FALSE,
6501: x_return_status, ---OUT NOCOPY VARCHAR2,
6502: x_msg_data, ---OUT NOCOPY VARCHAR2,
6503: x_msg_count, ---OUT NOCOPY NUMBER,
6504: fnd_api.to_boolean(g_main_tab(36).field_value), ---p_query_independent_tasks BOOLEAN DEFAULT TRUE,
6505: fnd_api.to_boolean(g_main_tab(58).field_value), ---p_query_planned_tasks BOOLEAN DEFAULT TRUE,
6506: fnd_api.to_boolean(g_main_tab(57).field_value), ---p_is_pending_plan BOOLEAN DEFAULT FALSE,
6507: fnd_api.to_boolean(g_main_tab(56).field_value), ---p_is_inprogress_plan BOOLEAN DEFAULT FALSE,
6508: fnd_api.to_boolean(g_main_tab(55).field_value), ---p_is_completed_plan BOOLEAN DEFAULT FALSE,
6509: fnd_api.to_boolean(g_main_tab(54).field_value), ---p_is_cancelled_plan BOOLEAN DEFAULT FALSE,
6502: x_msg_data, ---OUT NOCOPY VARCHAR2,
6503: x_msg_count, ---OUT NOCOPY NUMBER,
6504: fnd_api.to_boolean(g_main_tab(36).field_value), ---p_query_independent_tasks BOOLEAN DEFAULT TRUE,
6505: fnd_api.to_boolean(g_main_tab(58).field_value), ---p_query_planned_tasks BOOLEAN DEFAULT TRUE,
6506: fnd_api.to_boolean(g_main_tab(57).field_value), ---p_is_pending_plan BOOLEAN DEFAULT FALSE,
6507: fnd_api.to_boolean(g_main_tab(56).field_value), ---p_is_inprogress_plan BOOLEAN DEFAULT FALSE,
6508: fnd_api.to_boolean(g_main_tab(55).field_value), ---p_is_completed_plan BOOLEAN DEFAULT FALSE,
6509: fnd_api.to_boolean(g_main_tab(54).field_value), ---p_is_cancelled_plan BOOLEAN DEFAULT FALSE,
6510: fnd_api.to_boolean(g_main_tab(53).field_value), ---p_is_aborted_plan BOOLEAN DEFAULT FALSE,
6503: x_msg_count, ---OUT NOCOPY NUMBER,
6504: fnd_api.to_boolean(g_main_tab(36).field_value), ---p_query_independent_tasks BOOLEAN DEFAULT TRUE,
6505: fnd_api.to_boolean(g_main_tab(58).field_value), ---p_query_planned_tasks BOOLEAN DEFAULT TRUE,
6506: fnd_api.to_boolean(g_main_tab(57).field_value), ---p_is_pending_plan BOOLEAN DEFAULT FALSE,
6507: fnd_api.to_boolean(g_main_tab(56).field_value), ---p_is_inprogress_plan BOOLEAN DEFAULT FALSE,
6508: fnd_api.to_boolean(g_main_tab(55).field_value), ---p_is_completed_plan BOOLEAN DEFAULT FALSE,
6509: fnd_api.to_boolean(g_main_tab(54).field_value), ---p_is_cancelled_plan BOOLEAN DEFAULT FALSE,
6510: fnd_api.to_boolean(g_main_tab(53).field_value), ---p_is_aborted_plan BOOLEAN DEFAULT FALSE,
6511: g_main_tab(46).field_value, ---p_activity_id NUMBER DEFAULT NULL,
6504: fnd_api.to_boolean(g_main_tab(36).field_value), ---p_query_independent_tasks BOOLEAN DEFAULT TRUE,
6505: fnd_api.to_boolean(g_main_tab(58).field_value), ---p_query_planned_tasks BOOLEAN DEFAULT TRUE,
6506: fnd_api.to_boolean(g_main_tab(57).field_value), ---p_is_pending_plan BOOLEAN DEFAULT FALSE,
6507: fnd_api.to_boolean(g_main_tab(56).field_value), ---p_is_inprogress_plan BOOLEAN DEFAULT FALSE,
6508: fnd_api.to_boolean(g_main_tab(55).field_value), ---p_is_completed_plan BOOLEAN DEFAULT FALSE,
6509: fnd_api.to_boolean(g_main_tab(54).field_value), ---p_is_cancelled_plan BOOLEAN DEFAULT FALSE,
6510: fnd_api.to_boolean(g_main_tab(53).field_value), ---p_is_aborted_plan BOOLEAN DEFAULT FALSE,
6511: g_main_tab(46).field_value, ---p_activity_id NUMBER DEFAULT NULL,
6512: g_main_tab(48).field_value, ---p_plan_type_id NUMBER DEFAULT NULL,
6505: fnd_api.to_boolean(g_main_tab(58).field_value), ---p_query_planned_tasks BOOLEAN DEFAULT TRUE,
6506: fnd_api.to_boolean(g_main_tab(57).field_value), ---p_is_pending_plan BOOLEAN DEFAULT FALSE,
6507: fnd_api.to_boolean(g_main_tab(56).field_value), ---p_is_inprogress_plan BOOLEAN DEFAULT FALSE,
6508: fnd_api.to_boolean(g_main_tab(55).field_value), ---p_is_completed_plan BOOLEAN DEFAULT FALSE,
6509: fnd_api.to_boolean(g_main_tab(54).field_value), ---p_is_cancelled_plan BOOLEAN DEFAULT FALSE,
6510: fnd_api.to_boolean(g_main_tab(53).field_value), ---p_is_aborted_plan BOOLEAN DEFAULT FALSE,
6511: g_main_tab(46).field_value, ---p_activity_id NUMBER DEFAULT NULL,
6512: g_main_tab(48).field_value, ---p_plan_type_id NUMBER DEFAULT NULL,
6513: g_main_tab(47).field_value ---p_op_plan_id NUMBER DEFAULT NULL
6506: fnd_api.to_boolean(g_main_tab(57).field_value), ---p_is_pending_plan BOOLEAN DEFAULT FALSE,
6507: fnd_api.to_boolean(g_main_tab(56).field_value), ---p_is_inprogress_plan BOOLEAN DEFAULT FALSE,
6508: fnd_api.to_boolean(g_main_tab(55).field_value), ---p_is_completed_plan BOOLEAN DEFAULT FALSE,
6509: fnd_api.to_boolean(g_main_tab(54).field_value), ---p_is_cancelled_plan BOOLEAN DEFAULT FALSE,
6510: fnd_api.to_boolean(g_main_tab(53).field_value), ---p_is_aborted_plan BOOLEAN DEFAULT FALSE,
6511: g_main_tab(46).field_value, ---p_activity_id NUMBER DEFAULT NULL,
6512: g_main_tab(48).field_value, ---p_plan_type_id NUMBER DEFAULT NULL,
6513: g_main_tab(47).field_value ---p_op_plan_id NUMBER DEFAULT NULL
6514: );
6517: l_err_msg := 'Status returned by API wms_waveplan_tasks_pvt.query_tasks: '||x_return_status;
6518: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
6519: END IF;
6520:
6521: IF(x_return_status = FND_API.G_RET_STS_SUCCESS) THEN
6522: /* SELECT * BULK COLLECT
6523: INTO x_task_tab
6524: FROM wms_waveplan_tasks_temp;*/
6525: --Replacing the above by selecting columns from the table.
6649:
6650: END IF; --- if l_execute_qry then
6651:
6652: ELSE
6653: x_return_status := fnd_api.g_ret_sts_unexp_error;
6654: fnd_message.set_name('WMS', 'WMS_INVALID_VALUE');
6655: fnd_msg_pub.ADD;
6656: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
6657: inv_trx_util_pub.trace(l_api_name||': '||'Invalid Parameters Passed');
6652: ELSE
6653: x_return_status := fnd_api.g_ret_sts_unexp_error;
6654: fnd_message.set_name('WMS', 'WMS_INVALID_VALUE');
6655: fnd_msg_pub.ADD;
6656: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
6657: inv_trx_util_pub.trace(l_api_name||': '||'Invalid Parameters Passed');
6658: END IF; ----if p_transaction_number is not null
6659:
6660: EXCEPTION
6658: END IF; ----if p_transaction_number is not null
6659:
6660: EXCEPTION
6661: WHEN l_invalid_org THEN
6662: x_return_status := fnd_api.g_ret_sts_unexp_error;
6663: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
6664: IF(l_debug = 1) THEN
6665: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
6666: END IF;
6659:
6660: EXCEPTION
6661: WHEN l_invalid_org THEN
6662: x_return_status := fnd_api.g_ret_sts_unexp_error;
6663: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
6664: IF(l_debug = 1) THEN
6665: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
6666: END IF;
6667: NULL;
6666: END IF;
6667: NULL;
6668:
6669: WHEN l_qry_fail THEN
6670: x_return_status := fnd_api.g_ret_sts_unexp_error;
6671: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
6672: IF(l_debug = 1) THEN
6673: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
6674: END IF;
6667: NULL;
6668:
6669: WHEN l_qry_fail THEN
6670: x_return_status := fnd_api.g_ret_sts_unexp_error;
6671: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
6672: IF(l_debug = 1) THEN
6673: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
6674: END IF;
6675: NULL;
6674: END IF;
6675: NULL;
6676:
6677: WHEN OTHERS THEN
6678: x_return_status := fnd_api.g_ret_sts_unexp_error;
6679: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
6680: l_err_msg := substr(SQLERRM,1,1000);
6681: IF(l_debug = 1) THEN
6682: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
6675: NULL;
6676:
6677: WHEN OTHERS THEN
6678: x_return_status := fnd_api.g_ret_sts_unexp_error;
6679: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
6680: l_err_msg := substr(SQLERRM,1,1000);
6681: IF(l_debug = 1) THEN
6682: inv_trx_util_pub.trace(l_api_name||': '||l_err_msg);
6683: END IF;
6711: */
6712: -------------------------------------------------------------------------------------------------------------------
6713: PROCEDURE split_task( p_source_transaction_number IN NUMBER DEFAULT NULL ,
6714: p_split_quantities IN task_qty_tbl_type ,
6715: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE ,
6716: x_resultant_tasks OUT NOCOPY WMS_TASK_MGMT_PUB.task_tab_type ,
6717: x_resultant_task_details OUT NOCOPY task_detail_tbl_type ,
6718: x_return_status OUT NOCOPY VARCHAR2 ,
6719: x_msg_count OUT NOCOPY NUMBER ,
7107: ELSE
7108: print_msg(l_procedure_name, 'Table x_resultant_tasks is empty');
7109: END IF;
7110: END IF;
7111: IF p_commit = FND_API.G_TRUE THEN
7112: IF g_debug = 1 THEN
7113: print_msg(l_procedure_name, ' p_commit is TRUE, so COMMITING the transactions.');
7114: END IF;
7115: COMMIT;
7132: l_msg_count ,
7133: l_msg_data );
7134: fnd_message.set_name('WMS', 'WMS_INVALID_TASK');
7135: fnd_msg_pub.ADD;
7136: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
7137:
7138: IF l_new_tasks_tbl.COUNT > 0 THEN
7139: x_resultant_tasks(1) := l_new_tasks_tbl(1);
7140: x_resultant_tasks(1).RESULT := 'E';
7156: l_msg_count ,
7157: l_msg_data );
7158: fnd_message.set_name('INV', 'INV_LOT_INDIVISIBLE');
7159: fnd_msg_pub.ADD;
7160: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
7161:
7162: IF l_new_tasks_tbl.COUNT > 0 THEN
7163: x_resultant_tasks(1) := l_new_tasks_tbl(1);
7164: x_resultant_tasks(1).RESULT := 'E';
7177: l_msg_count ,
7178: l_msg_data );
7179: fnd_message.set_name('WMS', 'WMS_INVALID_SPLIT_QUANTITY');
7180: fnd_msg_pub.ADD;
7181: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
7182:
7183: IF l_new_tasks_tbl.COUNT > 0 THEN
7184: x_resultant_tasks(1) := l_new_tasks_tbl(1);
7185: x_resultant_tasks(1).RESULT := 'E';
7201: l_msg_count ,
7202: l_msg_data );
7203: fnd_message.set_name('WMS', 'WMS_QUERY_ELIG_MATRL');
7204: fnd_msg_pub.ADD;
7205: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
7206:
7207: IF l_new_tasks_tbl.COUNT > 0 THEN
7208: x_resultant_tasks(1) := l_new_tasks_tbl(1);
7209: x_resultant_tasks(1).RESULT := 'E';
7219: x_return_status := 'E';
7220: ROLLBACK TO wms_split_task;
7221: fnd_message.set_name('WMS', 'WMS_UNEXPECTED_ERROR');
7222: fnd_msg_pub.ADD;
7223: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
7224: WHEN OTHERS THEN
7225: IF g_debug = 1 THEN
7226: print_msg(l_procedure_name,'EXCEPTION BLOCK : Unexpected error has occured, ROLLING BACK THE TRANSACTIONS');
7227: END IF;
7228: x_return_status := 'E';
7229: ROLLBACK TO wms_split_task;
7230: fnd_message.set_name('WMS', 'WMS_UNEXPECTED_ERROR');
7231: fnd_msg_pub.ADD;
7232: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
7233: x_return_status := 'E';
7234: IF g_debug = 1 THEN
7235: print_msg(l_procedure_name, 'EXCEPTION BLOCK : Error Code : '|| SQLCODE || 'EXCEPTION BLOCK : Error Message :'||SQLERRM);
7236: END IF;
7284: p_new_task_type IN VARCHAR2 DEFAULT NULL ,
7285: p_new_carton_lpn_id IN NUMBER DEFAULT NULL ,
7286: p_new_operation_plan_id IN NUMBER DEFAULT NULL ,
7287: p_person_id IN NUMBER DEFAULT NULL ,
7288: p_commit IN VARCHAR2 DEFAULT FND_API.G_FALSE ,
7289: x_updated_tasks OUT NOCOPY WMS_TASK_MGMT_PUB.task_tab_type ,
7290: x_return_status OUT NOCOPY VARCHAR2 ,
7291: x_msg_count OUT NOCOPY NUMBER ,
7292: x_msg_data OUT NOCOPY VARCHAR2 ) IS
7393: l_action VARCHAR2(20) := 'MODIFY'; -- 6850212
7394:
7395:
7396: BEGIN
7397: x_return_status := fnd_api.g_ret_sts_success;
7398: --anjana
7399: x_msg_count := 0;
7400: --1.Tasks status can be updated only to to Pending or queued or unreleased state.
7401: IF (p_new_task_status IS NOT NULL) THEN
7400: --1.Tasks status can be updated only to to Pending or queued or unreleased state.
7401: IF (p_new_task_status IS NOT NULL) THEN
7402: IF(p_new_task_status NOT IN (1,2,8)) THEN
7403: --6850212:Return status should not be set to error.
7404: --x_return_status := fnd_api.g_ret_sts_error;
7405: fnd_message.set_name('WMS', 'WMS_INVALID_TASK_STATUS');--new message
7406: fnd_msg_pub.ADD;
7407: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_msg );
7408: x_msg_data := l_msg;
7403: --6850212:Return status should not be set to error.
7404: --x_return_status := fnd_api.g_ret_sts_error;
7405: fnd_message.set_name('WMS', 'WMS_INVALID_TASK_STATUS');--new message
7406: fnd_msg_pub.ADD;
7407: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_msg );
7408: x_msg_data := l_msg;
7409: x_msg_count := l_msg_count;
7410: l_err_msg :='New task status not in Pending or Queued state or Unreleased state';
7411: IF(l_debug = 1) THEN
7426: l_op_plan_rec.common_to_all_org,
7427: l_op_plan_rec.plan_type_id;
7428: IF (l_op_plan_rec.eabled_flag <> 'Y') THEN--op_plan passed is not enabled
7429: --6850212:Return status should not be set to error.
7430: --x_return_status := fnd_api.g_ret_sts_error;
7431: fnd_message.set_name('WMS', 'WMS_OPERTN_PLAN_ID_INVALID');--new message
7432: fnd_msg_pub.ADD;
7433: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_msg );
7434: x_msg_data := l_msg;
7429: --6850212:Return status should not be set to error.
7430: --x_return_status := fnd_api.g_ret_sts_error;
7431: fnd_message.set_name('WMS', 'WMS_OPERTN_PLAN_ID_INVALID');--new message
7432: fnd_msg_pub.ADD;
7433: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_msg );
7434: x_msg_data := l_msg;
7435: x_msg_count := l_msg_count;
7436: l_err_msg :='Operation Plan is not enabled';
7437: IF(l_debug = 1) THEN
7453: p_action => l_action, --6850212
7454: x_wms_task => l_updated_tasks,
7455: x_return_status => p_return_sts);
7456:
7457: IF (p_return_sts = fnd_api.g_ret_sts_success) THEN
7458: l_valid_task_counter := l_updated_tasks.count;
7459: FOR i IN 1..l_updated_tasks.count
7460: LOOP--Loop starts
7461: IF (nvl(l_updated_tasks(i).RESULT,'X')<> 'E') THEN
7467: x_msg_count => p_msg_count,
7468: x_msg_data => p_msg_data);
7469:
7470: --if quey was not successfull then populate output table with passed values with error
7471: IF ((p_return_sts <> fnd_api.g_ret_sts_success) OR ( temp_task_tab.count = 0)) THEN
7472: fnd_message.set_name('WMS', 'WMS_QUERY_ELIG_MATRL');--new message
7473: -- fnd_msg_pub.ADD;
7474: -- fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_msg);
7475: --anjana
7470: --if quey was not successfull then populate output table with passed values with error
7471: IF ((p_return_sts <> fnd_api.g_ret_sts_success) OR ( temp_task_tab.count = 0)) THEN
7472: fnd_message.set_name('WMS', 'WMS_QUERY_ELIG_MATRL');--new message
7473: -- fnd_msg_pub.ADD;
7474: -- fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_msg);
7475: --anjana
7476: l_msg := fnd_message.get;
7477: x_msg_data := x_msg_data || l_msg;
7478: x_msg_count := x_msg_count + 1;
7490: END IF;
7491: ELSE
7492: fnd_message.set_name('WMS', 'WMS_INVALID_TASK');
7493: -- fnd_msg_pub.ADD;
7494: -- fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_msg );
7495: --anjana
7496: l_msg := fnd_message.get;
7497: x_msg_data := x_msg_data || l_msg;
7498: x_msg_count := x_msg_count + 1;
7503: l_valid_task_counter := l_valid_task_counter - 1;
7504: END IF;
7505: END LOOP;--Loop ends
7506: ELSE
7507: x_return_status := fnd_api.g_ret_sts_unexp_error;
7508: fnd_message.set_name('WMS', 'WMS_UNEXPECTED_ERROR');
7509: fnd_msg_pub.ADD;
7510: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_msg );
7511: x_msg_data := l_msg;
7506: ELSE
7507: x_return_status := fnd_api.g_ret_sts_unexp_error;
7508: fnd_message.set_name('WMS', 'WMS_UNEXPECTED_ERROR');
7509: fnd_msg_pub.ADD;
7510: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_msg );
7511: x_msg_data := l_msg;
7512: x_msg_count := l_msg_count;
7513: -- l_err_msg :='Task Validation Failed';
7514: IF(l_debug = 1) THEN
7518: END IF;
7519: IF (l_valid_task_counter <=0 ) THEN
7520: --all the tasks are invalid.Dont proceed
7521: --6850212:Return status should not be set to error.
7522: --x_return_status := fnd_api.g_ret_sts_error;
7523: RETURN;
7524: END IF;
7525: --Cartonization needs to be done only if all the tasks passed are valid and the task is an outboud task(SO/WIP)
7526: IF (p_new_carton_lpn_id IS NOT NULL) THEN
7529: LOOP
7530: IF ((l_updated_tasks(1).task_type_id <> 1) OR (l_updated_tasks(i).task_type_id <> l_updated_tasks(1).task_type_id )) THEN
7531: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERROR');--new message
7532: fnd_msg_pub.ADD;
7533: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => l_msg_count, p_data => l_msg );
7534: l_err_msg :='Cartonization can be done only on Outbound tasks(Sales order/WIP)';
7535: x_msg_data := l_msg;
7536: x_msg_count := l_msg_count;
7537: log_error(p_transaction_number => p_transaction_number,
7545: p_new_carton_lpn_id => p_new_carton_lpn_id,
7546: x_error_msg => l_error_msg,
7547: x_return_status => p_return_sts);
7548:
7549: IF (p_return_sts <> fnd_api.g_ret_sts_success) THEN
7550: x_return_status := fnd_api.g_ret_sts_error;
7551: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data );
7552: FOR i IN 1..l_updated_tasks.count
7553: LOOP
7546: x_error_msg => l_error_msg,
7547: x_return_status => p_return_sts);
7548:
7549: IF (p_return_sts <> fnd_api.g_ret_sts_success) THEN
7550: x_return_status := fnd_api.g_ret_sts_error;
7551: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data );
7552: FOR i IN 1..l_updated_tasks.count
7553: LOOP
7554: x_updated_tasks(i).RESULT := 'E';
7547: x_return_status => p_return_sts);
7548:
7549: IF (p_return_sts <> fnd_api.g_ret_sts_success) THEN
7550: x_return_status := fnd_api.g_ret_sts_error;
7551: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data );
7552: FOR i IN 1..l_updated_tasks.count
7553: LOOP
7554: x_updated_tasks(i).RESULT := 'E';
7555: x_updated_tasks(i).ERROR := l_error_msg;
7559: END IF;
7560: RETURN;
7561: END IF;
7562: ELSE
7563: x_return_status := fnd_api.g_ret_sts_error;
7564: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERROR');--new message
7565: fnd_msg_pub.ADD;
7566: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data );
7567: l_err_msg := 'Some tasks have failed validation,cartonization cannot be done';
7562: ELSE
7563: x_return_status := fnd_api.g_ret_sts_error;
7564: fnd_message.set_name('WMS', 'WMS_CARTONIZATION_ERROR');--new message
7565: fnd_msg_pub.ADD;
7566: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data );
7567: l_err_msg := 'Some tasks have failed validation,cartonization cannot be done';
7568: IF(l_debug = 1) THEN
7569: inv_trx_util_pub.trace(l_api_name|| ': '||l_err_msg);
7570: END IF;
7756: DELETE from wms_dispatched_tasks
7757: WHERE transaction_temp_id = l_wdt_del_trns_num_table(i);
7758: END IF;
7759:
7760: IF (p_commit = FND_API.G_TRUE) THEN
7761: COMMIT;
7762: END IF;
7763: EXCEPTION
7764: WHEN OTHERS THEN
7761: COMMIT;
7762: END IF;
7763: EXCEPTION
7764: WHEN OTHERS THEN
7765: x_return_status := fnd_api.g_ret_sts_unexp_error;
7766: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
7767: l_err_msg := substr(SQLERRM,1,1000);
7768: IF(l_debug = 1) THEN
7769: inv_trx_util_pub.trace(l_api_name|| ': '||l_err_msg);
7762: END IF;
7763: EXCEPTION
7764: WHEN OTHERS THEN
7765: x_return_status := fnd_api.g_ret_sts_unexp_error;
7766: fnd_msg_pub.count_and_get(p_encoded => FND_API.G_FALSE,p_count => x_msg_count, p_data => x_msg_data);
7767: l_err_msg := substr(SQLERRM,1,1000);
7768: IF(l_debug = 1) THEN
7769: inv_trx_util_pub.trace(l_api_name|| ': '||l_err_msg);
7770: END IF;
7800: -------------------------------------------------------------------------------------------------------------
7801:
7802: PROCEDURE cancel_task(
7803: p_transaction_number IN NUMBER DEFAULT NULL,
7804: p_commit IN VARCHAR2 DEFAULT fnd_api.g_false,
7805: p_wms_task IN WMS_TASK_MGMT_PUB.task_tab_type,
7806: x_unprocessed_crossdock_tasks OUT NOCOPY WMS_TASK_MGMT_PUB.task_tab_type,
7807: x_return_status OUT NOCOPY VARCHAR2,
7808: x_msg_count OUT NOCOPY NUMBER,
7819: l_msg VARCHAR2(2000);
7820:
7821: BEGIN
7822:
7823: x_return_status := fnd_api.g_ret_sts_success;
7824: --anjana
7825: x_msg_count := 0;
7826: l_transaction_number:= p_transaction_number ;
7827: l_task_table := p_wms_task;
7838: IF l_debug = 1 THEN
7839: inv_trx_util_pub.trace('cancel_task l_val_ret_status is : '||l_val_ret_status);
7840: END IF;
7841:
7842: IF (l_val_ret_status = fnd_api.g_ret_sts_success) THEN
7843: IF l_debug = 1 THEN
7844: inv_trx_util_pub.trace('l_ret_task_table.count : '||l_ret_task_table.count);
7845: END IF;
7846:
7847: FOR i in 1..l_ret_task_table.count LOOP
7848: IF l_debug = 1 THEN
7849: inv_trx_util_pub.trace('cancel_task l_ret_task_table(i).RESULT '||l_ret_task_table(i).RESULT);
7850: END IF;
7851: IF ( nvl(l_ret_task_table(i).RESULT,'X')<> FND_API.G_RET_STS_ERROR)THEN
7852: IF l_debug = 1 THEN
7853: inv_trx_util_pub.trace('cancel_task transaction_number '||l_ret_task_table(i).transaction_number);
7854: END IF;
7855: SAVEPOINT SAVEPOINT1;
7860: IF l_debug = 1 THEN
7861: inv_trx_util_pub.trace('cancel_task CANCEL_TASK: x_return_status: ' || x_return_status);
7862: END IF;
7863:
7864: IF (x_return_status<>FND_API.G_RET_STS_SUCCESS) THEN
7865: FND_MESSAGE.SET_NAME('WMS', 'WMS_CANCEL_FAILED');
7866: l_msg := fnd_message.get;
7867: x_msg_count := x_msg_count + 1;
7868: x_msg_data := x_msg_data || l_msg;
7894: ELSE
7895: IF l_debug = 1 THEN
7896: inv_trx_util_pub.trace('CANCEL_TASK: Error occured while validating the transaction_number or table of transaction_number...');
7897: END IF;
7898: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
7899: RETURN;
7900: END IF;
7901:
7902: IF (p_commit= FND_API.G_TRUE ) THEN
7898: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
7899: RETURN;
7900: END IF;
7901:
7902: IF (p_commit= FND_API.G_TRUE ) THEN
7903: COMMIT;
7904: END IF;
7905: EXCEPTION
7906: WHEN fnd_api.g_exc_error THEN
7902: IF (p_commit= FND_API.G_TRUE ) THEN
7903: COMMIT;
7904: END IF;
7905: EXCEPTION
7906: WHEN fnd_api.g_exc_error THEN
7907: IF l_debug = 1 THEN
7908: inv_trx_util_pub.trace('CANCEL_TASK: Expected Error occurred while performing cancel cross dock task:'|| SQLCODE);
7909: END IF;
7910: x_return_status:=FND_API.G_RET_STS_ERROR;
7906: WHEN fnd_api.g_exc_error THEN
7907: IF l_debug = 1 THEN
7908: inv_trx_util_pub.trace('CANCEL_TASK: Expected Error occurred while performing cancel cross dock task:'|| SQLCODE);
7909: END IF;
7910: x_return_status:=FND_API.G_RET_STS_ERROR;
7911: ROLLBACK TO SAVEPOINT1;
7912: RETURN;
7913: WHEN OTHERS THEN
7914: IF l_debug = 1 THEN
7913: WHEN OTHERS THEN
7914: IF l_debug = 1 THEN
7915: inv_trx_util_pub.trace('CANCEL_TASK: Unknown Error occurred while performing cancel cross dock task:'|| SQLCODE);
7916: END IF;
7917: x_return_status:=FND_API.G_RET_STS_UNEXP_ERROR;
7918: ROLLBACK TO SAVEPOINT1;
7919: RETURN;
7920: END cancel_task;
7921: