[Home] [Help]
28: IS
29: BEGIN
30:
31:
32: x_return_status := fnd_api.g_ret_sts_success;
33:
34: csi_t_gen_utility_pvt.dump_api_info(
35: p_api_name => 'get_rma_info',
36: p_pkg_name => 'csi_rma_fulfill_pub');
56: WHEN no_data_found THEN
57: fnd_message.set_name('CSI', 'CSI_INT_OE_LINE_ID_INVALID');
58: fnd_message.set_token('OE_LINE_ID', p_rma_line_id);
59: fnd_msg_pub.add;
60: RAISE fnd_api.g_exc_error;
61: END;
62:
63: EXCEPTION
64:
61: END;
62:
63: EXCEPTION
64:
65: WHEN fnd_api.g_exc_error THEN
66: x_error_message := fnd_msg_pub.get;
67: x_return_status := fnd_api.g_ret_sts_error;
68:
69: WHEN others THEN
63: EXCEPTION
64:
65: WHEN fnd_api.g_exc_error THEN
66: x_error_message := fnd_msg_pub.get;
67: x_return_status := fnd_api.g_ret_sts_error;
68:
69: WHEN others THEN
70: fnd_message.set_name('FND', 'FND_GENERIC_MESSAGE');
71: fnd_message.set_token('MESSAGE', substr(sqlerrm, 240));
71: fnd_message.set_token('MESSAGE', substr(sqlerrm, 240));
72: fnd_msg_pub.add;
73:
74: x_error_message := fnd_msg_pub.get;
75: x_return_status := fnd_api.g_ret_sts_unexp_error;
76:
77: END get_rma_info;
78:
79:
86: x_error_message OUT NOCOPY varchar2,
87: x_rma_line_rec OUT NOCOPY csi_order_ship_pub.mtl_txn_rec)
88: IS
89:
90: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
91: l_api_name varchar2(100) := 'decode_message';
92: l_rma_line_id number;
93:
94: BEGIN
92: l_rma_line_id number;
93:
94: BEGIN
95:
96: x_return_status := fnd_api.g_ret_sts_success;
97:
98: csi_t_gen_utility_pvt.dump_api_info(
99: p_api_name => l_api_name,
100: p_pkg_name => 'csi_rma_fulfill_pub');
100: p_pkg_name => 'csi_rma_fulfill_pub');
101:
102: xnp_xml_utils.decode(p_msg_text, 'RMA_LINE_ID', l_rma_line_id);
103:
104: IF nvl(l_rma_line_id,fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
105: fnd_message.set_name('CSI','CSI_DECODE_MGS_ERROR');
106: fnd_message.set_token('MESSAGE_id', p_msg_header.message_id);
107: fnd_message.set_token('MESSAGE_CODE', p_msg_header.message_code);
108: fnd_msg_pub.add;
105: fnd_message.set_name('CSI','CSI_DECODE_MGS_ERROR');
106: fnd_message.set_token('MESSAGE_id', p_msg_header.message_id);
107: fnd_message.set_token('MESSAGE_CODE', p_msg_header.message_code);
108: fnd_msg_pub.add;
109: RAISE fnd_api.g_exc_error;
110: END IF;
111:
112: get_rma_info(
113: p_rma_line_id => l_rma_line_id,
114: x_rma_line_rec => x_rma_line_rec,
115: x_error_message => x_error_message,
116: x_return_status => l_return_status);
117:
118: IF l_return_status <> fnd_api.g_ret_sts_success THEN
119: debug('CSI_Rma_Fulfill_Pub.Get_rma_Info Failed.');
120: RAISE fnd_api.g_exc_error;
121: END IF;
122:
116: x_return_status => l_return_status);
117:
118: IF l_return_status <> fnd_api.g_ret_sts_success THEN
119: debug('CSI_Rma_Fulfill_Pub.Get_rma_Info Failed.');
120: RAISE fnd_api.g_exc_error;
121: END IF;
122:
123: debug('CSI_Rma_Fulfill_Pub.Decode_Message Successful');
124:
123: debug('CSI_Rma_Fulfill_Pub.Decode_Message Successful');
124:
125: EXCEPTION
126:
127: WHEN fnd_api.g_exc_error THEN
128:
129: x_error_message := fnd_msg_pub.get;
130: x_return_status := fnd_api.g_ret_sts_error;
131:
126:
127: WHEN fnd_api.g_exc_error THEN
128:
129: x_error_message := fnd_msg_pub.get;
130: x_return_status := fnd_api.g_ret_sts_error;
131:
132: debug(x_error_message);
133:
134: WHEN others THEN
138: fnd_message.set_token('SQL_ERROR', substr(sqlerrm, 1, 255));
139: fnd_msg_pub.add;
140:
141: x_error_message := fnd_msg_pub.get;
142: x_return_status := fnd_api.g_ret_sts_unexp_error;
143:
144: debug(x_error_message);
145:
146: END decode_message;
186: l_shippable_item_flag varchar2(1) := 'N';
187:
188: l_debug_level number;
189: l_error_message varchar2(2000);
190: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
191: l_msg_data varchar2(32767);
192: l_msg_dummy varchar2(32767);
193: l_msg_count number;
194: do_not_process exception;
201: BEGIN
202:
203: savepoint rma_fulfillment;
204:
205: x_return_status := fnd_api.g_ret_sts_success;
206: l_error_rec := px_trx_error_rec;
207:
208: fnd_msg_pub.initialize;
209:
251: debug('Invalid RMA Order Line ID');
252: fnd_message.set_name('CSI','CSI_INT_OE_LINE_ID_INVALID');
253: fnd_message.set_token('OE_LINE_ID', p_rma_line_id);
254: fnd_msg_pub.add;
255: RAISE fnd_api.g_exc_error;
256: END;
257:
258: l_error_rec.source_line_ref_id := l_rma_line_rec.line_id;
259: l_error_rec.source_line_ref := l_rma_line_rec.line_number||'.'||
272: debug('Invalid Order line details - org_id: '||l_rma_line_rec.org_id);
273: fnd_message.set_name('CSI','CSI_INT_OE_LINE_ID_INVALID');
274: fnd_message.set_token('OE_LINE_ID', p_rma_line_id);
275: fnd_msg_pub.add;
276: RAISE fnd_api.g_exc_error;
277: End;
278: ELSE
279: l_orgn_id := l_rma_line_rec.sold_from_org_id;
280: END IF;
309: debug('Invalid Organization ID - l_orgn_id: '||l_orgn_id);
310: fnd_message.set_name('CSI','CSI_INT_OE_LINE_ID_INVALID');
311: fnd_message.set_token('OE_LINE_ID', p_rma_line_id);
312: fnd_msg_pub.add;
313: RAISE fnd_api.g_exc_error;
314: END IF;
315:
316: l_error_rec.inventory_item_id := l_rma_line_rec.inventory_item_id;
317:
334: debug('Could not determine if the line item is shippable or not for the RMA Fulfillment Line.');
335: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
336: fnd_message.set_token('MESSAGE','Could not determine if the line item is shippable or not for the RMA Fulfillment Line.');
337: fnd_msg_pub.add;
338: raise fnd_api.g_exc_error;
339: ELSIF l_shippable_item_flag = 'Y' THEN
340: IF (WF_ENGINE.ACTIVITY_EXIST_IN_PROCESS(
341: 'OEOL' -- ITEM_TYPE
342: ,to_char(l_rma_line_rec.line_id) -- ITEM_KEY
365: debug('Transaction detail is Mandatory for RMA Fulfillment and was NOT found for the line.');
366: fnd_message.set_name('CSI', 'CSI_RMA_TXN_DTLS_REQD');
367: fnd_message.set_token('SRC_TXN_ID', p_rma_line_id);
368: fnd_msg_pub.add;
369: raise fnd_api.g_exc_error;
370: -- call the get api
371: ELSE
372: debug('Transaction Detail Found for the RMA line.');
373: BEGIN
382: fnd_message.set_name('CSI', 'CSI_TXN_SRC_ALREADY_PROCESSED');
383: fnd_message.set_token('SRC_TBL', l_src_txn_table);
384: fnd_message.set_token('SRC_ID', p_rma_line_id);
385: fnd_msg_pub.add;
386: RAISE fnd_api.g_exc_error;
387: END IF;
388:
389: UPDATE csi_t_transaction_lines
390: SET processing_status = 'IN_PROCESS'
400: l_g_txn_line_detail_query_rec.source_transaction_flag := 'Y';
401:
402: csi_t_txn_details_grp.get_transaction_details(
403: p_api_version => 1,
404: p_commit => fnd_api.g_false,
405: p_init_msg_list => fnd_api.g_true,
406: p_validation_level => fnd_api.g_valid_level_full,
407: p_txn_line_query_rec => l_g_txn_line_query_rec,
408: p_txn_line_detail_query_rec => l_g_txn_line_detail_query_rec,
401:
402: csi_t_txn_details_grp.get_transaction_details(
403: p_api_version => 1,
404: p_commit => fnd_api.g_false,
405: p_init_msg_list => fnd_api.g_true,
406: p_validation_level => fnd_api.g_valid_level_full,
407: p_txn_line_query_rec => l_g_txn_line_query_rec,
408: p_txn_line_detail_query_rec => l_g_txn_line_detail_query_rec,
409: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
402: csi_t_txn_details_grp.get_transaction_details(
403: p_api_version => 1,
404: p_commit => fnd_api.g_false,
405: p_init_msg_list => fnd_api.g_true,
406: p_validation_level => fnd_api.g_valid_level_full,
407: p_txn_line_query_rec => l_g_txn_line_query_rec,
408: p_txn_line_detail_query_rec => l_g_txn_line_detail_query_rec,
409: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
410: p_get_parties_flag => fnd_api.g_false,
406: p_validation_level => fnd_api.g_valid_level_full,
407: p_txn_line_query_rec => l_g_txn_line_query_rec,
408: p_txn_line_detail_query_rec => l_g_txn_line_detail_query_rec,
409: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
410: p_get_parties_flag => fnd_api.g_false,
411: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
412: p_get_pty_accts_flag => fnd_api.g_false,
413: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
414: p_get_ii_rltns_flag => fnd_api.g_false,
408: p_txn_line_detail_query_rec => l_g_txn_line_detail_query_rec,
409: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
410: p_get_parties_flag => fnd_api.g_false,
411: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
412: p_get_pty_accts_flag => fnd_api.g_false,
413: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
414: p_get_ii_rltns_flag => fnd_api.g_false,
415: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
416: p_get_org_assgns_flag => fnd_api.g_false,
410: p_get_parties_flag => fnd_api.g_false,
411: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
412: p_get_pty_accts_flag => fnd_api.g_false,
413: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
414: p_get_ii_rltns_flag => fnd_api.g_false,
415: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
416: p_get_org_assgns_flag => fnd_api.g_false,
417: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
418: p_get_ext_attrib_vals_flag => fnd_api.g_false,
412: p_get_pty_accts_flag => fnd_api.g_false,
413: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
414: p_get_ii_rltns_flag => fnd_api.g_false,
415: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
416: p_get_org_assgns_flag => fnd_api.g_false,
417: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
418: p_get_ext_attrib_vals_flag => fnd_api.g_false,
419: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
420: p_get_csi_attribs_flag => fnd_api.g_false,
414: p_get_ii_rltns_flag => fnd_api.g_false,
415: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
416: p_get_org_assgns_flag => fnd_api.g_false,
417: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
418: p_get_ext_attrib_vals_flag => fnd_api.g_false,
419: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
420: p_get_csi_attribs_flag => fnd_api.g_false,
421: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
422: p_get_csi_iea_values_flag => fnd_api.g_false,
416: p_get_org_assgns_flag => fnd_api.g_false,
417: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
418: p_get_ext_attrib_vals_flag => fnd_api.g_false,
419: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
420: p_get_csi_attribs_flag => fnd_api.g_false,
421: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
422: p_get_csi_iea_values_flag => fnd_api.g_false,
423: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
424: p_get_txn_systems_flag => fnd_api.g_false,
418: p_get_ext_attrib_vals_flag => fnd_api.g_false,
419: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
420: p_get_csi_attribs_flag => fnd_api.g_false,
421: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
422: p_get_csi_iea_values_flag => fnd_api.g_false,
423: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
424: p_get_txn_systems_flag => fnd_api.g_false,
425: x_txn_systems_tbl => l_g_txn_systems_tbl,
426: x_return_status => l_return_status,
420: p_get_csi_attribs_flag => fnd_api.g_false,
421: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
422: p_get_csi_iea_values_flag => fnd_api.g_false,
423: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
424: p_get_txn_systems_flag => fnd_api.g_false,
425: x_txn_systems_tbl => l_g_txn_systems_tbl,
426: x_return_status => l_return_status,
427: x_msg_count => l_msg_count,
428: x_msg_data => l_msg_data);
426: x_return_status => l_return_status,
427: x_msg_count => l_msg_count,
428: x_msg_data => l_msg_data);
429:
430: IF l_return_status <> fnd_api.g_ret_sts_success THEN
431: debug('Get transaction details for the RMA line fulfillment failed.');
432: raise fnd_api.g_exc_error;
433: END IF;
434: /*
428: x_msg_data => l_msg_data);
429:
430: IF l_return_status <> fnd_api.g_ret_sts_success THEN
431: debug('Get transaction details for the RMA line fulfillment failed.');
432: raise fnd_api.g_exc_error;
433: END IF;
434: /*
435: SELECT transaction_line_id
436: INTO l_g_txn_line_rec.transaction_line_id
456: END IF;
457: END LOOP;
458: END IF;
459: -- changes for bug 3684010.Ensuring that Post de fact sales order Qty changes are taken care of
460: IF nvl(l_rma_line_rec.fulfilled_quantity,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
461: l_canceled_qty := l_rma_line_rec.fulfilled_quantity;
462: ELSE
463: l_canceled_qty := l_rma_line_rec.ordered_quantity;
464: END IF;
466: IF l_tld_quantity <> l_canceled_qty THEN
467: IF l_g_line_dtl_tbl.COUNT > 1 THEN
468: fnd_message.set_name('CSI', 'CSI_TXN_LINE_DTL_QTY_INVALID');
469: fnd_msg_pub.add;
470: RAISE fnd_api.g_exc_error;
471: ELSE
472: debug('Canceled Qty as on the Sales Order: '||l_canceled_qty);
473: debug('Total Source Txn Details Qty : '||l_tld_quantity);
474: l_g_line_dtl_tbl(1).quantity := -1 * l_canceled_qty;
497: p_pkg_name => 'csi_transactions_pvt');
498:
499: csi_transactions_pvt.create_transaction(
500: p_api_version => 1.0,
501: p_commit => fnd_api.g_false,
502: p_init_msg_list => fnd_api.g_true,
503: p_validation_level => fnd_api.g_valid_level_full,
504: p_success_if_exists_flag => 'Y',
505: p_transaction_rec => l_csi_txn_rec,
498:
499: csi_transactions_pvt.create_transaction(
500: p_api_version => 1.0,
501: p_commit => fnd_api.g_false,
502: p_init_msg_list => fnd_api.g_true,
503: p_validation_level => fnd_api.g_valid_level_full,
504: p_success_if_exists_flag => 'Y',
505: p_transaction_rec => l_csi_txn_rec,
506: x_return_status => l_return_status,
499: csi_transactions_pvt.create_transaction(
500: p_api_version => 1.0,
501: p_commit => fnd_api.g_false,
502: p_init_msg_list => fnd_api.g_true,
503: p_validation_level => fnd_api.g_valid_level_full,
504: p_success_if_exists_flag => 'Y',
505: p_transaction_rec => l_csi_txn_rec,
506: x_return_status => l_return_status,
507: x_msg_count => l_msg_count,
506: x_return_status => l_return_status,
507: x_msg_count => l_msg_count,
508: x_msg_data => l_msg_data);
509:
510: IF l_return_status <> fnd_api.g_ret_sts_success THEN
511: debug('Create CSI transaction failed for Fulfill RMA Line.');
512: RAISE fnd_api.g_exc_error;
513: END IF;
514:
508: x_msg_data => l_msg_data);
509:
510: IF l_return_status <> fnd_api.g_ret_sts_success THEN
511: debug('Create CSI transaction failed for Fulfill RMA Line.');
512: RAISE fnd_api.g_exc_error;
513: END IF;
514:
515: fulfill_rma_line(
516: p_rma_line_rec => l_rma_line_rec,
520: x_msg_count => l_msg_count,
521: x_msg_data => l_msg_data,
522: x_return_status => l_return_status);
523:
524: IF l_return_status <> fnd_api.g_ret_sts_success THEN
525: debug('Fulfill RMA Line routine failed.');
526: RAISE fnd_api.g_exc_error;
527: END IF;
528: ELSE
522: x_return_status => l_return_status);
523:
524: IF l_return_status <> fnd_api.g_ret_sts_success THEN
525: debug('Fulfill RMA Line routine failed.');
526: RAISE fnd_api.g_exc_error;
527: END IF;
528: ELSE
529: debug('Instance reference on the Transaction detail is Mandatory for a RMA Fulfillment and was NOT found for the line.');
530: fnd_message.set_name('CSI', 'CSI_RMA_INST_REF_REQD');
529: debug('Instance reference on the Transaction detail is Mandatory for a RMA Fulfillment and was NOT found for the line.');
530: fnd_message.set_name('CSI', 'CSI_RMA_INST_REF_REQD');
531: fnd_message.set_token('SRC_TXN_ID', p_rma_line_id);
532: fnd_msg_pub.add;
533: raise fnd_api.g_exc_error;
534: END IF;
535:
536: EXCEPTION
537: WHEN do_not_process THEN
534: END IF;
535:
536: EXCEPTION
537: WHEN do_not_process THEN
538: x_return_status := fnd_api.g_ret_sts_success;
539: WHEN fnd_api.g_exc_error THEN
540: rollback to rma_fulfillment;
541: x_return_status := fnd_api.g_ret_sts_error;
542: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
535:
536: EXCEPTION
537: WHEN do_not_process THEN
538: x_return_status := fnd_api.g_ret_sts_success;
539: WHEN fnd_api.g_exc_error THEN
540: rollback to rma_fulfillment;
541: x_return_status := fnd_api.g_ret_sts_error;
542: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
543: l_error_rec.error_text := l_error_message;
537: WHEN do_not_process THEN
538: x_return_status := fnd_api.g_ret_sts_success;
539: WHEN fnd_api.g_exc_error THEN
540: rollback to rma_fulfillment;
541: x_return_status := fnd_api.g_ret_sts_error;
542: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
543: l_error_rec.error_text := l_error_message;
544: debug('Error :'||l_error_rec.error_text);
545: px_trx_error_rec := l_error_rec;
560: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
561: fnd_message.set_token('MESSAGE',substr(sqlerrm,1,255));
562: fnd_msg_pub.add;
563:
564: x_return_status := fnd_api.g_ret_sts_error;
565: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
566:
567: l_error_rec.error_text := l_error_message;
568: debug('Error :'||l_error_rec.error_text);
652: l_p_instance_asset_tbl csi_process_txn_grp.txn_instance_asset_tbl;
653: l_p_ii_relationships_tbl csi_process_txn_grp.txn_ii_relationships_tbl;
654: l_dest_location_rec csi_process_txn_grp.dest_location_rec;
655: l_api_version NUMBER := 1.0;
656: l_commit VARCHAR2(1) := fnd_api.g_false;
657: l_init_msg_list VARCHAR2(1) := fnd_api.g_false;
658: l_validation_level NUMBER := fnd_api.g_valid_level_full;
659: l_validate_only_flag VARCHAR2(1) := fnd_api.g_false;
660: l_in_out_flag VARCHAR2(30) := 'NONE';
653: l_p_ii_relationships_tbl csi_process_txn_grp.txn_ii_relationships_tbl;
654: l_dest_location_rec csi_process_txn_grp.dest_location_rec;
655: l_api_version NUMBER := 1.0;
656: l_commit VARCHAR2(1) := fnd_api.g_false;
657: l_init_msg_list VARCHAR2(1) := fnd_api.g_false;
658: l_validation_level NUMBER := fnd_api.g_valid_level_full;
659: l_validate_only_flag VARCHAR2(1) := fnd_api.g_false;
660: l_in_out_flag VARCHAR2(30) := 'NONE';
661: l_pty_ind binary_integer;
654: l_dest_location_rec csi_process_txn_grp.dest_location_rec;
655: l_api_version NUMBER := 1.0;
656: l_commit VARCHAR2(1) := fnd_api.g_false;
657: l_init_msg_list VARCHAR2(1) := fnd_api.g_false;
658: l_validation_level NUMBER := fnd_api.g_valid_level_full;
659: l_validate_only_flag VARCHAR2(1) := fnd_api.g_false;
660: l_in_out_flag VARCHAR2(30) := 'NONE';
661: l_pty_ind binary_integer;
662: l_pa_ind binary_integer;
655: l_api_version NUMBER := 1.0;
656: l_commit VARCHAR2(1) := fnd_api.g_false;
657: l_init_msg_list VARCHAR2(1) := fnd_api.g_false;
658: l_validation_level NUMBER := fnd_api.g_valid_level_full;
659: l_validate_only_flag VARCHAR2(1) := fnd_api.g_false;
660: l_in_out_flag VARCHAR2(30) := 'NONE';
661: l_pty_ind binary_integer;
662: l_pa_ind binary_integer;
663: l_oa_ind binary_integer;
683: l_orig_rma_status varchar2(30);
684: l_orig_rma_ref_valid varchar2(1):= 'Y';
685:
686: l_debug_level number;
687: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
688: l_pty_override_flag varchar2(1) := 'N';
689: l_upd_inst_qty varchar2(1) := 'Y';
690: l_msg_data varchar2(32767);
691: l_msg_count number;
712: do_not_process exception; --bug no. 10007311
713: l_has_rma_receipt VARCHAR2(1); --Added for bug 12417905
714: l_last_txn_type_id NUMBER; --Added for bug 12417905
715: BEGIN
716: x_return_status := fnd_api.g_ret_sts_success;
717: savepoint fulfill_rma_line;
718: fnd_msg_pub.initialize;
719:
720: l_debug_level := csi_t_gen_utility_pvt.g_debug_level;
742: WHEN others THEN
743: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
744: fnd_message.set_token('MESSAGE',substr(sqlerrm,1,255));
745: fnd_msg_pub.add;
746: RAISE fnd_api.g_exc_error;
747: END;
748:
749: l_csi_trxn_rec := p_csi_txn_rec;
750:
760: p_line_dtl_tbl(l_td_ind).txn_line_detail_id;
761:
762: csi_t_txn_details_grp.get_transaction_details(
763: p_api_version => 1,
764: p_commit => fnd_api.g_false,
765: p_init_msg_list => fnd_api.g_true,
766: p_validation_level => fnd_api.g_valid_level_full,
767: p_txn_line_query_rec => l_txn_line_query_rec,
768: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
761:
762: csi_t_txn_details_grp.get_transaction_details(
763: p_api_version => 1,
764: p_commit => fnd_api.g_false,
765: p_init_msg_list => fnd_api.g_true,
766: p_validation_level => fnd_api.g_valid_level_full,
767: p_txn_line_query_rec => l_txn_line_query_rec,
768: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
769: x_txn_line_detail_tbl => l_line_dtl_tbl,
762: csi_t_txn_details_grp.get_transaction_details(
763: p_api_version => 1,
764: p_commit => fnd_api.g_false,
765: p_init_msg_list => fnd_api.g_true,
766: p_validation_level => fnd_api.g_valid_level_full,
767: p_txn_line_query_rec => l_txn_line_query_rec,
768: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
769: x_txn_line_detail_tbl => l_line_dtl_tbl,
770: p_get_parties_flag => fnd_api.g_true,
766: p_validation_level => fnd_api.g_valid_level_full,
767: p_txn_line_query_rec => l_txn_line_query_rec,
768: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
769: x_txn_line_detail_tbl => l_line_dtl_tbl,
770: p_get_parties_flag => fnd_api.g_true,
771: x_txn_party_detail_tbl => l_pty_dtl_tbl,
772: p_get_pty_accts_flag => fnd_api.g_true,
773: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
774: p_get_ii_rltns_flag => fnd_api.g_true,
768: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
769: x_txn_line_detail_tbl => l_line_dtl_tbl,
770: p_get_parties_flag => fnd_api.g_true,
771: x_txn_party_detail_tbl => l_pty_dtl_tbl,
772: p_get_pty_accts_flag => fnd_api.g_true,
773: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
774: p_get_ii_rltns_flag => fnd_api.g_true,
775: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
776: p_get_org_assgns_flag => fnd_api.g_true,
770: p_get_parties_flag => fnd_api.g_true,
771: x_txn_party_detail_tbl => l_pty_dtl_tbl,
772: p_get_pty_accts_flag => fnd_api.g_true,
773: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
774: p_get_ii_rltns_flag => fnd_api.g_true,
775: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
776: p_get_org_assgns_flag => fnd_api.g_true,
777: x_txn_org_assgn_tbl => l_org_assgn_tbl,
778: p_get_ext_attrib_vals_flag => fnd_api.g_true,
772: p_get_pty_accts_flag => fnd_api.g_true,
773: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
774: p_get_ii_rltns_flag => fnd_api.g_true,
775: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
776: p_get_org_assgns_flag => fnd_api.g_true,
777: x_txn_org_assgn_tbl => l_org_assgn_tbl,
778: p_get_ext_attrib_vals_flag => fnd_api.g_true,
779: x_txn_ext_attrib_vals_tbl => l_txn_ext_attrib_tbl,
780: p_get_csi_attribs_flag => fnd_api.g_false,
774: p_get_ii_rltns_flag => fnd_api.g_true,
775: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
776: p_get_org_assgns_flag => fnd_api.g_true,
777: x_txn_org_assgn_tbl => l_org_assgn_tbl,
778: p_get_ext_attrib_vals_flag => fnd_api.g_true,
779: x_txn_ext_attrib_vals_tbl => l_txn_ext_attrib_tbl,
780: p_get_csi_attribs_flag => fnd_api.g_false,
781: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
782: p_get_csi_iea_values_flag => fnd_api.g_false,
776: p_get_org_assgns_flag => fnd_api.g_true,
777: x_txn_org_assgn_tbl => l_org_assgn_tbl,
778: p_get_ext_attrib_vals_flag => fnd_api.g_true,
779: x_txn_ext_attrib_vals_tbl => l_txn_ext_attrib_tbl,
780: p_get_csi_attribs_flag => fnd_api.g_false,
781: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
782: p_get_csi_iea_values_flag => fnd_api.g_false,
783: x_csi_iea_values_tbl => l_csi_eav_tbl,
784: p_get_txn_systems_flag => fnd_api.g_false,
778: p_get_ext_attrib_vals_flag => fnd_api.g_true,
779: x_txn_ext_attrib_vals_tbl => l_txn_ext_attrib_tbl,
780: p_get_csi_attribs_flag => fnd_api.g_false,
781: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
782: p_get_csi_iea_values_flag => fnd_api.g_false,
783: x_csi_iea_values_tbl => l_csi_eav_tbl,
784: p_get_txn_systems_flag => fnd_api.g_false,
785: x_txn_systems_tbl => l_txn_systems_tbl,
786: x_return_status => l_return_status,
780: p_get_csi_attribs_flag => fnd_api.g_false,
781: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
782: p_get_csi_iea_values_flag => fnd_api.g_false,
783: x_csi_iea_values_tbl => l_csi_eav_tbl,
784: p_get_txn_systems_flag => fnd_api.g_false,
785: x_txn_systems_tbl => l_txn_systems_tbl,
786: x_return_status => l_return_status,
787: x_msg_count => l_msg_count,
788: x_msg_data => l_msg_data);
786: x_return_status => l_return_status,
787: x_msg_count => l_msg_count,
788: x_msg_data => l_msg_data);
789:
790: IF l_return_status <> fnd_api.g_ret_sts_success THEN
791: debug('Get transaction details failed for Fulfill RMA Line.');
792: RAISE fnd_api.g_exc_error;
793: END IF;
794:
788: x_msg_data => l_msg_data);
789:
790: IF l_return_status <> fnd_api.g_ret_sts_success THEN
791: debug('Get transaction details failed for Fulfill RMA Line.');
792: RAISE fnd_api.g_exc_error;
793: END IF;
794:
795: l_txn_line_dtl_rec := l_line_dtl_tbl(1);--always one record. Query by TLD ID. bug 3230999. changed all references
796: l_txn_line_dtl_rec.quantity := p_line_dtl_tbl(l_td_ind).quantity; -- changes for bug 3684010
841: when others THEN
842: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
843: fnd_message.set_token('MESSAGE',substr(sqlerrm,1,255));
844: fnd_msg_pub.add;
845: raise fnd_api.g_exc_error;
846: End;
847: --Check if the object id is being updated, if so raise error
848:
849: IF l_curr_object_id <> -9999 THEN
850: IF l_curr_object_id <> l_object_inst_id THEN
851: fnd_message.set_name('CSI','CSI_INT_OBJ_ID_NOT_ALLOW_UPD');
852: fnd_message.set_token('OBJECT_ID',l_object_inst_id);
853: fnd_msg_pub.add;
854: raise fnd_api.g_exc_error;
855: END IF;
856: END IF;
857: END IF;
858:
863: p_trx_type_id => l_txn_type_id,
864: x_trx_sub_type_rec => l_txn_sub_type_rec,
865: x_return_status => l_return_status) ;
866:
867: IF l_return_status <> fnd_api.g_ret_sts_success THEN
868: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
869: fnd_message.set_token('MESSAGE','Call to the routine csi_utl_pkg.get_sub_type_rec Failed.');
870: fnd_msg_pub.add;
871: raise fnd_api.g_exc_error;
867: IF l_return_status <> fnd_api.g_ret_sts_success THEN
868: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
869: fnd_message.set_token('MESSAGE','Call to the routine csi_utl_pkg.get_sub_type_rec Failed.');
870: fnd_msg_pub.add;
871: raise fnd_api.g_exc_error;
872: END IF;
873:
874: debug(' transaction_type_id :'||l_txn_sub_type_rec.trx_type_id );
875: debug(' default sub_type_id :'||l_txn_sub_type_rec.sub_type_id );
877: --Fix for bug 4243512
878: IF l_txn_sub_type_rec.src_change_owner = 'Y' THEN
879: fnd_message.set_name('CSI','CSI_SUB_TYPE_INVALID');
880: fnd_msg_pub.add;
881: raise fnd_api.g_exc_error;
882: END IF;
883: --end of fix.
884:
885:
896: l_instance_rec.instance_id := l_txn_line_dtl_rec.instance_id;
897:
898: csi_item_instance_pub.get_item_instance_details(
899: p_api_version => 1.0,
900: p_commit => fnd_api.g_false,
901: p_init_msg_list => fnd_api.g_true,
902: p_validation_level => fnd_api.g_valid_level_full,
903: p_instance_rec => l_instance_rec,
904: p_get_parties => fnd_api.g_true,
897:
898: csi_item_instance_pub.get_item_instance_details(
899: p_api_version => 1.0,
900: p_commit => fnd_api.g_false,
901: p_init_msg_list => fnd_api.g_true,
902: p_validation_level => fnd_api.g_valid_level_full,
903: p_instance_rec => l_instance_rec,
904: p_get_parties => fnd_api.g_true,
905: p_party_header_tbl => l_party_header_tbl,
898: csi_item_instance_pub.get_item_instance_details(
899: p_api_version => 1.0,
900: p_commit => fnd_api.g_false,
901: p_init_msg_list => fnd_api.g_true,
902: p_validation_level => fnd_api.g_valid_level_full,
903: p_instance_rec => l_instance_rec,
904: p_get_parties => fnd_api.g_true,
905: p_party_header_tbl => l_party_header_tbl,
906: p_get_accounts => fnd_api.g_true,
900: p_commit => fnd_api.g_false,
901: p_init_msg_list => fnd_api.g_true,
902: p_validation_level => fnd_api.g_valid_level_full,
903: p_instance_rec => l_instance_rec,
904: p_get_parties => fnd_api.g_true,
905: p_party_header_tbl => l_party_header_tbl,
906: p_get_accounts => fnd_api.g_true,
907: p_account_header_tbl => l_account_header_tbl,
908: p_get_org_assignments => fnd_api.g_false,
902: p_validation_level => fnd_api.g_valid_level_full,
903: p_instance_rec => l_instance_rec,
904: p_get_parties => fnd_api.g_true,
905: p_party_header_tbl => l_party_header_tbl,
906: p_get_accounts => fnd_api.g_true,
907: p_account_header_tbl => l_account_header_tbl,
908: p_get_org_assignments => fnd_api.g_false,
909: p_org_header_tbl => l_org_assignments_tbl,
910: p_get_pricing_attribs => fnd_api.g_false,
904: p_get_parties => fnd_api.g_true,
905: p_party_header_tbl => l_party_header_tbl,
906: p_get_accounts => fnd_api.g_true,
907: p_account_header_tbl => l_account_header_tbl,
908: p_get_org_assignments => fnd_api.g_false,
909: p_org_header_tbl => l_org_assignments_tbl,
910: p_get_pricing_attribs => fnd_api.g_false,
911: p_pricing_attrib_tbl => l_pricing_attrib_tbl,
912: p_get_ext_attribs => fnd_api.g_false,
906: p_get_accounts => fnd_api.g_true,
907: p_account_header_tbl => l_account_header_tbl,
908: p_get_org_assignments => fnd_api.g_false,
909: p_org_header_tbl => l_org_assignments_tbl,
910: p_get_pricing_attribs => fnd_api.g_false,
911: p_pricing_attrib_tbl => l_pricing_attrib_tbl,
912: p_get_ext_attribs => fnd_api.g_false,
913: p_ext_attrib_tbl => l_ext_attrib_tbl,
914: p_ext_attrib_def_tbl => l_ext_attrib_def_tbl,
908: p_get_org_assignments => fnd_api.g_false,
909: p_org_header_tbl => l_org_assignments_tbl,
910: p_get_pricing_attribs => fnd_api.g_false,
911: p_pricing_attrib_tbl => l_pricing_attrib_tbl,
912: p_get_ext_attribs => fnd_api.g_false,
913: p_ext_attrib_tbl => l_ext_attrib_tbl,
914: p_ext_attrib_def_tbl => l_ext_attrib_def_tbl,
915: p_get_asset_assignments => fnd_api.g_false,
916: p_asset_header_tbl => l_asset_assignment_tbl,
911: p_pricing_attrib_tbl => l_pricing_attrib_tbl,
912: p_get_ext_attribs => fnd_api.g_false,
913: p_ext_attrib_tbl => l_ext_attrib_tbl,
914: p_ext_attrib_def_tbl => l_ext_attrib_def_tbl,
915: p_get_asset_assignments => fnd_api.g_false,
916: p_asset_header_tbl => l_asset_assignment_tbl,
917: p_time_stamp => l_time_stamp,
918: x_return_status => l_return_status,
919: x_msg_count => l_msg_count,
918: x_return_status => l_return_status,
919: x_msg_count => l_msg_count,
920: x_msg_data => l_msg_data);
921:
922: IF l_return_status <> fnd_api.g_ret_sts_success THEN
923: debug('Get item instance details failed for Fulfill RMA Line.');
924: RAISE fnd_api.g_exc_error;
925: END IF;
926:
920: x_msg_data => l_msg_data);
921:
922: IF l_return_status <> fnd_api.g_ret_sts_success THEN
923: debug('Get item instance details failed for Fulfill RMA Line.');
924: RAISE fnd_api.g_exc_error;
925: END IF;
926:
927: --Initialize the variable
928: l_upd_inst_qty := 'Y';
941: debug('Instance Party not found. Instance:'||l_instance_rec.instance_id);
942: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
943: fnd_message.set_token('MESSAGE','Instance Party not found. Instance:'||l_instance_rec.instance_id);
944: fnd_msg_pub.add;
945: RAISE fnd_api.g_exc_error;
946: END IF;
947:
948:
949: -- Bug 4997771
948:
949: -- Bug 4997771
950: IF ( l_instance_rec.location_type_code = 'INVENTORY'
951: AND
952: NVL(l_instance_rec.active_end_date,fnd_api.g_miss_date) = fnd_api.g_miss_date )
953: THEN
954: --Added for bug 12417905
955: l_has_rma_receipt := 'N';
956: BEGIN
979: IF(l_has_rma_receipt = 'N') THEN
980: fnd_message.set_name('CSI','CSI_INT_INST_REF_INVALID');
981: fnd_message.set_token('INSTANCE_ID',l_instance_rec.instance_id);
982: fnd_msg_pub.add;
983: RAISE fnd_api.g_exc_error;
984: END IF;
985: ELSE
986: --STARTS , bug no. 10007311 --modified the fix of bug 10007311, while making the changes for bug 12417905
987: IF(l_has_rma_receipt = 'N') THEN
987: IF(l_has_rma_receipt = 'N') THEN
988: fnd_message.set_name('CSI', 'CSI_NON_RETURNABLE_INSTANCE');
989: fnd_message.set_token('LOC_TYPE_CODE', l_instance_rec.location_type_code);
990: fnd_msg_pub.add;
991: raise fnd_api.g_exc_error;
992: END IF;
993: --ENDS bug no. 10007311
994: END IF;
995: END IF;
1022: IF nvl(l_txn_sub_type_rec.src_change_owner, 'N') = 'Y' THEN
1023: fnd_message.set_name('CSI','CSI_INT_INST_REF_INVALID');
1024: fnd_message.set_token('INSTANCE_ID',l_instance_rec.instance_id);
1025: fnd_msg_pub.add;
1026: RAISE fnd_api.g_exc_error;
1027: END IF;
1028: ELSIF l_inst_owner_pty_id <> l_src_txn_owner_pty_id THEN
1029: IF l_pty_override_flag = 'Y' THEN
1030:
1035: l_upd_parties_tbl(1).party_source_table := 'HZ_PARTIES';
1036: l_upd_parties_tbl(1).party_id := l_src_txn_owner_pty_id;
1037: l_upd_parties_tbl(1).relationship_type_code := 'OWNER';
1038: l_upd_parties_tbl(1).contact_flag := 'N';
1039: l_upd_parties_tbl(1).call_contracts := fnd_api.g_false;
1040:
1041: l_upd_pty_accts_tbl(1).ip_account_id := l_owner_acct_ipa_id;
1042: l_upd_pty_accts_tbl(1).object_version_number:= l_owner_acct_obj_ver_num;
1043: l_upd_pty_accts_tbl(1).parent_tbl_index := 1;
1042: l_upd_pty_accts_tbl(1).object_version_number:= l_owner_acct_obj_ver_num;
1043: l_upd_pty_accts_tbl(1).parent_tbl_index := 1;
1044: l_upd_pty_accts_tbl(1).party_account_id := p_rma_line_rec.sold_to_org_id; -- bug 3693594
1045: l_upd_pty_accts_tbl(1).relationship_type_code := 'OWNER';
1046: l_upd_pty_accts_tbl(1).call_contracts := fnd_api.g_false;
1047:
1048: /* Commented the call as part of fix for Bug 2733128. Added call to Update_Item_Instance instead
1049: csi_t_gen_utility_pvt.dump_api_info(
1050: p_pkg_name => 'csi_party_relationships_pub',
1051: p_api_name => 'update_inst_party_relationship');
1052:
1053: csi_party_relationships_pub.update_inst_party_relationship (
1054: p_api_version => 1.0,
1055: p_commit => fnd_api.g_false,
1056: p_init_msg_list => fnd_api.g_true,
1057: p_validation_level => fnd_api.g_valid_level_full,
1058: p_party_tbl => l_upd_parties_tbl,
1059: p_party_account_tbl => l_upd_pty_accts_tbl,
1052:
1053: csi_party_relationships_pub.update_inst_party_relationship (
1054: p_api_version => 1.0,
1055: p_commit => fnd_api.g_false,
1056: p_init_msg_list => fnd_api.g_true,
1057: p_validation_level => fnd_api.g_valid_level_full,
1058: p_party_tbl => l_upd_parties_tbl,
1059: p_party_account_tbl => l_upd_pty_accts_tbl,
1060: p_txn_rec => l_csi_trxn_rec,
1053: csi_party_relationships_pub.update_inst_party_relationship (
1054: p_api_version => 1.0,
1055: p_commit => fnd_api.g_false,
1056: p_init_msg_list => fnd_api.g_true,
1057: p_validation_level => fnd_api.g_valid_level_full,
1058: p_party_tbl => l_upd_parties_tbl,
1059: p_party_account_tbl => l_upd_pty_accts_tbl,
1060: p_txn_rec => l_csi_trxn_rec,
1061: x_return_status => l_return_status,
1076: p_api_name => 'update_item_instance');
1077:
1078: csi_item_instance_pub.update_item_instance(
1079: p_api_version => 1.0,
1080: p_commit => fnd_api.g_false,
1081: p_init_msg_list => fnd_api.g_true,
1082: p_validation_level => fnd_api.g_valid_level_full,
1083: p_instance_rec => l_chg_instance_rec,
1084: p_ext_attrib_values_tbl => l_chg_ext_attrib_val_tbl,
1077:
1078: csi_item_instance_pub.update_item_instance(
1079: p_api_version => 1.0,
1080: p_commit => fnd_api.g_false,
1081: p_init_msg_list => fnd_api.g_true,
1082: p_validation_level => fnd_api.g_valid_level_full,
1083: p_instance_rec => l_chg_instance_rec,
1084: p_ext_attrib_values_tbl => l_chg_ext_attrib_val_tbl,
1085: p_party_tbl => l_upd_parties_tbl,
1078: csi_item_instance_pub.update_item_instance(
1079: p_api_version => 1.0,
1080: p_commit => fnd_api.g_false,
1081: p_init_msg_list => fnd_api.g_true,
1082: p_validation_level => fnd_api.g_valid_level_full,
1083: p_instance_rec => l_chg_instance_rec,
1084: p_ext_attrib_values_tbl => l_chg_ext_attrib_val_tbl,
1085: p_party_tbl => l_upd_parties_tbl,
1086: p_account_tbl => l_upd_pty_accts_tbl,
1092: x_return_status => l_return_status,
1093: x_msg_count => l_msg_count,
1094: x_msg_data => l_msg_data);
1095:
1096: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1097: RAISE fnd_api.g_exc_error;
1098: END IF;
1099:
1100: debug('Ownership Changed Successfully.');
1093: x_msg_count => l_msg_count,
1094: x_msg_data => l_msg_data);
1095:
1096: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1097: RAISE fnd_api.g_exc_error;
1098: END IF;
1099:
1100: debug('Ownership Changed Successfully.');
1101: ELSE
1103: fnd_message.set_token('INSTANCE_ID', l_instance_rec.instance_id );
1104: fnd_message.set_token('OLD_PARTY_ID', l_inst_owner_pty_id );
1105: fnd_message.set_token('NEW_PARTY_ID', l_src_txn_owner_pty_id );
1106: fnd_msg_pub.add;
1107: RAISE fnd_api.g_exc_error;
1108: END IF;
1109: END IF;
1110: /* Bug 3746600. Since Cancellation is always a expiry now, we do not need the code below. commenting.
1111: ELSE -- inst party = source txn party AND instance is valid - Normal case
1161: debug('Fetch instance details failed ...');
1162: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
1163: fnd_message.set_token('MESSAGE',substr(sqlerrm,1,255));
1164: fnd_msg_pub.add;
1165: raise fnd_api.g_exc_unexpected_error;
1166: End;
1167:
1168: csi_t_gen_utility_pvt.dump_api_info(
1169: p_pkg_name => 'csi_item_instance_pub',
1170: p_api_name => 'update_item_instance');
1171:
1172: csi_item_instance_pub.update_item_instance(
1173: p_api_version => 1.0,
1174: p_commit => fnd_api.g_false,
1175: p_init_msg_list => fnd_api.g_true,
1176: p_validation_level => fnd_api.g_valid_level_full,
1177: p_instance_rec => l_u_instance_rec,
1178: p_party_tbl => l_u_parties_tbl,
1171:
1172: csi_item_instance_pub.update_item_instance(
1173: p_api_version => 1.0,
1174: p_commit => fnd_api.g_false,
1175: p_init_msg_list => fnd_api.g_true,
1176: p_validation_level => fnd_api.g_valid_level_full,
1177: p_instance_rec => l_u_instance_rec,
1178: p_party_tbl => l_u_parties_tbl,
1179: p_account_tbl => l_u_pty_accts_tbl,
1172: csi_item_instance_pub.update_item_instance(
1173: p_api_version => 1.0,
1174: p_commit => fnd_api.g_false,
1175: p_init_msg_list => fnd_api.g_true,
1176: p_validation_level => fnd_api.g_valid_level_full,
1177: p_instance_rec => l_u_instance_rec,
1178: p_party_tbl => l_u_parties_tbl,
1179: p_account_tbl => l_u_pty_accts_tbl,
1180: p_org_assignments_tbl => l_u_org_units_tbl,
1186: x_return_status => l_return_status,
1187: x_msg_count => l_msg_count,
1188: x_msg_data => l_msg_data);
1189:
1190: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1191: RAISE fnd_api.g_exc_error;
1192: END IF;
1193: ELSE
1194: debug('Instance Quantity is -ve already. Error??');
1187: x_msg_count => l_msg_count,
1188: x_msg_data => l_msg_data);
1189:
1190: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1191: RAISE fnd_api.g_exc_error;
1192: END IF;
1193: ELSE
1194: debug('Instance Quantity is -ve already. Error??');
1195: l_upd_inst_qty := 'N';
1192: END IF;
1193: ELSE
1194: debug('Instance Quantity is -ve already. Error??');
1195: l_upd_inst_qty := 'N';
1196: --RAISE fnd_api.g_exc_error;
1197: END IF;
1198: ELSE --Not sure about the case??
1199: l_p_instances_tbl(l_td_ind).active_end_date := NULL;
1200: l_upd_inst_qty := 'N';
1226: debug('Could not determine serial control policy?');
1227: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
1228: fnd_message.set_token('MESSAGE',substr(sqlerrm,1,255));
1229: fnd_msg_pub.add;
1230: RAISE fnd_api.g_exc_unexpected_error;
1231: End;
1232:
1233: l_p_instances_tbl(l_td_ind).instance_id := l_txn_line_dtl_rec.instance_id;
1234: IF ( nvl(l_instance_rec.active_end_date,fnd_api.g_miss_date) <> fnd_api.g_miss_date
1230: RAISE fnd_api.g_exc_unexpected_error;
1231: End;
1232:
1233: l_p_instances_tbl(l_td_ind).instance_id := l_txn_line_dtl_rec.instance_id;
1234: IF ( nvl(l_instance_rec.active_end_date,fnd_api.g_miss_date) <> fnd_api.g_miss_date
1235: AND l_instance_rec.active_end_date < sysdate ) THEN -- Added this new check, IF as part of 3746600
1236: IF l_instance_rec.instance_usage_code <> 'IN_RELATIONSHIP' THEN
1237: -- ONLY excluding Components since they get expired along with their parent in a config cancellation
1238: fnd_message.set_name('CSI','CSI_TXN_INVALID_INST_REF');
1237: -- ONLY excluding Components since they get expired along with their parent in a config cancellation
1238: fnd_message.set_name('CSI','CSI_TXN_INVALID_INST_REF');
1239: fnd_message.set_token('INSTANCE_ID',l_instance_rec.instance_id);
1240: fnd_msg_pub.add;
1241: RAISE fnd_api.g_exc_error;
1242: END IF;
1243: ELSIF l_item_srl_code = 1 THEN
1244: IF abs(l_txn_line_dtl_rec.quantity) > l_instance_rec.quantity THEN
1245: -- check if the quantity is greater than the instance quantity
1245: -- check if the quantity is greater than the instance quantity
1246: fnd_message.set_name('CSI','CSI_INT_QTY_CHK_FAILED');
1247: fnd_message.set_token('INSTANCE_ID',l_instance_rec.instance_id);
1248: fnd_msg_pub.add;
1249: RAISE fnd_api.g_exc_error;
1250: ELSIF l_instance_rec.quantity > abs(l_txn_line_dtl_rec.quantity) THEN -- need to split the source cust prod first
1251: debug('Original Instance Quantity: '||l_instance_rec.quantity);
1252: l_quantity1 := l_instance_rec.quantity - abs(l_txn_line_dtl_rec.quantity) ;
1253:
1259: p_api_name => 'split_item_instance');
1260:
1261: csi_item_instance_pvt.split_item_instance (
1262: p_api_version => 1.0,
1263: p_commit => fnd_api.g_false,
1264: p_init_msg_list => fnd_api.g_true,
1265: p_validation_level => fnd_api.g_valid_level_full,
1266: p_source_instance_rec => l_split_src_inst_rec,
1267: p_quantity1 => l_quantity1,
1260:
1261: csi_item_instance_pvt.split_item_instance (
1262: p_api_version => 1.0,
1263: p_commit => fnd_api.g_false,
1264: p_init_msg_list => fnd_api.g_true,
1265: p_validation_level => fnd_api.g_valid_level_full,
1266: p_source_instance_rec => l_split_src_inst_rec,
1267: p_quantity1 => l_quantity1,
1268: p_quantity2 => abs(l_txn_line_dtl_rec.quantity),
1261: csi_item_instance_pvt.split_item_instance (
1262: p_api_version => 1.0,
1263: p_commit => fnd_api.g_false,
1264: p_init_msg_list => fnd_api.g_true,
1265: p_validation_level => fnd_api.g_valid_level_full,
1266: p_source_instance_rec => l_split_src_inst_rec,
1267: p_quantity1 => l_quantity1,
1268: p_quantity2 => abs(l_txn_line_dtl_rec.quantity),
1269: p_copy_ext_attribs => fnd_api.g_true,
1265: p_validation_level => fnd_api.g_valid_level_full,
1266: p_source_instance_rec => l_split_src_inst_rec,
1267: p_quantity1 => l_quantity1,
1268: p_quantity2 => abs(l_txn_line_dtl_rec.quantity),
1269: p_copy_ext_attribs => fnd_api.g_true,
1270: p_copy_org_assignments => fnd_api.g_true,
1271: p_copy_parties => fnd_api.g_true,
1272: p_copy_accounts => fnd_api.g_true,
1273: p_copy_asset_assignments => fnd_api.g_true,
1266: p_source_instance_rec => l_split_src_inst_rec,
1267: p_quantity1 => l_quantity1,
1268: p_quantity2 => abs(l_txn_line_dtl_rec.quantity),
1269: p_copy_ext_attribs => fnd_api.g_true,
1270: p_copy_org_assignments => fnd_api.g_true,
1271: p_copy_parties => fnd_api.g_true,
1272: p_copy_accounts => fnd_api.g_true,
1273: p_copy_asset_assignments => fnd_api.g_true,
1274: p_copy_pricing_attribs => fnd_api.g_true,
1267: p_quantity1 => l_quantity1,
1268: p_quantity2 => abs(l_txn_line_dtl_rec.quantity),
1269: p_copy_ext_attribs => fnd_api.g_true,
1270: p_copy_org_assignments => fnd_api.g_true,
1271: p_copy_parties => fnd_api.g_true,
1272: p_copy_accounts => fnd_api.g_true,
1273: p_copy_asset_assignments => fnd_api.g_true,
1274: p_copy_pricing_attribs => fnd_api.g_true,
1275: p_txn_rec => l_csi_trxn_rec,
1268: p_quantity2 => abs(l_txn_line_dtl_rec.quantity),
1269: p_copy_ext_attribs => fnd_api.g_true,
1270: p_copy_org_assignments => fnd_api.g_true,
1271: p_copy_parties => fnd_api.g_true,
1272: p_copy_accounts => fnd_api.g_true,
1273: p_copy_asset_assignments => fnd_api.g_true,
1274: p_copy_pricing_attribs => fnd_api.g_true,
1275: p_txn_rec => l_csi_trxn_rec,
1276: x_new_instance_rec => l_split_new_inst_rec,
1269: p_copy_ext_attribs => fnd_api.g_true,
1270: p_copy_org_assignments => fnd_api.g_true,
1271: p_copy_parties => fnd_api.g_true,
1272: p_copy_accounts => fnd_api.g_true,
1273: p_copy_asset_assignments => fnd_api.g_true,
1274: p_copy_pricing_attribs => fnd_api.g_true,
1275: p_txn_rec => l_csi_trxn_rec,
1276: x_new_instance_rec => l_split_new_inst_rec,
1277: x_return_status => l_return_status,
1270: p_copy_org_assignments => fnd_api.g_true,
1271: p_copy_parties => fnd_api.g_true,
1272: p_copy_accounts => fnd_api.g_true,
1273: p_copy_asset_assignments => fnd_api.g_true,
1274: p_copy_pricing_attribs => fnd_api.g_true,
1275: p_txn_rec => l_csi_trxn_rec,
1276: x_new_instance_rec => l_split_new_inst_rec,
1277: x_return_status => l_return_status,
1278: x_msg_count => l_msg_count,
1277: x_return_status => l_return_status,
1278: x_msg_count => l_msg_count,
1279: x_msg_data => l_msg_data);
1280:
1281: IF NOT(l_return_status = fnd_api.g_ret_sts_success) THEN
1282: debug('csi_item_instance_pvt.split_item_instance raised errors');
1283: raise fnd_api.g_exc_error;
1284: END IF;
1285:
1279: x_msg_data => l_msg_data);
1280:
1281: IF NOT(l_return_status = fnd_api.g_ret_sts_success) THEN
1282: debug('csi_item_instance_pvt.split_item_instance raised errors');
1283: raise fnd_api.g_exc_error;
1284: END IF;
1285:
1286: l_p_instances_tbl(l_td_ind).instance_id := l_split_new_inst_rec.instance_id ;
1287: l_p_instances_tbl(l_td_ind).object_version_number := l_split_new_inst_rec.object_version_number;
1380:
1381: -- updating txn dtls to IN_PROCESS. moved this code down here from inside the loop
1382: csi_t_txn_details_grp.update_txn_line_dtls(
1383: p_api_version => 1.0,
1384: p_commit => fnd_api.g_false,
1385: p_init_msg_list => fnd_api.g_true,
1386: p_validation_level => fnd_api.g_valid_level_full,
1387: p_txn_line_rec => l_u_txn_line_rec,
1388: p_txn_line_detail_tbl => l_u_line_dtl_tbl,
1381: -- updating txn dtls to IN_PROCESS. moved this code down here from inside the loop
1382: csi_t_txn_details_grp.update_txn_line_dtls(
1383: p_api_version => 1.0,
1384: p_commit => fnd_api.g_false,
1385: p_init_msg_list => fnd_api.g_true,
1386: p_validation_level => fnd_api.g_valid_level_full,
1387: p_txn_line_rec => l_u_txn_line_rec,
1388: p_txn_line_detail_tbl => l_u_line_dtl_tbl,
1389: px_txn_ii_rltns_tbl => l_u_ii_rltns_tbl,
1382: csi_t_txn_details_grp.update_txn_line_dtls(
1383: p_api_version => 1.0,
1384: p_commit => fnd_api.g_false,
1385: p_init_msg_list => fnd_api.g_true,
1386: p_validation_level => fnd_api.g_valid_level_full,
1387: p_txn_line_rec => l_u_txn_line_rec,
1388: p_txn_line_detail_tbl => l_u_line_dtl_tbl,
1389: px_txn_ii_rltns_tbl => l_u_ii_rltns_tbl,
1390: px_txn_party_detail_tbl => l_u_pty_dtl_tbl,
1394: x_return_status => l_return_status,
1395: x_msg_count => l_msg_count,
1396: x_msg_data => l_msg_data);
1397:
1398: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1399: debug('Update txn line dtls failed for Fulfill RMA Line.');
1400: RAISE fnd_api.g_exc_error;
1401: END IF;
1402: --
1396: x_msg_data => l_msg_data);
1397:
1398: IF x_return_status <> fnd_api.g_ret_sts_success THEN
1399: debug('Update txn line dtls failed for Fulfill RMA Line.');
1400: RAISE fnd_api.g_exc_error;
1401: END IF;
1402: --
1403: -- srramakr TSO with Equipment
1404: -- For Shippable Items, if RMA fulfillment is performed then we need to remove the config keys
1407: IF NVL(p_rma_line_rec.shippable_flag,'N') = 'Y' THEN
1408: IF l_p_instances_tbl.count > 0 THEN
1409: FOR J in l_p_instances_tbl.FIRST .. l_p_instances_tbl.LAST LOOP
1410: IF l_p_instances_tbl(J).instance_id IS NOT NULL AND
1411: l_p_instances_tbl(J).instance_id <> FND_API.G_MISS_NUM THEN
1412: l_lock_id := NULL;
1413: l_lock_status := NULL;
1414: l_locked_inst_rev_num := NULL;
1415: l_p_instances_tbl(J).config_inst_hdr_id := null;
1463: ,x_return_status => l_return_status
1464: ,x_msg_count => l_msg_count
1465: ,x_msg_data => l_msg_data
1466: );
1467: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1468: debug('Unlock Item Instances routine failed.');
1469: RAISE fnd_api.g_exc_error;
1470: END IF;
1471: --
1465: ,x_msg_data => l_msg_data
1466: );
1467: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1468: debug('Unlock Item Instances routine failed.');
1469: RAISE fnd_api.g_exc_error;
1470: END IF;
1471: --
1472: -- Update any pending TLD for the same config keys (fetched from lock table)
1473: -- with the instance_id so that when regular fulfillment happens for this
1499: x_return_status => l_return_status,
1500: x_msg_count => l_msg_count,
1501: x_msg_data => l_msg_data
1502: );
1503: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1504: debug('Remove_Returned_Config_Item routine failed.');
1505: RAISE fnd_api.g_exc_error;
1506: END IF;
1507: END IF;
1501: x_msg_data => l_msg_data
1502: );
1503: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1504: debug('Remove_Returned_Config_Item routine failed.');
1505: RAISE fnd_api.g_exc_error;
1506: END IF;
1507: END IF;
1508: END IF;
1509: --
1536: x_return_status => l_return_status,
1537: x_msg_count => l_msg_count,
1538: x_msg_data => l_msg_data );
1539:
1540: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1541: debug('Process Transaction call failed for Fulfill RMA Line.');
1542: RAISE fnd_api.g_exc_error;
1543: END IF;
1544: Begin
1538: x_msg_data => l_msg_data );
1539:
1540: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1541: debug('Process Transaction call failed for Fulfill RMA Line.');
1542: RAISE fnd_api.g_exc_error;
1543: END IF;
1544: Begin
1545:
1546: --Assign the literals.. bug 4311676
1559: b.source_transaction_id = p_rma_line_rec.line_id
1560: AND b.source_transaction_table = l_literal2);
1561: Exception when others Then
1562: debug('Txn details update failed');
1563: raise fnd_api.g_exc_unexpected_error;
1564: End;
1565:
1566: END IF; -- td_tbl count > 0
1567:
1566: END IF; -- td_tbl count > 0
1567:
1568: EXCEPTION
1569: WHEN do_not_process THEN
1570: x_return_status := fnd_api.g_ret_sts_success; --bug no. 10007311
1571: WHEN fnd_api.g_exc_error THEN
1572: rollback to fulfill_rma_line;
1573: x_return_status := fnd_api.g_ret_sts_error;
1574: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
1567:
1568: EXCEPTION
1569: WHEN do_not_process THEN
1570: x_return_status := fnd_api.g_ret_sts_success; --bug no. 10007311
1571: WHEN fnd_api.g_exc_error THEN
1572: rollback to fulfill_rma_line;
1573: x_return_status := fnd_api.g_ret_sts_error;
1574: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
1575: debug(l_error_message);
1569: WHEN do_not_process THEN
1570: x_return_status := fnd_api.g_ret_sts_success; --bug no. 10007311
1571: WHEN fnd_api.g_exc_error THEN
1572: rollback to fulfill_rma_line;
1573: x_return_status := fnd_api.g_ret_sts_error;
1574: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
1575: debug(l_error_message);
1576: WHEN fnd_api.g_exc_unexpected_error THEN
1577: rollback to fulfill_rma_line;
1572: rollback to fulfill_rma_line;
1573: x_return_status := fnd_api.g_ret_sts_error;
1574: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
1575: debug(l_error_message);
1576: WHEN fnd_api.g_exc_unexpected_error THEN
1577: rollback to fulfill_rma_line;
1578: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
1579: fnd_message.set_token('MESSAGE',substr(sqlerrm,1,255));
1580: fnd_msg_pub.add;
1577: rollback to fulfill_rma_line;
1578: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
1579: fnd_message.set_token('MESSAGE',substr(sqlerrm,1,255));
1580: fnd_msg_pub.add;
1581: x_return_status := fnd_api.g_ret_sts_error;
1582: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
1583: debug(l_error_message);
1584: END fulfill_rma_line;
1585: