[Home] [Help]
20: PROCEDURE create_csi_transaction(
21: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
22: x_return_status OUT nocopy varchar2)
23: IS
24: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
25: l_msg_count number;
26: l_msg_data varchar2(2000);
27:
28: BEGIN
26: l_msg_data varchar2(2000);
27:
28: BEGIN
29:
30: x_return_status := fnd_api.g_ret_sts_success;
31:
32: csi_t_gen_utility_pvt.dump_api_info(
33: p_api_name => 'create_transaction',
34: p_pkg_name => 'csi_transactions_pvt');
34: p_pkg_name => 'csi_transactions_pvt');
35:
36: csi_transactions_pvt.create_transaction(
37: p_api_version => 1.0,
38: p_commit => fnd_api.g_false,
39: p_init_msg_list => fnd_api.g_true,
40: p_validation_level => fnd_api.g_valid_level_full,
41: p_success_if_exists_flag => 'Y',
42: p_transaction_rec => px_csi_txn_rec,
35:
36: csi_transactions_pvt.create_transaction(
37: p_api_version => 1.0,
38: p_commit => fnd_api.g_false,
39: p_init_msg_list => fnd_api.g_true,
40: p_validation_level => fnd_api.g_valid_level_full,
41: p_success_if_exists_flag => 'Y',
42: p_transaction_rec => px_csi_txn_rec,
43: x_return_status => l_return_status,
36: csi_transactions_pvt.create_transaction(
37: p_api_version => 1.0,
38: p_commit => fnd_api.g_false,
39: p_init_msg_list => fnd_api.g_true,
40: p_validation_level => fnd_api.g_valid_level_full,
41: p_success_if_exists_flag => 'Y',
42: p_transaction_rec => px_csi_txn_rec,
43: x_return_status => l_return_status,
44: x_msg_count => l_msg_count,
43: x_return_status => l_return_status,
44: x_msg_count => l_msg_count,
45: x_msg_data => l_msg_data);
46:
47: IF l_return_status <> fnd_api.g_ret_sts_success THEN
48: RAISE fnd_api.g_exc_error;
49: END IF;
50:
51: debug(' csi_transaction_id : '||px_csi_txn_rec.transaction_id);
44: x_msg_count => l_msg_count,
45: x_msg_data => l_msg_data);
46:
47: IF l_return_status <> fnd_api.g_ret_sts_success THEN
48: RAISE fnd_api.g_exc_error;
49: END IF;
50:
51: debug(' csi_transaction_id : '||px_csi_txn_rec.transaction_id);
52:
50:
51: debug(' csi_transaction_id : '||px_csi_txn_rec.transaction_id);
52:
53: EXCEPTION
54: WHEN fnd_api.g_exc_error THEN
55: x_return_status := fnd_api.g_ret_sts_error;
56: END create_csi_transaction;
57:
58: PROCEDURE get_sub_type_rec(
51: debug(' csi_transaction_id : '||px_csi_txn_rec.transaction_id);
52:
53: EXCEPTION
54: WHEN fnd_api.g_exc_error THEN
55: x_return_status := fnd_api.g_ret_sts_error;
56: END create_csi_transaction;
57:
58: PROCEDURE get_sub_type_rec(
59: p_transaction_type_id IN number,
63: IS
64: l_sub_type_rec sub_type_rec;
65: BEGIN
66: api_log('get_sub_type_rec');
67: x_return_status := fnd_api.g_ret_sts_success;
68:
69: l_sub_type_rec.transaction_type_id := p_transaction_type_id;
70: l_sub_type_rec.sub_type_id := p_sub_type_id;
71:
97: fnd_message.set_name('CSI','CSI_INT_SUB_TYPE_REC_MISSING');
98: fnd_message.set_token('SUB_TYPE_ID', p_sub_type_id);
99: fnd_message.set_token('TRANSACTION_TYPE_ID', p_transaction_type_id);
100: fnd_msg_pub.add;
101: RAISE fnd_api.g_exc_error;
102: END;
103: x_sub_type_rec := l_sub_type_rec;
104: EXCEPTION
105: WHEN fnd_api.g_exc_error THEN
101: RAISE fnd_api.g_exc_error;
102: END;
103: x_sub_type_rec := l_sub_type_rec;
104: EXCEPTION
105: WHEN fnd_api.g_exc_error THEN
106: x_return_status := fnd_api.g_ret_sts_error;
107: END get_sub_type_rec;
108:
109:
102: END;
103: x_sub_type_rec := l_sub_type_rec;
104: EXCEPTION
105: WHEN fnd_api.g_exc_error THEN
106: x_return_status := fnd_api.g_ret_sts_error;
107: END get_sub_type_rec;
108:
109:
110: -- added for the bug 5464761
115: x_return_status OUT nocopy varchar2)
116: IS
117: l_src_instance_rec csi_datastructures_pub.instance_rec;
118: l_instance_tbl csi_datastructures_pub.instance_tbl;
119: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
120: l_msg_count number;
121: l_msg_data varchar2(2000);
122: BEGIN
123:
120: l_msg_count number;
121: l_msg_data varchar2(2000);
122: BEGIN
123:
124: x_return_status := fnd_api.g_ret_sts_success;
125:
126: api_log('auto_split_instances');
127:
128: l_src_instance_rec.instance_id := p_instance_rec.instance_id ;
151: p_api_name => 'split_item_instance_lines');
152:
153: csi_item_instance_pvt.split_item_instance_lines(
154: p_api_version => 1.0,
155: p_commit => fnd_api.g_false,
156: p_init_msg_list => fnd_api.g_true,
157: p_validation_level => fnd_api.g_valid_level_full,
158: p_source_instance_rec => l_src_instance_rec,
159: p_copy_ext_attribs => fnd_api.g_true,
152:
153: csi_item_instance_pvt.split_item_instance_lines(
154: p_api_version => 1.0,
155: p_commit => fnd_api.g_false,
156: p_init_msg_list => fnd_api.g_true,
157: p_validation_level => fnd_api.g_valid_level_full,
158: p_source_instance_rec => l_src_instance_rec,
159: p_copy_ext_attribs => fnd_api.g_true,
160: p_copy_org_assignments => fnd_api.g_true,
153: csi_item_instance_pvt.split_item_instance_lines(
154: p_api_version => 1.0,
155: p_commit => fnd_api.g_false,
156: p_init_msg_list => fnd_api.g_true,
157: p_validation_level => fnd_api.g_valid_level_full,
158: p_source_instance_rec => l_src_instance_rec,
159: p_copy_ext_attribs => fnd_api.g_true,
160: p_copy_org_assignments => fnd_api.g_true,
161: p_copy_parties => fnd_api.g_true,
155: p_commit => fnd_api.g_false,
156: p_init_msg_list => fnd_api.g_true,
157: p_validation_level => fnd_api.g_valid_level_full,
158: p_source_instance_rec => l_src_instance_rec,
159: p_copy_ext_attribs => fnd_api.g_true,
160: p_copy_org_assignments => fnd_api.g_true,
161: p_copy_parties => fnd_api.g_true,
162: p_copy_accounts => fnd_api.g_true,
163: p_copy_asset_assignments => fnd_api.g_true,
156: p_init_msg_list => fnd_api.g_true,
157: p_validation_level => fnd_api.g_valid_level_full,
158: p_source_instance_rec => l_src_instance_rec,
159: p_copy_ext_attribs => fnd_api.g_true,
160: p_copy_org_assignments => fnd_api.g_true,
161: p_copy_parties => fnd_api.g_true,
162: p_copy_accounts => fnd_api.g_true,
163: p_copy_asset_assignments => fnd_api.g_true,
164: p_copy_pricing_attribs => fnd_api.g_true,
157: p_validation_level => fnd_api.g_valid_level_full,
158: p_source_instance_rec => l_src_instance_rec,
159: p_copy_ext_attribs => fnd_api.g_true,
160: p_copy_org_assignments => fnd_api.g_true,
161: p_copy_parties => fnd_api.g_true,
162: p_copy_accounts => fnd_api.g_true,
163: p_copy_asset_assignments => fnd_api.g_true,
164: p_copy_pricing_attribs => fnd_api.g_true,
165: p_txn_rec => px_txn_rec,
158: p_source_instance_rec => l_src_instance_rec,
159: p_copy_ext_attribs => fnd_api.g_true,
160: p_copy_org_assignments => fnd_api.g_true,
161: p_copy_parties => fnd_api.g_true,
162: p_copy_accounts => fnd_api.g_true,
163: p_copy_asset_assignments => fnd_api.g_true,
164: p_copy_pricing_attribs => fnd_api.g_true,
165: p_txn_rec => px_txn_rec,
166: x_new_instance_tbl => l_instance_tbl,
159: p_copy_ext_attribs => fnd_api.g_true,
160: p_copy_org_assignments => fnd_api.g_true,
161: p_copy_parties => fnd_api.g_true,
162: p_copy_accounts => fnd_api.g_true,
163: p_copy_asset_assignments => fnd_api.g_true,
164: p_copy_pricing_attribs => fnd_api.g_true,
165: p_txn_rec => px_txn_rec,
166: x_new_instance_tbl => l_instance_tbl,
167: x_return_status => l_return_status,
160: p_copy_org_assignments => fnd_api.g_true,
161: p_copy_parties => fnd_api.g_true,
162: p_copy_accounts => fnd_api.g_true,
163: p_copy_asset_assignments => fnd_api.g_true,
164: p_copy_pricing_attribs => fnd_api.g_true,
165: p_txn_rec => px_txn_rec,
166: x_new_instance_tbl => l_instance_tbl,
167: x_return_status => l_return_status,
168: x_msg_count => l_msg_count,
167: x_return_status => l_return_status,
168: x_msg_count => l_msg_count,
169: x_msg_data => l_msg_data);
170:
171: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
172: RAISE fnd_api.g_exc_error;
173: END IF;
174:
175: x_instance_tbl := l_instance_tbl;
168: x_msg_count => l_msg_count,
169: x_msg_data => l_msg_data);
170:
171: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
172: RAISE fnd_api.g_exc_error;
173: END IF;
174:
175: x_instance_tbl := l_instance_tbl;
176:
174:
175: x_instance_tbl := l_instance_tbl;
176:
177: EXCEPTION
178: WHEN fnd_api.g_exc_error THEN
179: x_return_status := fnd_api.g_ret_sts_error;
180: END auto_split_instances;
181:
182:
175: x_instance_tbl := l_instance_tbl;
176:
177: EXCEPTION
178: WHEN fnd_api.g_exc_error THEN
179: x_return_status := fnd_api.g_ret_sts_error;
180: END auto_split_instances;
181:
182:
183: -- added for the bug 5464761
194: l_ind binary_integer := 0;
195: l_all_cps_tbl csi_order_ship_pub.customer_products_tbl;
196: l_single_cps_tbl csi_order_ship_pub.customer_products_tbl;
197: l_acp_ind binary_integer := 0;
198: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
199: l_msg_count number;
200: l_msg_data varchar2(2000);
201:
202:
282: px_txn_rec => px_csi_txn_rec,
283: x_instance_tbl => l_auto_split_instances,
284: x_return_status => l_return_status);
285:
286: IF l_return_status <> fnd_api.g_ret_sts_success THEN
287: RAISE fnd_api.g_exc_error;
288: END IF;
289: END IF;
290:
283: x_instance_tbl => l_auto_split_instances,
284: x_return_status => l_return_status);
285:
286: IF l_return_status <> fnd_api.g_ret_sts_success THEN
287: RAISE fnd_api.g_exc_error;
288: END IF;
289: END IF;
290:
291:
370: p_api_name => 'explode_bom');
371:
372: csi_item_instance_grp.explode_bom( -- changes done to call the Group API for performance issues, bug3722382
373: p_api_version => 1.0,
374: p_commit => fnd_api.g_false,
375: p_init_msg_list => fnd_api.g_true,
376: p_validation_level => fnd_api.g_valid_level_full,
377: p_source_instance_tbl => l_bom_std_item_tbl,
378: p_explosion_level => fnd_api.g_miss_num,
371:
372: csi_item_instance_grp.explode_bom( -- changes done to call the Group API for performance issues, bug3722382
373: p_api_version => 1.0,
374: p_commit => fnd_api.g_false,
375: p_init_msg_list => fnd_api.g_true,
376: p_validation_level => fnd_api.g_valid_level_full,
377: p_source_instance_tbl => l_bom_std_item_tbl,
378: p_explosion_level => fnd_api.g_miss_num,
379: p_txn_rec => px_csi_txn_rec,
372: csi_item_instance_grp.explode_bom( -- changes done to call the Group API for performance issues, bug3722382
373: p_api_version => 1.0,
374: p_commit => fnd_api.g_false,
375: p_init_msg_list => fnd_api.g_true,
376: p_validation_level => fnd_api.g_valid_level_full,
377: p_source_instance_tbl => l_bom_std_item_tbl,
378: p_explosion_level => fnd_api.g_miss_num,
379: p_txn_rec => px_csi_txn_rec,
380: x_return_status => l_return_status,
374: p_commit => fnd_api.g_false,
375: p_init_msg_list => fnd_api.g_true,
376: p_validation_level => fnd_api.g_valid_level_full,
377: p_source_instance_tbl => l_bom_std_item_tbl,
378: p_explosion_level => fnd_api.g_miss_num,
379: p_txn_rec => px_csi_txn_rec,
380: x_return_status => l_return_status,
381: x_msg_count => l_msg_count,
382: x_msg_data => l_msg_data);
380: x_return_status => l_return_status,
381: x_msg_count => l_msg_count,
382: x_msg_data => l_msg_data);
383:
384: IF l_return_status <> fnd_api.g_ret_sts_success THEN
385: RAISE fnd_api.g_exc_error;
386: END IF;
387:
388: debug('explode bom end time :'||to_char(sysdate, 'hh24:mi:ss'));
381: x_msg_count => l_msg_count,
382: x_msg_data => l_msg_data);
383:
384: IF l_return_status <> fnd_api.g_ret_sts_success THEN
385: RAISE fnd_api.g_exc_error;
386: END IF;
387:
388: debug('explode bom end time :'||to_char(sysdate, 'hh24:mi:ss'));
389: END IF;
414:
415: l_loop_count number := 1;
416: l_quantity number;
417:
418: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
419: l_msg_count number;
420: l_msg_data varchar2(4000);
421:
422: BEGIN
420: l_msg_data varchar2(4000);
421:
422: BEGIN
423:
424: x_return_status := fnd_api.g_ret_sts_success;
425: api_log('create_dflt_txn_dtls');
426:
427: c_tl_rec.source_transaction_type_id := 51;
428: c_tl_rec.source_transaction_table := 'OE_ORDER_LINES_ALL';
456: c_tld_tbl(l_ind).quantity := l_quantity;
457: c_tld_tbl(l_ind).unit_of_measure := p_order_line_rec.order_quantity_uom;
458: c_tld_tbl(l_ind).processing_status := 'IN_PROCESS';
459:
460: IF nvl(px_default_info_rec.current_party_site_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
461: c_tld_tbl(l_ind).location_type_code := 'HZ_PARTY_SITES';
462: c_tld_tbl(l_ind).location_id := px_default_info_rec.current_party_site_id;
463: END IF;
464:
461: c_tld_tbl(l_ind).location_type_code := 'HZ_PARTY_SITES';
462: c_tld_tbl(l_ind).location_id := px_default_info_rec.current_party_site_id;
463: END IF;
464:
465: IF nvl(px_default_info_rec.install_party_site_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
466: c_tld_tbl(l_ind).install_location_type_code := 'HZ_PARTY_SITES';
467: c_tld_tbl(l_ind).install_location_id := px_default_info_rec.install_party_site_id;
468: END IF;
469:
486: ELSE
487: c_tpd_tbl(l_ind).party_source_id := px_default_info_rec.internal_party_id;
488: END IF;
489:
490: IF nvl(p_order_line_rec.sold_from_org_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
491: c_oa_tbl(l_ind).operating_unit_id := p_order_line_rec.sold_from_org_id;
492: c_oa_tbl(l_ind).relationship_type_code := 'SOLD_FROM';
493: c_oa_tbl(l_ind).preserve_detail_flag := 'Y';
494: c_oa_tbl(l_ind).txn_line_details_index := l_ind;
497: END LOOP;
498:
499: csi_t_txn_details_grp.create_transaction_dtls(
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: px_txn_line_rec => c_tl_rec,
505: px_txn_line_detail_tbl => c_tld_tbl,
498:
499: csi_t_txn_details_grp.create_transaction_dtls(
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: px_txn_line_rec => c_tl_rec,
505: px_txn_line_detail_tbl => c_tld_tbl,
506: px_txn_party_detail_tbl => c_tpd_tbl,
499: csi_t_txn_details_grp.create_transaction_dtls(
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: px_txn_line_rec => c_tl_rec,
505: px_txn_line_detail_tbl => c_tld_tbl,
506: px_txn_party_detail_tbl => c_tpd_tbl,
507: px_txn_pty_acct_detail_tbl => c_tpa_tbl,
512: x_return_status => l_return_status,
513: x_msg_count => l_msg_count,
514: x_msg_data => l_msg_data);
515:
516: IF l_return_status <> fnd_api.g_ret_sts_success THEN
517: RAISE fnd_api.g_exc_error;
518: END IF;
519:
520: x_txn_line_rec := c_tl_rec;
513: x_msg_count => l_msg_count,
514: x_msg_data => l_msg_data);
515:
516: IF l_return_status <> fnd_api.g_ret_sts_success THEN
517: RAISE fnd_api.g_exc_error;
518: END IF;
519:
520: x_txn_line_rec := c_tl_rec;
521: x_tld_tbl := c_tld_tbl;
521: x_tld_tbl := c_tld_tbl;
522: x_tiir_tbl := c_iir_tbl;
523:
524: EXCEPTION
525: WHEN fnd_api.g_exc_error THEN
526: x_return_status := fnd_api.g_ret_sts_error;
527: END create_dflt_txn_dtls;
528:
529: PROCEDURE get_parent_txn_line_status (
522: x_tiir_tbl := c_iir_tbl;
523:
524: EXCEPTION
525: WHEN fnd_api.g_exc_error THEN
526: x_return_status := fnd_api.g_ret_sts_error;
527: END create_dflt_txn_dtls;
528:
529: PROCEDURE get_parent_txn_line_status (
530: p_parent_line_id IN number,
563: x_return_status OUT NOCOPY varchar2)
564: IS
565: BEGIN
566:
567: x_return_status := fnd_api.g_ret_sts_success;
568:
569: x_instance_rec.instance_id := p_instance_header_rec.instance_id;
570: x_instance_rec.instance_number := p_instance_header_rec.instance_number;
571: x_instance_rec.external_reference := p_instance_header_rec.external_reference;
639: p_instance_header_tbl IN csi_datastructures_pub.instance_header_tbl,
640: x_instance_tbl OUT NOCOPY csi_datastructures_pub.instance_tbl,
641: x_return_status OUT NOCOPY varchar2)
642: IS
643: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
644: BEGIN
645:
646: x_return_status := fnd_api.g_ret_sts_success;
647:
642: IS
643: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
644: BEGIN
645:
646: x_return_status := fnd_api.g_ret_sts_success;
647:
648: IF p_instance_header_tbl.COUNT > 0 THEN
649: FOR l_ind IN p_instance_header_tbl.FIRST .. p_instance_header_tbl.LAST
650: LOOP
688:
689: l_instance_tbl csi_datastructures_pub.instance_tbl;
690: x_ind binary_integer := 0;
691:
692: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
693: l_msg_data varchar2(2000);
694: l_msg_count number;
695:
696: BEGIN
693: l_msg_data varchar2(2000);
694: l_msg_count number;
695:
696: BEGIN
697: x_return_status := fnd_api.g_ret_sts_success;
698: api_log('split_instances_using_copy');
699:
700: IF nvl(p_instance_rec.instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
701:
696: BEGIN
697: x_return_status := fnd_api.g_ret_sts_success;
698: api_log('split_instances_using_copy');
699:
700: IF nvl(p_instance_rec.instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
701:
702: l_instance_rec := p_instance_rec;
703:
704: IF p_instance_rec.quantity > 1 THEN
733: debug(' quantity : '||l_u_instance_rec.quantity);
734:
735: csi_item_instance_pub.update_item_instance(
736: p_api_version => 1.0,
737: p_commit => fnd_api.g_false,
738: p_init_msg_list => fnd_api.g_true,
739: p_validation_level => fnd_api.g_valid_level_full,
740: p_instance_rec => l_u_instance_rec,
741: p_party_tbl => l_u_parties_tbl,
734:
735: csi_item_instance_pub.update_item_instance(
736: p_api_version => 1.0,
737: p_commit => fnd_api.g_false,
738: p_init_msg_list => fnd_api.g_true,
739: p_validation_level => fnd_api.g_valid_level_full,
740: p_instance_rec => l_u_instance_rec,
741: p_party_tbl => l_u_parties_tbl,
742: p_account_tbl => l_u_pty_accts_tbl,
735: csi_item_instance_pub.update_item_instance(
736: p_api_version => 1.0,
737: p_commit => fnd_api.g_false,
738: p_init_msg_list => fnd_api.g_true,
739: p_validation_level => fnd_api.g_valid_level_full,
740: p_instance_rec => l_u_instance_rec,
741: p_party_tbl => l_u_parties_tbl,
742: p_account_tbl => l_u_pty_accts_tbl,
743: p_org_assignments_tbl => l_u_org_units_tbl,
749: x_return_status => l_return_status,
750: x_msg_count => l_msg_count,
751: x_msg_data => l_msg_data);
752:
753: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
754: RAISE fnd_api.g_exc_error;
755: END IF;
756:
757: x_ind := x_ind + 1;
750: x_msg_count => l_msg_count,
751: x_msg_data => l_msg_data);
752:
753: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
754: RAISE fnd_api.g_exc_error;
755: END IF;
756:
757: x_ind := x_ind + 1;
758: l_instance_tbl(x_ind) := p_instance_rec;
767: debug(' Inside API :csi_item_instance_pub.copy_item_instance');
768:
769: csi_item_instance_pub.copy_item_instance(
770: p_api_version => 1.0,
771: p_commit => fnd_api.g_false,
772: p_init_msg_list => fnd_api.g_true,
773: p_validation_level => fnd_api.g_valid_level_full,
774: p_source_instance_rec => l_instance_rec,
775: p_copy_ext_attribs => fnd_api.g_true,
768:
769: csi_item_instance_pub.copy_item_instance(
770: p_api_version => 1.0,
771: p_commit => fnd_api.g_false,
772: p_init_msg_list => fnd_api.g_true,
773: p_validation_level => fnd_api.g_valid_level_full,
774: p_source_instance_rec => l_instance_rec,
775: p_copy_ext_attribs => fnd_api.g_true,
776: p_copy_org_assignments => fnd_api.g_true,
769: csi_item_instance_pub.copy_item_instance(
770: p_api_version => 1.0,
771: p_commit => fnd_api.g_false,
772: p_init_msg_list => fnd_api.g_true,
773: p_validation_level => fnd_api.g_valid_level_full,
774: p_source_instance_rec => l_instance_rec,
775: p_copy_ext_attribs => fnd_api.g_true,
776: p_copy_org_assignments => fnd_api.g_true,
777: p_copy_parties => fnd_api.g_true,
771: p_commit => fnd_api.g_false,
772: p_init_msg_list => fnd_api.g_true,
773: p_validation_level => fnd_api.g_valid_level_full,
774: p_source_instance_rec => l_instance_rec,
775: p_copy_ext_attribs => fnd_api.g_true,
776: p_copy_org_assignments => fnd_api.g_true,
777: p_copy_parties => fnd_api.g_true,
778: p_copy_party_contacts => fnd_api.g_true,
779: p_copy_accounts => fnd_api.g_true,
772: p_init_msg_list => fnd_api.g_true,
773: p_validation_level => fnd_api.g_valid_level_full,
774: p_source_instance_rec => l_instance_rec,
775: p_copy_ext_attribs => fnd_api.g_true,
776: p_copy_org_assignments => fnd_api.g_true,
777: p_copy_parties => fnd_api.g_true,
778: p_copy_party_contacts => fnd_api.g_true,
779: p_copy_accounts => fnd_api.g_true,
780: p_copy_asset_assignments => fnd_api.g_true,
773: p_validation_level => fnd_api.g_valid_level_full,
774: p_source_instance_rec => l_instance_rec,
775: p_copy_ext_attribs => fnd_api.g_true,
776: p_copy_org_assignments => fnd_api.g_true,
777: p_copy_parties => fnd_api.g_true,
778: p_copy_party_contacts => fnd_api.g_true,
779: p_copy_accounts => fnd_api.g_true,
780: p_copy_asset_assignments => fnd_api.g_true,
781: p_copy_pricing_attribs => fnd_api.g_true,
774: p_source_instance_rec => l_instance_rec,
775: p_copy_ext_attribs => fnd_api.g_true,
776: p_copy_org_assignments => fnd_api.g_true,
777: p_copy_parties => fnd_api.g_true,
778: p_copy_party_contacts => fnd_api.g_true,
779: p_copy_accounts => fnd_api.g_true,
780: p_copy_asset_assignments => fnd_api.g_true,
781: p_copy_pricing_attribs => fnd_api.g_true,
782: p_copy_inst_children => fnd_api.g_false,
775: p_copy_ext_attribs => fnd_api.g_true,
776: p_copy_org_assignments => fnd_api.g_true,
777: p_copy_parties => fnd_api.g_true,
778: p_copy_party_contacts => fnd_api.g_true,
779: p_copy_accounts => fnd_api.g_true,
780: p_copy_asset_assignments => fnd_api.g_true,
781: p_copy_pricing_attribs => fnd_api.g_true,
782: p_copy_inst_children => fnd_api.g_false,
783: p_txn_rec => px_csi_txn_rec,
776: p_copy_org_assignments => fnd_api.g_true,
777: p_copy_parties => fnd_api.g_true,
778: p_copy_party_contacts => fnd_api.g_true,
779: p_copy_accounts => fnd_api.g_true,
780: p_copy_asset_assignments => fnd_api.g_true,
781: p_copy_pricing_attribs => fnd_api.g_true,
782: p_copy_inst_children => fnd_api.g_false,
783: p_txn_rec => px_csi_txn_rec,
784: x_new_instance_tbl => l_copy_instance_tbl,
777: p_copy_parties => fnd_api.g_true,
778: p_copy_party_contacts => fnd_api.g_true,
779: p_copy_accounts => fnd_api.g_true,
780: p_copy_asset_assignments => fnd_api.g_true,
781: p_copy_pricing_attribs => fnd_api.g_true,
782: p_copy_inst_children => fnd_api.g_false,
783: p_txn_rec => px_csi_txn_rec,
784: x_new_instance_tbl => l_copy_instance_tbl,
785: x_return_status => l_return_status,
778: p_copy_party_contacts => fnd_api.g_true,
779: p_copy_accounts => fnd_api.g_true,
780: p_copy_asset_assignments => fnd_api.g_true,
781: p_copy_pricing_attribs => fnd_api.g_true,
782: p_copy_inst_children => fnd_api.g_false,
783: p_txn_rec => px_csi_txn_rec,
784: x_new_instance_tbl => l_copy_instance_tbl,
785: x_return_status => l_return_status,
786: x_msg_count => l_msg_count,
785: x_return_status => l_return_status,
786: x_msg_count => l_msg_count,
787: x_msg_data => l_msg_data);
788:
789: IF l_return_status <> fnd_api.g_ret_sts_success THEN
790: RAISE fnd_api.g_exc_error;
791: END IF;
792:
793: IF l_copy_instance_tbl.COUNT > 0 THEN
786: x_msg_count => l_msg_count,
787: x_msg_data => l_msg_data);
788:
789: IF l_return_status <> fnd_api.g_ret_sts_success THEN
790: RAISE fnd_api.g_exc_error;
791: END IF;
792:
793: IF l_copy_instance_tbl.COUNT > 0 THEN
794: FOR c_ind IN l_copy_instance_tbl.FIRST .. l_copy_instance_tbl.LAST
800: debug(' quantity : '||l_copy_instance_tbl(c_ind).quantity);
801:
802: IF l_parent_instance_id is not null THEN
803:
804: l_ii_rltns_tbl(1).relationship_id := fnd_api.g_miss_num;
805: l_ii_rltns_tbl(1).relationship_type_code := 'COMPONENT-OF';
806: l_ii_rltns_tbl(1).object_id := l_parent_instance_id;
807: l_ii_rltns_tbl(1).subject_id := l_copy_instance_tbl(c_ind).instance_id;
808:
809: debug(' Inside API :csi_ii_relationships_pub.create_relationship');
810:
811: csi_ii_relationships_pub.create_relationship(
812: p_api_version => 1.0,
813: p_commit => fnd_api.g_false,
814: p_init_msg_list => fnd_api.g_true,
815: p_validation_level => fnd_api.g_valid_level_full,
816: p_relationship_tbl => l_ii_rltns_tbl,
817: p_txn_rec => px_csi_txn_rec,
810:
811: csi_ii_relationships_pub.create_relationship(
812: p_api_version => 1.0,
813: p_commit => fnd_api.g_false,
814: p_init_msg_list => fnd_api.g_true,
815: p_validation_level => fnd_api.g_valid_level_full,
816: p_relationship_tbl => l_ii_rltns_tbl,
817: p_txn_rec => px_csi_txn_rec,
818: x_return_status => l_return_status,
811: csi_ii_relationships_pub.create_relationship(
812: p_api_version => 1.0,
813: p_commit => fnd_api.g_false,
814: p_init_msg_list => fnd_api.g_true,
815: p_validation_level => fnd_api.g_valid_level_full,
816: p_relationship_tbl => l_ii_rltns_tbl,
817: p_txn_rec => px_csi_txn_rec,
818: x_return_status => l_return_status,
819: x_msg_count => l_msg_count,
818: x_return_status => l_return_status,
819: x_msg_count => l_msg_count,
820: x_msg_data => l_msg_data);
821:
822: IF l_return_status <> fnd_api.g_ret_sts_success THEN
823: RAISE fnd_api.g_exc_error;
824: END IF;
825:
826: END IF;
819: x_msg_count => l_msg_count,
820: x_msg_data => l_msg_data);
821:
822: IF l_return_status <> fnd_api.g_ret_sts_success THEN
823: RAISE fnd_api.g_exc_error;
824: END IF;
825:
826: END IF;
827: END LOOP;
847:
848: x_instance_tbl := l_instance_tbl;
849: END IF;
850: EXCEPTION
851: WHEN fnd_api.g_exc_error THEN
852: x_return_status := fnd_api.g_ret_sts_error;
853: END split_instances_using_copy;
854:
855: PROCEDURE split_instance(
848: x_instance_tbl := l_instance_tbl;
849: END IF;
850: EXCEPTION
851: WHEN fnd_api.g_exc_error THEN
852: x_return_status := fnd_api.g_ret_sts_error;
853: END split_instances_using_copy;
854:
855: PROCEDURE split_instance(
856: p_instance_id IN number,
867:
868: l_quantity1 number;
869: l_quantity2 number;
870:
871: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
872: l_msg_data varchar2(2000);
873: l_msg_count number;
874: BEGIN
875:
872: l_msg_data varchar2(2000);
873: l_msg_count number;
874: BEGIN
875:
876: x_return_status := fnd_api.g_ret_sts_success;
877: api_log('split_instance');
878:
879: SELECT quantity,
880: object_version_number
893: p_api_name => 'split_item_instance');
894:
895: csi_item_instance_pvt.split_item_instance (
896: p_api_version => 1.0,
897: p_commit => fnd_api.g_false,
898: p_init_msg_list => fnd_api.g_true,
899: p_validation_level => fnd_api.g_valid_level_full,
900: p_source_instance_rec => l_src_instance_rec,
901: p_quantity1 => l_quantity1,
894:
895: csi_item_instance_pvt.split_item_instance (
896: p_api_version => 1.0,
897: p_commit => fnd_api.g_false,
898: p_init_msg_list => fnd_api.g_true,
899: p_validation_level => fnd_api.g_valid_level_full,
900: p_source_instance_rec => l_src_instance_rec,
901: p_quantity1 => l_quantity1,
902: p_quantity2 => l_quantity2,
895: csi_item_instance_pvt.split_item_instance (
896: p_api_version => 1.0,
897: p_commit => fnd_api.g_false,
898: p_init_msg_list => fnd_api.g_true,
899: p_validation_level => fnd_api.g_valid_level_full,
900: p_source_instance_rec => l_src_instance_rec,
901: p_quantity1 => l_quantity1,
902: p_quantity2 => l_quantity2,
903: p_copy_ext_attribs => fnd_api.g_true,
899: p_validation_level => fnd_api.g_valid_level_full,
900: p_source_instance_rec => l_src_instance_rec,
901: p_quantity1 => l_quantity1,
902: p_quantity2 => l_quantity2,
903: p_copy_ext_attribs => fnd_api.g_true,
904: p_copy_org_assignments => fnd_api.g_true,
905: p_copy_parties => fnd_api.g_true,
906: p_copy_accounts => fnd_api.g_true,
907: p_copy_asset_assignments => fnd_api.g_true,
900: p_source_instance_rec => l_src_instance_rec,
901: p_quantity1 => l_quantity1,
902: p_quantity2 => l_quantity2,
903: p_copy_ext_attribs => fnd_api.g_true,
904: p_copy_org_assignments => fnd_api.g_true,
905: p_copy_parties => fnd_api.g_true,
906: p_copy_accounts => fnd_api.g_true,
907: p_copy_asset_assignments => fnd_api.g_true,
908: p_copy_pricing_attribs => fnd_api.g_true,
901: p_quantity1 => l_quantity1,
902: p_quantity2 => l_quantity2,
903: p_copy_ext_attribs => fnd_api.g_true,
904: p_copy_org_assignments => fnd_api.g_true,
905: p_copy_parties => fnd_api.g_true,
906: p_copy_accounts => fnd_api.g_true,
907: p_copy_asset_assignments => fnd_api.g_true,
908: p_copy_pricing_attribs => fnd_api.g_true,
909: p_txn_rec => px_csi_txn_rec,
902: p_quantity2 => l_quantity2,
903: p_copy_ext_attribs => fnd_api.g_true,
904: p_copy_org_assignments => fnd_api.g_true,
905: p_copy_parties => fnd_api.g_true,
906: p_copy_accounts => fnd_api.g_true,
907: p_copy_asset_assignments => fnd_api.g_true,
908: p_copy_pricing_attribs => fnd_api.g_true,
909: p_txn_rec => px_csi_txn_rec,
910: x_new_instance_rec => l_new_instance_rec,
903: p_copy_ext_attribs => fnd_api.g_true,
904: p_copy_org_assignments => fnd_api.g_true,
905: p_copy_parties => fnd_api.g_true,
906: p_copy_accounts => fnd_api.g_true,
907: p_copy_asset_assignments => fnd_api.g_true,
908: p_copy_pricing_attribs => fnd_api.g_true,
909: p_txn_rec => px_csi_txn_rec,
910: x_new_instance_rec => l_new_instance_rec,
911: x_return_status => l_return_status,
904: p_copy_org_assignments => fnd_api.g_true,
905: p_copy_parties => fnd_api.g_true,
906: p_copy_accounts => fnd_api.g_true,
907: p_copy_asset_assignments => fnd_api.g_true,
908: p_copy_pricing_attribs => fnd_api.g_true,
909: p_txn_rec => px_csi_txn_rec,
910: x_new_instance_rec => l_new_instance_rec,
911: x_return_status => l_return_status,
912: x_msg_count => l_msg_count,
911: x_return_status => l_return_status,
912: x_msg_count => l_msg_count,
913: x_msg_data => l_msg_data);
914:
915: IF l_return_status <> fnd_api.g_ret_sts_success THEN
916: RAISE fnd_api.g_exc_error;
917: END IF;
918:
919: x_instance_rec := l_new_instance_rec;
912: x_msg_count => l_msg_count,
913: x_msg_data => l_msg_data);
914:
915: IF l_return_status <> fnd_api.g_ret_sts_success THEN
916: RAISE fnd_api.g_exc_error;
917: END IF;
918:
919: x_instance_rec := l_new_instance_rec;
920:
919: x_instance_rec := l_new_instance_rec;
920:
921:
922: EXCEPTION
923: WHEN fnd_api.g_exc_error THEN
924: x_return_status := fnd_api.g_ret_sts_error;
925: END split_instance;
926:
927: PROCEDURE split_instance_using_ratio(
920:
921:
922: EXCEPTION
923: WHEN fnd_api.g_exc_error THEN
924: x_return_status := fnd_api.g_ret_sts_error;
925: END split_instance;
926:
927: PROCEDURE split_instance_using_ratio(
928: p_instance_id IN number,
939: l_init_instance_rec csi_datastructures_pub.instance_rec;
940: l_parent_instance_id number;
941: l_ii_rltns_tbl csi_datastructures_pub.ii_relationship_tbl;
942:
943: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
944: l_msg_data varchar2(2000);
945: l_msg_count number;
946:
947: l_split_flag boolean := FALSE;
984: c_pa_ind binary_integer;
985:
986: BEGIN
987:
988: x_return_status := fnd_api.g_ret_sts_success;
989:
990: api_log('split_instance_using_ratio');
991:
992: l_s_ind := 0;
997:
998: -- get the instance party and party account info
999: csi_item_instance_pub.get_item_instance_details(
1000: p_api_version => 1.0,
1001: p_commit => fnd_api.g_false,
1002: p_init_msg_list => fnd_api.g_true,
1003: p_validation_level => fnd_api.g_valid_level_full,
1004: p_instance_rec => l_g_instance_rec,
1005: p_get_parties => fnd_api.g_true,
998: -- get the instance party and party account info
999: csi_item_instance_pub.get_item_instance_details(
1000: p_api_version => 1.0,
1001: p_commit => fnd_api.g_false,
1002: p_init_msg_list => fnd_api.g_true,
1003: p_validation_level => fnd_api.g_valid_level_full,
1004: p_instance_rec => l_g_instance_rec,
1005: p_get_parties => fnd_api.g_true,
1006: p_party_header_tbl => l_g_ph_tbl,
999: csi_item_instance_pub.get_item_instance_details(
1000: p_api_version => 1.0,
1001: p_commit => fnd_api.g_false,
1002: p_init_msg_list => fnd_api.g_true,
1003: p_validation_level => fnd_api.g_valid_level_full,
1004: p_instance_rec => l_g_instance_rec,
1005: p_get_parties => fnd_api.g_true,
1006: p_party_header_tbl => l_g_ph_tbl,
1007: p_get_accounts => fnd_api.g_true,
1001: p_commit => fnd_api.g_false,
1002: p_init_msg_list => fnd_api.g_true,
1003: p_validation_level => fnd_api.g_valid_level_full,
1004: p_instance_rec => l_g_instance_rec,
1005: p_get_parties => fnd_api.g_true,
1006: p_party_header_tbl => l_g_ph_tbl,
1007: p_get_accounts => fnd_api.g_true,
1008: p_account_header_tbl => l_g_pah_tbl,
1009: p_get_org_assignments => fnd_api.g_false,
1003: p_validation_level => fnd_api.g_valid_level_full,
1004: p_instance_rec => l_g_instance_rec,
1005: p_get_parties => fnd_api.g_true,
1006: p_party_header_tbl => l_g_ph_tbl,
1007: p_get_accounts => fnd_api.g_true,
1008: p_account_header_tbl => l_g_pah_tbl,
1009: p_get_org_assignments => fnd_api.g_false,
1010: p_org_header_tbl => l_g_ouh_tbl,
1011: p_get_pricing_attribs => fnd_api.g_false,
1005: p_get_parties => fnd_api.g_true,
1006: p_party_header_tbl => l_g_ph_tbl,
1007: p_get_accounts => fnd_api.g_true,
1008: p_account_header_tbl => l_g_pah_tbl,
1009: p_get_org_assignments => fnd_api.g_false,
1010: p_org_header_tbl => l_g_ouh_tbl,
1011: p_get_pricing_attribs => fnd_api.g_false,
1012: p_pricing_attrib_tbl => l_g_pa_tbl,
1013: p_get_ext_attribs => fnd_api.g_false,
1007: p_get_accounts => fnd_api.g_true,
1008: p_account_header_tbl => l_g_pah_tbl,
1009: p_get_org_assignments => fnd_api.g_false,
1010: p_org_header_tbl => l_g_ouh_tbl,
1011: p_get_pricing_attribs => fnd_api.g_false,
1012: p_pricing_attrib_tbl => l_g_pa_tbl,
1013: p_get_ext_attribs => fnd_api.g_false,
1014: p_ext_attrib_tbl => l_g_eav_tbl,
1015: p_ext_attrib_def_tbl => l_g_ea_tbl,
1009: p_get_org_assignments => fnd_api.g_false,
1010: p_org_header_tbl => l_g_ouh_tbl,
1011: p_get_pricing_attribs => fnd_api.g_false,
1012: p_pricing_attrib_tbl => l_g_pa_tbl,
1013: p_get_ext_attribs => fnd_api.g_false,
1014: p_ext_attrib_tbl => l_g_eav_tbl,
1015: p_ext_attrib_def_tbl => l_g_ea_tbl,
1016: p_get_asset_assignments => fnd_api.g_false,
1017: p_asset_header_tbl => l_g_iah_tbl,
1012: p_pricing_attrib_tbl => l_g_pa_tbl,
1013: p_get_ext_attribs => fnd_api.g_false,
1014: p_ext_attrib_tbl => l_g_eav_tbl,
1015: p_ext_attrib_def_tbl => l_g_ea_tbl,
1016: p_get_asset_assignments => fnd_api.g_false,
1017: p_asset_header_tbl => l_g_iah_tbl,
1018: p_time_stamp => l_g_time_stamp,
1019: x_return_status => l_return_status,
1020: x_msg_count => l_msg_count,
1019: x_return_status => l_return_status,
1020: x_msg_count => l_msg_count,
1021: x_msg_data => l_msg_data);
1022:
1023: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1024: RAISE fnd_api.g_exc_error;
1025: END IF;
1026:
1027: make_non_header_rec(
1020: x_msg_count => l_msg_count,
1021: x_msg_data => l_msg_data);
1022:
1023: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1024: RAISE fnd_api.g_exc_error;
1025: END IF;
1026:
1027: make_non_header_rec(
1028: p_instance_header_rec => l_g_instance_rec,
1066:
1067: l_c_instance_rec := l_instance_rec;
1068:
1069: -- substitute create specific attributes
1070: l_c_instance_rec.instance_id := fnd_api.g_miss_num;
1071: l_c_instance_rec.instance_number := fnd_api.g_miss_char;
1072: l_c_instance_rec.object_version_number := 1.0;
1073: l_c_instance_rec.vld_organization_id := p_organization_id;
1074: l_c_instance_rec.quantity := p_qty_ratio;
1067: l_c_instance_rec := l_instance_rec;
1068:
1069: -- substitute create specific attributes
1070: l_c_instance_rec.instance_id := fnd_api.g_miss_num;
1071: l_c_instance_rec.instance_number := fnd_api.g_miss_char;
1072: l_c_instance_rec.object_version_number := 1.0;
1073: l_c_instance_rec.vld_organization_id := p_organization_id;
1074: l_c_instance_rec.quantity := p_qty_ratio;
1075:
1081: IF l_g_ph_tbl.COUNT > 0 THEN
1082:
1083: FOR l_pt_ind IN l_g_ph_tbl.FIRST ..l_g_ph_tbl.LAST
1084: LOOP
1085: l_c_parties_tbl(l_pt_ind).instance_party_id := fnd_api.g_miss_num;
1086: l_c_parties_tbl(l_pt_ind).instance_id := fnd_api.g_miss_num;
1087: l_c_parties_tbl(l_pt_ind).party_id :=
1088: l_g_ph_tbl(l_pt_ind).party_id;
1089: l_c_parties_tbl(l_pt_ind).party_source_table :=
1082:
1083: FOR l_pt_ind IN l_g_ph_tbl.FIRST ..l_g_ph_tbl.LAST
1084: LOOP
1085: l_c_parties_tbl(l_pt_ind).instance_party_id := fnd_api.g_miss_num;
1086: l_c_parties_tbl(l_pt_ind).instance_id := fnd_api.g_miss_num;
1087: l_c_parties_tbl(l_pt_ind).party_id :=
1088: l_g_ph_tbl(l_pt_ind).party_id;
1089: l_c_parties_tbl(l_pt_ind).party_source_table :=
1090: l_g_ph_tbl(l_pt_ind).party_source_table;
1099: IF l_g_pah_tbl(l_pa_ind).instance_party_id = l_g_ph_tbl(l_pt_ind).instance_party_id
1100: THEN
1101: c_pa_ind := c_pa_ind + 1;
1102: l_c_pty_accts_tbl(c_pa_ind).parent_tbl_index := l_pt_ind;
1103: l_c_pty_accts_tbl(c_pa_ind).ip_account_id := fnd_api.g_miss_num;
1104: l_c_pty_accts_tbl(c_pa_ind).instance_party_id := fnd_api.g_miss_num;
1105: l_c_pty_accts_tbl(c_pa_ind).party_account_id :=
1106: l_g_pah_tbl(l_pa_ind).party_account_id;
1107: l_c_pty_accts_tbl(c_pa_ind).relationship_type_code :=
1100: THEN
1101: c_pa_ind := c_pa_ind + 1;
1102: l_c_pty_accts_tbl(c_pa_ind).parent_tbl_index := l_pt_ind;
1103: l_c_pty_accts_tbl(c_pa_ind).ip_account_id := fnd_api.g_miss_num;
1104: l_c_pty_accts_tbl(c_pa_ind).instance_party_id := fnd_api.g_miss_num;
1105: l_c_pty_accts_tbl(c_pa_ind).party_account_id :=
1106: l_g_pah_tbl(l_pa_ind).party_account_id;
1107: l_c_pty_accts_tbl(c_pa_ind).relationship_type_code :=
1108: l_g_pah_tbl(l_pa_ind).relationship_type_code;
1119: debug(' Inside API :csi_item_instance_pub.create_item_instance');
1120:
1121: csi_item_instance_pub.create_item_instance(
1122: p_api_version => 1.0,
1123: p_commit => fnd_api.g_false,
1124: p_init_msg_list => fnd_api.g_true,
1125: p_validation_level => fnd_api.g_valid_level_full,
1126: p_instance_rec => l_c_instance_rec,
1127: p_party_tbl => l_c_parties_tbl,
1120:
1121: csi_item_instance_pub.create_item_instance(
1122: p_api_version => 1.0,
1123: p_commit => fnd_api.g_false,
1124: p_init_msg_list => fnd_api.g_true,
1125: p_validation_level => fnd_api.g_valid_level_full,
1126: p_instance_rec => l_c_instance_rec,
1127: p_party_tbl => l_c_parties_tbl,
1128: p_account_tbl => l_c_pty_accts_tbl,
1121: csi_item_instance_pub.create_item_instance(
1122: p_api_version => 1.0,
1123: p_commit => fnd_api.g_false,
1124: p_init_msg_list => fnd_api.g_true,
1125: p_validation_level => fnd_api.g_valid_level_full,
1126: p_instance_rec => l_c_instance_rec,
1127: p_party_tbl => l_c_parties_tbl,
1128: p_account_tbl => l_c_pty_accts_tbl,
1129: p_org_assignments_tbl => l_c_org_units_tbl,
1134: x_return_status => l_return_status,
1135: x_msg_count => l_msg_count,
1136: x_msg_data => l_msg_data );
1137:
1138: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1139: RAISE fnd_api.g_exc_error;
1140: END IF;
1141:
1142: debug(' new_instance_id : '||l_c_instance_rec.instance_id);
1135: x_msg_count => l_msg_count,
1136: x_msg_data => l_msg_data );
1137:
1138: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1139: RAISE fnd_api.g_exc_error;
1140: END IF;
1141:
1142: debug(' new_instance_id : '||l_c_instance_rec.instance_id);
1143:
1147: l_ii_rltns_tbl.delete;
1148:
1149: IF l_parent_instance_id is not null THEN
1150:
1151: l_ii_rltns_tbl(1).relationship_id := fnd_api.g_miss_num;
1152: l_ii_rltns_tbl(1).relationship_type_code := 'COMPONENT-OF';
1153: l_ii_rltns_tbl(1).object_id := l_parent_instance_id;
1154: l_ii_rltns_tbl(1).subject_id := l_c_instance_rec.instance_id;
1155:
1156: debug(' Inside API :csi_ii_relationships_pub.create_relationship');
1157:
1158: csi_ii_relationships_pub.create_relationship(
1159: p_api_version => 1.0,
1160: p_commit => fnd_api.g_false,
1161: p_init_msg_list => fnd_api.g_true,
1162: p_validation_level => fnd_api.g_valid_level_full,
1163: p_relationship_tbl => l_ii_rltns_tbl,
1164: p_txn_rec => px_csi_txn_rec,
1157:
1158: csi_ii_relationships_pub.create_relationship(
1159: p_api_version => 1.0,
1160: p_commit => fnd_api.g_false,
1161: p_init_msg_list => fnd_api.g_true,
1162: p_validation_level => fnd_api.g_valid_level_full,
1163: p_relationship_tbl => l_ii_rltns_tbl,
1164: p_txn_rec => px_csi_txn_rec,
1165: x_return_status => l_return_status,
1158: csi_ii_relationships_pub.create_relationship(
1159: p_api_version => 1.0,
1160: p_commit => fnd_api.g_false,
1161: p_init_msg_list => fnd_api.g_true,
1162: p_validation_level => fnd_api.g_valid_level_full,
1163: p_relationship_tbl => l_ii_rltns_tbl,
1164: p_txn_rec => px_csi_txn_rec,
1165: x_return_status => l_return_status,
1166: x_msg_count => l_msg_count,
1165: x_return_status => l_return_status,
1166: x_msg_count => l_msg_count,
1167: x_msg_data => l_msg_data);
1168:
1169: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1170: RAISE fnd_api.g_exc_error;
1171: END IF;
1172:
1173: END IF;
1166: x_msg_count => l_msg_count,
1167: x_msg_data => l_msg_data);
1168:
1169: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1170: RAISE fnd_api.g_exc_error;
1171: END IF;
1172:
1173: END IF;
1174:
1187: debug(' old_instance_id : '||l_u_instance_rec.instance_id);
1188:
1189: csi_item_instance_pub.update_item_instance(
1190: p_api_version => 1.0,
1191: p_commit => fnd_api.g_false,
1192: p_init_msg_list => fnd_api.g_true,
1193: p_validation_level => fnd_api.g_valid_level_full,
1194: p_instance_rec => l_u_instance_rec,
1195: p_party_tbl => l_u_parties_tbl,
1188:
1189: csi_item_instance_pub.update_item_instance(
1190: p_api_version => 1.0,
1191: p_commit => fnd_api.g_false,
1192: p_init_msg_list => fnd_api.g_true,
1193: p_validation_level => fnd_api.g_valid_level_full,
1194: p_instance_rec => l_u_instance_rec,
1195: p_party_tbl => l_u_parties_tbl,
1196: p_account_tbl => l_u_pty_accts_tbl,
1189: csi_item_instance_pub.update_item_instance(
1190: p_api_version => 1.0,
1191: p_commit => fnd_api.g_false,
1192: p_init_msg_list => fnd_api.g_true,
1193: p_validation_level => fnd_api.g_valid_level_full,
1194: p_instance_rec => l_u_instance_rec,
1195: p_party_tbl => l_u_parties_tbl,
1196: p_account_tbl => l_u_pty_accts_tbl,
1197: p_org_assignments_tbl => l_u_org_units_tbl,
1203: x_return_status => l_return_status,
1204: x_msg_count => l_msg_count,
1205: x_msg_data => l_msg_data);
1206:
1207: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
1208: RAISE fnd_api.g_exc_error;
1209: END IF;
1210:
1211: ELSE
1204: x_msg_count => l_msg_count,
1205: x_msg_data => l_msg_data);
1206:
1207: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
1208: RAISE fnd_api.g_exc_error;
1209: END IF;
1210:
1211: ELSE
1212:
1255:
1256: x_splitted_instances := l_splitted_instances;
1257:
1258: EXCEPTION
1259: WHEN fnd_api.g_exc_error THEN
1260: x_return_status := fnd_api.g_ret_sts_error;
1261: END split_instance_using_ratio;
1262:
1263:
1256: x_splitted_instances := l_splitted_instances;
1257:
1258: EXCEPTION
1259: WHEN fnd_api.g_exc_error THEN
1260: x_return_status := fnd_api.g_ret_sts_error;
1261: END split_instance_using_ratio;
1262:
1263:
1264: PROCEDURE query_immediate_children (
1336: l_lpad_string varchar2(80);
1337:
1338: BEGIN
1339:
1340: x_return_status := fnd_api.g_ret_sts_success;
1341: api_log('get_ib_trackable_children');
1342:
1343: debug('lvl_0_line_id : '||p_current_line_id);
1344: l_final_ind := 0;
1447:
1448: l_nxt_ind binary_integer;
1449: l_final_ind binary_integer;
1450:
1451: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
1452:
1453: BEGIN
1454:
1455: x_return_status := fnd_api.g_ret_sts_success;
1451: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
1452:
1453: BEGIN
1454:
1455: x_return_status := fnd_api.g_ret_sts_success;
1456:
1457: l_final_ind := 0;
1458:
1459: get_ib_trackable_children(
1530: AND default_flag = 'Y';
1531:
1532: EXCEPTION
1533: WHEN no_data_found THEN
1534: x_return_status := fnd_api.g_ret_sts_error;
1535: FND_MESSAGE.set_name('CSI','CSI_INVALID_TXN_TYPE_ID');
1536: FND_MSG_PUB.add;
1537: WHEN too_many_rows THEN
1538: x_return_status := fnd_api.g_ret_sts_error;
1534: x_return_status := fnd_api.g_ret_sts_error;
1535: FND_MESSAGE.set_name('CSI','CSI_INVALID_TXN_TYPE_ID');
1536: FND_MSG_PUB.add;
1537: WHEN too_many_rows THEN
1538: x_return_status := fnd_api.g_ret_sts_error;
1539: FND_MESSAGE.set_name('CSI','CSI_INVALID_TXN_TYPE_ID');
1540: FND_MSG_PUB.add;
1541: END get_txn_sub_type_id;
1542:
1565:
1566: l_c_pty_ind binary_integer;
1567: l_c_pa_ind binary_integer;
1568:
1569: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
1570: l_msg_count number;
1571: l_msg_data varchar2(2000);
1572:
1573: BEGIN
1571: l_msg_data varchar2(2000);
1572:
1573: BEGIN
1574:
1575: x_return_status := fnd_api.g_ret_sts_success;
1576:
1577: api_log('split_txn_dtls');
1578:
1579: l_split_count := 0;
1595:
1596: -- get_txn_line_details
1597: csi_t_txn_details_grp.get_transaction_details(
1598: p_api_version => 1,
1599: p_commit => fnd_api.g_false,
1600: p_init_msg_list => fnd_api.g_true,
1601: p_validation_level => fnd_api.g_valid_level_full,
1602: p_txn_line_query_rec => l_txn_line_query_rec,
1603: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1596: -- get_txn_line_details
1597: csi_t_txn_details_grp.get_transaction_details(
1598: p_api_version => 1,
1599: p_commit => fnd_api.g_false,
1600: p_init_msg_list => fnd_api.g_true,
1601: p_validation_level => fnd_api.g_valid_level_full,
1602: p_txn_line_query_rec => l_txn_line_query_rec,
1603: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1604: x_txn_line_detail_tbl => l_line_dtl_tbl,
1597: csi_t_txn_details_grp.get_transaction_details(
1598: p_api_version => 1,
1599: p_commit => fnd_api.g_false,
1600: p_init_msg_list => fnd_api.g_true,
1601: p_validation_level => fnd_api.g_valid_level_full,
1602: p_txn_line_query_rec => l_txn_line_query_rec,
1603: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1604: x_txn_line_detail_tbl => l_line_dtl_tbl,
1605: p_get_parties_flag => fnd_api.g_true,
1601: p_validation_level => fnd_api.g_valid_level_full,
1602: p_txn_line_query_rec => l_txn_line_query_rec,
1603: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1604: x_txn_line_detail_tbl => l_line_dtl_tbl,
1605: p_get_parties_flag => fnd_api.g_true,
1606: x_txn_party_detail_tbl => l_pty_dtl_tbl,
1607: p_get_pty_accts_flag => fnd_api.g_true,
1608: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1609: p_get_ii_rltns_flag => fnd_api.g_false,
1603: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1604: x_txn_line_detail_tbl => l_line_dtl_tbl,
1605: p_get_parties_flag => fnd_api.g_true,
1606: x_txn_party_detail_tbl => l_pty_dtl_tbl,
1607: p_get_pty_accts_flag => fnd_api.g_true,
1608: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1609: p_get_ii_rltns_flag => fnd_api.g_false,
1610: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1611: p_get_org_assgns_flag => fnd_api.g_true,
1605: p_get_parties_flag => fnd_api.g_true,
1606: x_txn_party_detail_tbl => l_pty_dtl_tbl,
1607: p_get_pty_accts_flag => fnd_api.g_true,
1608: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1609: p_get_ii_rltns_flag => fnd_api.g_false,
1610: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1611: p_get_org_assgns_flag => fnd_api.g_true,
1612: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1613: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1607: p_get_pty_accts_flag => fnd_api.g_true,
1608: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1609: p_get_ii_rltns_flag => fnd_api.g_false,
1610: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1611: p_get_org_assgns_flag => fnd_api.g_true,
1612: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1613: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1614: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1615: p_get_csi_attribs_flag => fnd_api.g_false,
1609: p_get_ii_rltns_flag => fnd_api.g_false,
1610: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1611: p_get_org_assgns_flag => fnd_api.g_true,
1612: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1613: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1614: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1615: p_get_csi_attribs_flag => fnd_api.g_false,
1616: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1617: p_get_csi_iea_values_flag => fnd_api.g_false,
1611: p_get_org_assgns_flag => fnd_api.g_true,
1612: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1613: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1614: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1615: p_get_csi_attribs_flag => fnd_api.g_false,
1616: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1617: p_get_csi_iea_values_flag => fnd_api.g_false,
1618: x_csi_iea_values_tbl => l_csi_eav_tbl,
1619: p_get_txn_systems_flag => fnd_api.g_false,
1613: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1614: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1615: p_get_csi_attribs_flag => fnd_api.g_false,
1616: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1617: p_get_csi_iea_values_flag => fnd_api.g_false,
1618: x_csi_iea_values_tbl => l_csi_eav_tbl,
1619: p_get_txn_systems_flag => fnd_api.g_false,
1620: x_txn_systems_tbl => l_txn_systems_tbl,
1621: x_return_status => l_return_status,
1615: p_get_csi_attribs_flag => fnd_api.g_false,
1616: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1617: p_get_csi_iea_values_flag => fnd_api.g_false,
1618: x_csi_iea_values_tbl => l_csi_eav_tbl,
1619: p_get_txn_systems_flag => fnd_api.g_false,
1620: x_txn_systems_tbl => l_txn_systems_tbl,
1621: x_return_status => l_return_status,
1622: x_msg_count => l_msg_count,
1623: x_msg_data => l_msg_data);
1621: x_return_status => l_return_status,
1622: x_msg_count => l_msg_count,
1623: x_msg_data => l_msg_data);
1624:
1625: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1626: debug('Error getting txn details for splitting the source for model.');
1627: RAISE fnd_api.g_exc_error;
1628: END IF;
1629:
1623: x_msg_data => l_msg_data);
1624:
1625: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1626: debug('Error getting txn details for splitting the source for model.');
1627: RAISE fnd_api.g_exc_error;
1628: END IF;
1629:
1630: FOR l_ind in 1..(p_line_dtl_tbl(l_td_ind).quantity - 1)
1631: LOOP
1652: ---Added (End) for m-to-m enhancements
1653:
1654: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
1655: p_api_version => 1.0,
1656: p_commit => fnd_api.g_false,
1657: p_init_msg_list => fnd_api.g_true,
1658: p_validation_level => fnd_api.g_valid_level_full,
1659: p_txn_line_dtl_index => 1,
1660: p_txn_line_dtl_rec => l_line_dtl_rec,
1653:
1654: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
1655: p_api_version => 1.0,
1656: p_commit => fnd_api.g_false,
1657: p_init_msg_list => fnd_api.g_true,
1658: p_validation_level => fnd_api.g_valid_level_full,
1659: p_txn_line_dtl_index => 1,
1660: p_txn_line_dtl_rec => l_line_dtl_rec,
1661: px_txn_party_dtl_tbl => l_pty_dtl_tbl,
1654: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
1655: p_api_version => 1.0,
1656: p_commit => fnd_api.g_false,
1657: p_init_msg_list => fnd_api.g_true,
1658: p_validation_level => fnd_api.g_valid_level_full,
1659: p_txn_line_dtl_index => 1,
1660: p_txn_line_dtl_rec => l_line_dtl_rec,
1661: px_txn_party_dtl_tbl => l_pty_dtl_tbl,
1662: px_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1666: x_return_status => l_return_status,
1667: x_msg_count => l_msg_count,
1668: x_msg_data => l_msg_data);
1669:
1670: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1671: debug('Error creating txn details for splitting the source for model.');
1672: raise fnd_api.g_exc_error;
1673: END IF;
1674:
1668: x_msg_data => l_msg_data);
1669:
1670: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1671: debug('Error creating txn details for splitting the source for model.');
1672: raise fnd_api.g_exc_error;
1673: END IF;
1674:
1675: l_line_dtl_tbl(1) := l_line_dtl_rec;
1676:
1689:
1690: debug('Splitted Transaction Details :'||l_split_count );
1691:
1692: EXCEPTION
1693: WHEN fnd_api.g_exc_error THEN
1694: l_return_status := FND_API.g_ret_sts_error;
1695: END split_txn_dtls;
1696:
1697: PROCEDURE split_txn_dtls_with_ratio(
1690: debug('Splitted Transaction Details :'||l_split_count );
1691:
1692: EXCEPTION
1693: WHEN fnd_api.g_exc_error THEN
1694: l_return_status := FND_API.g_ret_sts_error;
1695: END split_txn_dtls;
1696:
1697: PROCEDURE split_txn_dtls_with_ratio(
1698: p_quantity_ratio IN number,
1718:
1719: l_o_line_dtl_tbl csi_t_datastructures_grp.txn_line_detail_tbl;
1720: l_o_ind binary_integer := 0;
1721:
1722: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
1723: l_msg_count number;
1724: l_msg_data varchar2(2000);
1725:
1726: BEGIN
1724: l_msg_data varchar2(2000);
1725:
1726: BEGIN
1727:
1728: x_return_status := fnd_api.g_ret_sts_success;
1729: api_log('split_txn_dtls_with_ratio');
1730:
1731: IF px_line_dtl_tbl.COUNT > 0 THEN
1732: FOR l_td_ind in px_line_dtl_tbl.FIRST .. px_line_dtl_tbl.LAST
1746:
1747: -- get_txn_line_details
1748: csi_t_txn_details_grp.get_transaction_details(
1749: p_api_version => 1,
1750: p_commit => fnd_api.g_false,
1751: p_init_msg_list => fnd_api.g_true,
1752: p_validation_level => fnd_api.g_valid_level_full,
1753: p_txn_line_query_rec => l_txn_line_query_rec,
1754: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1747: -- get_txn_line_details
1748: csi_t_txn_details_grp.get_transaction_details(
1749: p_api_version => 1,
1750: p_commit => fnd_api.g_false,
1751: p_init_msg_list => fnd_api.g_true,
1752: p_validation_level => fnd_api.g_valid_level_full,
1753: p_txn_line_query_rec => l_txn_line_query_rec,
1754: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1755: x_txn_line_detail_tbl => l_line_dtl_tbl,
1748: csi_t_txn_details_grp.get_transaction_details(
1749: p_api_version => 1,
1750: p_commit => fnd_api.g_false,
1751: p_init_msg_list => fnd_api.g_true,
1752: p_validation_level => fnd_api.g_valid_level_full,
1753: p_txn_line_query_rec => l_txn_line_query_rec,
1754: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1755: x_txn_line_detail_tbl => l_line_dtl_tbl,
1756: p_get_parties_flag => fnd_api.g_true,
1752: p_validation_level => fnd_api.g_valid_level_full,
1753: p_txn_line_query_rec => l_txn_line_query_rec,
1754: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1755: x_txn_line_detail_tbl => l_line_dtl_tbl,
1756: p_get_parties_flag => fnd_api.g_true,
1757: x_txn_party_detail_tbl => l_pty_dtl_tbl,
1758: p_get_pty_accts_flag => fnd_api.g_true,
1759: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1760: p_get_ii_rltns_flag => fnd_api.g_false,
1754: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1755: x_txn_line_detail_tbl => l_line_dtl_tbl,
1756: p_get_parties_flag => fnd_api.g_true,
1757: x_txn_party_detail_tbl => l_pty_dtl_tbl,
1758: p_get_pty_accts_flag => fnd_api.g_true,
1759: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1760: p_get_ii_rltns_flag => fnd_api.g_false,
1761: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1762: p_get_org_assgns_flag => fnd_api.g_true,
1756: p_get_parties_flag => fnd_api.g_true,
1757: x_txn_party_detail_tbl => l_pty_dtl_tbl,
1758: p_get_pty_accts_flag => fnd_api.g_true,
1759: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1760: p_get_ii_rltns_flag => fnd_api.g_false,
1761: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1762: p_get_org_assgns_flag => fnd_api.g_true,
1763: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1764: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1758: p_get_pty_accts_flag => fnd_api.g_true,
1759: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1760: p_get_ii_rltns_flag => fnd_api.g_false,
1761: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1762: p_get_org_assgns_flag => fnd_api.g_true,
1763: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1764: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1765: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1766: p_get_csi_attribs_flag => fnd_api.g_false,
1760: p_get_ii_rltns_flag => fnd_api.g_false,
1761: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1762: p_get_org_assgns_flag => fnd_api.g_true,
1763: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1764: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1765: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1766: p_get_csi_attribs_flag => fnd_api.g_false,
1767: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1768: p_get_csi_iea_values_flag => fnd_api.g_false,
1762: p_get_org_assgns_flag => fnd_api.g_true,
1763: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1764: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1765: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1766: p_get_csi_attribs_flag => fnd_api.g_false,
1767: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1768: p_get_csi_iea_values_flag => fnd_api.g_false,
1769: x_csi_iea_values_tbl => l_csi_eav_tbl,
1770: p_get_txn_systems_flag => fnd_api.g_false,
1764: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1765: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1766: p_get_csi_attribs_flag => fnd_api.g_false,
1767: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1768: p_get_csi_iea_values_flag => fnd_api.g_false,
1769: x_csi_iea_values_tbl => l_csi_eav_tbl,
1770: p_get_txn_systems_flag => fnd_api.g_false,
1771: x_txn_systems_tbl => l_txn_systems_tbl,
1772: x_return_status => l_return_status,
1766: p_get_csi_attribs_flag => fnd_api.g_false,
1767: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1768: p_get_csi_iea_values_flag => fnd_api.g_false,
1769: x_csi_iea_values_tbl => l_csi_eav_tbl,
1770: p_get_txn_systems_flag => fnd_api.g_false,
1771: x_txn_systems_tbl => l_txn_systems_tbl,
1772: x_return_status => l_return_status,
1773: x_msg_count => l_msg_count,
1774: x_msg_data => l_msg_data);
1772: x_return_status => l_return_status,
1773: x_msg_count => l_msg_count,
1774: x_msg_data => l_msg_data);
1775:
1776: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1777: RAISE fnd_api.g_exc_error;
1778: END IF;
1779:
1780: IF l_line_dtl_tbl.COUNT > 0 THEN
1773: x_msg_count => l_msg_count,
1774: x_msg_data => l_msg_data);
1775:
1776: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1777: RAISE fnd_api.g_exc_error;
1778: END IF;
1779:
1780: IF l_line_dtl_tbl.COUNT > 0 THEN
1781:
1803: -- create transaction detail
1804:
1805: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
1806: p_api_version => 1.0,
1807: p_commit => fnd_api.g_false,
1808: p_init_msg_list => fnd_api.g_true,
1809: p_validation_level => fnd_api.g_valid_level_full,
1810: p_txn_line_dtl_index => 1,
1811: p_txn_line_dtl_rec => l_line_dtl_rec,
1804:
1805: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
1806: p_api_version => 1.0,
1807: p_commit => fnd_api.g_false,
1808: p_init_msg_list => fnd_api.g_true,
1809: p_validation_level => fnd_api.g_valid_level_full,
1810: p_txn_line_dtl_index => 1,
1811: p_txn_line_dtl_rec => l_line_dtl_rec,
1812: px_txn_party_dtl_tbl => l_pty_dtl_tbl,
1805: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
1806: p_api_version => 1.0,
1807: p_commit => fnd_api.g_false,
1808: p_init_msg_list => fnd_api.g_true,
1809: p_validation_level => fnd_api.g_valid_level_full,
1810: p_txn_line_dtl_index => 1,
1811: p_txn_line_dtl_rec => l_line_dtl_rec,
1812: px_txn_party_dtl_tbl => l_pty_dtl_tbl,
1813: px_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1817: x_return_status => l_return_status,
1818: x_msg_count => l_msg_count,
1819: x_msg_data => l_msg_data);
1820:
1821: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1822: raise fnd_api.g_exc_error;
1823: END IF;
1824:
1825: l_o_ind := l_o_ind + 1;
1818: x_msg_count => l_msg_count,
1819: x_msg_data => l_msg_data);
1820:
1821: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1822: raise fnd_api.g_exc_error;
1823: END IF;
1824:
1825: l_o_ind := l_o_ind + 1;
1826: l_o_line_dtl_tbl(l_o_ind) := l_line_dtl_rec;
1844: END IF;
1845: px_line_dtl_tbl := l_o_line_dtl_tbl;
1846:
1847: EXCEPTION
1848: WHEN fnd_api.g_exc_error THEN
1849: l_return_status := FND_API.g_ret_sts_error;
1850: END split_txn_dtls_with_ratio;
1851:
1852: /* private routine to determine the item type of the order line */
1845: px_line_dtl_tbl := l_o_line_dtl_tbl;
1846:
1847: EXCEPTION
1848: WHEN fnd_api.g_exc_error THEN
1849: l_return_status := FND_API.g_ret_sts_error;
1850: END split_txn_dtls_with_ratio;
1851:
1852: /* private routine to determine the item type of the order line */
1853: PROCEDURE get_item_type(
1937: l_parent_line_rec oe_order_pub.line_rec_type;
1938:
1939: BEGIN
1940:
1941: x_return_status := fnd_api.g_ret_sts_success;
1942:
1943: api_log('get_ib_trackable_parent');
1944:
1945: BEGIN
2016: l_n_org_assgn_tbl csi_t_datastructures_grp.txn_org_assgn_tbl;
2017: l_n_ext_attrib_tbl csi_t_datastructures_grp.txn_ext_attrib_vals_tbl;
2018: l_n_ii_rltns_tbl csi_t_datastructures_grp.txn_ii_rltns_tbl;
2019:
2020: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
2021: l_msg_count number;
2022: l_msg_data varchar2(4000);
2023:
2024: BEGIN
2022: l_msg_data varchar2(4000);
2023:
2024: BEGIN
2025:
2026: x_return_status := fnd_api.g_ret_sts_success;
2027:
2028: api_log('build_non_source_rec');
2029:
2030: l_g_instance_rec.instance_id := p_instance_id;
2030: l_g_instance_rec.instance_id := p_instance_id;
2031:
2032: debug(' instance_id : '||p_instance_id);
2033:
2034: IF nvl(p_instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
2035:
2036: csi_t_gen_utility_pvt.dump_api_info(
2037: p_pkg_name => 'csi_item_instance_pub',
2038: p_api_name => 'get_item_instance_details');
2039:
2040: -- get the instance party and party account info
2041: csi_item_instance_pub.get_item_instance_details(
2042: p_api_version => 1.0,
2043: p_commit => fnd_api.g_false,
2044: p_init_msg_list => fnd_api.g_true,
2045: p_validation_level => fnd_api.g_valid_level_full,
2046: p_instance_rec => l_g_instance_rec,
2047: p_get_parties => fnd_api.g_false,
2040: -- get the instance party and party account info
2041: csi_item_instance_pub.get_item_instance_details(
2042: p_api_version => 1.0,
2043: p_commit => fnd_api.g_false,
2044: p_init_msg_list => fnd_api.g_true,
2045: p_validation_level => fnd_api.g_valid_level_full,
2046: p_instance_rec => l_g_instance_rec,
2047: p_get_parties => fnd_api.g_false,
2048: p_party_header_tbl => l_g_ph_tbl,
2041: csi_item_instance_pub.get_item_instance_details(
2042: p_api_version => 1.0,
2043: p_commit => fnd_api.g_false,
2044: p_init_msg_list => fnd_api.g_true,
2045: p_validation_level => fnd_api.g_valid_level_full,
2046: p_instance_rec => l_g_instance_rec,
2047: p_get_parties => fnd_api.g_false,
2048: p_party_header_tbl => l_g_ph_tbl,
2049: p_get_accounts => fnd_api.g_false,
2043: p_commit => fnd_api.g_false,
2044: p_init_msg_list => fnd_api.g_true,
2045: p_validation_level => fnd_api.g_valid_level_full,
2046: p_instance_rec => l_g_instance_rec,
2047: p_get_parties => fnd_api.g_false,
2048: p_party_header_tbl => l_g_ph_tbl,
2049: p_get_accounts => fnd_api.g_false,
2050: p_account_header_tbl => l_g_pah_tbl,
2051: p_get_org_assignments => fnd_api.g_false,
2045: p_validation_level => fnd_api.g_valid_level_full,
2046: p_instance_rec => l_g_instance_rec,
2047: p_get_parties => fnd_api.g_false,
2048: p_party_header_tbl => l_g_ph_tbl,
2049: p_get_accounts => fnd_api.g_false,
2050: p_account_header_tbl => l_g_pah_tbl,
2051: p_get_org_assignments => fnd_api.g_false,
2052: p_org_header_tbl => l_g_ouh_tbl,
2053: p_get_pricing_attribs => fnd_api.g_false,
2047: p_get_parties => fnd_api.g_false,
2048: p_party_header_tbl => l_g_ph_tbl,
2049: p_get_accounts => fnd_api.g_false,
2050: p_account_header_tbl => l_g_pah_tbl,
2051: p_get_org_assignments => fnd_api.g_false,
2052: p_org_header_tbl => l_g_ouh_tbl,
2053: p_get_pricing_attribs => fnd_api.g_false,
2054: p_pricing_attrib_tbl => l_g_pa_tbl,
2055: p_get_ext_attribs => fnd_api.g_false,
2049: p_get_accounts => fnd_api.g_false,
2050: p_account_header_tbl => l_g_pah_tbl,
2051: p_get_org_assignments => fnd_api.g_false,
2052: p_org_header_tbl => l_g_ouh_tbl,
2053: p_get_pricing_attribs => fnd_api.g_false,
2054: p_pricing_attrib_tbl => l_g_pa_tbl,
2055: p_get_ext_attribs => fnd_api.g_false,
2056: p_ext_attrib_tbl => l_g_eav_tbl,
2057: p_ext_attrib_def_tbl => l_g_ea_tbl,
2051: p_get_org_assignments => fnd_api.g_false,
2052: p_org_header_tbl => l_g_ouh_tbl,
2053: p_get_pricing_attribs => fnd_api.g_false,
2054: p_pricing_attrib_tbl => l_g_pa_tbl,
2055: p_get_ext_attribs => fnd_api.g_false,
2056: p_ext_attrib_tbl => l_g_eav_tbl,
2057: p_ext_attrib_def_tbl => l_g_ea_tbl,
2058: p_get_asset_assignments => fnd_api.g_false,
2059: p_asset_header_tbl => l_g_iah_tbl,
2054: p_pricing_attrib_tbl => l_g_pa_tbl,
2055: p_get_ext_attribs => fnd_api.g_false,
2056: p_ext_attrib_tbl => l_g_eav_tbl,
2057: p_ext_attrib_def_tbl => l_g_ea_tbl,
2058: p_get_asset_assignments => fnd_api.g_false,
2059: p_asset_header_tbl => l_g_iah_tbl,
2060: p_time_stamp => l_g_time_stamp,
2061: x_return_status => l_return_status,
2062: x_msg_count => l_msg_count,
2061: x_return_status => l_return_status,
2062: x_msg_count => l_msg_count,
2063: x_msg_data => l_msg_data);
2064:
2065: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2066: RAISE fnd_api.g_exc_error;
2067: END IF;
2068:
2069: l_n_line_dtl_rec.txn_line_detail_id := fnd_api.g_miss_num;
2062: x_msg_count => l_msg_count,
2063: x_msg_data => l_msg_data);
2064:
2065: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2066: RAISE fnd_api.g_exc_error;
2067: END IF;
2068:
2069: l_n_line_dtl_rec.txn_line_detail_id := fnd_api.g_miss_num;
2070: l_n_line_dtl_rec.transaction_line_id := p_transaction_line_id;
2065: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2066: RAISE fnd_api.g_exc_error;
2067: END IF;
2068:
2069: l_n_line_dtl_rec.txn_line_detail_id := fnd_api.g_miss_num;
2070: l_n_line_dtl_rec.transaction_line_id := p_transaction_line_id;
2071: l_n_line_dtl_rec.sub_type_id := px_default_info_rec.sub_type_id;
2072: l_n_line_dtl_rec.processing_status := 'IN_PROCESS';
2073: l_n_line_dtl_rec.source_transaction_flag := 'N';
2088: l_n_line_dtl_rec.object_version_number := 1.0;
2089:
2090: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
2091: p_api_version => 1.0,
2092: p_commit => fnd_api.g_false,
2093: p_init_msg_list => fnd_api.g_true,
2094: p_validation_level => fnd_api.g_valid_level_full,
2095: p_txn_line_dtl_index => 1,
2096: p_txn_line_dtl_rec => l_n_line_dtl_rec,
2089:
2090: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
2091: p_api_version => 1.0,
2092: p_commit => fnd_api.g_false,
2093: p_init_msg_list => fnd_api.g_true,
2094: p_validation_level => fnd_api.g_valid_level_full,
2095: p_txn_line_dtl_index => 1,
2096: p_txn_line_dtl_rec => l_n_line_dtl_rec,
2097: px_txn_party_dtl_tbl => l_n_pty_dtl_tbl,
2090: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
2091: p_api_version => 1.0,
2092: p_commit => fnd_api.g_false,
2093: p_init_msg_list => fnd_api.g_true,
2094: p_validation_level => fnd_api.g_valid_level_full,
2095: p_txn_line_dtl_index => 1,
2096: p_txn_line_dtl_rec => l_n_line_dtl_rec,
2097: px_txn_party_dtl_tbl => l_n_pty_dtl_tbl,
2098: px_txn_pty_acct_detail_tbl => l_n_pty_acct_tbl,
2102: x_return_status => l_return_status,
2103: x_msg_count => l_msg_count,
2104: x_msg_data => l_msg_data);
2105:
2106: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2107: RAISE fnd_api.g_exc_error;
2108: END IF;
2109: debug('non_source_tld_id : '||l_n_line_dtl_rec.txn_line_detail_id);
2110: END IF;
2103: x_msg_count => l_msg_count,
2104: x_msg_data => l_msg_data);
2105:
2106: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2107: RAISE fnd_api.g_exc_error;
2108: END IF;
2109: debug('non_source_tld_id : '||l_n_line_dtl_rec.txn_line_detail_id);
2110: END IF;
2111: x_txn_line_dtl_id := l_n_line_dtl_rec.txn_line_detail_id;
2109: debug('non_source_tld_id : '||l_n_line_dtl_rec.txn_line_detail_id);
2110: END IF;
2111: x_txn_line_dtl_id := l_n_line_dtl_rec.txn_line_detail_id;
2112: EXCEPTION
2113: WHEN fnd_api.g_exc_error THEN
2114: x_return_status := fnd_api.g_ret_sts_error;
2115: END build_non_source_rec;
2116:
2117: PROCEDURE get_tld(
2110: END IF;
2111: x_txn_line_dtl_id := l_n_line_dtl_rec.txn_line_detail_id;
2112: EXCEPTION
2113: WHEN fnd_api.g_exc_error THEN
2114: x_return_status := fnd_api.g_ret_sts_error;
2115: END build_non_source_rec;
2116:
2117: PROCEDURE get_tld(
2118: p_source_table IN varchar2,
2135: l_csi_ea_tbl csi_t_datastructures_grp.csi_ext_attribs_tbl;
2136: l_csi_eav_tbl csi_t_datastructures_grp.csi_ext_attrib_vals_tbl;
2137: l_txn_systems_tbl csi_t_datastructures_grp.txn_systems_tbl;
2138:
2139: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
2140: l_msg_data varchar2(2000);
2141: l_msg_count number;
2142:
2143: BEGIN
2141: l_msg_count number;
2142:
2143: BEGIN
2144:
2145: x_return_status := fnd_api.g_ret_sts_success;
2146:
2147: api_log('get_tld');
2148:
2149: l_txn_line_query_rec.source_transaction_table := p_source_table;
2152: l_txn_line_detail_query_rec.processing_status := p_processing_status;
2153:
2154: csi_t_txn_details_grp.get_transaction_details(
2155: p_api_version => 1,
2156: p_commit => fnd_api.g_false,
2157: p_init_msg_list => fnd_api.g_true,
2158: p_validation_level => fnd_api.g_valid_level_full,
2159: p_txn_line_query_rec => l_txn_line_query_rec,
2160: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2153:
2154: csi_t_txn_details_grp.get_transaction_details(
2155: p_api_version => 1,
2156: p_commit => fnd_api.g_false,
2157: p_init_msg_list => fnd_api.g_true,
2158: p_validation_level => fnd_api.g_valid_level_full,
2159: p_txn_line_query_rec => l_txn_line_query_rec,
2160: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2161: x_txn_line_detail_tbl => l_line_dtl_tbl,
2154: csi_t_txn_details_grp.get_transaction_details(
2155: p_api_version => 1,
2156: p_commit => fnd_api.g_false,
2157: p_init_msg_list => fnd_api.g_true,
2158: p_validation_level => fnd_api.g_valid_level_full,
2159: p_txn_line_query_rec => l_txn_line_query_rec,
2160: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2161: x_txn_line_detail_tbl => l_line_dtl_tbl,
2162: p_get_parties_flag => fnd_api.g_false,
2158: p_validation_level => fnd_api.g_valid_level_full,
2159: p_txn_line_query_rec => l_txn_line_query_rec,
2160: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2161: x_txn_line_detail_tbl => l_line_dtl_tbl,
2162: p_get_parties_flag => fnd_api.g_false,
2163: x_txn_party_detail_tbl => l_pty_dtl_tbl,
2164: p_get_pty_accts_flag => fnd_api.g_false,
2165: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
2166: p_get_ii_rltns_flag => fnd_api.g_false,
2160: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2161: x_txn_line_detail_tbl => l_line_dtl_tbl,
2162: p_get_parties_flag => fnd_api.g_false,
2163: x_txn_party_detail_tbl => l_pty_dtl_tbl,
2164: p_get_pty_accts_flag => fnd_api.g_false,
2165: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
2166: p_get_ii_rltns_flag => fnd_api.g_false,
2167: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2168: p_get_org_assgns_flag => fnd_api.g_false,
2162: p_get_parties_flag => fnd_api.g_false,
2163: x_txn_party_detail_tbl => l_pty_dtl_tbl,
2164: p_get_pty_accts_flag => fnd_api.g_false,
2165: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
2166: p_get_ii_rltns_flag => fnd_api.g_false,
2167: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2168: p_get_org_assgns_flag => fnd_api.g_false,
2169: x_txn_org_assgn_tbl => l_org_assgn_tbl,
2170: p_get_ext_attrib_vals_flag => fnd_api.g_false,
2164: p_get_pty_accts_flag => fnd_api.g_false,
2165: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
2166: p_get_ii_rltns_flag => fnd_api.g_false,
2167: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2168: p_get_org_assgns_flag => fnd_api.g_false,
2169: x_txn_org_assgn_tbl => l_org_assgn_tbl,
2170: p_get_ext_attrib_vals_flag => fnd_api.g_false,
2171: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2172: p_get_csi_attribs_flag => fnd_api.g_false,
2166: p_get_ii_rltns_flag => fnd_api.g_false,
2167: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2168: p_get_org_assgns_flag => fnd_api.g_false,
2169: x_txn_org_assgn_tbl => l_org_assgn_tbl,
2170: p_get_ext_attrib_vals_flag => fnd_api.g_false,
2171: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2172: p_get_csi_attribs_flag => fnd_api.g_false,
2173: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2174: p_get_csi_iea_values_flag => fnd_api.g_false,
2168: p_get_org_assgns_flag => fnd_api.g_false,
2169: x_txn_org_assgn_tbl => l_org_assgn_tbl,
2170: p_get_ext_attrib_vals_flag => fnd_api.g_false,
2171: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2172: p_get_csi_attribs_flag => fnd_api.g_false,
2173: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2174: p_get_csi_iea_values_flag => fnd_api.g_false,
2175: x_csi_iea_values_tbl => l_csi_eav_tbl,
2176: p_get_txn_systems_flag => fnd_api.g_false,
2170: p_get_ext_attrib_vals_flag => fnd_api.g_false,
2171: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2172: p_get_csi_attribs_flag => fnd_api.g_false,
2173: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2174: p_get_csi_iea_values_flag => fnd_api.g_false,
2175: x_csi_iea_values_tbl => l_csi_eav_tbl,
2176: p_get_txn_systems_flag => fnd_api.g_false,
2177: x_txn_systems_tbl => l_txn_systems_tbl,
2178: x_return_status => l_return_status,
2172: p_get_csi_attribs_flag => fnd_api.g_false,
2173: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2174: p_get_csi_iea_values_flag => fnd_api.g_false,
2175: x_csi_iea_values_tbl => l_csi_eav_tbl,
2176: p_get_txn_systems_flag => fnd_api.g_false,
2177: x_txn_systems_tbl => l_txn_systems_tbl,
2178: x_return_status => l_return_status,
2179: x_msg_count => l_msg_count,
2180: x_msg_data => l_msg_data);
2178: x_return_status => l_return_status,
2179: x_msg_count => l_msg_count,
2180: x_msg_data => l_msg_data);
2181:
2182: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2183: raise fnd_api.g_exc_error;
2184: END IF;
2185:
2186: x_line_dtl_tbl := l_line_dtl_tbl;
2179: x_msg_count => l_msg_count,
2180: x_msg_data => l_msg_data);
2181:
2182: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2183: raise fnd_api.g_exc_error;
2184: END IF;
2185:
2186: x_line_dtl_tbl := l_line_dtl_tbl;
2187:
2185:
2186: x_line_dtl_tbl := l_line_dtl_tbl;
2187:
2188: EXCEPTION
2189: WHEN fnd_api.g_exc_error THEN
2190: x_return_status := fnd_api.g_ret_sts_error;
2191: END get_tld;
2192:
2193: PROCEDURE get_ato_options_only(
2186: x_line_dtl_tbl := l_line_dtl_tbl;
2187:
2188: EXCEPTION
2189: WHEN fnd_api.g_exc_error THEN
2190: x_return_status := fnd_api.g_ret_sts_error;
2191: END get_tld;
2192:
2193: PROCEDURE get_ato_options_only(
2194: px_line_tbl IN OUT nocopy oe_order_pub.line_tbl_type,
2196: IS
2197: o_line_tbl oe_order_pub.line_tbl_type;
2198: o_ind binary_integer := 0;
2199: BEGIN
2200: x_return_status := fnd_api.g_ret_sts_success;
2201: api_log('get_ato_options_only');
2202:
2203: IF px_line_tbl.COUNT > 0 THEN
2204: FOR l_ind IN px_line_tbl.FIRST .. px_line_tbl.LAST
2212:
2213: px_line_tbl := o_line_tbl;
2214:
2215: EXCEPTION
2216: WHEN fnd_api.g_exc_error THEN
2217: x_return_status := fnd_api.g_ret_sts_error;
2218: END get_ato_options_only;
2219:
2220: PROCEDURE get_parent_instances(
2213: px_line_tbl := o_line_tbl;
2214:
2215: EXCEPTION
2216: WHEN fnd_api.g_exc_error THEN
2217: x_return_status := fnd_api.g_ret_sts_error;
2218: END get_ato_options_only;
2219:
2220: PROCEDURE get_parent_instances(
2221: p_parent_line_id IN number,
2240: l_ind binary_integer := 0;
2241:
2242: BEGIN
2243:
2244: x_return_status := fnd_api.g_ret_sts_success;
2245:
2246: api_log('get_parent_instances');
2247:
2248: FOR inst_rec IN inst_cur
2286: l_install_site_use_id number;
2287:
2288: BEGIN
2289:
2290: x_return_status := fnd_api.g_ret_sts_success;
2291:
2292: api_log('get_partner_order_info');
2293:
2294: -- for partner ordering
2296: p_order_line_id => p_order_line_rec.line_id,
2297: x_partner_order_rec => l_partner_rec);
2298:
2299: -- customer
2300: IF nvl(l_partner_rec.ib_owner, fnd_api.g_miss_char) <> fnd_api.g_miss_char THEN
2301: IF l_partner_rec.ib_owner = 'INSTALL_BASE' THEN
2302: l_end_customer_id := fnd_api.g_miss_num;
2303: ELSE
2304:
2298:
2299: -- customer
2300: IF nvl(l_partner_rec.ib_owner, fnd_api.g_miss_char) <> fnd_api.g_miss_char THEN
2301: IF l_partner_rec.ib_owner = 'INSTALL_BASE' THEN
2302: l_end_customer_id := fnd_api.g_miss_num;
2303: ELSE
2304:
2305: IF l_partner_rec.ib_owner = 'END_CUSTOMER' THEN
2306: l_end_customer_id := l_partner_rec.end_customer_id;
2307: ELSIF l_partner_rec.ib_owner = 'SOLD_TO' THEN
2308: l_end_customer_id := p_order_line_rec.sold_to_org_id;
2309: END IF;
2310:
2311: IF nvl(l_end_customer_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
2312: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
2313: fnd_msg_pub.add;
2314: RAISE fnd_api.g_exc_error;
2315: END IF;
2310:
2311: IF nvl(l_end_customer_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
2312: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
2313: fnd_msg_pub.add;
2314: RAISE fnd_api.g_exc_error;
2315: END IF;
2316:
2317: END IF;
2318: ELSE
2320: l_end_customer_id := p_order_line_rec.sold_to_org_id;
2321: END IF;
2322:
2323: -- current location
2324: IF nvl(l_partner_rec.ib_current_location, fnd_api.g_miss_char) <> fnd_api.g_miss_char THEN
2325: IF l_partner_rec.ib_current_location = 'INSTALL_BASE' THEN
2326: l_current_site_use_id := fnd_api.g_miss_num;
2327: ELSE
2328:
2322:
2323: -- current location
2324: IF nvl(l_partner_rec.ib_current_location, fnd_api.g_miss_char) <> fnd_api.g_miss_char THEN
2325: IF l_partner_rec.ib_current_location = 'INSTALL_BASE' THEN
2326: l_current_site_use_id := fnd_api.g_miss_num;
2327: ELSE
2328:
2329: IF l_partner_rec.ib_current_location = 'END_CUSTOMER' THEN
2330: l_current_site_use_id := l_partner_rec.end_customer_site_use_id;
2336: l_current_site_use_id := p_order_line_rec.deliver_to_org_id;
2337: ELSIF l_partner_rec.ib_current_location = 'BILL_TO' THEN
2338: l_current_site_use_id := p_order_line_rec.invoice_to_org_id;
2339: END IF;
2340: IF nvl(l_current_site_use_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
2341: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
2342: fnd_msg_pub.add;
2343: RAISE fnd_api.g_exc_error;
2344: END IF;
2339: END IF;
2340: IF nvl(l_current_site_use_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
2341: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
2342: fnd_msg_pub.add;
2343: RAISE fnd_api.g_exc_error;
2344: END IF;
2345:
2346: END IF;
2347:
2350: l_current_site_use_id := p_order_line_rec.ship_to_org_id;
2351: END IF;
2352:
2353: -- installed at location
2354: IF nvl(l_partner_rec.ib_installed_at_location, fnd_api.g_miss_char) <> fnd_api.g_miss_char THEN
2355: IF l_partner_rec.ib_installed_at_location = 'INSTALL_BASE' THEN
2356: l_install_site_use_id := fnd_api.g_miss_num;
2357: ELSE
2358:
2352:
2353: -- installed at location
2354: IF nvl(l_partner_rec.ib_installed_at_location, fnd_api.g_miss_char) <> fnd_api.g_miss_char THEN
2355: IF l_partner_rec.ib_installed_at_location = 'INSTALL_BASE' THEN
2356: l_install_site_use_id := fnd_api.g_miss_num;
2357: ELSE
2358:
2359: IF l_partner_rec.ib_installed_at_location = 'END_CUSTOMER' THEN
2360: l_install_site_use_id := l_partner_rec.end_customer_site_use_id;
2366: l_install_site_use_id := p_order_line_rec.deliver_to_org_id;
2367: ELSIF l_partner_rec.ib_installed_at_location = 'BILL_TO' THEN
2368: l_install_site_use_id := p_order_line_rec.invoice_to_org_id;
2369: END IF;
2370: IF nvl(l_install_site_use_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
2371: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
2372: fnd_msg_pub.add;
2373: RAISE fnd_api.g_exc_error;
2374: END IF;
2369: END IF;
2370: IF nvl(l_install_site_use_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
2371: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
2372: fnd_msg_pub.add;
2373: RAISE fnd_api.g_exc_error;
2374: END IF;
2375:
2376: END IF;
2377:
2388: x_current_site_use_id := l_current_site_use_id;
2389: x_install_site_use_id := l_install_site_use_id;
2390:
2391: EXCEPTION
2392: WHEN fnd_api.g_exc_error THEN
2393: x_return_status := fnd_api.g_ret_sts_error;
2394: END get_partner_order_info;
2395:
2396:
2389: x_install_site_use_id := l_install_site_use_id;
2390:
2391: EXCEPTION
2392: WHEN fnd_api.g_exc_error THEN
2393: x_return_status := fnd_api.g_ret_sts_error;
2394: END get_partner_order_info;
2395:
2396:
2397: PROCEDURE convert_wip_instance_to_cp(
2443: l_src_change_owner varchar2(1);
2444: l_src_change_owner_to_code varchar2(1);
2445: l_src_status_id number;
2446:
2447: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
2448: l_msg_count number;
2449: l_msg_data varchar2(2000);
2450:
2451: l_ind binary_integer := 0;
2464: x_sub_type_id OUT nocopy number,
2465: x_cascade_owner_flag OUT nocopy varchar2,
2466: x_tld_found OUT NOCOPY VARCHAR2 )
2467: IS
2468: l_tld_found VARCHAR2(1) := fnd_api.g_false;
2469: l_txn_line_detail_id NUMBER;
2470: l_tld_tbl csi_t_datastructures_grp.txn_line_detail_tbl;
2471: l_txn_line_query_rec csi_t_datastructures_grp.txn_line_query_rec;
2472: l_txn_line_detail_query_rec csi_t_datastructures_grp.txn_line_detail_query_rec;
2474: l_ext_attrib_tbl csi_t_datastructures_grp.txn_ext_attrib_vals_tbl;
2475: l_csi_ea_tbl csi_t_datastructures_grp.csi_ext_attribs_tbl;
2476: l_csi_iea_values_tbl csi_t_datastructures_grp.csi_ext_attrib_vals_tbl;
2477: l_ii_rltns_tbl csi_t_datastructures_grp.txn_ii_rltns_tbl;
2478: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
2479: l_msg_count number;
2480: l_msg_data varchar2(2000);
2481:
2482: BEGIN
2486: IF p_tld_tbl(p_ind).instance_id = p_instance_id THEN
2487: x_sub_type_id := p_tld_tbl(p_ind).sub_type_id;
2488: x_cascade_owner_flag := p_tld_tbl(p_ind).cascade_owner_flag;
2489: l_txn_line_detail_id := p_tld_tbl(p_ind).txn_line_detail_id;
2490: l_tld_found := fnd_api.g_true;
2491: exit;
2492: END IF;
2493: END LOOP;
2494:
2491: exit;
2492: END IF;
2493: END LOOP;
2494:
2495: IF l_tld_found = fnd_api.g_false THEN
2496: x_sub_type_id := p_tld_tbl(1).sub_type_id;
2497: x_cascade_owner_flag := p_tld_tbl(1).cascade_owner_flag;
2498: l_txn_line_detail_id := p_tld_tbl(1).txn_line_detail_id;
2499: END IF;
2501:
2502: -- get_txn_line_details
2503: csi_t_txn_details_grp.get_transaction_details(
2504: p_api_version => 1,
2505: p_commit => fnd_api.g_false,
2506: p_init_msg_list => fnd_api.g_true,
2507: p_validation_level => fnd_api.g_valid_level_full,
2508: p_txn_line_query_rec => l_txn_line_query_rec,
2509: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2502: -- get_txn_line_details
2503: csi_t_txn_details_grp.get_transaction_details(
2504: p_api_version => 1,
2505: p_commit => fnd_api.g_false,
2506: p_init_msg_list => fnd_api.g_true,
2507: p_validation_level => fnd_api.g_valid_level_full,
2508: p_txn_line_query_rec => l_txn_line_query_rec,
2509: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2510: x_txn_line_detail_tbl => l_tld_tbl,
2503: csi_t_txn_details_grp.get_transaction_details(
2504: p_api_version => 1,
2505: p_commit => fnd_api.g_false,
2506: p_init_msg_list => fnd_api.g_true,
2507: p_validation_level => fnd_api.g_valid_level_full,
2508: p_txn_line_query_rec => l_txn_line_query_rec,
2509: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2510: x_txn_line_detail_tbl => l_tld_tbl,
2511: p_get_parties_flag => fnd_api.g_true,
2507: p_validation_level => fnd_api.g_valid_level_full,
2508: p_txn_line_query_rec => l_txn_line_query_rec,
2509: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2510: x_txn_line_detail_tbl => l_tld_tbl,
2511: p_get_parties_flag => fnd_api.g_true,
2512: x_txn_party_detail_tbl => x_pty_dtl_tbl,
2513: p_get_pty_accts_flag => fnd_api.g_true,
2514: x_txn_pty_acct_detail_tbl => x_pty_acct_tbl,
2515: p_get_ii_rltns_flag => fnd_api.g_false,
2509: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2510: x_txn_line_detail_tbl => l_tld_tbl,
2511: p_get_parties_flag => fnd_api.g_true,
2512: x_txn_party_detail_tbl => x_pty_dtl_tbl,
2513: p_get_pty_accts_flag => fnd_api.g_true,
2514: x_txn_pty_acct_detail_tbl => x_pty_acct_tbl,
2515: p_get_ii_rltns_flag => fnd_api.g_false,
2516: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2517: p_get_org_assgns_flag => fnd_api.g_true,
2511: p_get_parties_flag => fnd_api.g_true,
2512: x_txn_party_detail_tbl => x_pty_dtl_tbl,
2513: p_get_pty_accts_flag => fnd_api.g_true,
2514: x_txn_pty_acct_detail_tbl => x_pty_acct_tbl,
2515: p_get_ii_rltns_flag => fnd_api.g_false,
2516: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2517: p_get_org_assgns_flag => fnd_api.g_true,
2518: x_txn_org_assgn_tbl => x_org_assgn_tbl,
2519: p_get_ext_attrib_vals_flag => fnd_api.g_true,
2513: p_get_pty_accts_flag => fnd_api.g_true,
2514: x_txn_pty_acct_detail_tbl => x_pty_acct_tbl,
2515: p_get_ii_rltns_flag => fnd_api.g_false,
2516: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2517: p_get_org_assgns_flag => fnd_api.g_true,
2518: x_txn_org_assgn_tbl => x_org_assgn_tbl,
2519: p_get_ext_attrib_vals_flag => fnd_api.g_true,
2520: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2521: p_get_csi_attribs_flag => fnd_api.g_false,
2515: p_get_ii_rltns_flag => fnd_api.g_false,
2516: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2517: p_get_org_assgns_flag => fnd_api.g_true,
2518: x_txn_org_assgn_tbl => x_org_assgn_tbl,
2519: p_get_ext_attrib_vals_flag => fnd_api.g_true,
2520: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2521: p_get_csi_attribs_flag => fnd_api.g_false,
2522: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2523: p_get_csi_iea_values_flag => fnd_api.g_false,
2517: p_get_org_assgns_flag => fnd_api.g_true,
2518: x_txn_org_assgn_tbl => x_org_assgn_tbl,
2519: p_get_ext_attrib_vals_flag => fnd_api.g_true,
2520: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2521: p_get_csi_attribs_flag => fnd_api.g_false,
2522: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2523: p_get_csi_iea_values_flag => fnd_api.g_false,
2524: x_csi_iea_values_tbl => l_csi_iea_values_tbl,
2525: p_get_txn_systems_flag => fnd_api.g_false,
2519: p_get_ext_attrib_vals_flag => fnd_api.g_true,
2520: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2521: p_get_csi_attribs_flag => fnd_api.g_false,
2522: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2523: p_get_csi_iea_values_flag => fnd_api.g_false,
2524: x_csi_iea_values_tbl => l_csi_iea_values_tbl,
2525: p_get_txn_systems_flag => fnd_api.g_false,
2526: x_txn_systems_tbl => l_txn_systems_tbl,
2527: x_return_status => l_return_status,
2521: p_get_csi_attribs_flag => fnd_api.g_false,
2522: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2523: p_get_csi_iea_values_flag => fnd_api.g_false,
2524: x_csi_iea_values_tbl => l_csi_iea_values_tbl,
2525: p_get_txn_systems_flag => fnd_api.g_false,
2526: x_txn_systems_tbl => l_txn_systems_tbl,
2527: x_return_status => l_return_status,
2528: x_msg_count => l_msg_count,
2529: x_msg_data => l_msg_data);
2527: x_return_status => l_return_status,
2528: x_msg_count => l_msg_count,
2529: x_msg_data => l_msg_data);
2530: IF nvl(l_tld_tbl.count,0) > 0 THEN
2531: l_tld_found := fnd_api.g_true ;
2532: px_tld_tbl(1) := l_tld_tbl(1);
2533: ELSE
2534: l_tld_found := fnd_api.g_false;
2535: x_sub_type_id := px_default_info_rec.sub_type_id;
2530: IF nvl(l_tld_tbl.count,0) > 0 THEN
2531: l_tld_found := fnd_api.g_true ;
2532: px_tld_tbl(1) := l_tld_tbl(1);
2533: ELSE
2534: l_tld_found := fnd_api.g_false;
2535: x_sub_type_id := px_default_info_rec.sub_type_id;
2536: x_cascade_owner_flag := px_default_info_rec.ownership_cascade_at_txn;
2537:
2538: END IF;
2535: x_sub_type_id := px_default_info_rec.sub_type_id;
2536: x_cascade_owner_flag := px_default_info_rec.ownership_cascade_at_txn;
2537:
2538: END IF;
2539: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2540: debug('Error getting txn details before converting item instance to customer product.');
2541: RAISE fnd_api.g_exc_error;
2542: ELSE
2543: csi_t_utilities_pvt.convert_ids_to_index(
2537:
2538: END IF;
2539: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2540: debug('Error getting txn details before converting item instance to customer product.');
2541: RAISE fnd_api.g_exc_error;
2542: ELSE
2543: csi_t_utilities_pvt.convert_ids_to_index(
2544: px_line_dtl_tbl => px_tld_tbl,
2545: px_pty_dtl_tbl => x_pty_dtl_tbl,
2557: END get_info_from_tld;
2558:
2559: BEGIN
2560:
2561: x_return_status := fnd_api.g_ret_sts_success;
2562: api_log('convert_wip_instance_to_cp');
2563:
2564: -- check if the instance is in WIP
2565: SELECT object_version_number,
2628: x_sub_type_id => l_sub_type_id,
2629: x_cascade_owner_flag => l_cascade_owner_flag,
2630: x_tld_found => l_tld_found );
2631:
2632: IF l_tld_found = fnd_api.g_true THEN
2633: FOR l_index IN l_tld_tbl.FIRST..l_tld_tbl.FIRST
2634: LOOP
2635: l_u_instance_rec.instance_id := p_instance_id;
2636: l_u_instance_rec.instance_number := fnd_api.g_miss_char;
2632: IF l_tld_found = fnd_api.g_true THEN
2633: FOR l_index IN l_tld_tbl.FIRST..l_tld_tbl.FIRST
2634: LOOP
2635: l_u_instance_rec.instance_id := p_instance_id;
2636: l_u_instance_rec.instance_number := fnd_api.g_miss_char;
2637: l_u_instance_rec.external_reference := nvl(l_tld_tbl(l_index).external_reference,fnd_api.g_miss_char);
2638: l_u_instance_rec.unit_of_measure := l_tld_tbl(l_index).unit_of_measure;
2639: l_u_instance_rec.instance_condition_id := nvl(l_tld_tbl(l_index).item_condition_id,fnd_api.g_miss_num);
2640: l_u_instance_rec.sellable_flag := nvl(l_tld_tbl(l_index).sellable_flag,fnd_api.g_miss_char);
2633: FOR l_index IN l_tld_tbl.FIRST..l_tld_tbl.FIRST
2634: LOOP
2635: l_u_instance_rec.instance_id := p_instance_id;
2636: l_u_instance_rec.instance_number := fnd_api.g_miss_char;
2637: l_u_instance_rec.external_reference := nvl(l_tld_tbl(l_index).external_reference,fnd_api.g_miss_char);
2638: l_u_instance_rec.unit_of_measure := l_tld_tbl(l_index).unit_of_measure;
2639: l_u_instance_rec.instance_condition_id := nvl(l_tld_tbl(l_index).item_condition_id,fnd_api.g_miss_num);
2640: l_u_instance_rec.sellable_flag := nvl(l_tld_tbl(l_index).sellable_flag,fnd_api.g_miss_char);
2641: l_u_instance_rec.system_id := nvl(l_tld_tbl(l_index).csi_system_id ,fnd_api.g_miss_num);
2635: l_u_instance_rec.instance_id := p_instance_id;
2636: l_u_instance_rec.instance_number := fnd_api.g_miss_char;
2637: l_u_instance_rec.external_reference := nvl(l_tld_tbl(l_index).external_reference,fnd_api.g_miss_char);
2638: l_u_instance_rec.unit_of_measure := l_tld_tbl(l_index).unit_of_measure;
2639: l_u_instance_rec.instance_condition_id := nvl(l_tld_tbl(l_index).item_condition_id,fnd_api.g_miss_num);
2640: l_u_instance_rec.sellable_flag := nvl(l_tld_tbl(l_index).sellable_flag,fnd_api.g_miss_char);
2641: l_u_instance_rec.system_id := nvl(l_tld_tbl(l_index).csi_system_id ,fnd_api.g_miss_num);
2642: l_u_instance_rec.instance_type_code := nvl(l_tld_tbl(l_index).instance_type_code,fnd_api.g_miss_char);
2643: l_u_instance_rec.install_date := nvl(l_tld_tbl(l_index).installation_date,fnd_api.g_miss_date);
2636: l_u_instance_rec.instance_number := fnd_api.g_miss_char;
2637: l_u_instance_rec.external_reference := nvl(l_tld_tbl(l_index).external_reference,fnd_api.g_miss_char);
2638: l_u_instance_rec.unit_of_measure := l_tld_tbl(l_index).unit_of_measure;
2639: l_u_instance_rec.instance_condition_id := nvl(l_tld_tbl(l_index).item_condition_id,fnd_api.g_miss_num);
2640: l_u_instance_rec.sellable_flag := nvl(l_tld_tbl(l_index).sellable_flag,fnd_api.g_miss_char);
2641: l_u_instance_rec.system_id := nvl(l_tld_tbl(l_index).csi_system_id ,fnd_api.g_miss_num);
2642: l_u_instance_rec.instance_type_code := nvl(l_tld_tbl(l_index).instance_type_code,fnd_api.g_miss_char);
2643: l_u_instance_rec.install_date := nvl(l_tld_tbl(l_index).installation_date,fnd_api.g_miss_date);
2644: BEGIN
2637: l_u_instance_rec.external_reference := nvl(l_tld_tbl(l_index).external_reference,fnd_api.g_miss_char);
2638: l_u_instance_rec.unit_of_measure := l_tld_tbl(l_index).unit_of_measure;
2639: l_u_instance_rec.instance_condition_id := nvl(l_tld_tbl(l_index).item_condition_id,fnd_api.g_miss_num);
2640: l_u_instance_rec.sellable_flag := nvl(l_tld_tbl(l_index).sellable_flag,fnd_api.g_miss_char);
2641: l_u_instance_rec.system_id := nvl(l_tld_tbl(l_index).csi_system_id ,fnd_api.g_miss_num);
2642: l_u_instance_rec.instance_type_code := nvl(l_tld_tbl(l_index).instance_type_code,fnd_api.g_miss_char);
2643: l_u_instance_rec.install_date := nvl(l_tld_tbl(l_index).installation_date,fnd_api.g_miss_date);
2644: BEGIN
2645: IF NVL( p_instance_id , fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
2638: l_u_instance_rec.unit_of_measure := l_tld_tbl(l_index).unit_of_measure;
2639: l_u_instance_rec.instance_condition_id := nvl(l_tld_tbl(l_index).item_condition_id,fnd_api.g_miss_num);
2640: l_u_instance_rec.sellable_flag := nvl(l_tld_tbl(l_index).sellable_flag,fnd_api.g_miss_char);
2641: l_u_instance_rec.system_id := nvl(l_tld_tbl(l_index).csi_system_id ,fnd_api.g_miss_num);
2642: l_u_instance_rec.instance_type_code := nvl(l_tld_tbl(l_index).instance_type_code,fnd_api.g_miss_char);
2643: l_u_instance_rec.install_date := nvl(l_tld_tbl(l_index).installation_date,fnd_api.g_miss_date);
2644: BEGIN
2645: IF NVL( p_instance_id , fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
2646: SELECT active_start_date
2639: l_u_instance_rec.instance_condition_id := nvl(l_tld_tbl(l_index).item_condition_id,fnd_api.g_miss_num);
2640: l_u_instance_rec.sellable_flag := nvl(l_tld_tbl(l_index).sellable_flag,fnd_api.g_miss_char);
2641: l_u_instance_rec.system_id := nvl(l_tld_tbl(l_index).csi_system_id ,fnd_api.g_miss_num);
2642: l_u_instance_rec.instance_type_code := nvl(l_tld_tbl(l_index).instance_type_code,fnd_api.g_miss_char);
2643: l_u_instance_rec.install_date := nvl(l_tld_tbl(l_index).installation_date,fnd_api.g_miss_date);
2644: BEGIN
2645: IF NVL( p_instance_id , fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
2646: SELECT active_start_date
2647: INTO l_u_instance_rec.active_start_date
2641: l_u_instance_rec.system_id := nvl(l_tld_tbl(l_index).csi_system_id ,fnd_api.g_miss_num);
2642: l_u_instance_rec.instance_type_code := nvl(l_tld_tbl(l_index).instance_type_code,fnd_api.g_miss_char);
2643: l_u_instance_rec.install_date := nvl(l_tld_tbl(l_index).installation_date,fnd_api.g_miss_date);
2644: BEGIN
2645: IF NVL( p_instance_id , fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
2646: SELECT active_start_date
2647: INTO l_u_instance_rec.active_start_date
2648: FROM csi_item_instances
2649: WHERE instance_id = p_instance_id;
2647: INTO l_u_instance_rec.active_start_date
2648: FROM csi_item_instances
2649: WHERE instance_id = p_instance_id;
2650: ELSE
2651: l_u_instance_rec.active_start_date := nvl(l_tld_tbl(l_index).active_start_date,fnd_api.g_miss_date);
2652: END IF;
2653: EXCEPTION
2654: WHEN OTHERS THEN
2655: l_u_instance_rec.active_start_date := nvl(l_tld_tbl(l_index).active_start_date,fnd_api.g_miss_date);
2651: l_u_instance_rec.active_start_date := nvl(l_tld_tbl(l_index).active_start_date,fnd_api.g_miss_date);
2652: END IF;
2653: EXCEPTION
2654: WHEN OTHERS THEN
2655: l_u_instance_rec.active_start_date := nvl(l_tld_tbl(l_index).active_start_date,fnd_api.g_miss_date);
2656: END;
2657:
2658: l_u_instance_rec.active_end_date := nvl(l_tld_tbl(l_index).active_end_date,fnd_api.g_miss_date);
2659: l_u_instance_rec.location_type_code := 'HZ_PARTY_SITES';
2654: WHEN OTHERS THEN
2655: l_u_instance_rec.active_start_date := nvl(l_tld_tbl(l_index).active_start_date,fnd_api.g_miss_date);
2656: END;
2657:
2658: l_u_instance_rec.active_end_date := nvl(l_tld_tbl(l_index).active_end_date,fnd_api.g_miss_date);
2659: l_u_instance_rec.location_type_code := 'HZ_PARTY_SITES';
2660: l_u_instance_rec.location_id := l_party_site_id;
2661: l_u_instance_rec.return_by_date := nvl(l_tld_tbl(l_index).return_by_date,fnd_api.g_miss_date);
2662:
2657:
2658: l_u_instance_rec.active_end_date := nvl(l_tld_tbl(l_index).active_end_date,fnd_api.g_miss_date);
2659: l_u_instance_rec.location_type_code := 'HZ_PARTY_SITES';
2660: l_u_instance_rec.location_id := l_party_site_id;
2661: l_u_instance_rec.return_by_date := nvl(l_tld_tbl(l_index).return_by_date,fnd_api.g_miss_date);
2662:
2663: IF l_pty_dtl_tbl.COUNT > 0 THEN
2664: FOR l_p_ind IN l_pty_dtl_tbl.FIRST .. l_pty_dtl_tbl.LAST
2665: LOOP
2670: IF l_pty_dtl_tbl(l_pc_ind).contact_flag = 'Y'
2671: AND
2672: l_pty_dtl_tbl(l_pc_ind).contact_party_id = l_p_ind
2673: THEN
2674: IF nvl(l_u_instance_rec.instance_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num Then
2675:
2676: BEGIN
2677: IF l_pty_dtl_tbl(l_p_ind).relationship_type_code = 'OWNER' THEN
2678: SELECT instance_party_id
2700: fnd_message.set_token('INSTANCE_ID',l_u_instance_rec.instance_id);
2701: fnd_message.set_token('RELATIONSHIP_TYPE_CODE',l_pty_dtl_tbl(l_p_ind).relationship_type_code);
2702: fnd_msg_pub.add;
2703: IF l_pty_dtl_tbl(l_p_ind).relationship_type_code = 'OWNER' THEN
2704: x_return_status := fnd_api.g_ret_sts_error;
2705: raise fnd_api.g_exc_error;
2706: ELSE
2707: l_pty_dtl_tbl(l_pc_ind).contact_party_id := l_ind;
2708: END IF;
2701: fnd_message.set_token('RELATIONSHIP_TYPE_CODE',l_pty_dtl_tbl(l_p_ind).relationship_type_code);
2702: fnd_msg_pub.add;
2703: IF l_pty_dtl_tbl(l_p_ind).relationship_type_code = 'OWNER' THEN
2704: x_return_status := fnd_api.g_ret_sts_error;
2705: raise fnd_api.g_exc_error;
2706: ELSE
2707: l_pty_dtl_tbl(l_pc_ind).contact_party_id := l_ind;
2708: END IF;
2709: WHEN too_many_rows THEN
2710: fnd_message.set_name('CSI','CSI_INT_MANY_INSTA_PTY_FOUND');
2711: fnd_message.set_token('INSTANCE_ID',l_u_instance_rec.instance_id);
2712: fnd_message.set_token('RELATIONSHIP_TYPE_CODE',l_pty_dtl_tbl(l_p_ind).relationship_type_code);
2713: fnd_msg_pub.add;
2714: x_return_status := fnd_api.g_ret_sts_error;
2715: raise fnd_api.g_exc_error;
2716: END;
2717: ELSE
2718: l_pty_dtl_tbl(l_pc_ind).contact_party_id := l_ind;
2711: fnd_message.set_token('INSTANCE_ID',l_u_instance_rec.instance_id);
2712: fnd_message.set_token('RELATIONSHIP_TYPE_CODE',l_pty_dtl_tbl(l_p_ind).relationship_type_code);
2713: fnd_msg_pub.add;
2714: x_return_status := fnd_api.g_ret_sts_error;
2715: raise fnd_api.g_exc_error;
2716: END;
2717: ELSE
2718: l_pty_dtl_tbl(l_pc_ind).contact_party_id := l_ind;
2719: END IF;
2753: l_src_status_id
2754: FROM csi_ib_txn_types
2755: WHERE sub_type_id = l_sub_type_id;
2756:
2757: l_u_instance_rec.instance_status_id := nvl(l_src_status_id, fnd_api.g_miss_num);
2758:
2759: IF l_src_change_owner = 'Y' AND l_src_change_owner_to_code = 'E' THEN
2760:
2761: l_owner_party_id := px_default_info_rec.owner_party_id;
2788: WHERE instance_party_id = l_instance_party_id
2789: AND relationship_type_code = 'OWNER';
2790: EXCEPTION
2791: WHEN no_data_found THEN
2792: l_ip_account_id := fnd_api.g_miss_num;
2793: l_acct_object_ver_num := 1;
2794: END;
2795:
2796: l_u_party_acct_tbl(1).ip_account_id := l_ip_account_id;
2813: p_pkg_name => 'csi_item_instance_pub');
2814:
2815: csi_item_instance_pub.update_item_instance(
2816: p_api_version => 1.0,
2817: p_commit => fnd_api.g_false,
2818: p_init_msg_list => fnd_api.g_true,
2819: p_validation_level => fnd_api.g_valid_level_full,
2820: p_instance_rec => l_u_instance_rec,
2821: p_ext_attrib_values_tbl => l_u_ext_attrib_val_tbl,
2814:
2815: csi_item_instance_pub.update_item_instance(
2816: p_api_version => 1.0,
2817: p_commit => fnd_api.g_false,
2818: p_init_msg_list => fnd_api.g_true,
2819: p_validation_level => fnd_api.g_valid_level_full,
2820: p_instance_rec => l_u_instance_rec,
2821: p_ext_attrib_values_tbl => l_u_ext_attrib_val_tbl,
2822: p_party_tbl => l_u_party_tbl,
2815: csi_item_instance_pub.update_item_instance(
2816: p_api_version => 1.0,
2817: p_commit => fnd_api.g_false,
2818: p_init_msg_list => fnd_api.g_true,
2819: p_validation_level => fnd_api.g_valid_level_full,
2820: p_instance_rec => l_u_instance_rec,
2821: p_ext_attrib_values_tbl => l_u_ext_attrib_val_tbl,
2822: p_party_tbl => l_u_party_tbl,
2823: p_account_tbl => l_u_party_acct_tbl,
2829: x_return_status => l_return_status,
2830: x_msg_count => l_msg_count,
2831: x_msg_data => l_msg_data);
2832:
2833: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
2834: RAISE fnd_api.g_exc_error;
2835: END IF;
2836:
2837: debug('wip issued instance converted to cp. instance_id : '||l_u_instance_rec.instance_id);
2830: x_msg_count => l_msg_count,
2831: x_msg_data => l_msg_data);
2832:
2833: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
2834: RAISE fnd_api.g_exc_error;
2835: END IF;
2836:
2837: debug('wip issued instance converted to cp. instance_id : '||l_u_instance_rec.instance_id);
2838:
2847: l_u_instance_rec => l_u_instance_rec,
2848: px_csi_txn_rec =>px_csi_txn_rec,
2849: x_return_status =>l_return_status);
2850:
2851: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2852: RAISE fnd_api.g_exc_error;
2853: END IF;
2854: END IF;
2855:
2848: px_csi_txn_rec =>px_csi_txn_rec,
2849: x_return_status =>l_return_status);
2850:
2851: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2852: RAISE fnd_api.g_exc_error;
2853: END IF;
2854: END IF;
2855:
2856: EXCEPTION
2853: END IF;
2854: END IF;
2855:
2856: EXCEPTION
2857: WHEN fnd_api.g_exc_error THEN
2858: x_return_status := fnd_api.g_ret_sts_error;
2859: END convert_wip_instance_to_cp;
2860:
2861: PROCEDURE get_wip_instances(
2854: END IF;
2855:
2856: EXCEPTION
2857: WHEN fnd_api.g_exc_error THEN
2858: x_return_status := fnd_api.g_ret_sts_error;
2859: END convert_wip_instance_to_cp;
2860:
2861: PROCEDURE get_wip_instances(
2862: p_wip_entity_id IN number,
2909:
2910: l_soi_instance_rec csi_datastructures_pub.instance_rec;
2911:
2912: l_splitted_instances csi_datastructures_pub.instance_tbl;
2913: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
2914:
2915: BEGIN
2916:
2917: x_return_status := fnd_api.g_ret_sts_success;
2913: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
2914:
2915: BEGIN
2916:
2917: x_return_status := fnd_api.g_ret_sts_success;
2918: api_log('get_wip_instances');
2919:
2920: IF p_option_serial_code in (1, 6) THEN
2921: FOR wip_inst_rec IN wip_nsrl_inst_cur(
2959: fnd_message.set_token('INV_ITEM_ID', p_inventory_item_id);
2960: fnd_message.set_token('WIP_ENTITY_ID', p_wip_entity_id);
2961: fnd_msg_pub.add;
2962:
2963: RAISE fnd_api.g_exc_error;
2964: END IF;
2965:
2966:
2967: IF p_option_serial_code = 6 THEN
2981: px_csi_txn_rec => px_csi_txn_rec,
2982: x_instance_tbl => l_splitted_instances,
2983: x_return_status => l_return_status);
2984:
2985: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2986: RAISE fnd_api.g_exc_error;
2987: END IF;
2988:
2989: IF l_splitted_instances.COUNT > 0 THEN
2982: x_instance_tbl => l_splitted_instances,
2983: x_return_status => l_return_status);
2984:
2985: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2986: RAISE fnd_api.g_exc_error;
2987: END IF;
2988:
2989: IF l_splitted_instances.COUNT > 0 THEN
2990: FOR spl_ind IN l_splitted_instances.FIRST .. l_splitted_instances.LAST
3023: END IF;
3024: x_wip_instances := l_wip_instances;
3025:
3026: EXCEPTION
3027: WHEN fnd_api.g_exc_error THEN
3028: x_return_status := fnd_api.g_ret_sts_error;
3029: END get_wip_instances;
3030:
3031: PROCEDURE get_wip_instances_for_line(
3024: x_wip_instances := l_wip_instances;
3025:
3026: EXCEPTION
3027: WHEN fnd_api.g_exc_error THEN
3028: x_return_status := fnd_api.g_ret_sts_error;
3029: END get_wip_instances;
3030:
3031: PROCEDURE get_wip_instances_for_line(
3032: p_option_line_rec IN oe_order_lines_all%rowtype,
3054: l_option_count number := 0;
3055:
3056: l_new_instance_rec csi_datastructures_pub.instance_rec;
3057:
3058: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
3059:
3060: FUNCTION tot_wip_inst_qty(
3061: p_wip_instances IN wip_instances)
3062: RETURN number
3080: n_ind binary_integer:= 0;
3081: l_n_wip_instances wip_instances;
3082: l_parent_instance_id number;
3083: BEGIN
3084: x_return_status := fnd_api.g_ret_sts_success;
3085: api_log('get_in_rel_options');
3086: IF px_wip_instances.count > 0 THEN
3087: FOR l_ind IN px_wip_instances.FIRST ..px_wip_instances.LAST
3088: LOOP
3112: END IF;
3113: debug(' in_rel_options.count : '||l_n_wip_instances.COUNT);
3114: px_wip_instances := l_n_wip_instances;
3115: EXCEPTION
3116: WHEN fnd_api.g_exc_error THEN
3117: x_return_status := fnd_api.g_ret_sts_error;
3118: END get_in_rel_options;
3119:
3120: PROCEDURE mark_and_get(
3113: debug(' in_rel_options.count : '||l_n_wip_instances.COUNT);
3114: px_wip_instances := l_n_wip_instances;
3115: EXCEPTION
3116: WHEN fnd_api.g_exc_error THEN
3117: x_return_status := fnd_api.g_ret_sts_error;
3118: END get_in_rel_options;
3119:
3120: PROCEDURE mark_and_get(
3121: px_wip_instances IN OUT nocopy wip_instances,
3180: END filter_processed_options;
3181:
3182: BEGIN
3183:
3184: x_return_status := fnd_api.g_ret_sts_success;
3185:
3186: api_log('get_wip_instances_for_line');
3187:
3188: l_wip_instances := px_wip_instances;
3203: get_in_rel_options(
3204: p_config_instances => p_config_instances,
3205: px_wip_instances => l_in_rel_wip_instances,
3206: x_return_status => l_return_status);
3207: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3208: RAISE fnd_api.g_exc_error;
3209: END IF;
3210:
3211: --fix for bug 4705806:If all the option instances for the order line are not in_rel
3204: p_config_instances => p_config_instances,
3205: px_wip_instances => l_in_rel_wip_instances,
3206: x_return_status => l_return_status);
3207: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3208: RAISE fnd_api.g_exc_error;
3209: END IF;
3210:
3211: --fix for bug 4705806:If all the option instances for the order line are not in_rel
3212: --we pick instances left in wip and convert them into CP
3248: LOOP
3249: mark_and_get(
3250: px_wip_instances => l_temp_wip_instances,
3251: x_wip_instance => l_n_wip_instance);
3252: IF nvl(l_n_wip_instance.instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
3253: n_ind := n_ind + 1;
3254: l_n_wip_instances(n_ind) := l_n_wip_instance;
3255: END IF;
3256: END LOOP;
3274: px_csi_txn_rec => px_csi_txn_rec,
3275: x_instance_rec => l_new_instance_rec,
3276: x_return_status => l_return_status);
3277:
3278: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3279: RAISE fnd_api.g_exc_error;
3280: END IF;
3281:
3282: n_ind := n_ind + 1;
3275: x_instance_rec => l_new_instance_rec,
3276: x_return_status => l_return_status);
3277:
3278: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3279: RAISE fnd_api.g_exc_error;
3280: END IF;
3281:
3282: n_ind := n_ind + 1;
3283: l_n_wip_instances(n_ind).instance_id := l_new_instance_rec.instance_id;
3312: px_csi_txn_rec => px_csi_txn_rec,
3313: x_splitted_instances => l_splitted_instances,
3314: x_return_status => l_return_status);
3315:
3316: IF l_return_status <> fnd_Api.g_ret_sts_success THEN
3317: RAISE fnd_api.g_exc_error;
3318: END IF;
3319:
3320: IF l_splitted_instances.COUNT > 0 THEN
3313: x_splitted_instances => l_splitted_instances,
3314: x_return_status => l_return_status);
3315:
3316: IF l_return_status <> fnd_Api.g_ret_sts_success THEN
3317: RAISE fnd_api.g_exc_error;
3318: END IF;
3319:
3320: IF l_splitted_instances.COUNT > 0 THEN
3321: FOR l_ind IN l_splitted_instances.FIRST .. l_splitted_instances.LAST
3344: mark_and_get(
3345: px_wip_instances => l_temp_wip_instances,
3346: x_wip_instance => l_n_wip_instance);
3347:
3348: IF nvl(l_n_wip_instance.instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
3349: n_ind := n_ind + 1;
3350: l_n_wip_instances(n_ind) := l_n_wip_instance;
3351: END IF;
3352: END LOOP;
3371: px_csi_txn_rec => px_csi_txn_rec,
3372: x_splitted_instances => l_splitted_instances,
3373: x_return_status => l_return_status);
3374:
3375: IF l_return_status <> fnd_Api.g_ret_sts_success THEN
3376: RAISE fnd_api.g_exc_error;
3377: END IF;
3378:
3379: IF l_splitted_instances.COUNT > 0 THEN
3372: x_splitted_instances => l_splitted_instances,
3373: x_return_status => l_return_status);
3374:
3375: IF l_return_status <> fnd_Api.g_ret_sts_success THEN
3376: RAISE fnd_api.g_exc_error;
3377: END IF;
3378:
3379: IF l_splitted_instances.COUNT > 0 THEN
3380: FOR l_ind IN l_splitted_instances.FIRST .. l_splitted_instances.LAST
3408: mark_and_get(
3409: px_wip_instances => l_temp_wip_instances,
3410: x_wip_instance => l_n_wip_instance);
3411:
3412: IF nvl(l_n_wip_instance.instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
3413: n_ind := n_ind + 1;
3414: l_n_wip_instances(n_ind) := l_n_wip_instance;
3415: END IF;
3416: END LOOP;
3440: END LOOP;
3441: END IF;
3442:
3443: EXCEPTION
3444: WHEN fnd_api.g_exc_error THEN
3445: x_return_status := fnd_api.g_ret_sts_error;
3446: END get_wip_instances_for_line;
3447:
3448: -- enhancements to be made in the genealogy area in this routine
3441: END IF;
3442:
3443: EXCEPTION
3444: WHEN fnd_api.g_exc_error THEN
3445: x_return_status := fnd_api.g_ret_sts_error;
3446: END get_wip_instances_for_line;
3447:
3448: -- enhancements to be made in the genealogy area in this routine
3449: PROCEDURE distribute_wip_instances(
3482: END mark_and_get;
3483:
3484: BEGIN
3485:
3486: x_return_status := fnd_api.g_ret_sts_success;
3487: api_log('distribute_wip_instances');
3488:
3489: l_parent_instances := p_parent_instances;
3490: l_wip_instances := p_wip_instances;
3534:
3535: x_ii_rltns_tbl := l_ii_rltns_tbl;
3536:
3537: EXCEPTION
3538: WHEN fnd_api.g_exc_error THEN
3539: x_return_status := fnd_api.g_ret_sts_error;
3540: END distribute_wip_instances;
3541:
3542: PROCEDURE make_or_buy_from_unit_txn(
3535: x_ii_rltns_tbl := l_ii_rltns_tbl;
3536:
3537: EXCEPTION
3538: WHEN fnd_api.g_exc_error THEN
3539: x_return_status := fnd_api.g_ret_sts_error;
3540: END distribute_wip_instances;
3541:
3542: PROCEDURE make_or_buy_from_unit_txn(
3543: p_serial_number IN varchar2,
3786:
3787: l_config_rec config_rec;
3788: l_wip_found boolean := FALSE;
3789: l_parent_ato_line_id number;
3790: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
3791:
3792: BEGIN
3793:
3794: x_return_status := fnd_api.g_ret_sts_success;
3790: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
3791:
3792: BEGIN
3793:
3794: x_return_status := fnd_api.g_ret_sts_success;
3795: api_log('get_config_info');
3796:
3797: BEGIN
3798: SELECT oel.line_id,
3895: THEN
3896: get_sub_model_wip_info(
3897: px_config_rec => l_config_rec,
3898: x_return_status => l_return_status);
3899: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3900: RAISE fnd_api.g_exc_error;
3901: END IF;
3902: ELSE
3903: l_config_rec.sub_config_make_flag := 'N';
3896: get_sub_model_wip_info(
3897: px_config_rec => l_config_rec,
3898: x_return_status => l_return_status);
3899: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3900: RAISE fnd_api.g_exc_error;
3901: END IF;
3902: ELSE
3903: l_config_rec.sub_config_make_flag := 'N';
3904: END IF;
3937:
3938: x_config_rec := l_config_rec;
3939:
3940: EXCEPTION
3941: WHEN fnd_api.g_exc_error THEN
3942: x_return_status := fnd_api.g_ret_sts_error;
3943: END get_config_info;
3944:
3945: PROCEDURE get_config_nsrl_instances(
3938: x_config_rec := l_config_rec;
3939:
3940: EXCEPTION
3941: WHEN fnd_api.g_exc_error THEN
3942: x_return_status := fnd_api.g_ret_sts_error;
3943: END get_config_info;
3944:
3945: PROCEDURE get_config_nsrl_instances(
3946: p_config_rec IN config_rec,
3958: l_c_ind binary_integer := 0;
3959: l_config_instances config_serial_inst_tbl;
3960:
3961: BEGIN
3962: x_return_status := fnd_api.g_ret_sts_success;
3963: api_log('get_config_nsrl_instances');
3964: FOR config_inst_rec IN config_inst_cur
3965: LOOP
3966: l_c_ind := l_c_ind + 1;
3984:
3985: x_config_instances := l_config_instances;
3986:
3987: EXCEPTION
3988: WHEN fnd_api.g_exc_error THEN
3989: x_return_status := fnd_api.g_ret_sts_error;
3990: END get_config_nsrl_instances;
3991:
3992: PROCEDURE get_config_srl_instances(
3985: x_config_instances := l_config_instances;
3986:
3987: EXCEPTION
3988: WHEN fnd_api.g_exc_error THEN
3989: x_return_status := fnd_api.g_ret_sts_error;
3990: END get_config_nsrl_instances;
3991:
3992: PROCEDURE get_config_srl_instances(
3993: p_config_rec IN config_rec,
4062: l_order_hdr_rec oe_order_headers_all%rowtype;
4063: l_order_line_rec oe_order_lines_all%rowtype;
4064: l_tld_tbl csi_t_datastructures_grp.txn_line_detail_tbl;
4065:
4066: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4067:
4068: BEGIN
4069:
4070: x_return_status := fnd_api.g_ret_sts_success;
4066: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4067:
4068: BEGIN
4069:
4070: x_return_status := fnd_api.g_ret_sts_success;
4071: api_log('get_config_srl_instances');
4072:
4073: IF p_sub_config_flag = 'N' THEN
4074: FOR inst_rec IN inst_cur
4203: p_tld_tbl => l_tld_tbl,
4204: px_default_info_rec => px_default_info_rec,
4205: px_csi_txn_rec => px_csi_txn_rec,
4206: x_return_status => l_return_status);
4207: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4208: RAISE fnd_api.g_exc_error;
4209: END IF;
4210: l_config_instances(l_c_ind).location_type_code := 'HZ_PARTY_SITES';
4211: END IF;
4204: px_default_info_rec => px_default_info_rec,
4205: px_csi_txn_rec => px_csi_txn_rec,
4206: x_return_status => l_return_status);
4207: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4208: RAISE fnd_api.g_exc_error;
4209: END IF;
4210: l_config_instances(l_c_ind).location_type_code := 'HZ_PARTY_SITES';
4211: END IF;
4212:
4228:
4229: x_config_instances := l_config_instances;
4230:
4231: EXCEPTION
4232: WHEN fnd_api.g_exc_error THEN
4233: x_return_status := fnd_api.g_ret_sts_error;
4234: END get_config_srl_instances;
4235:
4236: PROCEDURE get_config_shipped_serials(
4229: x_config_instances := l_config_instances;
4230:
4231: EXCEPTION
4232: WHEN fnd_api.g_exc_error THEN
4233: x_return_status := fnd_api.g_ret_sts_error;
4234: END get_config_srl_instances;
4235:
4236: PROCEDURE get_config_shipped_serials(
4237: px_config_instances IN OUT nocopy config_serial_inst_tbl,
4239: IS
4240: l_config_instances config_serial_inst_tbl;
4241: l_c_ind binary_integer := 0;
4242: BEGIN
4243: x_return_status := fnd_api.g_ret_sts_success;
4244: api_log('get_config_shipped_serials');
4245: IF px_config_instances.COUNT > 0 THEN
4246: FOR l_ind IN px_config_instances.FIRST .. px_config_instances.LAST
4247: LOOP
4253: END IF;
4254: debug(' shipped srls count : '||l_config_instances.COUNT);
4255: px_config_instances := l_config_instances;
4256: EXCEPTION
4257: WHEN fnd_api.g_exc_error THEN
4258: x_return_status := fnd_api.g_ret_sts_error;
4259: END get_config_shipped_serials;
4260:
4261: PROCEDURE check_for_re_shipment(
4254: debug(' shipped srls count : '||l_config_instances.COUNT);
4255: px_config_instances := l_config_instances;
4256: EXCEPTION
4257: WHEN fnd_api.g_exc_error THEN
4258: x_return_status := fnd_api.g_ret_sts_error;
4259: END get_config_shipped_serials;
4260:
4261: PROCEDURE check_for_re_shipment(
4262: p_header_id IN number,
4274: AND NOT (ct.transaction_type_id = 51 AND ct.source_header_ref_id = p_header_id)
4275: ORDER BY ct.transaction_date desc;
4276:
4277: BEGIN
4278: x_return_status := fnd_api.g_ret_sts_success;
4279: api_log('check_for_re_shipment');
4280: x_reship_found := FALSE;
4281: IF px_config_instances.COUNT > 0 THEN
4282: FOR l_ind IN px_config_instances.FIRST .. px_config_instances.LAST
4297: debug(' reship_flag : '||px_config_instances(l_ind).reship_flag);
4298: END LOOP;
4299: END IF;
4300: EXCEPTION
4301: WHEN fnd_api.g_exc_error THEN
4302: x_return_status := fnd_api.g_ret_sts_error;
4303: END check_for_re_shipment;
4304:
4305: PROCEDURE get_reship_count(
4298: END LOOP;
4299: END IF;
4300: EXCEPTION
4301: WHEN fnd_api.g_exc_error THEN
4302: x_return_status := fnd_api.g_ret_sts_error;
4303: END check_for_re_shipment;
4304:
4305: PROCEDURE get_reship_count(
4306: p_config_instances IN config_serial_inst_tbl,
4308: x_return_status OUT NOCOPY varchar2)
4309: IS
4310: l_reship_count number := 0;
4311: BEGIN
4312: x_return_status := fnd_api.g_ret_sts_success;
4313: IF p_config_instances.COUNT > 0 THEN
4314: FOR l_ind IN p_config_instances.FIRST .. p_config_instances.LAST
4315: LOOP
4316: IF p_config_instances(l_ind).reship_flag = 'Y' THEN
4320: END IF;
4321: debug(' reship count : '||l_reship_count);
4322: x_reship_count := l_reship_count;
4323: EXCEPTION
4324: WHEN fnd_api.g_exc_error THEN
4325: x_return_status := fnd_api.g_ret_sts_error;
4326: END get_reship_count;
4327:
4328: PROCEDURE eliminate_reshipped_instances(
4321: debug(' reship count : '||l_reship_count);
4322: x_reship_count := l_reship_count;
4323: EXCEPTION
4324: WHEN fnd_api.g_exc_error THEN
4325: x_return_status := fnd_api.g_ret_sts_error;
4326: END get_reship_count;
4327:
4328: PROCEDURE eliminate_reshipped_instances(
4329: p_config_instances IN config_serial_inst_tbl,
4333: l_instances_tbl csi_datastructures_pub.instance_tbl;
4334: l_i_ind binary_integer := 0;
4335: l_reshipped boolean := FALSE;
4336: BEGIN
4337: x_return_status := fnd_api.g_ret_sts_success;
4338: api_log('eliminate_reshipped_instances');
4339:
4340: IF px_instances_tbl.COUNT > 0 THEN
4341: FOR l_ind IN px_instances_tbl.FIRST .. px_instances_tbl.LAST
4361: END IF;
4362: debug(' after eliminating the reshipped instances - COUNT :'||l_instances_tbl.COUNT);
4363: px_instances_tbl := l_instances_tbl;
4364: EXCEPTION
4365: WHEN fnd_api.g_exc_error THEN
4366: x_return_status := fnd_api.g_ret_sts_error;
4367: END eliminate_reshipped_instances;
4368:
4369: PROCEDURE get_option_instances(
4362: debug(' after eliminating the reshipped instances - COUNT :'||l_instances_tbl.COUNT);
4363: px_instances_tbl := l_instances_tbl;
4364: EXCEPTION
4365: WHEN fnd_api.g_exc_error THEN
4366: x_return_status := fnd_api.g_ret_sts_error;
4367: END eliminate_reshipped_instances;
4368:
4369: PROCEDURE get_option_instances(
4370: p_config_instance_id IN number,
4390: l_option_instances(option_inst_cur%rowcount).instance_id := option_inst_rec.instance_id;
4391: END LOOP;
4392: x_option_instances := l_option_instances;
4393: EXCEPTION
4394: WHEN fnd_api.g_exc_error THEN
4395: x_return_status := fnd_api.g_ret_sts_error;
4396: END get_option_instances;
4397:
4398: /* when the serialized config item is shipped it moves the options along with */
4391: END LOOP;
4392: x_option_instances := l_option_instances;
4393: EXCEPTION
4394: WHEN fnd_api.g_exc_error THEN
4395: x_return_status := fnd_api.g_ret_sts_error;
4396: END get_option_instances;
4397:
4398: /* when the serialized config item is shipped it moves the options along with */
4399: /* it because relations are created at the time of wip completion. When the */
4418: l_u_pricing_attribs_tbl csi_datastructures_pub.pricing_attribs_tbl;
4419: l_u_org_units_tbl csi_datastructures_pub.organization_units_tbl;
4420: l_u_inst_id_lst csi_datastructures_pub.id_tbl;
4421:
4422: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4423: l_msg_count number;
4424: l_msg_data varchar2(2000);
4425:
4426: BEGIN
4424: l_msg_data varchar2(2000);
4425:
4426: BEGIN
4427:
4428: x_return_status := fnd_api.g_ret_sts_success;
4429: api_log('stamp_om_line');
4430:
4431: -- check if the instance is in WIP
4432: SELECT object_version_number
4447: debug(' instance_ovn : '||l_u_instance_rec.object_version_number);
4448:
4449: csi_item_instance_pub.update_item_instance(
4450: p_api_version => 1.0,
4451: p_commit => fnd_api.g_false,
4452: p_init_msg_list => fnd_api.g_true,
4453: p_validation_level => fnd_api.g_valid_level_full,
4454: p_instance_rec => l_u_instance_rec,
4455: p_ext_attrib_values_tbl => l_u_ext_attrib_val_tbl,
4448:
4449: csi_item_instance_pub.update_item_instance(
4450: p_api_version => 1.0,
4451: p_commit => fnd_api.g_false,
4452: p_init_msg_list => fnd_api.g_true,
4453: p_validation_level => fnd_api.g_valid_level_full,
4454: p_instance_rec => l_u_instance_rec,
4455: p_ext_attrib_values_tbl => l_u_ext_attrib_val_tbl,
4456: p_party_tbl => l_u_party_tbl,
4449: csi_item_instance_pub.update_item_instance(
4450: p_api_version => 1.0,
4451: p_commit => fnd_api.g_false,
4452: p_init_msg_list => fnd_api.g_true,
4453: p_validation_level => fnd_api.g_valid_level_full,
4454: p_instance_rec => l_u_instance_rec,
4455: p_ext_attrib_values_tbl => l_u_ext_attrib_val_tbl,
4456: p_party_tbl => l_u_party_tbl,
4457: p_account_tbl => l_u_party_acct_tbl,
4463: x_return_status => l_return_status,
4464: x_msg_count => l_msg_count,
4465: x_msg_data => l_msg_data);
4466:
4467: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
4468: RAISE fnd_api.g_exc_error;
4469: END IF;
4470:
4471: debug('wip issued component instance updated with the om info. instance_id : '||
4464: x_msg_count => l_msg_count,
4465: x_msg_data => l_msg_data);
4466:
4467: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
4468: RAISE fnd_api.g_exc_error;
4469: END IF;
4470:
4471: debug('wip issued component instance updated with the om info. instance_id : '||
4472: l_u_instance_rec.instance_id);
4471: debug('wip issued component instance updated with the om info. instance_id : '||
4472: l_u_instance_rec.instance_id);
4473:
4474: EXCEPTION
4475: WHEN fnd_api.g_exc_error THEN
4476: x_return_status := fnd_api.g_ret_sts_error;
4477: END stamp_om_line;
4478:
4479: PROCEDURE stamp_om_line_for_options(
4472: l_u_instance_rec.instance_id);
4473:
4474: EXCEPTION
4475: WHEN fnd_api.g_exc_error THEN
4476: x_return_status := fnd_api.g_ret_sts_error;
4477: END stamp_om_line;
4478:
4479: PROCEDURE stamp_om_line_for_options(
4480: p_order_hdr_rec IN oe_order_headers_all%rowtype,
4484: px_default_info_rec IN OUT nocopy default_info_rec,
4485: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
4486: x_return_status OUT nocopy varchar2)
4487: IS
4488: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4489: BEGIN
4490: x_return_status := fnd_api.g_ret_sts_success;
4491: api_log('stamp_om_line_for_options');
4492:
4486: x_return_status OUT nocopy varchar2)
4487: IS
4488: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4489: BEGIN
4490: x_return_status := fnd_api.g_ret_sts_success;
4491: api_log('stamp_om_line_for_options');
4492:
4493: IF p_wip_instances.COUNT > 0 THEN
4494: FOR l_ind IN p_wip_instances.FIRST .. p_wip_instances.LAST
4501: p_order_line_id => p_order_line_rec.line_id,
4502: px_csi_txn_rec => px_csi_txn_rec,
4503: x_return_status => l_return_status);
4504:
4505: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4506: RAISE fnd_api.g_exc_error;
4507: END IF;
4508:
4509: ELSE
4502: px_csi_txn_rec => px_csi_txn_rec,
4503: x_return_status => l_return_status);
4504:
4505: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4506: RAISE fnd_api.g_exc_error;
4507: END IF;
4508:
4509: ELSE
4510:
4516: px_default_info_rec => px_default_info_rec,
4517: px_csi_txn_rec => px_csi_txn_rec,
4518: x_return_status => l_return_status);
4519:
4520: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4521: RAISE fnd_api.g_exc_error;
4522: END IF;
4523:
4524: END IF;
4517: px_csi_txn_rec => px_csi_txn_rec,
4518: x_return_status => l_return_status);
4519:
4520: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4521: RAISE fnd_api.g_exc_error;
4522: END IF;
4523:
4524: END IF;
4525:
4526: END LOOP;
4527: END IF;
4528:
4529: EXCEPTION
4530: WHEN fnd_api.g_exc_error THEN
4531: x_return_status := fnd_api.g_ret_sts_error;
4532: END stamp_om_line_for_options;
4533:
4534: PROCEDURE get_config_serial_code(
4527: END IF;
4528:
4529: EXCEPTION
4530: WHEN fnd_api.g_exc_error THEN
4531: x_return_status := fnd_api.g_ret_sts_error;
4532: END stamp_om_line_for_options;
4533:
4534: PROCEDURE get_config_serial_code(
4535: p_ato_line_id IN number,
4545: AND msi.organization_id = oel.ship_from_org_id
4546: AND msi.inventory_item_id = oel.inventory_item_id;
4547: BEGIN
4548:
4549: x_return_status := fnd_api.g_ret_sts_success;
4550: api_log('get_config_serial_code');
4551: FOR config_rec IN config_cur
4552: LOOP
4553: x_serial_code := config_rec.serial_number_control_code;
4553: x_serial_code := config_rec.serial_number_control_code;
4554: END LOOP;
4555:
4556: EXCEPTION
4557: WHEN fnd_api.g_exc_error THEN
4558: x_return_status := fnd_api.g_ret_sts_error;
4559: END get_config_serial_code;
4560:
4561:
4554: END LOOP;
4555:
4556: EXCEPTION
4557: WHEN fnd_api.g_exc_error THEN
4558: x_return_status := fnd_api.g_ret_sts_error;
4559: END get_config_serial_code;
4560:
4561:
4562: PROCEDURE break_relation(
4567: IS
4568: l_exp_rltns_rec csi_datastructures_pub.ii_relationship_rec;
4569: l_instance_id_lst csi_datastructures_pub.id_tbl;
4570:
4571: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4572: l_msg_count number;
4573: l_msg_data varchar2(2000);
4574: BEGIN
4575: x_return_status := fnd_api.g_ret_sts_success;
4571: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4572: l_msg_count number;
4573: l_msg_data varchar2(2000);
4574: BEGIN
4575: x_return_status := fnd_api.g_ret_sts_success;
4576: api_log('break_relation');
4577:
4578: l_exp_rltns_rec.relationship_id := p_relationship_id;
4579: l_exp_rltns_rec.object_version_number:= p_relationship_ovn;
4579: l_exp_rltns_rec.object_version_number:= p_relationship_ovn;
4580:
4581: debug(' relationship_id :'||l_exp_rltns_rec.relationship_id);
4582:
4583: IF nvl(p_relationship_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
4584: SELECT object_version_number
4585: INTO l_exp_rltns_rec.object_version_number
4586: FROM csi_ii_relationships
4587: WHERE relationship_id = l_exp_rltns_rec.relationship_id;
4592: p_api_name => 'expire_relationship');
4593:
4594: csi_ii_relationships_pub.expire_relationship(
4595: p_api_version => 1.0,
4596: p_commit => fnd_api.g_false,
4597: p_init_msg_list => fnd_api.g_false,
4598: p_validation_level => fnd_api.g_valid_level_full,
4599: p_relationship_rec => l_exp_rltns_rec,
4600: p_txn_rec => px_csi_txn_rec,
4593:
4594: csi_ii_relationships_pub.expire_relationship(
4595: p_api_version => 1.0,
4596: p_commit => fnd_api.g_false,
4597: p_init_msg_list => fnd_api.g_false,
4598: p_validation_level => fnd_api.g_valid_level_full,
4599: p_relationship_rec => l_exp_rltns_rec,
4600: p_txn_rec => px_csi_txn_rec,
4601: x_instance_id_lst => l_instance_id_lst,
4594: csi_ii_relationships_pub.expire_relationship(
4595: p_api_version => 1.0,
4596: p_commit => fnd_api.g_false,
4597: p_init_msg_list => fnd_api.g_false,
4598: p_validation_level => fnd_api.g_valid_level_full,
4599: p_relationship_rec => l_exp_rltns_rec,
4600: p_txn_rec => px_csi_txn_rec,
4601: x_instance_id_lst => l_instance_id_lst,
4602: x_return_status => l_return_status,
4602: x_return_status => l_return_status,
4603: x_msg_count => l_msg_count,
4604: x_msg_data => l_msg_data);
4605:
4606: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4607: RAISE fnd_api.g_exc_error;
4608: END IF;
4609: END IF;
4610: EXCEPTION
4603: x_msg_count => l_msg_count,
4604: x_msg_data => l_msg_data);
4605:
4606: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4607: RAISE fnd_api.g_exc_error;
4608: END IF;
4609: END IF;
4610: EXCEPTION
4611: WHEN fnd_api.g_exc_error THEN
4607: RAISE fnd_api.g_exc_error;
4608: END IF;
4609: END IF;
4610: EXCEPTION
4611: WHEN fnd_api.g_exc_error THEN
4612: x_return_status := fnd_api.g_ret_sts_error;
4613: END break_relation;
4614:
4615: /* this routine check the relationship record for the ato component in WIP */
4608: END IF;
4609: END IF;
4610: EXCEPTION
4611: WHEN fnd_api.g_exc_error THEN
4612: x_return_status := fnd_api.g_ret_sts_error;
4613: END break_relation;
4614:
4615: /* this routine check the relationship record for the ato component in WIP */
4616: /* and breaks the relation */
4625: l_relationship_query_rec csi_datastructures_pub.relationship_query_rec;
4626: l_relationship_tbl csi_datastructures_pub.ii_relationship_tbl;
4627: l_time_stamp date := sysdate;
4628:
4629: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4630: l_msg_count number := 0;
4631: l_msg_data varchar2(2000);
4632:
4633: BEGIN
4631: l_msg_data varchar2(2000);
4632:
4633: BEGIN
4634:
4635: x_return_status := fnd_api.g_ret_sts_success;
4636: api_log('check_and_break_relation');
4637:
4638: debug(' subject instance id :'||p_instance_id);
4639:
4645: p_api_name => 'get_relationships');
4646:
4647: csi_ii_relationships_pub.get_relationships(
4648: p_api_version => 1.0,
4649: p_commit => fnd_api.g_false,
4650: p_init_msg_list => fnd_api.g_true,
4651: p_validation_level => fnd_api.g_valid_level_full,
4652: p_relationship_query_rec => l_relationship_query_rec,
4653: p_depth => 1,
4646:
4647: csi_ii_relationships_pub.get_relationships(
4648: p_api_version => 1.0,
4649: p_commit => fnd_api.g_false,
4650: p_init_msg_list => fnd_api.g_true,
4651: p_validation_level => fnd_api.g_valid_level_full,
4652: p_relationship_query_rec => l_relationship_query_rec,
4653: p_depth => 1,
4654: p_time_stamp => l_time_stamp,
4647: csi_ii_relationships_pub.get_relationships(
4648: p_api_version => 1.0,
4649: p_commit => fnd_api.g_false,
4650: p_init_msg_list => fnd_api.g_true,
4651: p_validation_level => fnd_api.g_valid_level_full,
4652: p_relationship_query_rec => l_relationship_query_rec,
4653: p_depth => 1,
4654: p_time_stamp => l_time_stamp,
4655: p_active_relationship_only => fnd_api.g_true,
4651: p_validation_level => fnd_api.g_valid_level_full,
4652: p_relationship_query_rec => l_relationship_query_rec,
4653: p_depth => 1,
4654: p_time_stamp => l_time_stamp,
4655: p_active_relationship_only => fnd_api.g_true,
4656: x_relationship_tbl => l_relationship_tbl,
4657: x_return_status => l_return_status,
4658: x_msg_count => l_msg_count,
4659: x_msg_data => l_msg_data);
4657: x_return_status => l_return_status,
4658: x_msg_count => l_msg_count,
4659: x_msg_data => l_msg_data);
4660:
4661: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4662: RAISE fnd_api.g_exc_error;
4663: END IF;
4664:
4665: debug(' relationship table count :'||l_relationship_tbl.COUNT);
4658: x_msg_count => l_msg_count,
4659: x_msg_data => l_msg_data);
4660:
4661: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4662: RAISE fnd_api.g_exc_error;
4663: END IF;
4664:
4665: debug(' relationship table count :'||l_relationship_tbl.COUNT);
4666:
4673: p_relationship_ovn => l_relationship_tbl(l_ind).object_version_number,
4674: px_csi_txn_rec => px_csi_txn_rec,
4675: x_return_status => l_return_status);
4676:
4677: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4678: RAISE fnd_api.g_exc_error;
4679: END IF;
4680:
4681: END LOOP;
4674: px_csi_txn_rec => px_csi_txn_rec,
4675: x_return_status => l_return_status);
4676:
4677: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4678: RAISE fnd_api.g_exc_error;
4679: END IF;
4680:
4681: END LOOP;
4682: END IF;
4683:
4684: debug('check and break relation successful.');
4685:
4686: EXCEPTION
4687: WHEN fnd_api.g_exc_error THEN
4688: x_return_status := fnd_api.g_ret_sts_error;
4689: END check_and_break_relation;
4690:
4691: PROCEDURE mark_and_get_config(
4684: debug('check and break relation successful.');
4685:
4686: EXCEPTION
4687: WHEN fnd_api.g_exc_error THEN
4688: x_return_status := fnd_api.g_ret_sts_error;
4689: END check_and_break_relation;
4690:
4691: PROCEDURE mark_and_get_config(
4692: px_config_instances IN OUT nocopy config_serial_inst_tbl,
4694: x_return_status OUT nocopy varchar2)
4695: IS
4696: px_ind binary_integer := 0;
4697: BEGIN
4698: x_return_status := fnd_api.g_ret_sts_success;
4699: api_log('mark_and_get_config');
4700:
4701: IF px_config_instances.COUNT > 0 THEN
4702: px_ind := px_config_instances.NEXT(px_ind);
4708: END IF;
4709: END IF;
4710:
4711: EXCEPTION
4712: WHEN fnd_api.g_exc_error THEN
4713: x_return_status := fnd_api.g_ret_sts_error;
4714: END mark_and_get_config;
4715:
4716: PROCEDURE mark_and_get_src_tld(
4709: END IF;
4710:
4711: EXCEPTION
4712: WHEN fnd_api.g_exc_error THEN
4713: x_return_status := fnd_api.g_ret_sts_error;
4714: END mark_and_get_config;
4715:
4716: PROCEDURE mark_and_get_src_tld(
4717: px_src_tld_tbl IN OUT nocopy csi_t_datastructures_grp.txn_line_detail_tbl,
4719: x_return_status OUT nocopy varchar2)
4720: IS
4721: px_ind binary_integer := 0;
4722: BEGIN
4723: x_return_status := fnd_api.g_ret_sts_success;
4724: api_log('mark_and_get_src_tld');
4725:
4726: IF px_src_tld_tbl.COUNT > 0 THEN
4727: px_ind := px_src_tld_tbl.NEXT(px_ind);
4733: END IF;
4734: END IF;
4735:
4736: EXCEPTION
4737: WHEN fnd_api.g_exc_error THEN
4738: x_return_status := fnd_api.g_ret_sts_error;
4739: END mark_and_get_src_tld;
4740:
4741: PROCEDURE mark_and_get_nsrl_option(
4734: END IF;
4735:
4736: EXCEPTION
4737: WHEN fnd_api.g_exc_error THEN
4738: x_return_status := fnd_api.g_ret_sts_error;
4739: END mark_and_get_src_tld;
4740:
4741: PROCEDURE mark_and_get_nsrl_option(
4742: p_class_quantity IN number,
4754: l_vld_organization_id number;
4755:
4756: l_splitted_instances csi_datastructures_pub.instance_tbl;
4757:
4758: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4759: l_msg_count number;
4760: l_msg_data varchar2(2000);
4761:
4762: BEGIN
4759: l_msg_count number;
4760: l_msg_data varchar2(2000);
4761:
4762: BEGIN
4763: x_return_status := fnd_api.g_ret_sts_success;
4764: api_log('mark_and_get_nsrl_option');
4765:
4766: px_ind := 0;
4767:
4790: px_csi_txn_rec => px_csi_txn_rec,
4791: x_splitted_instances => l_splitted_instances,
4792: x_return_status => l_return_status);
4793:
4794: IF l_return_status <> fnd_Api.g_ret_sts_success THEN
4795: RAISE fnd_api.g_exc_error;
4796: END IF;
4797:
4798: px_new_ind := px_ind;
4791: x_splitted_instances => l_splitted_instances,
4792: x_return_status => l_return_status);
4793:
4794: IF l_return_status <> fnd_Api.g_ret_sts_success THEN
4795: RAISE fnd_api.g_exc_error;
4796: END IF;
4797:
4798: px_new_ind := px_ind;
4799:
4817: AND subject_id = px_ii_rltns_tbl(px_new_ind).subject_id
4818: AND relationship_type_code = 'COMPONENT-OF';
4819: EXCEPTION
4820: WHEN no_data_found THEN
4821: px_ii_rltns_tbl(px_new_ind).relationship_id := fnd_api.g_miss_num;
4822: END;
4823: END IF;
4824: END LOOP;
4825: END IF;
4823: END IF;
4824: END LOOP;
4825: END IF;
4826:
4827: IF nvl(px_ii_rltns_tbl(px_ind).relationship_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
4828: break_relation(
4829: p_relationship_id => px_ii_rltns_tbl(px_ind).relationship_id,
4830: p_relationship_ovn => px_ii_rltns_tbl(px_ind).object_version_number,
4831: px_csi_txn_rec => px_csi_txn_rec,
4830: p_relationship_ovn => px_ii_rltns_tbl(px_ind).object_version_number,
4831: px_csi_txn_rec => px_csi_txn_rec,
4832: x_return_status => l_return_status);
4833:
4834: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4835: RAISE fnd_api.g_exc_error;
4836: END IF;
4837: END IF;
4838:
4831: px_csi_txn_rec => px_csi_txn_rec,
4832: x_return_status => l_return_status);
4833:
4834: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4835: RAISE fnd_api.g_exc_error;
4836: END IF;
4837: END IF;
4838:
4839: px_ii_rltns_tbl.DELETE(px_ind);
4839: px_ii_rltns_tbl.DELETE(px_ind);
4840:
4841: ELSE
4842:
4843: IF nvl(px_ii_rltns_tbl(px_ind).relationship_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
4844: break_relation(
4845: p_relationship_id => px_ii_rltns_tbl(px_ind).relationship_id,
4846: p_relationship_ovn => px_ii_rltns_tbl(px_ind).object_version_number,
4847: px_csi_txn_rec => px_csi_txn_rec,
4846: p_relationship_ovn => px_ii_rltns_tbl(px_ind).object_version_number,
4847: px_csi_txn_rec => px_csi_txn_rec,
4848: x_return_status => l_return_status);
4849:
4850: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4851: RAISE fnd_api.g_exc_error;
4852: END IF;
4853: END IF;
4854:
4847: px_csi_txn_rec => px_csi_txn_rec,
4848: x_return_status => l_return_status);
4849:
4850: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4851: RAISE fnd_api.g_exc_error;
4852: END IF;
4853: END IF;
4854:
4855: px_ii_rltns_tbl.DELETE(px_ind);
4856:
4857: END IF;
4858: END IF;
4859: EXCEPTION
4860: WHEN fnd_api.g_exc_error THEN
4861: x_return_status := fnd_api.g_ret_sts_error;
4862: END mark_and_get_nsrl_option;
4863:
4864: PROCEDURE mark_and_get_srl_option(
4857: END IF;
4858: END IF;
4859: EXCEPTION
4860: WHEN fnd_api.g_exc_error THEN
4861: x_return_status := fnd_api.g_ret_sts_error;
4862: END mark_and_get_nsrl_option;
4863:
4864: PROCEDURE mark_and_get_srl_option(
4865: px_ii_rltns_tbl IN OUT nocopy csi_datastructures_pub.ii_relationship_tbl,
4867: x_return_status OUT nocopy varchar2)
4868: IS
4869: px_ind binary_integer := 0;
4870: BEGIN
4871: x_return_status := fnd_api.g_ret_sts_success;
4872: api_log('mark_and_get_srl_option');
4873: IF px_ii_rltns_tbl.COUNT > 0 THEN
4874: px_ind := px_ii_rltns_tbl.NEXT(px_ind);
4875: x_option_ii_rltns_rec := px_ii_rltns_tbl(px_ind);
4875: x_option_ii_rltns_rec := px_ii_rltns_tbl(px_ind);
4876: px_ii_rltns_tbl.DELETE(px_ind);
4877: END IF;
4878: EXCEPTION
4879: WHEN fnd_api.g_exc_error THEN
4880: x_return_status := fnd_api.g_ret_sts_error;
4881: END mark_and_get_srl_option;
4882:
4883: PROCEDURE filter_option_instances(
4876: px_ii_rltns_tbl.DELETE(px_ind);
4877: END IF;
4878: EXCEPTION
4879: WHEN fnd_api.g_exc_error THEN
4880: x_return_status := fnd_api.g_ret_sts_error;
4881: END mark_and_get_srl_option;
4882:
4883: PROCEDURE filter_option_instances(
4884: p_option_line_rec IN oe_order_pub.line_rec_type,
4892: l_option_instance varchar2(1);
4893: l_ind binary_integer := 0;
4894: l_ii_rltns_tbl csi_datastructures_pub.ii_relationship_tbl;
4895: l_wip_instances wip_instances;
4896: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4897: CURSOR option_cp_cur IS
4898: SELECT cii.instance_id
4899: FROM csi_item_instances cii
4900: WHERE cii.inventory_item_id = p_option_line_rec.inventory_item_id
4907: AND ctld.source_transaction_flag = 'N'
4908: AND ctld.instance_id = cii.instance_id);
4909: BEGIN
4910:
4911: x_return_status := fnd_api.g_ret_sts_success;
4912: api_log('filter_option_instances');
4913:
4914: IF px_ii_rltns_tbl.COUNT > 0 THEN
4915: FOR px_ind IN px_ii_rltns_tbl.FIRST .. px_ii_rltns_tbl.LAST
4947: p_config_rec => p_config_rec,
4948: px_csi_txn_rec => px_csi_txn_rec,
4949: x_wip_instances => l_wip_instances,
4950: x_return_status => l_return_status);
4951: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4952: RAISE fnd_api.g_exc_error;
4953: END IF;
4954:
4955: IF l_wip_instances.COUNT > 0 THEN
4948: px_csi_txn_rec => px_csi_txn_rec,
4949: x_wip_instances => l_wip_instances,
4950: x_return_status => l_return_status);
4951: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4952: RAISE fnd_api.g_exc_error;
4953: END IF;
4954:
4955: IF l_wip_instances.COUNT > 0 THEN
4956: FOR w_ind IN l_wip_instances.FIRST .. l_wip_instances.LAST
4975:
4976: px_ii_rltns_tbl := l_ii_rltns_tbl;
4977:
4978: EXCEPTION
4979: WHEN fnd_api.g_exc_error THEN
4980: x_return_status := fnd_api.g_ret_sts_error;
4981: END filter_option_instances;
4982:
4983: PROCEDURE check_wip_requirements(
4976: px_ii_rltns_tbl := l_ii_rltns_tbl;
4977:
4978: EXCEPTION
4979: WHEN fnd_api.g_exc_error THEN
4980: x_return_status := fnd_api.g_ret_sts_error;
4981: END filter_option_instances;
4982:
4983: PROCEDURE check_wip_requirements(
4984: p_wip_entity_id IN number,
5080: l_wip_processing boolean := FALSE;
5081:
5082: l_msg_count number := 0;
5083: l_msg_data varchar2(2000);
5084: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
5085:
5086: CURSOR sc_inst_cur(
5087: p_top_config_instance_id IN number,
5088: p_sub_config_item_id IN number)
5106: x_config_instance OUT nocopy config_serial_inst_rec,
5107: x_return_status OUT nocopy varchar2)
5108: IS
5109: l_iir_tbl csi_datastructures_pub.ii_relationship_tbl;
5110: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
5111: l_msg_count number;
5112: l_msg_data varchar2(2000);
5113: BEGIN
5114:
5111: l_msg_count number;
5112: l_msg_data varchar2(2000);
5113: BEGIN
5114:
5115: x_return_status := fnd_api.g_ret_sts_success;
5116:
5117: api_log('get_config_wrt_child');
5118:
5119: IF p_parent_is_oc THEN
5119: IF p_parent_is_oc THEN
5120:
5121: csi_item_instance_grp.get_all_parents(
5122: p_api_version => 1.0,
5123: p_commit => fnd_api.g_false,
5124: p_init_msg_list => fnd_api.g_true,
5125: p_validation_level => fnd_api.g_valid_level_full,
5126: p_subject_id => p_parent_instance.instance_id,
5127: x_rel_tbl => l_iir_tbl,
5120:
5121: csi_item_instance_grp.get_all_parents(
5122: p_api_version => 1.0,
5123: p_commit => fnd_api.g_false,
5124: p_init_msg_list => fnd_api.g_true,
5125: p_validation_level => fnd_api.g_valid_level_full,
5126: p_subject_id => p_parent_instance.instance_id,
5127: x_rel_tbl => l_iir_tbl,
5128: x_return_status => l_return_status,
5121: csi_item_instance_grp.get_all_parents(
5122: p_api_version => 1.0,
5123: p_commit => fnd_api.g_false,
5124: p_init_msg_list => fnd_api.g_true,
5125: p_validation_level => fnd_api.g_valid_level_full,
5126: p_subject_id => p_parent_instance.instance_id,
5127: x_rel_tbl => l_iir_tbl,
5128: x_return_status => l_return_status,
5129: x_msg_count => l_msg_count,
5128: x_return_status => l_return_status,
5129: x_msg_count => l_msg_count,
5130: x_msg_data => l_msg_data);
5131:
5132: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5133: RAISE fnd_api.g_exc_error;
5134: END IF;
5135: IF l_iir_tbl.COUNT > 0 THEN
5136: FOR iir_ind IN l_iir_tbl.FIRST .. l_iir_tbl.LAST
5129: x_msg_count => l_msg_count,
5130: x_msg_data => l_msg_data);
5131:
5132: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5133: RAISE fnd_api.g_exc_error;
5134: END IF;
5135: IF l_iir_tbl.COUNT > 0 THEN
5136: FOR iir_ind IN l_iir_tbl.FIRST .. l_iir_tbl.LAST
5137: LOOP
5152: x_config_instance.instance_id := p_parent_instance.instance_id;
5153: END IF;
5154: debug(' config_instance_id : '||x_config_instance.instance_id);
5155: EXCEPTION
5156: WHEN fnd_api.g_exc_error THEN
5157: x_return_status := fnd_api.g_ret_sts_error;
5158: END get_config_wrt_child;
5159:
5160: BEGIN
5153: END IF;
5154: debug(' config_instance_id : '||x_config_instance.instance_id);
5155: EXCEPTION
5156: WHEN fnd_api.g_exc_error THEN
5157: x_return_status := fnd_api.g_ret_sts_error;
5158: END get_config_wrt_child;
5159:
5160: BEGIN
5161:
5158: END get_config_wrt_child;
5159:
5160: BEGIN
5161:
5162: x_return_status := fnd_api.g_ret_sts_success;
5163:
5164: api_log('rebuild_relation_for_ato');
5165:
5166: IF p_order_line_rec.item_type_code = 'CLASS' THEN
5171: p_processing_status => 'IN_PROCESS',
5172: x_line_dtl_tbl => l_src_tld_tbl,
5173: x_return_status => l_return_status);
5174:
5175: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5176: RAISE fnd_api.g_exc_error;
5177: END IF;
5178:
5179: get_ib_trackable_parent(
5172: x_line_dtl_tbl => l_src_tld_tbl,
5173: x_return_status => l_return_status);
5174:
5175: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5176: RAISE fnd_api.g_exc_error;
5177: END IF;
5178:
5179: get_ib_trackable_parent(
5180: p_current_line_id => p_order_line_rec.line_id,
5181: p_om_vld_org_id => px_default_info_rec.om_vld_org_id,
5182: x_parent_line_rec => l_parent_line_rec,
5183: x_return_status => l_return_status);
5184:
5185: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5186: RAISE fnd_api.g_exc_error;
5187: END IF;
5188:
5189: l_config_class_ratio := p_order_line_rec.ordered_quantity/l_parent_line_rec.ordered_quantity;
5182: x_parent_line_rec => l_parent_line_rec,
5183: x_return_status => l_return_status);
5184:
5185: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5186: RAISE fnd_api.g_exc_error;
5187: END IF;
5188:
5189: l_config_class_ratio := p_order_line_rec.ordered_quantity/l_parent_line_rec.ordered_quantity;
5190: debug(' config_class_ratio : '||l_config_class_ratio);
5197: px_default_info_rec => px_default_info_rec,
5198: px_csi_txn_rec => px_csi_txn_rec,
5199: x_config_instances => l_sub_config_instances,
5200: x_return_status => l_return_status);
5201: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5202: RAISE fnd_api.g_exc_error;
5203: END IF;
5204:
5205: IF p_order_line_rec.ato_line_id = l_parent_line_rec.line_id THEN
5198: px_csi_txn_rec => px_csi_txn_rec,
5199: x_config_instances => l_sub_config_instances,
5200: x_return_status => l_return_status);
5201: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5202: RAISE fnd_api.g_exc_error;
5203: END IF;
5204:
5205: IF p_order_line_rec.ato_line_id = l_parent_line_rec.line_id THEN
5206: l_parent_is_oc := FALSE;
5212: p_config_rec => p_config_rec,
5213: p_sub_config_flag => 'N',
5214: x_config_instances => l_config_instances,
5215: x_return_status => l_return_status);
5216: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5217: RAISE fnd_api.g_exc_error;
5218: END IF;
5219: ELSE
5220: l_config_instances := p_config_instances;
5213: p_sub_config_flag => 'N',
5214: x_config_instances => l_config_instances,
5215: x_return_status => l_return_status);
5216: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5217: RAISE fnd_api.g_exc_error;
5218: END IF;
5219: ELSE
5220: l_config_instances := p_config_instances;
5221: END IF;
5259: px_default_info_rec => px_default_info_rec,
5260: x_txn_line_dtl_id => l_config_ns_tld_id,
5261: x_return_status => l_return_status);
5262:
5263: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5264: RAISE fnd_api.g_exc_error;
5265: END IF;
5266:
5267: oct_ind := 0;
5260: x_txn_line_dtl_id => l_config_ns_tld_id,
5261: x_return_status => l_return_status);
5262:
5263: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5264: RAISE fnd_api.g_exc_error;
5265: END IF;
5266:
5267: oct_ind := 0;
5268: l_oc_tld_tbl.DELETE;
5274: px_src_tld_tbl => l_temp_src_tld_tbl,
5275: x_src_tld_rec => l_oc_tld_rec,
5276: x_return_status => l_return_status);
5277:
5278: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5279: RAISE fnd_api.g_exc_error;
5280: END IF;
5281:
5282: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5275: x_src_tld_rec => l_oc_tld_rec,
5276: x_return_status => l_return_status);
5277:
5278: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5279: RAISE fnd_api.g_exc_error;
5280: END IF;
5281:
5282: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5283:
5278: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5279: RAISE fnd_api.g_exc_error;
5280: END IF;
5281:
5282: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5283:
5284: oct_ind := oct_ind + 1;
5285: l_oc_tld_tbl(oct_ind) := l_oc_tld_rec;
5286:
5300: p_parent_instance => l_parent_instances(pi_ind),
5301: x_config_instance => l_config_instance,
5302: x_return_status => l_return_status);
5303:
5304: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5305: RAISE fnd_api.g_exc_error;
5306: END IF;
5307:
5308: IF p_config_rec.serial_code in (2, 5) THEN
5301: x_config_instance => l_config_instance,
5302: x_return_status => l_return_status);
5303:
5304: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5305: RAISE fnd_api.g_exc_error;
5306: END IF;
5307:
5308: IF p_config_rec.serial_code in (2, 5) THEN
5309:
5316: mark_and_get_src_tld(
5317: px_src_tld_tbl => l_oc_tld_tbl,
5318: x_src_tld_rec => l_oc_tld_rec,
5319: x_return_status => l_return_status);
5320: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5321: RAISE fnd_api.g_exc_error;
5322: END IF;
5323:
5324: break_relation(
5317: px_src_tld_tbl => l_oc_tld_tbl,
5318: x_src_tld_rec => l_oc_tld_rec,
5319: x_return_status => l_return_status);
5320: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5321: RAISE fnd_api.g_exc_error;
5322: END IF;
5323:
5324: break_relation(
5325: p_relationship_id => sc_inst_rec.relationship_id,
5326: p_relationship_ovn => sc_inst_rec.object_version_number,
5327: px_csi_txn_rec => px_csi_txn_rec,
5328: x_return_status => l_return_status);
5329:
5330: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5331: RAISE fnd_api.g_exc_error;
5332: END IF;
5333:
5334: build_non_source_rec(
5327: px_csi_txn_rec => px_csi_txn_rec,
5328: x_return_status => l_return_status);
5329:
5330: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5331: RAISE fnd_api.g_exc_error;
5332: END IF;
5333:
5334: build_non_source_rec(
5335: p_transaction_line_id => px_default_info_rec.transaction_line_id,
5337: px_default_info_rec => px_default_info_rec,
5338: x_txn_line_dtl_id => l_config_ns_tld_id,
5339: x_return_status => l_return_status);
5340:
5341: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5342: RAISE fnd_api.g_exc_error;
5343: END IF;
5344:
5345: pcm_ind := pcm_ind + 1;
5338: x_txn_line_dtl_id => l_config_ns_tld_id,
5339: x_return_status => l_return_status);
5340:
5341: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5342: RAISE fnd_api.g_exc_error;
5343: END IF;
5344:
5345: pcm_ind := pcm_ind + 1;
5346: l_pcm_tbl(pcm_ind).object_tld_id := l_oc_tld_rec.txn_line_detail_id;
5358: px_src_tld_tbl => l_oc_tld_tbl,
5359: x_src_tld_rec => l_oc_tld_rec,
5360: x_return_status => l_return_status);
5361:
5362: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5363: RAISE fnd_api.g_exc_error;
5364: END IF;
5365:
5366: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num
5359: x_src_tld_rec => l_oc_tld_rec,
5360: x_return_status => l_return_status);
5361:
5362: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5363: RAISE fnd_api.g_exc_error;
5364: END IF;
5365:
5366: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num
5367: THEN
5362: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5363: RAISE fnd_api.g_exc_error;
5364: END IF;
5365:
5366: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num
5367: THEN
5368:
5369: mark_and_get_config(
5370: px_config_instances => l_sub_config_instances,
5378: px_default_info_rec => px_default_info_rec,
5379: x_txn_line_dtl_id => l_sub_config_ns_tld_id,
5380: x_return_status => l_return_status);
5381:
5382: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5383: RAISE fnd_api.g_exc_error;
5384: END IF;
5385:
5386: pcm_ind := pcm_ind + 1;
5379: x_txn_line_dtl_id => l_sub_config_ns_tld_id,
5380: x_return_status => l_return_status);
5381:
5382: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5383: RAISE fnd_api.g_exc_error;
5384: END IF;
5385:
5386: pcm_ind := pcm_ind + 1;
5387: l_pcm_tbl(pcm_ind).object_tld_id := l_oc_tld_rec.txn_line_detail_id;
5405: p_om_vld_org_id => px_default_info_rec.om_vld_org_id,
5406: x_trackable_line_tbl => l_child_line_tbl,
5407: x_return_status => l_return_status);
5408:
5409: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5410: RAISE fnd_api.g_exc_error;
5411: END IF;
5412:
5413: get_ato_options_only(
5406: x_trackable_line_tbl => l_child_line_tbl,
5407: x_return_status => l_return_status);
5408:
5409: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5410: RAISE fnd_api.g_exc_error;
5411: END IF;
5412:
5413: get_ato_options_only(
5414: px_line_tbl => l_child_line_tbl,
5413: get_ato_options_only(
5414: px_line_tbl => l_child_line_tbl,
5415: x_return_status => l_return_status);
5416:
5417: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5418: RAISE fnd_api.g_exc_error;
5419: END IF;
5420:
5421: l_temp_src_tld_tbl := l_src_tld_tbl;
5414: px_line_tbl => l_child_line_tbl,
5415: x_return_status => l_return_status);
5416:
5417: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5418: RAISE fnd_api.g_exc_error;
5419: END IF;
5420:
5421: l_temp_src_tld_tbl := l_src_tld_tbl;
5422:
5432: px_default_info_rec => px_default_info_rec,
5433: px_csi_txn_rec => px_csi_txn_rec,
5434: x_config_instances => l_config_instances,
5435: x_return_status => l_return_status);
5436: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5437: RAISE fnd_api.g_exc_error;
5438: END IF;
5439: END IF;
5440: END IF;
5433: px_csi_txn_rec => px_csi_txn_rec,
5434: x_config_instances => l_config_instances,
5435: x_return_status => l_return_status);
5436: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5437: RAISE fnd_api.g_exc_error;
5438: END IF;
5439: END IF;
5440: END IF;
5441:
5443: get_config_shipped_serials(
5444: px_config_instances => l_config_instances,
5445: x_return_status => l_return_status);
5446:
5447: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5448: RAISE fnd_api.g_exc_error;
5449: END IF;
5450: END IF;
5451:
5444: px_config_instances => l_config_instances,
5445: x_return_status => l_return_status);
5446:
5447: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5448: RAISE fnd_api.g_exc_error;
5449: END IF;
5450: END IF;
5451:
5452: IF l_config_instances.COUNT > 0 THEN
5462: px_default_info_rec => px_default_info_rec,
5463: x_txn_line_dtl_id => l_config_ns_tld_id,
5464: x_return_status => l_return_status);
5465:
5466: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5467: RAISE fnd_api.g_exc_error;
5468: END IF;
5469:
5470: oct_ind := 0;
5463: x_txn_line_dtl_id => l_config_ns_tld_id,
5464: x_return_status => l_return_status);
5465:
5466: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5467: RAISE fnd_api.g_exc_error;
5468: END IF;
5469:
5470: oct_ind := 0;
5471:
5476: px_src_tld_tbl => l_temp_src_tld_tbl,
5477: x_src_tld_rec => l_oc_tld_rec,
5478: x_return_status => l_return_status);
5479:
5480: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5481: RAISE fnd_api.g_exc_error;
5482: END IF;
5483:
5484: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5477: x_src_tld_rec => l_oc_tld_rec,
5478: x_return_status => l_return_status);
5479:
5480: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5481: RAISE fnd_api.g_exc_error;
5482: END IF;
5483:
5484: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5485:
5480: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5481: RAISE fnd_api.g_exc_error;
5482: END IF;
5483:
5484: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5485:
5486: oct_ind := oct_ind + 1;
5487: l_oc_tld_tbl(oct_ind) := l_oc_tld_rec;
5488:
5506: p_api_name => 'get_relationships');
5507:
5508: csi_ii_relationships_pub.get_relationships(
5509: p_api_version => 1.0,
5510: p_commit => fnd_api.g_false,
5511: p_init_msg_list => fnd_api.g_true,
5512: p_validation_level => fnd_api.g_valid_level_full,
5513: p_relationship_query_rec => l_ii_rltns_qry_rec,
5514: p_depth => 1,
5507:
5508: csi_ii_relationships_pub.get_relationships(
5509: p_api_version => 1.0,
5510: p_commit => fnd_api.g_false,
5511: p_init_msg_list => fnd_api.g_true,
5512: p_validation_level => fnd_api.g_valid_level_full,
5513: p_relationship_query_rec => l_ii_rltns_qry_rec,
5514: p_depth => 1,
5515: p_time_stamp => l_time_stamp,
5508: csi_ii_relationships_pub.get_relationships(
5509: p_api_version => 1.0,
5510: p_commit => fnd_api.g_false,
5511: p_init_msg_list => fnd_api.g_true,
5512: p_validation_level => fnd_api.g_valid_level_full,
5513: p_relationship_query_rec => l_ii_rltns_qry_rec,
5514: p_depth => 1,
5515: p_time_stamp => l_time_stamp,
5516: p_active_relationship_only => fnd_api.g_true,
5512: p_validation_level => fnd_api.g_valid_level_full,
5513: p_relationship_query_rec => l_ii_rltns_qry_rec,
5514: p_depth => 1,
5515: p_time_stamp => l_time_stamp,
5516: p_active_relationship_only => fnd_api.g_true,
5517: x_relationship_tbl => l_ii_rltns_tbl,
5518: x_return_status => l_return_status,
5519: x_msg_count => l_msg_count,
5520: x_msg_data => l_msg_data);
5518: x_return_status => l_return_status,
5519: x_msg_count => l_msg_count,
5520: x_msg_data => l_msg_data);
5521:
5522: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5523: RAISE fnd_api.g_exc_error;
5524: END IF;
5525:
5526: debug(' ii relationship count :'||l_ii_rltns_tbl.COUNT);
5519: x_msg_count => l_msg_count,
5520: x_msg_data => l_msg_data);
5521:
5522: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5523: RAISE fnd_api.g_exc_error;
5524: END IF;
5525:
5526: debug(' ii relationship count :'||l_ii_rltns_tbl.COUNT);
5527:
5565: px_csi_txn_rec => px_csi_txn_rec,
5566: x_return_status => l_return_status);
5567:
5568: --Included the return status check, as part of fixing bug 4514821
5569: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5570: RAISE fnd_api.g_exc_error;
5571: END IF;
5572: debug('ii relationship count :'||l_ii_rltns_tbl.COUNT);
5573:
5566: x_return_status => l_return_status);
5567:
5568: --Included the return status check, as part of fixing bug 4514821
5569: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5570: RAISE fnd_api.g_exc_error;
5571: END IF;
5572: debug('ii relationship count :'||l_ii_rltns_tbl.COUNT);
5573:
5574:
5589: px_ii_rltns_tbl => l_ii_rltns_tbl,
5590: x_option_ii_rltns_rec => l_option_ii_rltns_rec,
5591: x_return_status => l_return_status);
5592:
5593: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5594: RAISE fnd_api.g_exc_error;
5595: END IF;
5596:
5597: build_non_source_rec(
5590: x_option_ii_rltns_rec => l_option_ii_rltns_rec,
5591: x_return_status => l_return_status);
5592:
5593: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5594: RAISE fnd_api.g_exc_error;
5595: END IF;
5596:
5597: build_non_source_rec(
5598: p_transaction_line_id => px_default_info_rec.transaction_line_id,
5600: px_default_info_rec => px_default_info_rec,
5601: x_txn_line_dtl_id => l_option_ns_tld_id,
5602: x_return_status => l_return_status);
5603:
5604: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5605: RAISE fnd_api.g_exc_error;
5606: END IF;
5607:
5608: IF nvl(l_option_ii_rltns_rec.relationship_id, fnd_api.g_miss_num) <>
5601: x_txn_line_dtl_id => l_option_ns_tld_id,
5602: x_return_status => l_return_status);
5603:
5604: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5605: RAISE fnd_api.g_exc_error;
5606: END IF;
5607:
5608: IF nvl(l_option_ii_rltns_rec.relationship_id, fnd_api.g_miss_num) <>
5609: fnd_api.g_miss_num
5604: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5605: RAISE fnd_api.g_exc_error;
5606: END IF;
5607:
5608: IF nvl(l_option_ii_rltns_rec.relationship_id, fnd_api.g_miss_num) <>
5609: fnd_api.g_miss_num
5610: THEN
5611: break_relation(
5612: p_relationship_id => l_option_ii_rltns_rec.relationship_id,
5605: RAISE fnd_api.g_exc_error;
5606: END IF;
5607:
5608: IF nvl(l_option_ii_rltns_rec.relationship_id, fnd_api.g_miss_num) <>
5609: fnd_api.g_miss_num
5610: THEN
5611: break_relation(
5612: p_relationship_id => l_option_ii_rltns_rec.relationship_id,
5613: p_relationship_ovn => l_option_ii_rltns_rec.object_version_number,
5613: p_relationship_ovn => l_option_ii_rltns_rec.object_version_number,
5614: px_csi_txn_rec => px_csi_txn_rec,
5615: x_return_status => l_return_status);
5616:
5617: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5618: RAISE fnd_api.g_exc_error;
5619: END IF;
5620: END IF;
5621:
5614: px_csi_txn_rec => px_csi_txn_rec,
5615: x_return_status => l_return_status);
5616:
5617: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5618: RAISE fnd_api.g_exc_error;
5619: END IF;
5620: END IF;
5621:
5622: pcm_ind := pcm_ind + 1;
5634: px_ii_rltns_tbl => l_ii_rltns_tbl,
5635: x_option_ii_rltns_rec => l_option_ii_rltns_rec,
5636: x_return_status => l_return_status);
5637:
5638: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5639: RAISE fnd_api.g_exc_error;
5640: END IF;
5641:
5642: IF nvl(l_option_ii_rltns_rec.subject_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num
5635: x_option_ii_rltns_rec => l_option_ii_rltns_rec,
5636: x_return_status => l_return_status);
5637:
5638: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5639: RAISE fnd_api.g_exc_error;
5640: END IF;
5641:
5642: IF nvl(l_option_ii_rltns_rec.subject_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num
5643: THEN
5638: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5639: RAISE fnd_api.g_exc_error;
5640: END IF;
5641:
5642: IF nvl(l_option_ii_rltns_rec.subject_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num
5643: THEN
5644: build_non_source_rec(
5645: p_transaction_line_id => px_default_info_rec.transaction_line_id,
5646: p_instance_id => l_option_ii_rltns_rec.subject_id,
5647: px_default_info_rec => px_default_info_rec,
5648: x_txn_line_dtl_id => l_option_ns_tld_id,
5649: x_return_status => l_return_status);
5650:
5651: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5652: RAISE fnd_api.g_exc_error;
5653: END IF;
5654:
5655: pcm_ind := pcm_ind + 1;
5648: x_txn_line_dtl_id => l_option_ns_tld_id,
5649: x_return_status => l_return_status);
5650:
5651: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5652: RAISE fnd_api.g_exc_error;
5653: END IF;
5654:
5655: pcm_ind := pcm_ind + 1;
5656: l_pcm_tbl(pcm_ind).object_tld_id := l_oc_tld_tbl(l_oc_ind).txn_line_detail_id;
5673: IF l_pcm_tbl.COUNT > 0 THEN
5674: FOR l_pcm_ind IN l_pcm_tbl.FIRST .. l_pcm_tbl.LAST
5675: LOOP
5676: -- build ii_rltns table
5677: l_t_rltns_tbl(l_pcm_ind).txn_relationship_id := fnd_api.g_miss_num;
5678: l_t_rltns_tbl(l_pcm_ind).transaction_line_id := px_default_info_rec.transaction_line_id;
5679: l_t_rltns_tbl(l_pcm_ind).subject_id := l_pcm_tbl(l_pcm_ind).subject_tld_id;
5680: l_t_rltns_tbl(l_pcm_ind).object_id := l_pcm_tbl(l_pcm_ind).object_tld_id;
5681: l_t_rltns_tbl(l_pcm_ind).relationship_type_code := 'COMPONENT-OF';
5685: END LOOP;
5686:
5687: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
5688: p_api_version => 1.0,
5689: p_commit => fnd_api.g_false,
5690: p_init_msg_list => fnd_api.g_true,
5691: p_validation_level => fnd_api.g_valid_level_full,
5692: px_txn_ii_rltns_tbl => l_t_rltns_tbl,
5693: x_return_status => l_return_status,
5686:
5687: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
5688: p_api_version => 1.0,
5689: p_commit => fnd_api.g_false,
5690: p_init_msg_list => fnd_api.g_true,
5691: p_validation_level => fnd_api.g_valid_level_full,
5692: px_txn_ii_rltns_tbl => l_t_rltns_tbl,
5693: x_return_status => l_return_status,
5694: x_msg_count => l_msg_count,
5687: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
5688: p_api_version => 1.0,
5689: p_commit => fnd_api.g_false,
5690: p_init_msg_list => fnd_api.g_true,
5691: p_validation_level => fnd_api.g_valid_level_full,
5692: px_txn_ii_rltns_tbl => l_t_rltns_tbl,
5693: x_return_status => l_return_status,
5694: x_msg_count => l_msg_count,
5695: x_msg_data => l_msg_data);
5692: px_txn_ii_rltns_tbl => l_t_rltns_tbl,
5693: x_return_status => l_return_status,
5694: x_msg_count => l_msg_count,
5695: x_msg_data => l_msg_data);
5696: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5697: RAISe fnd_api.g_exc_error;
5698: END IF;
5699:
5700: END IF; -- pcm tbl count > 0
5693: x_return_status => l_return_status,
5694: x_msg_count => l_msg_count,
5695: x_msg_data => l_msg_data);
5696: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5697: RAISe fnd_api.g_exc_error;
5698: END IF;
5699:
5700: END IF; -- pcm tbl count > 0
5701: EXCEPTION
5698: END IF;
5699:
5700: END IF; -- pcm tbl count > 0
5701: EXCEPTION
5702: WHEN fnd_api.g_exc_error THEN
5703: x_return_status := fnd_api.g_ret_sts_error;
5704: END rebuild_relation_for_ato;
5705:
5706: -- child order line instances should get hooked in to the ib trackable parent order line
5699:
5700: END IF; -- pcm tbl count > 0
5701: EXCEPTION
5702: WHEN fnd_api.g_exc_error THEN
5703: x_return_status := fnd_api.g_ret_sts_error;
5704: END rebuild_relation_for_ato;
5705:
5706: -- child order line instances should get hooked in to the ib trackable parent order line
5707: PROCEDURE build_parent_relation(
5737: l_i_ind binary_integer := 0;
5738: l_object_id number;
5739: l_subject_id number;
5740:
5741: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
5742: l_msg_data varchar2(2000);
5743: l_msg_count number;
5744:
5745:
5753:
5754: BEGIN
5755:
5756:
5757: x_return_status := fnd_api.g_ret_sts_success;
5758: api_log('build_parent_relation');
5759:
5760: l_config_instances := p_config_instances;
5761:
5764: p_om_vld_org_id => px_default_info_rec.om_vld_org_id,
5765: x_parent_line_rec => l_parent_line_rec,
5766: x_return_status => l_return_status);
5767:
5768: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5769: RAISE fnd_api.g_exc_error;
5770: END IF;
5771:
5772: IF nvl(l_parent_line_rec.line_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5765: x_parent_line_rec => l_parent_line_rec,
5766: x_return_status => l_return_status);
5767:
5768: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5769: RAISE fnd_api.g_exc_error;
5770: END IF;
5771:
5772: IF nvl(l_parent_line_rec.line_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5773:
5768: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5769: RAISE fnd_api.g_exc_error;
5770: END IF;
5771:
5772: IF nvl(l_parent_line_rec.line_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5773:
5774: get_tld(
5775: p_source_table => 'OE_ORDER_LINES_ALL',
5776: p_source_id => p_order_line_rec.line_id,
5778: p_processing_status => 'IN_PROCESS',
5779: x_line_dtl_tbl => l_line_dtl_tbl,
5780: x_return_status => l_return_status);
5781:
5782: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5783: RAISE fnd_api.g_exc_error;
5784: END IF;
5785:
5786: l_child_of_sub_ato_mdl := 'N';
5779: x_line_dtl_tbl => l_line_dtl_tbl,
5780: x_return_status => l_return_status);
5781:
5782: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5783: RAISE fnd_api.g_exc_error;
5784: END IF;
5785:
5786: l_child_of_sub_ato_mdl := 'N';
5787:
5802: AND
5803: p_order_line_rec.ato_line_id = l_parent_line_rec.line_id
5804: )
5805: THEN
5806: IF nvl(p_config_rec.line_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5807: oe_line_util.query_row(
5808: p_line_id => p_config_rec.line_id,
5809: x_line_rec => l_parent_line_rec);
5810: END IF;
5825: px_default_info_rec => px_default_info_rec,
5826: px_csi_txn_rec => px_csi_txn_rec,
5827: x_config_instances => l_config_instances,
5828: x_return_status => l_return_status);
5829: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5830: RAISE fnd_api.g_exc_error;
5831: END IF;
5832:
5833: END IF;
5826: px_csi_txn_rec => px_csi_txn_rec,
5827: x_config_instances => l_config_instances,
5828: x_return_status => l_return_status);
5829: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5830: RAISE fnd_api.g_exc_error;
5831: END IF;
5832:
5833: END IF;
5834: END IF;
5848: split_txn_dtls_with_ratio(
5849: p_quantity_ratio => l_qty_ratio,
5850: px_line_dtl_tbl => l_line_dtl_tbl,
5851: x_return_status => l_return_status);
5852: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5853: RAISE fnd_api.g_exc_error;
5854: END IF;
5855:
5856: END IF;
5849: p_quantity_ratio => l_qty_ratio,
5850: px_line_dtl_tbl => l_line_dtl_tbl,
5851: x_return_status => l_return_status);
5852: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5853: RAISE fnd_api.g_exc_error;
5854: END IF;
5855:
5856: END IF;
5857:
5883: p_pkg_name => 'csi_item_instance_pub');
5884:
5885: csi_item_instance_pub.get_item_instances(
5886: p_api_version => 1.0,
5887: p_commit => fnd_api.g_false,
5888: p_init_msg_list => fnd_api.g_true,
5889: p_validation_level => fnd_api.g_valid_level_full,
5890: p_instance_query_rec => l_inst_query_rec,
5891: p_party_query_rec => l_party_query_rec,
5884:
5885: csi_item_instance_pub.get_item_instances(
5886: p_api_version => 1.0,
5887: p_commit => fnd_api.g_false,
5888: p_init_msg_list => fnd_api.g_true,
5889: p_validation_level => fnd_api.g_valid_level_full,
5890: p_instance_query_rec => l_inst_query_rec,
5891: p_party_query_rec => l_party_query_rec,
5892: p_account_query_rec => l_pty_acct_query_rec,
5885: csi_item_instance_pub.get_item_instances(
5886: p_api_version => 1.0,
5887: p_commit => fnd_api.g_false,
5888: p_init_msg_list => fnd_api.g_true,
5889: p_validation_level => fnd_api.g_valid_level_full,
5890: p_instance_query_rec => l_inst_query_rec,
5891: p_party_query_rec => l_party_query_rec,
5892: p_account_query_rec => l_pty_acct_query_rec,
5893: p_transaction_id => null,
5890: p_instance_query_rec => l_inst_query_rec,
5891: p_party_query_rec => l_party_query_rec,
5892: p_account_query_rec => l_pty_acct_query_rec,
5893: p_transaction_id => null,
5894: p_resolve_id_columns => fnd_api.g_false,
5895: p_active_instance_only => fnd_api.g_true,
5896: x_instance_header_tbl => l_instance_hdr_tbl,
5897: x_return_status => l_return_status,
5898: x_msg_count => l_msg_count,
5891: p_party_query_rec => l_party_query_rec,
5892: p_account_query_rec => l_pty_acct_query_rec,
5893: p_transaction_id => null,
5894: p_resolve_id_columns => fnd_api.g_false,
5895: p_active_instance_only => fnd_api.g_true,
5896: x_instance_header_tbl => l_instance_hdr_tbl,
5897: x_return_status => l_return_status,
5898: x_msg_count => l_msg_count,
5899: x_msg_data => l_msg_data );
5897: x_return_status => l_return_status,
5898: x_msg_count => l_msg_count,
5899: x_msg_data => l_msg_data );
5900:
5901: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5902: RAISE fnd_api.g_exc_error;
5903: END IF;
5904:
5905: IF l_instance_hdr_tbl.COUNT > 0 THEN
5898: x_msg_count => l_msg_count,
5899: x_msg_data => l_msg_data );
5900:
5901: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5902: RAISE fnd_api.g_exc_error;
5903: END IF;
5904:
5905: IF l_instance_hdr_tbl.COUNT > 0 THEN
5906: l_instance_found := TRUE;
5924: eliminate_reshipped_instances(
5925: p_config_instances => l_config_instances,
5926: px_instances_tbl => l_instance_tbl,
5927: x_return_status => l_return_status);
5928: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5929: RAISE fnd_api.g_exc_error;
5930: END IF;
5931: END IF;
5932:
5925: p_config_instances => l_config_instances,
5926: px_instances_tbl => l_instance_tbl,
5927: x_return_status => l_return_status);
5928: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5929: RAISE fnd_api.g_exc_error;
5930: END IF;
5931: END IF;
5932:
5933: IF l_instance_tbl.COUNT > 0 THEN
5940: px_default_info_rec => px_default_info_rec,
5941: x_txn_line_dtl_id => l_ns_tld_id,
5942: x_return_status => l_return_status);
5943:
5944: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5945: raise fnd_api.g_exc_error;
5946: END IF;
5947:
5948: l_object_id := l_ns_tld_id;
5941: x_txn_line_dtl_id => l_ns_tld_id,
5942: x_return_status => l_return_status);
5943:
5944: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5945: raise fnd_api.g_exc_error;
5946: END IF;
5947:
5948: l_object_id := l_ns_tld_id;
5949:
5958: px_src_tld_tbl => l_line_dtl_tbl,
5959: x_src_tld_rec => l_child_tld_rec,
5960: x_return_status => l_return_status);
5961:
5962: IF nvl(l_child_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5963:
5964: l_subject_id := l_child_tld_rec.txn_line_detail_id;
5965: l_qty_allocated := l_qty_allocated + l_child_tld_rec.quantity;
5966:
5977:
5978: l_t_iir_tbl.DELETE;
5979:
5980: -- build ii_rltns table
5981: l_t_iir_tbl(1).txn_relationship_id := fnd_api.g_miss_num;
5982: l_t_iir_tbl(1).transaction_line_id := p_txn_line_rec.transaction_line_id;
5983: l_t_iir_tbl(1).subject_id := l_subject_id;
5984: l_t_iir_tbl(1).object_id := l_object_id;
5985: l_t_iir_tbl(1).relationship_type_code := 'COMPONENT-OF';
5988: l_t_iir_tbl(1).object_type := 'T';
5989:
5990: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
5991: p_api_version => 1.0,
5992: p_commit => fnd_api.g_false,
5993: p_init_msg_list => fnd_api.g_true,
5994: p_validation_level => fnd_api.g_valid_level_full,
5995: px_txn_ii_rltns_tbl => l_t_iir_tbl,
5996: x_return_status => l_return_status,
5989:
5990: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
5991: p_api_version => 1.0,
5992: p_commit => fnd_api.g_false,
5993: p_init_msg_list => fnd_api.g_true,
5994: p_validation_level => fnd_api.g_valid_level_full,
5995: px_txn_ii_rltns_tbl => l_t_iir_tbl,
5996: x_return_status => l_return_status,
5997: x_msg_count => l_msg_count,
5990: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
5991: p_api_version => 1.0,
5992: p_commit => fnd_api.g_false,
5993: p_init_msg_list => fnd_api.g_true,
5994: p_validation_level => fnd_api.g_valid_level_full,
5995: px_txn_ii_rltns_tbl => l_t_iir_tbl,
5996: x_return_status => l_return_status,
5997: x_msg_count => l_msg_count,
5998: x_msg_data => l_msg_data);
5996: x_return_status => l_return_status,
5997: x_msg_count => l_msg_count,
5998: x_msg_data => l_msg_data);
5999:
6000: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6001: RAISE fnd_api.g_exc_error;
6002: END IF;
6003:
6004: IF l_satisfied = 'Y' THEN
5997: x_msg_count => l_msg_count,
5998: x_msg_data => l_msg_data);
5999:
6000: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6001: RAISE fnd_api.g_exc_error;
6002: END IF;
6003:
6004: IF l_satisfied = 'Y' THEN
6005: exit;
6018:
6019: END IF; -- found an ib trackable parent
6020:
6021: EXCEPTION
6022: WHEN fnd_api.g_exc_error THEN
6023: x_return_status := fnd_api.g_ret_sts_error;
6024: END build_parent_relation;
6025:
6026: PROCEDURE mark_and_get_instances(
6019: END IF; -- found an ib trackable parent
6020:
6021: EXCEPTION
6022: WHEN fnd_api.g_exc_error THEN
6023: x_return_status := fnd_api.g_ret_sts_error;
6024: END build_parent_relation;
6025:
6026: PROCEDURE mark_and_get_instances(
6027: p_qty_ratio IN number,
6036: l_old_qty number;
6037: x_ind binary_integer := 0;
6038: px_ind binary_integer := 0;
6039: --fix for bug5096435
6040: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6041: l_new_instance_rec csi_datastructures_pub.instance_rec;
6042: BEGIN
6043: x_return_status := fnd_api.g_ret_sts_success;
6044: api_log('mark_and_get_instances');
6039: --fix for bug5096435
6040: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6041: l_new_instance_rec csi_datastructures_pub.instance_rec;
6042: BEGIN
6043: x_return_status := fnd_api.g_ret_sts_success;
6044: api_log('mark_and_get_instances');
6045:
6046: l_satisfied := 'N';
6047: IF px_instance_tbl.COUNT > 0 THEN
6071: p_quantity => l_new_qty,
6072: px_csi_txn_rec => px_csi_txn_rec,
6073: x_instance_rec => l_new_instance_rec,
6074: x_return_status => l_return_status);
6075: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6076: RAISE fnd_api.g_exc_error;
6077: END IF;
6078: debug('New instance created after splitiing : ' || l_new_instance_rec.instance_id);
6079: px_instance_tbl(px_instance_tbl.LAST+1) := l_new_instance_rec;
6072: px_csi_txn_rec => px_csi_txn_rec,
6073: x_instance_rec => l_new_instance_rec,
6074: x_return_status => l_return_status);
6075: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6076: RAISE fnd_api.g_exc_error;
6077: END IF;
6078: debug('New instance created after splitiing : ' || l_new_instance_rec.instance_id);
6079: px_instance_tbl(px_instance_tbl.LAST+1) := l_new_instance_rec;
6080: px_instance_tbl.DELETE(px_ind);
6125: l_object_id number;
6126: l_subject_id number;
6127: l_t_iir_tbl csi_t_datastructures_grp.txn_ii_rltns_tbl;
6128:
6129: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6130: l_msg_data varchar2(2000);
6131: l_msg_count number;
6132:
6133: --fix for bug5096435
6139: l_temp_index number := 0;
6140:
6141: BEGIN
6142:
6143: x_return_status := fnd_api.g_ret_sts_success;
6144: api_log('build_child_relation');
6145:
6146: get_ib_trackable_children(
6147: p_current_line_id => p_order_line_rec.line_id,
6148: p_om_vld_org_id => px_default_info_rec.om_vld_org_id,
6149: x_trackable_line_tbl => l_child_line_tbl,
6150: x_return_status => l_return_status);
6151:
6152: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6153: RAISE fnd_api.g_exc_error;
6154: END IF;
6155:
6156: --fix for bug5096435
6149: x_trackable_line_tbl => l_child_line_tbl,
6150: x_return_status => l_return_status);
6151:
6152: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6153: RAISE fnd_api.g_exc_error;
6154: END IF;
6155:
6156: --fix for bug5096435
6157: --Here child_line_tbl is sorted and rearranged to ensure that
6185: p_processing_status => 'IN_PROCESS',
6186: x_line_dtl_tbl => l_tld_tbl,
6187: x_return_status => l_return_status);
6188:
6189: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6190: RAISE fnd_api.g_exc_error;
6191: END IF;
6192:
6193: FOR l_ind in l_child_line_tbl.FIRST..l_child_line_tbl.LAST
6186: x_line_dtl_tbl => l_tld_tbl,
6187: x_return_status => l_return_status);
6188:
6189: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6190: RAISE fnd_api.g_exc_error;
6191: END IF;
6192:
6193: FOR l_ind in l_child_line_tbl.FIRST..l_child_line_tbl.LAST
6194: LOOP
6240: p_pkg_name => 'csi_item_instance_pub');
6241:
6242: csi_item_instance_pub.get_item_instances(
6243: p_api_version => 1.0,
6244: p_commit => fnd_api.g_false,
6245: p_init_msg_list => fnd_api.g_true,
6246: p_validation_level => fnd_api.g_valid_level_full,
6247: p_instance_query_rec => l_inst_query_rec,
6248: p_party_query_rec => l_party_query_rec,
6241:
6242: csi_item_instance_pub.get_item_instances(
6243: p_api_version => 1.0,
6244: p_commit => fnd_api.g_false,
6245: p_init_msg_list => fnd_api.g_true,
6246: p_validation_level => fnd_api.g_valid_level_full,
6247: p_instance_query_rec => l_inst_query_rec,
6248: p_party_query_rec => l_party_query_rec,
6249: p_account_query_rec => l_pty_acct_query_rec,
6242: csi_item_instance_pub.get_item_instances(
6243: p_api_version => 1.0,
6244: p_commit => fnd_api.g_false,
6245: p_init_msg_list => fnd_api.g_true,
6246: p_validation_level => fnd_api.g_valid_level_full,
6247: p_instance_query_rec => l_inst_query_rec,
6248: p_party_query_rec => l_party_query_rec,
6249: p_account_query_rec => l_pty_acct_query_rec,
6250: p_transaction_id => null,
6247: p_instance_query_rec => l_inst_query_rec,
6248: p_party_query_rec => l_party_query_rec,
6249: p_account_query_rec => l_pty_acct_query_rec,
6250: p_transaction_id => null,
6251: p_resolve_id_columns => fnd_api.g_false,
6252: p_active_instance_only => fnd_api.g_true,
6253: x_instance_header_tbl => l_instance_hdr_tbl,
6254: x_return_status => l_return_status,
6255: x_msg_count => l_msg_count,
6248: p_party_query_rec => l_party_query_rec,
6249: p_account_query_rec => l_pty_acct_query_rec,
6250: p_transaction_id => null,
6251: p_resolve_id_columns => fnd_api.g_false,
6252: p_active_instance_only => fnd_api.g_true,
6253: x_instance_header_tbl => l_instance_hdr_tbl,
6254: x_return_status => l_return_status,
6255: x_msg_count => l_msg_count,
6256: x_msg_data => l_msg_data);
6254: x_return_status => l_return_status,
6255: x_msg_count => l_msg_count,
6256: x_msg_data => l_msg_data);
6257:
6258: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6259: RAISE fnd_api.g_exc_error;
6260: END IF;
6261:
6262: debug('instances found for the child order line COUNT : '||l_instance_hdr_tbl.COUNT);
6255: x_msg_count => l_msg_count,
6256: x_msg_data => l_msg_data);
6257:
6258: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6259: RAISE fnd_api.g_exc_error;
6260: END IF;
6261:
6262: debug('instances found for the child order line COUNT : '||l_instance_hdr_tbl.COUNT);
6263: --fix for bug5096435
6292: p_instance_header_tbl => l_temp_instance_hdr_tbl, --end of fix for bug5096435
6293: x_instance_tbl => l_instance_tbl,
6294: x_return_status => l_return_status);
6295:
6296: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6297: RAISE fnd_api.g_exc_error;
6298: END IF;
6299:
6300: l_temp_instance_hdr_tbl.DELETE;
6293: x_instance_tbl => l_instance_tbl,
6294: x_return_status => l_return_status);
6295:
6296: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6297: RAISE fnd_api.g_exc_error;
6298: END IF;
6299:
6300: l_temp_instance_hdr_tbl.DELETE;
6301: FOR t_ind IN l_tld_tbl.FIRST .. l_tld_tbl.LAST
6311: px_csi_txn_rec => px_csi_txn_rec,
6312: x_instance_tbl => l_alloc_instance_tbl,
6313: x_return_status => l_return_status);
6314:
6315: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6316: RAISE fnd_api.g_exc_error;
6317: END IF;
6318:
6319: FOR a_ind IN l_alloc_instance_tbl.FIRST .. l_alloc_instance_tbl.LAST
6312: x_instance_tbl => l_alloc_instance_tbl,
6313: x_return_status => l_return_status);
6314:
6315: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6316: RAISE fnd_api.g_exc_error;
6317: END IF;
6318:
6319: FOR a_ind IN l_alloc_instance_tbl.FIRST .. l_alloc_instance_tbl.LAST
6320: LOOP
6325: px_default_info_rec => px_default_info_rec,
6326: x_txn_line_dtl_id => l_ns_tld_id,
6327: x_return_status => l_return_status);
6328:
6329: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6330: RAISE fnd_api.g_exc_error;
6331: END IF;
6332:
6333: l_object_id := l_tld_tbl(t_ind).txn_line_detail_id;
6326: x_txn_line_dtl_id => l_ns_tld_id,
6327: x_return_status => l_return_status);
6328:
6329: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6330: RAISE fnd_api.g_exc_error;
6331: END IF;
6332:
6333: l_object_id := l_tld_tbl(t_ind).txn_line_detail_id;
6334: l_subject_id := l_ns_tld_id;
6335:
6336: -- create ii_relationship
6337: l_t_iir_tbl.DELETE;
6338: -- build ii_rltns table
6339: l_t_iir_tbl(1).txn_relationship_id := fnd_api.g_miss_num;
6340: l_t_iir_tbl(1).transaction_line_id := p_txn_line_rec.transaction_line_id;
6341: l_t_iir_tbl(1).subject_id := l_subject_id;
6342: l_t_iir_tbl(1).object_id := l_object_id;
6343: l_t_iir_tbl(1).relationship_type_code := 'COMPONENT-OF';
6346: l_t_iir_tbl(1).object_type := 'T';
6347:
6348: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
6349: p_api_version => 1.0,
6350: p_commit => fnd_api.g_false,
6351: p_init_msg_list => fnd_api.g_true,
6352: p_validation_level => fnd_api.g_valid_level_full,
6353: px_txn_ii_rltns_tbl => l_t_iir_tbl,
6354: x_return_status => l_return_status,
6347:
6348: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
6349: p_api_version => 1.0,
6350: p_commit => fnd_api.g_false,
6351: p_init_msg_list => fnd_api.g_true,
6352: p_validation_level => fnd_api.g_valid_level_full,
6353: px_txn_ii_rltns_tbl => l_t_iir_tbl,
6354: x_return_status => l_return_status,
6355: x_msg_count => l_msg_count,
6348: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
6349: p_api_version => 1.0,
6350: p_commit => fnd_api.g_false,
6351: p_init_msg_list => fnd_api.g_true,
6352: p_validation_level => fnd_api.g_valid_level_full,
6353: px_txn_ii_rltns_tbl => l_t_iir_tbl,
6354: x_return_status => l_return_status,
6355: x_msg_count => l_msg_count,
6356: x_msg_data => l_msg_data);
6354: x_return_status => l_return_status,
6355: x_msg_count => l_msg_count,
6356: x_msg_data => l_msg_data);
6357:
6358: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6359: RAISE fnd_api.g_exc_error;
6360: END IF;
6361:
6362: END LOOP; --<
6355: x_msg_count => l_msg_count,
6356: x_msg_data => l_msg_data);
6357:
6358: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6359: RAISE fnd_api.g_exc_error;
6360: END IF;
6361:
6362: END LOOP; --<
6363:
6367: END LOOP; --<
6368: END IF; --<
6369:
6370: EXCEPTION
6371: WHEN fnd_api.g_exc_error THEN
6372: x_return_status := fnd_api.g_ret_sts_error;
6373: END build_child_relation;
6374:
6375: /* the wip issued instances for the ato options using the configured item */
6368: END IF; --<
6369:
6370: EXCEPTION
6371: WHEN fnd_api.g_exc_error THEN
6372: x_return_status := fnd_api.g_ret_sts_error;
6373: END build_child_relation;
6374:
6375: /* the wip issued instances for the ato options using the configured item */
6376: /* to wip job link and converts them as customer products and build the */
6404: l_return_status varchar2(1);
6405:
6406: BEGIN
6407:
6408: x_return_status := fnd_api.g_ret_sts_success;
6409:
6410: api_log('process_ato_option_nsrl');
6411:
6412: --assign the values for the csi_txn_rec
6440: px_csi_txn_rec => l_csi_txn_rec,
6441: x_wip_instances => l_wip_instances,
6442: x_return_status => l_return_status);
6443:
6444: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6445: RAISE fnd_api.g_exc_error;
6446: END IF;
6447:
6448: /* get the ib_trackable parent for the option item line */
6441: x_wip_instances => l_wip_instances,
6442: x_return_status => l_return_status);
6443:
6444: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6445: RAISE fnd_api.g_exc_error;
6446: END IF;
6447:
6448: /* get the ib_trackable parent for the option item line */
6449: csi_order_fulfill_pub.get_ib_trackable_parent(
6451: p_om_vld_org_id => px_default_info_rec.om_vld_org_id,
6452: x_parent_line_rec => l_parent_line_rec,
6453: x_return_status => l_return_status);
6454:
6455: IF x_return_status <> fnd_api.g_ret_sts_success THEN
6456: RAISE fnd_api.g_exc_error;
6457: END IF;
6458:
6459: l_parent_instances.DELETE;
6452: x_parent_line_rec => l_parent_line_rec,
6453: x_return_status => l_return_status);
6454:
6455: IF x_return_status <> fnd_api.g_ret_sts_success THEN
6456: RAISE fnd_api.g_exc_error;
6457: END IF;
6458:
6459: l_parent_instances.DELETE;
6460:
6457: END IF;
6458:
6459: l_parent_instances.DELETE;
6460:
6461: IF nvl(l_parent_line_rec.line_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6462:
6463: l_qty_ratio := p_order_line_rec.ordered_quantity/l_parent_line_rec.ordered_quantity;
6464:
6465: debug(' parent_child_ratio :'||l_qty_ratio);
6510: px_csi_txn_rec => l_csi_txn_rec,
6511: px_wip_instances => l_wip_instances,
6512: x_return_status => l_return_status);
6513:
6514: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6515: RAISE fnd_api.g_exc_error;
6516: END IF;
6517:
6518: IF l_wip_instances.COUNT > 0 THEN
6511: px_wip_instances => l_wip_instances,
6512: x_return_status => l_return_status);
6513:
6514: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6515: RAISE fnd_api.g_exc_error;
6516: END IF;
6517:
6518: IF l_wip_instances.COUNT > 0 THEN
6519:
6525: px_default_info_rec => px_default_info_rec,
6526: px_csi_txn_rec => l_csi_txn_rec,
6527: x_return_status => l_return_status);
6528:
6529: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6530: RAISE fnd_api.g_exc_error;
6531: END IF;
6532:
6533: IF l_parent_instances.COUNT > 0 THEN
6526: px_csi_txn_rec => l_csi_txn_rec,
6527: x_return_status => l_return_status);
6528:
6529: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6530: RAISE fnd_api.g_exc_error;
6531: END IF;
6532:
6533: IF l_parent_instances.COUNT > 0 THEN
6534: distribute_wip_instances(
6540: px_default_info_rec => px_default_info_rec,
6541: x_ii_rltns_tbl => l_ii_rltns_tbl,
6542: x_return_status => l_return_status);
6543:
6544: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6545: RAISE fnd_api.g_exc_error;
6546: END IF;
6547: END IF;
6548:
6541: x_ii_rltns_tbl => l_ii_rltns_tbl,
6542: x_return_status => l_return_status);
6543:
6544: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6545: RAISE fnd_api.g_exc_error;
6546: END IF;
6547: END IF;
6548:
6549: END IF;
6557: p_api_name => 'create_relationship');
6558:
6559: csi_ii_relationships_pub.create_relationship(
6560: p_api_version => 1.0,
6561: p_commit => fnd_api.g_false,
6562: p_init_msg_list => fnd_api.g_true,
6563: p_validation_level => fnd_api.g_valid_level_full,
6564: p_relationship_tbl => l_ii_rltns_tbl,
6565: p_txn_rec => l_csi_txn_rec,
6558:
6559: csi_ii_relationships_pub.create_relationship(
6560: p_api_version => 1.0,
6561: p_commit => fnd_api.g_false,
6562: p_init_msg_list => fnd_api.g_true,
6563: p_validation_level => fnd_api.g_valid_level_full,
6564: p_relationship_tbl => l_ii_rltns_tbl,
6565: p_txn_rec => l_csi_txn_rec,
6566: x_return_status => l_return_status,
6559: csi_ii_relationships_pub.create_relationship(
6560: p_api_version => 1.0,
6561: p_commit => fnd_api.g_false,
6562: p_init_msg_list => fnd_api.g_true,
6563: p_validation_level => fnd_api.g_valid_level_full,
6564: p_relationship_tbl => l_ii_rltns_tbl,
6565: p_txn_rec => l_csi_txn_rec,
6566: x_return_status => l_return_status,
6567: x_msg_count => l_msg_count,
6566: x_return_status => l_return_status,
6567: x_msg_count => l_msg_count,
6568: x_msg_data => l_msg_data);
6569:
6570: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6571: RAISE fnd_api.g_exc_error;
6572: END IF;
6573:
6574: END IF;
6567: x_msg_count => l_msg_count,
6568: x_msg_data => l_msg_data);
6569:
6570: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6571: RAISE fnd_api.g_exc_error;
6572: END IF;
6573:
6574: END IF;
6575:
6575:
6576: debug('Order Fulfillment of ATO option item successful.');
6577:
6578: EXCEPTION
6579: WHEN fnd_api.g_exc_error THEN
6580: x_return_status := fnd_api.g_ret_sts_error;
6581: WHEN others then
6582: fnd_message.set_name ('FND','FND_GENERIC_MESSAGE');
6583: fnd_message.set_token('MESSAGE', substr(sqlerrm, 1, 300));
6576: debug('Order Fulfillment of ATO option item successful.');
6577:
6578: EXCEPTION
6579: WHEN fnd_api.g_exc_error THEN
6580: x_return_status := fnd_api.g_ret_sts_error;
6581: WHEN others then
6582: fnd_message.set_name ('FND','FND_GENERIC_MESSAGE');
6583: fnd_message.set_token('MESSAGE', substr(sqlerrm, 1, 300));
6584: fnd_msg_pub.add;
6581: WHEN others then
6582: fnd_message.set_name ('FND','FND_GENERIC_MESSAGE');
6583: fnd_message.set_token('MESSAGE', substr(sqlerrm, 1, 300));
6584: fnd_msg_pub.add;
6585: x_return_status := fnd_api.g_ret_sts_error;
6586: END process_ato_option_nsrl;
6587:
6588: PROCEDURE mark_and_get_class_instance(
6589: p_option_serial_code IN number,
6634: END IF;
6635: END srl_get_and_delete;
6636:
6637: BEGIN
6638: x_return_status := fnd_api.g_ret_sts_success;
6639: api_log('mark_and_get_class_instance');
6640:
6641: FOR class_inst_rec IN class_inst_cur
6642: LOOP
6660:
6661: END LOOP;
6662:
6663: EXCEPTION
6664: WHEN fnd_api.g_exc_error THEN
6665: x_return_status := fnd_api.g_ret_sts_error;
6666: END mark_and_get_class_instance;
6667:
6668: PROCEDURE get_config_parent(
6661: END LOOP;
6662:
6663: EXCEPTION
6664: WHEN fnd_api.g_exc_error THEN
6665: x_return_status := fnd_api.g_ret_sts_error;
6666: END mark_and_get_class_instance;
6667:
6668: PROCEDURE get_config_parent(
6669: p_wip_instance IN wip_instance,
6679: l_config_instance config_serial_inst_rec;
6680:
6681: l_msg_count number := 0;
6682: l_msg_data varchar2(2000);
6683: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6684:
6685: CURSOR inst_cur(p_instance_id IN number) IS
6686: SELECT instance_id,
6687: serial_number,
6690: WHERE instance_id = p_instance_id
6691: AND inventory_item_id = p_config_rec.item_id;
6692:
6693: BEGIN
6694: x_return_status := fnd_api.g_ret_sts_success;
6695: api_log('get_config_parent');
6696:
6697: l_ii_rltns_qry_rec.subject_id := p_wip_instance.instance_id;
6698: l_ii_rltns_qry_rec.relationship_type_code := 'COMPONENT-OF';
6705: p_api_name => 'get_relationships');
6706:
6707: csi_ii_relationships_pub.get_relationships(
6708: p_api_version => 1.0,
6709: p_commit => fnd_api.g_false,
6710: p_init_msg_list => fnd_api.g_true,
6711: p_validation_level => fnd_api.g_valid_level_full,
6712: p_relationship_query_rec => l_ii_rltns_qry_rec,
6713: p_depth => 1,
6706:
6707: csi_ii_relationships_pub.get_relationships(
6708: p_api_version => 1.0,
6709: p_commit => fnd_api.g_false,
6710: p_init_msg_list => fnd_api.g_true,
6711: p_validation_level => fnd_api.g_valid_level_full,
6712: p_relationship_query_rec => l_ii_rltns_qry_rec,
6713: p_depth => 1,
6714: p_time_stamp => l_time_stamp,
6707: csi_ii_relationships_pub.get_relationships(
6708: p_api_version => 1.0,
6709: p_commit => fnd_api.g_false,
6710: p_init_msg_list => fnd_api.g_true,
6711: p_validation_level => fnd_api.g_valid_level_full,
6712: p_relationship_query_rec => l_ii_rltns_qry_rec,
6713: p_depth => 1,
6714: p_time_stamp => l_time_stamp,
6715: p_active_relationship_only => fnd_api.g_true,
6711: p_validation_level => fnd_api.g_valid_level_full,
6712: p_relationship_query_rec => l_ii_rltns_qry_rec,
6713: p_depth => 1,
6714: p_time_stamp => l_time_stamp,
6715: p_active_relationship_only => fnd_api.g_true,
6716: x_relationship_tbl => l_ii_rltns_tbl,
6717: x_return_status => l_return_status,
6718: x_msg_count => l_msg_count,
6719: x_msg_data => l_msg_data);
6717: x_return_status => l_return_status,
6718: x_msg_count => l_msg_count,
6719: x_msg_data => l_msg_data);
6720:
6721: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6722: RAISE fnd_api.g_exc_error;
6723: END IF;
6724:
6725: debug(' ii_rltns_tbl count : '||l_ii_rltns_tbl.COUNT);
6718: x_msg_count => l_msg_count,
6719: x_msg_data => l_msg_data);
6720:
6721: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6722: RAISE fnd_api.g_exc_error;
6723: END IF;
6724:
6725: debug(' ii_rltns_tbl count : '||l_ii_rltns_tbl.COUNT);
6726:
6747:
6748: x_config_instance := l_config_instance;
6749:
6750: EXCEPTION
6751: WHEN fnd_api.g_exc_error THEN
6752: x_return_status := fnd_api.g_ret_sts_error;
6753: END get_config_parent;
6754:
6755: /* This routine is invoked from the fulfillment of ATO options of serialized*/
6748: x_config_instance := l_config_instance;
6749:
6750: EXCEPTION
6751: WHEN fnd_api.g_exc_error THEN
6752: x_return_status := fnd_api.g_ret_sts_error;
6753: END get_config_parent;
6754:
6755: /* This routine is invoked from the fulfillment of ATO options of serialized*/
6756: /* Identifies the wip issued instances that are tied in relation with the */
6793: do_nothing exception;
6794:
6795: BEGIN
6796:
6797: x_return_status := fnd_api.g_ret_sts_success;
6798:
6799: api_log('process_ato_option_srl');
6800:
6801: --assign the values for the csi_txn_rec
6825: px_csi_txn_rec => l_csi_txn_rec,
6826: x_wip_instances => l_wip_instances,
6827: x_return_status => l_return_status);
6828:
6829: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6830: RAISE fnd_api.g_exc_error;
6831: END IF;
6832:
6833: debug('wip_instances count :'||l_wip_instances.COUNT);
6826: x_wip_instances => l_wip_instances,
6827: x_return_status => l_return_status);
6828:
6829: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6830: RAISE fnd_api.g_exc_error;
6831: END IF;
6832:
6833: debug('wip_instances count :'||l_wip_instances.COUNT);
6834:
6838: p_om_vld_org_id => px_default_info_rec.om_vld_org_id,
6839: x_parent_line_rec => l_parent_line_rec,
6840: x_return_status => l_return_status);
6841:
6842: IF x_return_status <> fnd_api.g_ret_sts_success THEN
6843: RAISE fnd_api.g_exc_error;
6844: END IF;
6845:
6846: l_parent_instances.DELETE;
6839: x_parent_line_rec => l_parent_line_rec,
6840: x_return_status => l_return_status);
6841:
6842: IF x_return_status <> fnd_api.g_ret_sts_success THEN
6843: RAISE fnd_api.g_exc_error;
6844: END IF;
6845:
6846: l_parent_instances.DELETE;
6847:
6844: END IF;
6845:
6846: l_parent_instances.DELETE;
6847:
6848: IF nvl(l_parent_line_rec.line_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6849:
6850: -- if the trackable parent is the ato model then do nothing
6851: IF l_parent_line_rec.line_id = p_order_line_rec.ato_line_id THEN
6852:
6859: px_default_info_rec => px_default_info_rec,
6860: px_csi_txn_rec => l_csi_txn_rec,
6861: x_return_status => l_return_status);
6862:
6863: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6864: RAISE fnd_api.g_exc_error;
6865: END IF;
6866:
6867: RAISE do_nothing;
6860: px_csi_txn_rec => l_csi_txn_rec,
6861: x_return_status => l_return_status);
6862:
6863: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6864: RAISE fnd_api.g_exc_error;
6865: END IF;
6866:
6867: RAISE do_nothing;
6868: ELSE
6905: px_csi_txn_rec => l_csi_txn_rec,
6906: px_wip_instances => l_wip_instances,
6907: x_return_status => l_return_status);
6908:
6909: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6910: RAISE fnd_api.g_exc_error;
6911: END IF;
6912:
6913: IF l_wip_instances.COUNT > 0 THEN
6906: px_wip_instances => l_wip_instances,
6907: x_return_status => l_return_status);
6908:
6909: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6910: RAISE fnd_api.g_exc_error;
6911: END IF;
6912:
6913: IF l_wip_instances.COUNT > 0 THEN
6914: stamp_om_line_for_options(
6919: px_default_info_rec => px_default_info_rec,
6920: px_csi_txn_rec => l_csi_txn_rec,
6921: x_return_status => l_return_status);
6922:
6923: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6924: RAISE fnd_api.g_exc_error;
6925: END IF;
6926: END IF;
6927:
6920: px_csi_txn_rec => l_csi_txn_rec,
6921: x_return_status => l_return_status);
6922:
6923: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6924: RAISE fnd_api.g_exc_error;
6925: END IF;
6926: END IF;
6927:
6928: IF l_parent_instances.COUNT > 0 THEN
6938: p_config_rec => p_config_rec,
6939: x_config_instance => l_config_parent,
6940: x_return_status => l_return_status);
6941:
6942: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6943: RAISE fnd_api.g_exc_error;
6944: END IF;
6945:
6946: mark_and_get_class_instance(
6939: x_config_instance => l_config_parent,
6940: x_return_status => l_return_status);
6941:
6942: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6943: RAISE fnd_api.g_exc_error;
6944: END IF;
6945:
6946: mark_and_get_class_instance(
6947: p_option_serial_code => l_option_serial_code,
6951: px_class_instances => l_parent_instances,
6952: x_class_instance => l_class_instance,
6953: x_return_status => l_return_status);
6954:
6955: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6956: RAISE fnd_api.g_exc_error;
6957: END IF;
6958:
6959: IF l_class_instance.instance_id is not null THEN
6952: x_class_instance => l_class_instance,
6953: x_return_status => l_return_status);
6954:
6955: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6956: RAISE fnd_api.g_exc_error;
6957: END IF;
6958:
6959: IF l_class_instance.instance_id is not null THEN
6960: l_ii_ind := l_ii_ind + 1;
6957: END IF;
6958:
6959: IF l_class_instance.instance_id is not null THEN
6960: l_ii_ind := l_ii_ind + 1;
6961: l_ii_rltns_tbl(l_ii_ind).relationship_id := fnd_api.g_miss_num;
6962: l_ii_rltns_tbl(l_ii_ind).relationship_type_code := 'COMPONENT-OF';
6963: l_ii_rltns_tbl(l_ii_ind).object_id := l_class_instance.instance_id;
6964: l_ii_rltns_tbl(l_ii_ind).subject_id := l_wip_instances(l_w_ind).instance_id;
6965: l_ii_rltns_tbl(l_ii_ind).cascade_ownership_flag :=
6965: l_ii_rltns_tbl(l_ii_ind).cascade_ownership_flag :=
6966: px_default_info_rec.cascade_owner_flag;
6967: END IF;
6968:
6969: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6970: RAISE fnd_api.g_exc_error;
6971: END IF;
6972:
6973: IF l_config_parent.relationship_id is not null THEN
6966: px_default_info_rec.cascade_owner_flag;
6967: END IF;
6968:
6969: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6970: RAISE fnd_api.g_exc_error;
6971: END IF;
6972:
6973: IF l_config_parent.relationship_id is not null THEN
6974:
6977: p_relationship_ovn => l_config_parent.relationship_ovn,
6978: px_csi_txn_rec => l_csi_txn_rec,
6979: x_return_status => l_return_status);
6980:
6981: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6982: RAISE fnd_api.g_exc_error;
6983: END IF;
6984: END IF;
6985:
6978: px_csi_txn_rec => l_csi_txn_rec,
6979: x_return_status => l_return_status);
6980:
6981: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6982: RAISE fnd_api.g_exc_error;
6983: END IF;
6984: END IF;
6985:
6986: END LOOP;
6995: p_config_rec => p_config_rec,
6996: x_config_instance => l_config_parent,
6997: x_return_status => l_return_status);
6998:
6999: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7000: RAISE fnd_api.g_exc_error;
7001: END IF;
7002:
7003: mark_and_get_class_instance(
6996: x_config_instance => l_config_parent,
6997: x_return_status => l_return_status);
6998:
6999: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7000: RAISE fnd_api.g_exc_error;
7001: END IF;
7002:
7003: mark_and_get_class_instance(
7004: p_option_serial_code => l_option_serial_code,
7008: px_class_instances => l_parent_instances,
7009: x_class_instance => l_class_instance,
7010: x_return_status => l_return_status);
7011:
7012: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7013: RAISE fnd_api.g_exc_error;
7014: END IF;
7015:
7016: IF l_class_instance.instance_id is not null THEN
7009: x_class_instance => l_class_instance,
7010: x_return_status => l_return_status);
7011:
7012: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7013: RAISE fnd_api.g_exc_error;
7014: END IF;
7015:
7016: IF l_class_instance.instance_id is not null THEN
7017: l_ii_ind := l_ii_ind + 1;
7014: END IF;
7015:
7016: IF l_class_instance.instance_id is not null THEN
7017: l_ii_ind := l_ii_ind + 1;
7018: l_ii_rltns_tbl(l_ii_ind).relationship_id := fnd_api.g_miss_num;
7019: l_ii_rltns_tbl(l_ii_ind).relationship_type_code := 'COMPONENT-OF';
7020: l_ii_rltns_tbl(l_ii_ind).object_id := l_class_instance.instance_id;
7021: l_ii_rltns_tbl(l_ii_ind).subject_id := l_wip_instances(l_w_ind).instance_id;
7022: l_ii_rltns_tbl(l_ii_ind).cascade_ownership_flag := px_default_info_rec.cascade_owner_flag;
7029: p_relationship_ovn => l_config_parent.relationship_ovn,
7030: px_csi_txn_rec => l_csi_txn_rec,
7031: x_return_status => l_return_status);
7032:
7033: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7034: RAISE fnd_api.g_exc_error;
7035: END IF;
7036: END IF;
7037:
7030: px_csi_txn_rec => l_csi_txn_rec,
7031: x_return_status => l_return_status);
7032:
7033: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7034: RAISE fnd_api.g_exc_error;
7035: END IF;
7036: END IF;
7037:
7038: END LOOP;
7050: p_api_name => 'create_relationship');
7051:
7052: csi_ii_relationships_pub.create_relationship(
7053: p_api_version => 1.0,
7054: p_commit => fnd_api.g_false,
7055: p_init_msg_list => fnd_api.g_true,
7056: p_validation_level => fnd_api.g_valid_level_full,
7057: p_relationship_tbl => l_ii_rltns_tbl,
7058: p_txn_rec => l_csi_txn_rec,
7051:
7052: csi_ii_relationships_pub.create_relationship(
7053: p_api_version => 1.0,
7054: p_commit => fnd_api.g_false,
7055: p_init_msg_list => fnd_api.g_true,
7056: p_validation_level => fnd_api.g_valid_level_full,
7057: p_relationship_tbl => l_ii_rltns_tbl,
7058: p_txn_rec => l_csi_txn_rec,
7059: x_return_status => l_return_status,
7052: csi_ii_relationships_pub.create_relationship(
7053: p_api_version => 1.0,
7054: p_commit => fnd_api.g_false,
7055: p_init_msg_list => fnd_api.g_true,
7056: p_validation_level => fnd_api.g_valid_level_full,
7057: p_relationship_tbl => l_ii_rltns_tbl,
7058: p_txn_rec => l_csi_txn_rec,
7059: x_return_status => l_return_status,
7060: x_msg_count => l_msg_count,
7059: x_return_status => l_return_status,
7060: x_msg_count => l_msg_count,
7061: x_msg_data => l_msg_data);
7062:
7063: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7064: RAISE fnd_api.g_exc_error;
7065: END IF;
7066:
7067: END IF;
7060: x_msg_count => l_msg_count,
7061: x_msg_data => l_msg_data);
7062:
7063: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7064: RAISE fnd_api.g_exc_error;
7065: END IF;
7066:
7067: END IF;
7068:
7069: debug('Order Fulfillment of ATO option item successful.');
7070:
7071: EXCEPTION
7072: WHEN do_nothing THEN
7073: x_return_status := fnd_api.g_ret_sts_success;
7074: WHEN fnd_api.g_exc_error THEN
7075: x_return_status := fnd_api.g_ret_sts_error;
7076: WHEN others then
7077: fnd_message.set_name ('FND','FND_GENERIC_MESSAGE');
7070:
7071: EXCEPTION
7072: WHEN do_nothing THEN
7073: x_return_status := fnd_api.g_ret_sts_success;
7074: WHEN fnd_api.g_exc_error THEN
7075: x_return_status := fnd_api.g_ret_sts_error;
7076: WHEN others then
7077: fnd_message.set_name ('FND','FND_GENERIC_MESSAGE');
7078: fnd_message.set_token('MESSAGE', substr(sqlerrm, 1, 300));
7071: EXCEPTION
7072: WHEN do_nothing THEN
7073: x_return_status := fnd_api.g_ret_sts_success;
7074: WHEN fnd_api.g_exc_error THEN
7075: x_return_status := fnd_api.g_ret_sts_error;
7076: WHEN others then
7077: fnd_message.set_name ('FND','FND_GENERIC_MESSAGE');
7078: fnd_message.set_token('MESSAGE', substr(sqlerrm, 1, 300));
7079: fnd_msg_pub.add;
7076: WHEN others then
7077: fnd_message.set_name ('FND','FND_GENERIC_MESSAGE');
7078: fnd_message.set_token('MESSAGE', substr(sqlerrm, 1, 300));
7079: fnd_msg_pub.add;
7080: x_return_status := fnd_api.g_ret_sts_error;
7081: END process_ato_option_srl;
7082:
7083: -- for ato options that are processed from wip
7084: PROCEDURE process_ato_option_from_wip(
7090: x_wip_processing OUT NOCOPY boolean,
7091: x_return_status OUT NOCOPY varchar2)
7092: IS
7093:
7094: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7095: l_wip_processing boolean := TRUE;
7096: l_src_tld_tbl csi_t_datastructures_grp.txn_line_detail_tbl;
7097: l_transaction_line_id number;
7098: l_mdl_ordered_qty number;
7100: l_qty_ratio number; --declared for bug5096435
7101:
7102: BEGIN
7103:
7104: x_return_status := fnd_api.g_ret_sts_success;
7105: api_log('process_ato_option_from_wip');
7106:
7107: l_wip_processing := TRUE;
7108:
7173: csi_t_utilities_pvt.cascade_child(
7174: p_data_string => l_model_hierarchy,
7175: x_return_status => l_return_status );
7176:
7177: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7178: RAISE fnd_api.g_exc_error;
7179: END IF;
7180: EXCEPTION
7181: WHEN no_data_found THEN
7174: p_data_string => l_model_hierarchy,
7175: x_return_status => l_return_status );
7176:
7177: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7178: RAISE fnd_api.g_exc_error;
7179: END IF;
7180: EXCEPTION
7181: WHEN no_data_found THEN
7182: l_transaction_line_id := null;
7191: p_processing_status => 'UNPROCESSED',
7192: x_line_dtl_tbl => l_src_tld_tbl,
7193: x_return_status => l_return_status);
7194:
7195: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7196: RAISE fnd_api.g_exc_error;
7197: END IF;
7198: END IF;
7199:
7192: x_line_dtl_tbl => l_src_tld_tbl,
7193: x_return_status => l_return_status);
7194:
7195: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7196: RAISE fnd_api.g_exc_error;
7197: END IF;
7198: END IF;
7199:
7200: IF p_config_rec.serial_code in (1, 6) THEN
7206: p_tld_tbl => l_src_tld_tbl,
7207: px_default_info_rec => px_default_info_rec,
7208: x_return_status => l_return_status);
7209:
7210: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7211: RAISE fnd_api.g_exc_error;
7212: END IF;
7213:
7214: ELSIF p_config_rec.serial_code IN (2,5) THEN
7207: px_default_info_rec => px_default_info_rec,
7208: x_return_status => l_return_status);
7209:
7210: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7211: RAISE fnd_api.g_exc_error;
7212: END IF;
7213:
7214: ELSIF p_config_rec.serial_code IN (2,5) THEN
7215:
7221: p_tld_tbl => l_src_tld_tbl,
7222: px_default_info_rec => px_default_info_rec,
7223: x_return_status => l_return_status);
7224:
7225: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7226: RAISE fnd_api.g_exc_error;
7227: END IF;
7228:
7229: END IF;
7222: px_default_info_rec => px_default_info_rec,
7223: x_return_status => l_return_status);
7224:
7225: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7226: RAISE fnd_api.g_exc_error;
7227: END IF;
7228:
7229: END IF;
7230: END IF;
7229: END IF;
7230: END IF;
7231:
7232: EXCEPTION
7233: WHEN fnd_api.g_exc_error THEN
7234: x_return_status := fnd_api.g_ret_sts_error;
7235: END process_ato_option_from_wip;
7236:
7237: PROCEDURE get_source_tlds(
7230: END IF;
7231:
7232: EXCEPTION
7233: WHEN fnd_api.g_exc_error THEN
7234: x_return_status := fnd_api.g_ret_sts_error;
7235: END process_ato_option_from_wip;
7236:
7237: PROCEDURE get_source_tlds(
7238: p_tld_tbl IN csi_t_datastructures_grp.txn_line_detail_tbl,
7306: l_inst_owner_id number;
7307: l_inst_owner_type csi_i_parties.party_source_table%TYPE;
7308: l_internal_party_id number;
7309: l_ownership_override varchar2(1) := 'N';
7310: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7311: l_msg_data varchar2(2000);
7312: l_msg_count number;
7313: l_inst_loc_id number;
7314: l_inst_loc_type csi_item_instances.location_type_code%TYPE;
7330: create_csi_transaction(
7331: px_csi_txn_rec => px_csi_txn_rec,
7332: x_return_status => l_return_status);
7333:
7334: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7335: RAISE fnd_api.g_exc_error;
7336: END IF;
7337:
7338: IF p_line_dtl_tbl.COUNT > 0 THEN
7331: px_csi_txn_rec => px_csi_txn_rec,
7332: x_return_status => l_return_status);
7333:
7334: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7335: RAISE fnd_api.g_exc_error;
7336: END IF;
7337:
7338: IF p_line_dtl_tbl.COUNT > 0 THEN
7339: FOR l_td_ind IN p_line_dtl_tbl.FIRST ..p_line_dtl_tbl.LAST
7337:
7338: IF p_line_dtl_tbl.COUNT > 0 THEN
7339: FOR l_td_ind IN p_line_dtl_tbl.FIRST ..p_line_dtl_tbl.LAST
7340: LOOP
7341: IF nvl(p_line_dtl_tbl(l_td_ind).instance_id, fnd_api.g_miss_num)
7342: <> fnd_api.g_miss_num
7343: THEN
7344:
7345: l_txn_line_detail_query_rec.txn_line_detail_id :=
7338: IF p_line_dtl_tbl.COUNT > 0 THEN
7339: FOR l_td_ind IN p_line_dtl_tbl.FIRST ..p_line_dtl_tbl.LAST
7340: LOOP
7341: IF nvl(p_line_dtl_tbl(l_td_ind).instance_id, fnd_api.g_miss_num)
7342: <> fnd_api.g_miss_num
7343: THEN
7344:
7345: l_txn_line_detail_query_rec.txn_line_detail_id :=
7346: p_line_dtl_tbl(l_td_ind).txn_line_detail_id;
7346: p_line_dtl_tbl(l_td_ind).txn_line_detail_id;
7347:
7348: csi_t_txn_details_grp.get_transaction_details(
7349: p_api_version => 1,
7350: p_commit => fnd_api.g_false,
7351: p_init_msg_list => fnd_api.g_true,
7352: p_validation_level => fnd_api.g_valid_level_full,
7353: p_txn_line_query_rec => l_txn_line_query_rec,
7354: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
7347:
7348: csi_t_txn_details_grp.get_transaction_details(
7349: p_api_version => 1,
7350: p_commit => fnd_api.g_false,
7351: p_init_msg_list => fnd_api.g_true,
7352: p_validation_level => fnd_api.g_valid_level_full,
7353: p_txn_line_query_rec => l_txn_line_query_rec,
7354: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
7355: x_txn_line_detail_tbl => l_line_dtl_tbl,
7348: csi_t_txn_details_grp.get_transaction_details(
7349: p_api_version => 1,
7350: p_commit => fnd_api.g_false,
7351: p_init_msg_list => fnd_api.g_true,
7352: p_validation_level => fnd_api.g_valid_level_full,
7353: p_txn_line_query_rec => l_txn_line_query_rec,
7354: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
7355: x_txn_line_detail_tbl => l_line_dtl_tbl,
7356: p_get_parties_flag => fnd_api.g_true,
7352: p_validation_level => fnd_api.g_valid_level_full,
7353: p_txn_line_query_rec => l_txn_line_query_rec,
7354: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
7355: x_txn_line_detail_tbl => l_line_dtl_tbl,
7356: p_get_parties_flag => fnd_api.g_true,
7357: x_txn_party_detail_tbl => l_pty_dtl_tbl,
7358: p_get_pty_accts_flag => fnd_api.g_true,
7359: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
7360: p_get_ii_rltns_flag => fnd_api.g_false,
7354: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
7355: x_txn_line_detail_tbl => l_line_dtl_tbl,
7356: p_get_parties_flag => fnd_api.g_true,
7357: x_txn_party_detail_tbl => l_pty_dtl_tbl,
7358: p_get_pty_accts_flag => fnd_api.g_true,
7359: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
7360: p_get_ii_rltns_flag => fnd_api.g_false,
7361: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
7362: p_get_org_assgns_flag => fnd_api.g_false,
7356: p_get_parties_flag => fnd_api.g_true,
7357: x_txn_party_detail_tbl => l_pty_dtl_tbl,
7358: p_get_pty_accts_flag => fnd_api.g_true,
7359: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
7360: p_get_ii_rltns_flag => fnd_api.g_false,
7361: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
7362: p_get_org_assgns_flag => fnd_api.g_false,
7363: x_txn_org_assgn_tbl => l_org_assgn_tbl,
7364: p_get_ext_attrib_vals_flag => fnd_api.g_false,
7358: p_get_pty_accts_flag => fnd_api.g_true,
7359: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
7360: p_get_ii_rltns_flag => fnd_api.g_false,
7361: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
7362: p_get_org_assgns_flag => fnd_api.g_false,
7363: x_txn_org_assgn_tbl => l_org_assgn_tbl,
7364: p_get_ext_attrib_vals_flag => fnd_api.g_false,
7365: x_txn_ext_attrib_vals_tbl => l_txn_ext_attrib_tbl,
7366: p_get_csi_attribs_flag => fnd_api.g_false,
7360: p_get_ii_rltns_flag => fnd_api.g_false,
7361: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
7362: p_get_org_assgns_flag => fnd_api.g_false,
7363: x_txn_org_assgn_tbl => l_org_assgn_tbl,
7364: p_get_ext_attrib_vals_flag => fnd_api.g_false,
7365: x_txn_ext_attrib_vals_tbl => l_txn_ext_attrib_tbl,
7366: p_get_csi_attribs_flag => fnd_api.g_false,
7367: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
7368: p_get_csi_iea_values_flag => fnd_api.g_false,
7362: p_get_org_assgns_flag => fnd_api.g_false,
7363: x_txn_org_assgn_tbl => l_org_assgn_tbl,
7364: p_get_ext_attrib_vals_flag => fnd_api.g_false,
7365: x_txn_ext_attrib_vals_tbl => l_txn_ext_attrib_tbl,
7366: p_get_csi_attribs_flag => fnd_api.g_false,
7367: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
7368: p_get_csi_iea_values_flag => fnd_api.g_false,
7369: x_csi_iea_values_tbl => l_csi_eav_tbl,
7370: p_get_txn_systems_flag => fnd_api.g_false,
7364: p_get_ext_attrib_vals_flag => fnd_api.g_false,
7365: x_txn_ext_attrib_vals_tbl => l_txn_ext_attrib_tbl,
7366: p_get_csi_attribs_flag => fnd_api.g_false,
7367: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
7368: p_get_csi_iea_values_flag => fnd_api.g_false,
7369: x_csi_iea_values_tbl => l_csi_eav_tbl,
7370: p_get_txn_systems_flag => fnd_api.g_false,
7371: x_txn_systems_tbl => l_txn_systems_tbl,
7372: x_return_status => l_return_status,
7366: p_get_csi_attribs_flag => fnd_api.g_false,
7367: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
7368: p_get_csi_iea_values_flag => fnd_api.g_false,
7369: x_csi_iea_values_tbl => l_csi_eav_tbl,
7370: p_get_txn_systems_flag => fnd_api.g_false,
7371: x_txn_systems_tbl => l_txn_systems_tbl,
7372: x_return_status => l_return_status,
7373: x_msg_count => l_msg_count,
7374: x_msg_data => l_msg_data);
7372: x_return_status => l_return_status,
7373: x_msg_count => l_msg_count,
7374: x_msg_data => l_msg_data);
7375:
7376: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7377: debug('Get transaction details failed for RMA Fulfillment.');
7378: RAISE fnd_api.g_exc_error;
7379: END IF;
7380:
7374: x_msg_data => l_msg_data);
7375:
7376: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7377: debug('Get transaction details failed for RMA Fulfillment.');
7378: RAISE fnd_api.g_exc_error;
7379: END IF;
7380:
7381: IF l_pty_dtl_tbl.COUNT > 0 THEN
7382: FOR l_ind IN l_pty_dtl_tbl.FIRST..l_pty_dtl_tbl.LAST
7390: ELSE
7391: debug('Party not found. Txn Line Dtl ID:'||p_line_dtl_tbl(l_td_ind).txn_line_detail_id);
7392: l_td_owner_id := null;
7393: l_td_owner_type := null;
7394: --RAISE fnd_api.g_exc_error;
7395: END IF;
7396:
7397: l_instance_rec.instance_id := l_line_dtl_tbl(1).instance_id;
7398:
7397: l_instance_rec.instance_id := l_line_dtl_tbl(1).instance_id;
7398:
7399: csi_item_instance_pub.get_item_instance_details(
7400: p_api_version => 1.0,
7401: p_commit => fnd_api.g_false,
7402: p_init_msg_list => fnd_api.g_true,
7403: p_validation_level => fnd_api.g_valid_level_full,
7404: p_instance_rec => l_instance_rec,
7405: p_get_parties => fnd_api.g_true,
7398:
7399: csi_item_instance_pub.get_item_instance_details(
7400: p_api_version => 1.0,
7401: p_commit => fnd_api.g_false,
7402: p_init_msg_list => fnd_api.g_true,
7403: p_validation_level => fnd_api.g_valid_level_full,
7404: p_instance_rec => l_instance_rec,
7405: p_get_parties => fnd_api.g_true,
7406: p_party_header_tbl => l_party_header_tbl,
7399: csi_item_instance_pub.get_item_instance_details(
7400: p_api_version => 1.0,
7401: p_commit => fnd_api.g_false,
7402: p_init_msg_list => fnd_api.g_true,
7403: p_validation_level => fnd_api.g_valid_level_full,
7404: p_instance_rec => l_instance_rec,
7405: p_get_parties => fnd_api.g_true,
7406: p_party_header_tbl => l_party_header_tbl,
7407: p_get_accounts => fnd_api.g_true,
7401: p_commit => fnd_api.g_false,
7402: p_init_msg_list => fnd_api.g_true,
7403: p_validation_level => fnd_api.g_valid_level_full,
7404: p_instance_rec => l_instance_rec,
7405: p_get_parties => fnd_api.g_true,
7406: p_party_header_tbl => l_party_header_tbl,
7407: p_get_accounts => fnd_api.g_true,
7408: p_account_header_tbl => l_account_header_tbl,
7409: p_get_org_assignments => fnd_api.g_false,
7403: p_validation_level => fnd_api.g_valid_level_full,
7404: p_instance_rec => l_instance_rec,
7405: p_get_parties => fnd_api.g_true,
7406: p_party_header_tbl => l_party_header_tbl,
7407: p_get_accounts => fnd_api.g_true,
7408: p_account_header_tbl => l_account_header_tbl,
7409: p_get_org_assignments => fnd_api.g_false,
7410: p_org_header_tbl => l_org_assignments_tbl,
7411: p_get_pricing_attribs => fnd_api.g_false,
7405: p_get_parties => fnd_api.g_true,
7406: p_party_header_tbl => l_party_header_tbl,
7407: p_get_accounts => fnd_api.g_true,
7408: p_account_header_tbl => l_account_header_tbl,
7409: p_get_org_assignments => fnd_api.g_false,
7410: p_org_header_tbl => l_org_assignments_tbl,
7411: p_get_pricing_attribs => fnd_api.g_false,
7412: p_pricing_attrib_tbl => l_pricing_attrib_tbl,
7413: p_get_ext_attribs => fnd_api.g_false,
7407: p_get_accounts => fnd_api.g_true,
7408: p_account_header_tbl => l_account_header_tbl,
7409: p_get_org_assignments => fnd_api.g_false,
7410: p_org_header_tbl => l_org_assignments_tbl,
7411: p_get_pricing_attribs => fnd_api.g_false,
7412: p_pricing_attrib_tbl => l_pricing_attrib_tbl,
7413: p_get_ext_attribs => fnd_api.g_false,
7414: p_ext_attrib_tbl => l_ext_attrib_tbl,
7415: p_ext_attrib_def_tbl => l_ext_attrib_def_tbl,
7409: p_get_org_assignments => fnd_api.g_false,
7410: p_org_header_tbl => l_org_assignments_tbl,
7411: p_get_pricing_attribs => fnd_api.g_false,
7412: p_pricing_attrib_tbl => l_pricing_attrib_tbl,
7413: p_get_ext_attribs => fnd_api.g_false,
7414: p_ext_attrib_tbl => l_ext_attrib_tbl,
7415: p_ext_attrib_def_tbl => l_ext_attrib_def_tbl,
7416: p_get_asset_assignments => fnd_api.g_false,
7417: p_asset_header_tbl => l_asset_assignment_tbl,
7412: p_pricing_attrib_tbl => l_pricing_attrib_tbl,
7413: p_get_ext_attribs => fnd_api.g_false,
7414: p_ext_attrib_tbl => l_ext_attrib_tbl,
7415: p_ext_attrib_def_tbl => l_ext_attrib_def_tbl,
7416: p_get_asset_assignments => fnd_api.g_false,
7417: p_asset_header_tbl => l_asset_assignment_tbl,
7418: p_time_stamp => l_time_stamp,
7419: x_return_status => l_return_status,
7420: x_msg_count => l_msg_count,
7419: x_return_status => l_return_status,
7420: x_msg_count => l_msg_count,
7421: x_msg_data => l_msg_data);
7422:
7423: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7424: debug('Get item instance details failed for RMA Fulfillment.');
7425: RAISE fnd_api.g_exc_error;
7426: END IF;
7427:
7421: x_msg_data => l_msg_data);
7422:
7423: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7424: debug('Get item instance details failed for RMA Fulfillment.');
7425: RAISE fnd_api.g_exc_error;
7426: END IF;
7427:
7428: l_inst_loc_type := l_instance_rec.location_type_code;
7429: l_inst_loc_id := l_instance_rec.location_id;
7427:
7428: l_inst_loc_type := l_instance_rec.location_type_code;
7429: l_inst_loc_id := l_instance_rec.location_id;
7430:
7431: IF nvl(l_line_dtl_tbl(1).inv_organization_id, fnd_api.g_miss_num)
7432: <> fnd_api.g_miss_num
7433: AND l_instance_rec.vld_organization_id <> l_line_dtl_tbl(1).inv_organization_id
7434: THEN
7435: l_vld_orgn_id := l_line_dtl_tbl(1).inv_organization_id; -- FP fix for bug 5072107
7428: l_inst_loc_type := l_instance_rec.location_type_code;
7429: l_inst_loc_id := l_instance_rec.location_id;
7430:
7431: IF nvl(l_line_dtl_tbl(1).inv_organization_id, fnd_api.g_miss_num)
7432: <> fnd_api.g_miss_num
7433: AND l_instance_rec.vld_organization_id <> l_line_dtl_tbl(1).inv_organization_id
7434: THEN
7435: l_vld_orgn_id := l_line_dtl_tbl(1).inv_organization_id; -- FP fix for bug 5072107
7436: IF l_instance_rec.inv_master_organization_id = l_line_dtl_tbl(1).inv_organization_id
7442: l_vld_orgn_id := l_instance_rec.vld_organization_id;
7443: ELSE
7444: fnd_message.set_name('CSI','CSI_INVALID_VLD_MAST_COMB');
7445: fnd_msg_pub.add;
7446: RAISE fnd_api.g_exc_error;
7447: END IF;
7448: END IF;
7449:
7450: /* loop thru the party table to figure out the Instance Owner */
7458: END IF;
7459: END LOOP;
7460: ELSE
7461: debug('Party not found. Instance:'||l_instance_rec.instance_id);
7462: RAISE fnd_api.g_exc_error;
7463: END IF;
7464:
7465: debug('Instance ID : '||l_instance_rec.instance_id);
7466: debug('Instance owner party type : '||l_inst_owner_type);
7479: -- If Party doesn't match orig party then install param authorization requd
7480: IF l_inst_owner_id = l_internal_party_id
7481: AND l_inst_owner_type = 'HZ_PARTIES' THEN
7482: -- check if TLD says expire? If yes, Invalid
7483: IF nvl(l_line_dtl_tbl(1).active_end_date, fnd_api.g_miss_date)
7484: <> fnd_api.g_miss_date THEN
7485: debug('Active End date :'||l_line_dtl_tbl(1).active_end_date
7486: || 'provided on transaction line detail: '
7487: || l_line_dtl_tbl(1).txn_line_detail_id);
7480: IF l_inst_owner_id = l_internal_party_id
7481: AND l_inst_owner_type = 'HZ_PARTIES' THEN
7482: -- check if TLD says expire? If yes, Invalid
7483: IF nvl(l_line_dtl_tbl(1).active_end_date, fnd_api.g_miss_date)
7484: <> fnd_api.g_miss_date THEN
7485: debug('Active End date :'||l_line_dtl_tbl(1).active_end_date
7486: || 'provided on transaction line detail: '
7487: || l_line_dtl_tbl(1).txn_line_detail_id);
7488: fnd_message.set_name('CSI','CSI_TXN_INVALID_INST_REF');
7487: || l_line_dtl_tbl(1).txn_line_detail_id);
7488: fnd_message.set_name('CSI','CSI_TXN_INVALID_INST_REF');
7489: fnd_message.set_token('INSTANCE_ID',l_instance_rec.instance_id);
7490: fnd_msg_pub.add;
7491: RAISE fnd_api.g_exc_error;
7492: ELSIF l_inst_loc_type
7493: NOT IN ( 'INVENTORY','HZ_PARTY_SITES', 'HZ_LOCATIONS', 'VENDOR_SITE', 'INTERNAL_SITE')
7494: THEN
7495: debug('Location type code is :'||l_inst_loc_type);
7496: fnd_message.set_name('CSI', 'CSI_TXN_SRC_LOC_INVALID');
7497: fnd_message.set_token('LOC_CODE', l_inst_loc_type);
7498: fnd_message.set_token('SRC_NAME', 'Conversion to a Customer Ownership ');
7499: fnd_msg_pub.add;
7500: RAISE fnd_api.g_exc_error;
7501: -- allow only externally located
7502: END IF;
7503: END IF;
7504:
7509: debug('Owner Change.');
7510: fnd_message.set_name('CSI', 'CSI_API_INVALID_PARTY_SOURCE');
7511: fnd_message.set_token('PARTY_SOURCE_TABLE', l_td_owner_type);
7512: fnd_msg_pub.add;
7513: RAISE fnd_api.g_exc_error;
7514: ELSIF l_td_owner_id <> l_inst_owner_id THEN
7515: IF l_ownership_override = 'Y' THEN
7516: debug('Ownership Change and is allowed.');
7517: ELSE
7520: fnd_message.set_token('OLD_PARTY_ID',l_inst_owner_id);
7521: fnd_message.set_token('NEW_PARTY_ID',l_td_owner_id);
7522: fnd_message.set_token('INSTANCE_ID',l_instance_rec.instance_id);
7523: fnd_msg_pub.add;
7524: RAISE fnd_api.g_exc_error;
7525: END IF;
7526: END IF;
7527: ELSE -- no owner entered in TD
7528: IF ((l_inst_owner_type = 'HZ_PARTIES' )
7530: THEN
7531: IF l_ownership_override = 'Y' THEN
7532: debug('Ownership Change and is allowed.');
7533: ELSE
7534: IF nvl(p_order_line_rec.end_customer_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num
7535: AND l_inst_owner_id <> p_order_line_rec.end_customer_id
7536: THEN -- end customer exists
7537: -- for normal NON-partner order, checks for ownership override will be
7538: -- done anyway later in update_install_base since we do not have party_id here
7541: fnd_message.set_token('OLD_PARTY_ID',l_inst_owner_id);
7542: fnd_message.set_token('NEW_PARTY_ID',l_td_owner_id);
7543: fnd_message.set_token('INSTANCE_ID',l_instance_rec.instance_id);
7544: fnd_msg_pub.add;
7545: RAISE fnd_api.g_exc_error;
7546: END IF;
7547: END IF;
7548: END IF;
7549: END IF;
7555: IF p_line_dtl_tbl(l_td_ind).quantity > l_instance_rec.quantity THEN
7556: fnd_message.set_name('CSI','CSI_INT_QTY_CHK_FAILED');
7557: fnd_message.set_token('INSTANCE_ID',l_instance_rec.instance_id);
7558: fnd_msg_pub.add;
7559: RAISE fnd_api.g_exc_error;
7560: ELSIF l_line_dtl_tbl(1).quantity < l_instance_rec.quantity THEN
7561: -- split the instance and process....
7562: l_quantity1 := l_instance_rec.quantity - l_line_dtl_tbl(1).quantity ;
7563: l_split_src_inst_rec.instance_id := l_instance_rec.instance_id;
7568: p_api_name => 'split_item_instance');
7569:
7570: csi_item_instance_pvt.split_item_instance (
7571: p_api_version => 1.0,
7572: p_commit => fnd_api.g_false,
7573: p_init_msg_list => fnd_api.g_true,
7574: p_validation_level => fnd_api.g_valid_level_full,
7575: p_source_instance_rec => l_split_src_inst_rec,
7576: p_quantity1 => l_quantity1,
7569:
7570: csi_item_instance_pvt.split_item_instance (
7571: p_api_version => 1.0,
7572: p_commit => fnd_api.g_false,
7573: p_init_msg_list => fnd_api.g_true,
7574: p_validation_level => fnd_api.g_valid_level_full,
7575: p_source_instance_rec => l_split_src_inst_rec,
7576: p_quantity1 => l_quantity1,
7577: p_quantity2 => l_line_dtl_tbl(1).quantity,
7570: csi_item_instance_pvt.split_item_instance (
7571: p_api_version => 1.0,
7572: p_commit => fnd_api.g_false,
7573: p_init_msg_list => fnd_api.g_true,
7574: p_validation_level => fnd_api.g_valid_level_full,
7575: p_source_instance_rec => l_split_src_inst_rec,
7576: p_quantity1 => l_quantity1,
7577: p_quantity2 => l_line_dtl_tbl(1).quantity,
7578: p_copy_ext_attribs => fnd_api.g_true,
7574: p_validation_level => fnd_api.g_valid_level_full,
7575: p_source_instance_rec => l_split_src_inst_rec,
7576: p_quantity1 => l_quantity1,
7577: p_quantity2 => l_line_dtl_tbl(1).quantity,
7578: p_copy_ext_attribs => fnd_api.g_true,
7579: p_copy_org_assignments => fnd_api.g_true,
7580: p_copy_parties => fnd_api.g_true,
7581: p_copy_accounts => fnd_api.g_true,
7582: p_copy_asset_assignments => fnd_api.g_true,
7575: p_source_instance_rec => l_split_src_inst_rec,
7576: p_quantity1 => l_quantity1,
7577: p_quantity2 => l_line_dtl_tbl(1).quantity,
7578: p_copy_ext_attribs => fnd_api.g_true,
7579: p_copy_org_assignments => fnd_api.g_true,
7580: p_copy_parties => fnd_api.g_true,
7581: p_copy_accounts => fnd_api.g_true,
7582: p_copy_asset_assignments => fnd_api.g_true,
7583: p_copy_pricing_attribs => fnd_api.g_true,
7576: p_quantity1 => l_quantity1,
7577: p_quantity2 => l_line_dtl_tbl(1).quantity,
7578: p_copy_ext_attribs => fnd_api.g_true,
7579: p_copy_org_assignments => fnd_api.g_true,
7580: p_copy_parties => fnd_api.g_true,
7581: p_copy_accounts => fnd_api.g_true,
7582: p_copy_asset_assignments => fnd_api.g_true,
7583: p_copy_pricing_attribs => fnd_api.g_true,
7584: p_txn_rec => px_csi_txn_rec,
7577: p_quantity2 => l_line_dtl_tbl(1).quantity,
7578: p_copy_ext_attribs => fnd_api.g_true,
7579: p_copy_org_assignments => fnd_api.g_true,
7580: p_copy_parties => fnd_api.g_true,
7581: p_copy_accounts => fnd_api.g_true,
7582: p_copy_asset_assignments => fnd_api.g_true,
7583: p_copy_pricing_attribs => fnd_api.g_true,
7584: p_txn_rec => px_csi_txn_rec,
7585: x_new_instance_rec => l_split_new_inst_rec,
7578: p_copy_ext_attribs => fnd_api.g_true,
7579: p_copy_org_assignments => fnd_api.g_true,
7580: p_copy_parties => fnd_api.g_true,
7581: p_copy_accounts => fnd_api.g_true,
7582: p_copy_asset_assignments => fnd_api.g_true,
7583: p_copy_pricing_attribs => fnd_api.g_true,
7584: p_txn_rec => px_csi_txn_rec,
7585: x_new_instance_rec => l_split_new_inst_rec,
7586: x_return_status => l_return_status,
7579: p_copy_org_assignments => fnd_api.g_true,
7580: p_copy_parties => fnd_api.g_true,
7581: p_copy_accounts => fnd_api.g_true,
7582: p_copy_asset_assignments => fnd_api.g_true,
7583: p_copy_pricing_attribs => fnd_api.g_true,
7584: p_txn_rec => px_csi_txn_rec,
7585: x_new_instance_rec => l_split_new_inst_rec,
7586: x_return_status => l_return_status,
7587: x_msg_count => l_msg_count,
7586: x_return_status => l_return_status,
7587: x_msg_count => l_msg_count,
7588: x_msg_data => l_msg_data);
7589:
7590: IF NOT(l_return_status = fnd_api.g_ret_sts_success) THEN
7591: debug('csi_item_instance_pvt.split_item_instance raised errors');
7592: raise fnd_api.g_exc_error;
7593: END IF;
7594: l_u_line_dtl_tbl(1).instance_id := l_split_new_inst_rec.instance_id;
7588: x_msg_data => l_msg_data);
7589:
7590: IF NOT(l_return_status = fnd_api.g_ret_sts_success) THEN
7591: debug('csi_item_instance_pvt.split_item_instance raised errors');
7592: raise fnd_api.g_exc_error;
7593: END IF;
7594: l_u_line_dtl_tbl(1).instance_id := l_split_new_inst_rec.instance_id;
7595: l_u_line_dtl_tbl(1).preserve_detail_flag := 'Y';
7596: debug('Newly split Instance ID : '||l_split_new_inst_rec.instance_id);
7601: l_u_txn_line_rec.transaction_line_id := p_line_dtl_tbl(l_td_ind).transaction_line_id;
7602:
7603: l_u_line_dtl_tbl(1).txn_line_detail_id := p_line_dtl_tbl(l_td_ind).txn_line_detail_id;
7604:
7605: IF nvl(l_vld_orgn_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
7606: l_u_line_dtl_tbl(1).inv_organization_id := l_vld_orgn_id; -- FP fix for bug 5072107
7607: END IF;
7608:
7609: l_u_line_dtl_tbl(1).transaction_line_id := p_line_dtl_tbl(l_td_ind).transaction_line_id;
7610: l_u_line_dtl_tbl(1).processing_status := 'IN_PROCESS';
7611:
7612: csi_t_txn_details_grp.update_txn_line_dtls(
7613: p_api_version => 1.0,
7614: p_commit => fnd_api.g_false,
7615: p_init_msg_list => fnd_api.g_true,
7616: p_validation_level => fnd_api.g_valid_level_full,
7617: p_txn_line_rec => l_u_txn_line_rec,
7618: p_txn_line_detail_tbl => l_u_line_dtl_tbl,
7611:
7612: csi_t_txn_details_grp.update_txn_line_dtls(
7613: p_api_version => 1.0,
7614: p_commit => fnd_api.g_false,
7615: p_init_msg_list => fnd_api.g_true,
7616: p_validation_level => fnd_api.g_valid_level_full,
7617: p_txn_line_rec => l_u_txn_line_rec,
7618: p_txn_line_detail_tbl => l_u_line_dtl_tbl,
7619: px_txn_ii_rltns_tbl => l_u_ii_rltns_tbl,
7612: csi_t_txn_details_grp.update_txn_line_dtls(
7613: p_api_version => 1.0,
7614: p_commit => fnd_api.g_false,
7615: p_init_msg_list => fnd_api.g_true,
7616: p_validation_level => fnd_api.g_valid_level_full,
7617: p_txn_line_rec => l_u_txn_line_rec,
7618: p_txn_line_detail_tbl => l_u_line_dtl_tbl,
7619: px_txn_ii_rltns_tbl => l_u_ii_rltns_tbl,
7620: px_txn_party_detail_tbl => l_u_pty_dtl_tbl,
7624: x_return_status => l_return_status,
7625: x_msg_count => l_msg_count,
7626: x_msg_data => l_msg_data);
7627:
7628: IF x_return_status <> fnd_api.g_ret_sts_success THEN
7629: debug('Update txn line dtls failed for RMA Fulfillment.');
7630: RAISE fnd_api.g_exc_error;
7631: END IF;
7632:
7626: x_msg_data => l_msg_data);
7627:
7628: IF x_return_status <> fnd_api.g_ret_sts_success THEN
7629: debug('Update txn line dtls failed for RMA Fulfillment.');
7630: RAISE fnd_api.g_exc_error;
7631: END IF;
7632:
7633: END IF;
7634: END LOOP;
7634: END LOOP;
7635: END IF;
7636:
7637: EXCEPTION
7638: WHEN fnd_api.g_exc_error THEN
7639: x_return_status := fnd_api.g_ret_sts_error;
7640:
7641: END demo_fulfillment;
7642:
7635: END IF;
7636:
7637: EXCEPTION
7638: WHEN fnd_api.g_exc_error THEN
7639: x_return_status := fnd_api.g_ret_sts_error;
7640:
7641: END demo_fulfillment;
7642:
7643: -- configurator fulfillment
7681:
7682: -- Added this for unlock_item_instances
7683: l_config_tbl csi_cz_int.config_tbl;
7684:
7685: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7686: l_return_message varchar2(2000);
7687: l_msg_count number;
7688: l_msg_data varchar2(2000);
7689:
7688: l_msg_data varchar2(2000);
7689:
7690: BEGIN
7691:
7692: x_return_status := fnd_api.g_ret_sts_success;
7693:
7694: debug('Configurator fulfillment for order line id :'||p_order_line_id);
7695:
7696: api_log('cz_fulfillment');
7703: x_source_header_rec => l_source_header_rec,
7704: x_source_line_rec => l_source_line_rec,
7705: x_return_status => l_return_status);
7706:
7707: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7708: RAISE fnd_api.g_exc_error;
7709: END IF;
7710:
7711: -- check for user entered transaction details
7704: x_source_line_rec => l_source_line_rec,
7705: x_return_status => l_return_status);
7706:
7707: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7708: RAISE fnd_api.g_exc_error;
7709: END IF;
7710:
7711: -- check for user entered transaction details
7712: l_txn_line_rec.source_transaction_table := csi_interface_pkg.g_om_source_table;
7722: l_txn_line_query_rec.source_transaction_id := l_source_line_rec.source_line_id;
7723:
7724: csi_t_txn_details_grp.get_transaction_details(
7725: p_api_version => 1.0,
7726: p_commit => fnd_api.g_false,
7727: p_init_msg_list => fnd_api.g_true,
7728: p_validation_level => fnd_api.g_valid_level_full,
7729: p_txn_line_query_rec => l_txn_line_query_rec,
7730: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
7723:
7724: csi_t_txn_details_grp.get_transaction_details(
7725: p_api_version => 1.0,
7726: p_commit => fnd_api.g_false,
7727: p_init_msg_list => fnd_api.g_true,
7728: p_validation_level => fnd_api.g_valid_level_full,
7729: p_txn_line_query_rec => l_txn_line_query_rec,
7730: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
7731: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
7724: csi_t_txn_details_grp.get_transaction_details(
7725: p_api_version => 1.0,
7726: p_commit => fnd_api.g_false,
7727: p_init_msg_list => fnd_api.g_true,
7728: p_validation_level => fnd_api.g_valid_level_full,
7729: p_txn_line_query_rec => l_txn_line_query_rec,
7730: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
7731: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
7732: p_get_parties_flag => fnd_api.g_true,
7728: p_validation_level => fnd_api.g_valid_level_full,
7729: p_txn_line_query_rec => l_txn_line_query_rec,
7730: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
7731: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
7732: p_get_parties_flag => fnd_api.g_true,
7733: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
7734: p_get_pty_accts_flag => fnd_api.g_true,
7735: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
7736: p_get_ii_rltns_flag => fnd_api.g_false,
7730: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
7731: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
7732: p_get_parties_flag => fnd_api.g_true,
7733: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
7734: p_get_pty_accts_flag => fnd_api.g_true,
7735: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
7736: p_get_ii_rltns_flag => fnd_api.g_false,
7737: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
7738: p_get_org_assgns_flag => fnd_api.g_true,
7732: p_get_parties_flag => fnd_api.g_true,
7733: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
7734: p_get_pty_accts_flag => fnd_api.g_true,
7735: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
7736: p_get_ii_rltns_flag => fnd_api.g_false,
7737: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
7738: p_get_org_assgns_flag => fnd_api.g_true,
7739: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
7740: p_get_ext_attrib_vals_flag => fnd_api.g_false,
7734: p_get_pty_accts_flag => fnd_api.g_true,
7735: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
7736: p_get_ii_rltns_flag => fnd_api.g_false,
7737: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
7738: p_get_org_assgns_flag => fnd_api.g_true,
7739: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
7740: p_get_ext_attrib_vals_flag => fnd_api.g_false,
7741: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
7742: p_get_csi_attribs_flag => fnd_api.g_false,
7736: p_get_ii_rltns_flag => fnd_api.g_false,
7737: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
7738: p_get_org_assgns_flag => fnd_api.g_true,
7739: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
7740: p_get_ext_attrib_vals_flag => fnd_api.g_false,
7741: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
7742: p_get_csi_attribs_flag => fnd_api.g_false,
7743: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
7744: p_get_csi_iea_values_flag => fnd_api.g_false,
7738: p_get_org_assgns_flag => fnd_api.g_true,
7739: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
7740: p_get_ext_attrib_vals_flag => fnd_api.g_false,
7741: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
7742: p_get_csi_attribs_flag => fnd_api.g_false,
7743: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
7744: p_get_csi_iea_values_flag => fnd_api.g_false,
7745: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
7746: p_get_txn_systems_flag => fnd_api.g_false,
7740: p_get_ext_attrib_vals_flag => fnd_api.g_false,
7741: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
7742: p_get_csi_attribs_flag => fnd_api.g_false,
7743: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
7744: p_get_csi_iea_values_flag => fnd_api.g_false,
7745: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
7746: p_get_txn_systems_flag => fnd_api.g_false,
7747: x_txn_systems_tbl => l_g_txn_systems_tbl,
7748: x_return_status => l_return_status,
7742: p_get_csi_attribs_flag => fnd_api.g_false,
7743: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
7744: p_get_csi_iea_values_flag => fnd_api.g_false,
7745: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
7746: p_get_txn_systems_flag => fnd_api.g_false,
7747: x_txn_systems_tbl => l_g_txn_systems_tbl,
7748: x_return_status => l_return_status,
7749: x_msg_count => l_msg_count,
7750: x_msg_data => l_msg_data);
7748: x_return_status => l_return_status,
7749: x_msg_count => l_msg_count,
7750: x_msg_data => l_msg_data);
7751:
7752: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7753: RAISE fnd_api.g_exc_error;
7754: END IF;
7755:
7756: -- l_txn_line_rec.source_transaction_type_id := csi_interface_pkg.g_om_txn_type_id;
7749: x_msg_count => l_msg_count,
7750: x_msg_data => l_msg_data);
7751:
7752: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7753: RAISE fnd_api.g_exc_error;
7754: END IF;
7755:
7756: -- l_txn_line_rec.source_transaction_type_id := csi_interface_pkg.g_om_txn_type_id;
7757: l_txn_line_rec.source_transaction_type_id := csi_interface_pkg.g_macd_txn_type_id; --bug 5194812
7776: px_txn_org_assgn_tbl => l_txn_org_assgn_tbl,
7777: x_pricing_attribs_tbl => l_pricing_attribs_tbl,
7778: x_return_status => l_return_status);
7779:
7780: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7781: RAISE fnd_api.g_exc_error;
7782: END IF;
7783:
7784: ELSE -- if not entered then build a brand new one using the source info
7777: x_pricing_attribs_tbl => l_pricing_attribs_tbl,
7778: x_return_status => l_return_status);
7779:
7780: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7781: RAISE fnd_api.g_exc_error;
7782: END IF;
7783:
7784: ELSE -- if not entered then build a brand new one using the source info
7785:
7799: x_txn_org_assgn_tbl => l_txn_org_assgn_tbl,
7800: x_pricing_attribs_tbl => l_pricing_attribs_tbl,
7801: x_return_status => l_return_status);
7802:
7803: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7804: RAISE fnd_api.g_exc_error;
7805: END IF;
7806:
7807: END IF;
7800: x_pricing_attribs_tbl => l_pricing_attribs_tbl,
7801: x_return_status => l_return_status);
7802:
7803: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7804: RAISE fnd_api.g_exc_error;
7805: END IF;
7806:
7807: END IF;
7808:
7818: x_txn_ii_rltns_tbl => l_txn_ii_rltns_tbl,
7819: x_txn_eav_tbl => l_txn_eav_tbl,
7820: x_return_status => l_return_status);
7821:
7822: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7823: RAISE fnd_api.g_exc_error;
7824: END IF;
7825:
7826: -- Added the following call for unlockinig the config keys to be fulfilled
7819: x_txn_eav_tbl => l_txn_eav_tbl,
7820: x_return_status => l_return_status);
7821:
7822: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7823: RAISE fnd_api.g_exc_error;
7824: END IF;
7825:
7826: -- Added the following call for unlockinig the config keys to be fulfilled
7827: IF l_txn_line_detail_tbl.count > 0
7838: l_config_tbl(1).source_txn_line_ref1 := l_source_line_rec.source_line_id;
7839:
7840: csi_cz_int.unlock_item_instances(
7841: p_api_version => 1.0,
7842: p_init_msg_list => fnd_api.g_true,
7843: p_commit => fnd_api.g_false,
7844: p_validation_level => fnd_api.g_valid_level_full,
7845: p_config_tbl => l_config_tbl,
7846: x_return_status => l_return_status,
7839:
7840: csi_cz_int.unlock_item_instances(
7841: p_api_version => 1.0,
7842: p_init_msg_list => fnd_api.g_true,
7843: p_commit => fnd_api.g_false,
7844: p_validation_level => fnd_api.g_valid_level_full,
7845: p_config_tbl => l_config_tbl,
7846: x_return_status => l_return_status,
7847: x_msg_count => l_msg_count,
7840: csi_cz_int.unlock_item_instances(
7841: p_api_version => 1.0,
7842: p_init_msg_list => fnd_api.g_true,
7843: p_commit => fnd_api.g_false,
7844: p_validation_level => fnd_api.g_valid_level_full,
7845: p_config_tbl => l_config_tbl,
7846: x_return_status => l_return_status,
7847: x_msg_count => l_msg_count,
7848: x_msg_data => l_msg_data);
7846: x_return_status => l_return_status,
7847: x_msg_count => l_msg_count,
7848: x_msg_data => l_msg_data);
7849:
7850: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7851: RAISE fnd_api.g_exc_error;
7852: END IF;
7853: END LOOP;
7854: END IF;
7847: x_msg_count => l_msg_count,
7848: x_msg_data => l_msg_data);
7849:
7850: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7851: RAISE fnd_api.g_exc_error;
7852: END IF;
7853: END LOOP;
7854: END IF;
7855:
7868: px_pricing_attribs_tbl => l_pricing_attribs_tbl,
7869: x_return_status => l_return_status,
7870: x_return_message => l_return_message);
7871:
7872: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7873: RAISE fnd_api.g_exc_error;
7874: END IF;
7875:
7876: debug('Configurator fulfillment successful for order line id :'||p_order_line_id);
7869: x_return_status => l_return_status,
7870: x_return_message => l_return_message);
7871:
7872: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7873: RAISE fnd_api.g_exc_error;
7874: END IF;
7875:
7876: debug('Configurator fulfillment successful for order line id :'||p_order_line_id);
7877:
7875:
7876: debug('Configurator fulfillment successful for order line id :'||p_order_line_id);
7877:
7878: EXCEPTION
7879: WHEN fnd_api.g_exc_error THEN
7880: x_return_status := fnd_api.g_ret_sts_error;
7881: x_return_message := csi_t_gen_utility_pvt.dump_error_stack;
7882: rollback to cz_fulfillment;
7883: debug(x_return_message);
7876: debug('Configurator fulfillment successful for order line id :'||p_order_line_id);
7877:
7878: EXCEPTION
7879: WHEN fnd_api.g_exc_error THEN
7880: x_return_status := fnd_api.g_ret_sts_error;
7881: x_return_message := csi_t_gen_utility_pvt.dump_error_stack;
7882: rollback to cz_fulfillment;
7883: debug(x_return_message);
7884: WHEN others THEN
7884: WHEN others THEN
7885: fnd_message.set_name ('FND', 'FND_GENERIC_MESSAGE');
7886: fnd_message.set_token('MESSAGE', 'OTHERS Error :'||substr(sqlerrm, 1, 300));
7887: fnd_msg_pub.add;
7888: x_return_status := fnd_api.g_ret_sts_error;
7889: x_return_message := csi_t_gen_utility_pvt.dump_error_stack;
7890: rollback to cz_fulfillment;
7891: debug(x_return_message);
7892: END cz_fulfillment;
7920:
7921: l_src_tld_tbl csi_t_datastructures_grp.txn_line_detail_tbl;
7922: l_src_tld_total_qty number := 0;
7923:
7924: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7925: l_msg_count number;
7926: l_msg_data varchar2(2000);
7927:
7928: BEGIN
7926: l_msg_data varchar2(2000);
7927:
7928: BEGIN
7929:
7930: x_return_status := fnd_api.g_ret_sts_success;
7931:
7932: api_log('query_tld_and_update_ib');
7933:
7934: l_p_tl_rec.transaction_line_id := px_default_info_rec.transaction_line_id;
7942: l_tl_query_rec.source_transaction_table := 'OE_ORDER_LINES_ALL';
7943: l_tl_query_rec.source_transaction_id := p_order_line_rec.order_line_id;
7944:
7945: l_tld_query_rec.processing_status := 'IN_PROCESS';
7946: l_tld_query_rec.source_transaction_flag := fnd_api.g_miss_char;
7947:
7948: csi_t_txn_details_grp.get_transaction_details(
7949: p_api_version => 1,
7950: p_commit => fnd_api.g_false,
7946: l_tld_query_rec.source_transaction_flag := fnd_api.g_miss_char;
7947:
7948: csi_t_txn_details_grp.get_transaction_details(
7949: p_api_version => 1,
7950: p_commit => fnd_api.g_false,
7951: p_init_msg_list => fnd_api.g_true,
7952: p_validation_level => fnd_api.g_valid_level_full,
7953: p_txn_line_query_rec => l_tl_query_rec,
7954: p_txn_line_detail_query_rec => l_tld_query_rec,
7947:
7948: csi_t_txn_details_grp.get_transaction_details(
7949: p_api_version => 1,
7950: p_commit => fnd_api.g_false,
7951: p_init_msg_list => fnd_api.g_true,
7952: p_validation_level => fnd_api.g_valid_level_full,
7953: p_txn_line_query_rec => l_tl_query_rec,
7954: p_txn_line_detail_query_rec => l_tld_query_rec,
7955: x_txn_line_detail_tbl => l_p_tld_tbl,
7948: csi_t_txn_details_grp.get_transaction_details(
7949: p_api_version => 1,
7950: p_commit => fnd_api.g_false,
7951: p_init_msg_list => fnd_api.g_true,
7952: p_validation_level => fnd_api.g_valid_level_full,
7953: p_txn_line_query_rec => l_tl_query_rec,
7954: p_txn_line_detail_query_rec => l_tld_query_rec,
7955: x_txn_line_detail_tbl => l_p_tld_tbl,
7956: p_get_parties_flag => fnd_api.g_true,
7952: p_validation_level => fnd_api.g_valid_level_full,
7953: p_txn_line_query_rec => l_tl_query_rec,
7954: p_txn_line_detail_query_rec => l_tld_query_rec,
7955: x_txn_line_detail_tbl => l_p_tld_tbl,
7956: p_get_parties_flag => fnd_api.g_true,
7957: x_txn_party_detail_tbl => l_p_tpd_tbl,
7958: p_get_pty_accts_flag => fnd_api.g_true,
7959: x_txn_pty_acct_detail_tbl => l_p_tpa_tbl,
7960: p_get_ii_rltns_flag => fnd_api.g_true,
7954: p_txn_line_detail_query_rec => l_tld_query_rec,
7955: x_txn_line_detail_tbl => l_p_tld_tbl,
7956: p_get_parties_flag => fnd_api.g_true,
7957: x_txn_party_detail_tbl => l_p_tpd_tbl,
7958: p_get_pty_accts_flag => fnd_api.g_true,
7959: x_txn_pty_acct_detail_tbl => l_p_tpa_tbl,
7960: p_get_ii_rltns_flag => fnd_api.g_true,
7961: x_txn_ii_rltns_tbl => l_p_tiir_tbl,
7962: p_get_org_assgns_flag => fnd_api.g_true,
7956: p_get_parties_flag => fnd_api.g_true,
7957: x_txn_party_detail_tbl => l_p_tpd_tbl,
7958: p_get_pty_accts_flag => fnd_api.g_true,
7959: x_txn_pty_acct_detail_tbl => l_p_tpa_tbl,
7960: p_get_ii_rltns_flag => fnd_api.g_true,
7961: x_txn_ii_rltns_tbl => l_p_tiir_tbl,
7962: p_get_org_assgns_flag => fnd_api.g_true,
7963: x_txn_org_assgn_tbl => l_p_toa_tbl,
7964: p_get_ext_attrib_vals_flag => fnd_api.g_true,
7958: p_get_pty_accts_flag => fnd_api.g_true,
7959: x_txn_pty_acct_detail_tbl => l_p_tpa_tbl,
7960: p_get_ii_rltns_flag => fnd_api.g_true,
7961: x_txn_ii_rltns_tbl => l_p_tiir_tbl,
7962: p_get_org_assgns_flag => fnd_api.g_true,
7963: x_txn_org_assgn_tbl => l_p_toa_tbl,
7964: p_get_ext_attrib_vals_flag => fnd_api.g_true,
7965: x_txn_ext_attrib_vals_tbl => l_p_teav_tbl,
7966: p_get_csi_attribs_flag => fnd_api.g_false,
7960: p_get_ii_rltns_flag => fnd_api.g_true,
7961: x_txn_ii_rltns_tbl => l_p_tiir_tbl,
7962: p_get_org_assgns_flag => fnd_api.g_true,
7963: x_txn_org_assgn_tbl => l_p_toa_tbl,
7964: p_get_ext_attrib_vals_flag => fnd_api.g_true,
7965: x_txn_ext_attrib_vals_tbl => l_p_teav_tbl,
7966: p_get_csi_attribs_flag => fnd_api.g_false,
7967: x_csi_ext_attribs_tbl => l_p_ea_tbl,
7968: p_get_csi_iea_values_flag => fnd_api.g_false,
7962: p_get_org_assgns_flag => fnd_api.g_true,
7963: x_txn_org_assgn_tbl => l_p_toa_tbl,
7964: p_get_ext_attrib_vals_flag => fnd_api.g_true,
7965: x_txn_ext_attrib_vals_tbl => l_p_teav_tbl,
7966: p_get_csi_attribs_flag => fnd_api.g_false,
7967: x_csi_ext_attribs_tbl => l_p_ea_tbl,
7968: p_get_csi_iea_values_flag => fnd_api.g_false,
7969: x_csi_iea_values_tbl => l_p_eav_tbl,
7970: p_get_txn_systems_flag => fnd_api.g_true,
7964: p_get_ext_attrib_vals_flag => fnd_api.g_true,
7965: x_txn_ext_attrib_vals_tbl => l_p_teav_tbl,
7966: p_get_csi_attribs_flag => fnd_api.g_false,
7967: x_csi_ext_attribs_tbl => l_p_ea_tbl,
7968: p_get_csi_iea_values_flag => fnd_api.g_false,
7969: x_csi_iea_values_tbl => l_p_eav_tbl,
7970: p_get_txn_systems_flag => fnd_api.g_true,
7971: x_txn_systems_tbl => l_p_tsys_tbl,
7972: x_return_status => l_return_status,
7966: p_get_csi_attribs_flag => fnd_api.g_false,
7967: x_csi_ext_attribs_tbl => l_p_ea_tbl,
7968: p_get_csi_iea_values_flag => fnd_api.g_false,
7969: x_csi_iea_values_tbl => l_p_eav_tbl,
7970: p_get_txn_systems_flag => fnd_api.g_true,
7971: x_txn_systems_tbl => l_p_tsys_tbl,
7972: x_return_status => l_return_status,
7973: x_msg_count => l_msg_count,
7974: x_msg_data => l_msg_data);
7972: x_return_status => l_return_status,
7973: x_msg_count => l_msg_count,
7974: x_msg_data => l_msg_data);
7975:
7976: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7977: RAISE fnd_api.g_exc_error;
7978: END IF;
7979:
7980: IF l_p_tld_tbl.COUNT > 0 THEN
7973: x_msg_count => l_msg_count,
7974: x_msg_data => l_msg_data);
7975:
7976: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7977: RAISE fnd_api.g_exc_error;
7978: END IF;
7979:
7980: IF l_p_tld_tbl.COUNT > 0 THEN
7981:
8003: -- assign default current and default install location
8004: FOR l_ind IN l_p_tld_tbl.FIRST .. l_p_tld_tbl.LAST
8005: LOOP
8006: IF l_p_tld_tbl(l_ind).source_transaction_flag = 'Y' THEN
8007: IF nvl(l_p_tld_tbl(l_ind).location_type_code,fnd_api.g_miss_char) =
8008: fnd_api.g_miss_char
8009: OR
8010: nvl(l_p_tld_tbl(l_ind).location_id, fnd_api.g_miss_num) = fnd_api.g_miss_num
8011: THEN
8004: FOR l_ind IN l_p_tld_tbl.FIRST .. l_p_tld_tbl.LAST
8005: LOOP
8006: IF l_p_tld_tbl(l_ind).source_transaction_flag = 'Y' THEN
8007: IF nvl(l_p_tld_tbl(l_ind).location_type_code,fnd_api.g_miss_char) =
8008: fnd_api.g_miss_char
8009: OR
8010: nvl(l_p_tld_tbl(l_ind).location_id, fnd_api.g_miss_num) = fnd_api.g_miss_num
8011: THEN
8012: l_p_tld_tbl(l_ind).location_type_code := 'HZ_PARTY_SITES';
8006: IF l_p_tld_tbl(l_ind).source_transaction_flag = 'Y' THEN
8007: IF nvl(l_p_tld_tbl(l_ind).location_type_code,fnd_api.g_miss_char) =
8008: fnd_api.g_miss_char
8009: OR
8010: nvl(l_p_tld_tbl(l_ind).location_id, fnd_api.g_miss_num) = fnd_api.g_miss_num
8011: THEN
8012: l_p_tld_tbl(l_ind).location_type_code := 'HZ_PARTY_SITES';
8013: l_p_tld_tbl(l_ind).location_id := px_default_info_rec.current_party_site_id;
8014: END IF;
8012: l_p_tld_tbl(l_ind).location_type_code := 'HZ_PARTY_SITES';
8013: l_p_tld_tbl(l_ind).location_id := px_default_info_rec.current_party_site_id;
8014: END IF;
8015:
8016: IF nvl(l_p_tld_tbl(l_ind).install_location_type_code,fnd_api.g_miss_char) =
8017: fnd_api.g_miss_char
8018: OR
8019: nvl(l_p_tld_tbl(l_ind).install_location_id, fnd_api.g_miss_num) = fnd_api.g_miss_num
8020: THEN
8013: l_p_tld_tbl(l_ind).location_id := px_default_info_rec.current_party_site_id;
8014: END IF;
8015:
8016: IF nvl(l_p_tld_tbl(l_ind).install_location_type_code,fnd_api.g_miss_char) =
8017: fnd_api.g_miss_char
8018: OR
8019: nvl(l_p_tld_tbl(l_ind).install_location_id, fnd_api.g_miss_num) = fnd_api.g_miss_num
8020: THEN
8021: l_p_tld_tbl(l_ind).install_location_type_code := 'HZ_PARTY_SITES';
8015:
8016: IF nvl(l_p_tld_tbl(l_ind).install_location_type_code,fnd_api.g_miss_char) =
8017: fnd_api.g_miss_char
8018: OR
8019: nvl(l_p_tld_tbl(l_ind).install_location_id, fnd_api.g_miss_num) = fnd_api.g_miss_num
8020: THEN
8021: l_p_tld_tbl(l_ind).install_location_type_code := 'HZ_PARTY_SITES';
8022: l_p_tld_tbl(l_ind).install_location_id :=
8023: px_default_info_rec.install_party_site_id;
8030: p_line_id => p_order_line_rec.order_line_id,
8031: x_pricing_attb_tbl => l_p_pa_tbl,
8032: x_return_status => l_return_status);
8033:
8034: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8035: RAISE fnd_api.g_exc_error;
8036: END IF;
8037:
8038: IF csi_t_gen_utility_pvt.g_debug_level >= 25 THEN
8031: x_pricing_attb_tbl => l_p_pa_tbl,
8032: x_return_status => l_return_status);
8033:
8034: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8035: RAISE fnd_api.g_exc_error;
8036: END IF;
8037:
8038: IF csi_t_gen_utility_pvt.g_debug_level >= 25 THEN
8039: csi_t_gen_utility_pvt.dump_txn_tables(
8085: l_p_order_line_rec.trx_line_id := px_default_info_rec.transaction_line_id;
8086:
8087: csi_order_ship_pub.update_install_base(
8088: p_api_version => 1.0,
8089: p_commit => fnd_api.g_false,
8090: p_init_msg_list => fnd_api.g_true,
8091: p_validation_level => fnd_api.g_valid_level_full,
8092: p_txn_line_rec => l_p_tl_rec,
8093: p_txn_line_detail_tbl => l_p_tld_tbl,
8086:
8087: csi_order_ship_pub.update_install_base(
8088: p_api_version => 1.0,
8089: p_commit => fnd_api.g_false,
8090: p_init_msg_list => fnd_api.g_true,
8091: p_validation_level => fnd_api.g_valid_level_full,
8092: p_txn_line_rec => l_p_tl_rec,
8093: p_txn_line_detail_tbl => l_p_tld_tbl,
8094: p_txn_party_detail_tbl => l_p_tpd_tbl,
8087: csi_order_ship_pub.update_install_base(
8088: p_api_version => 1.0,
8089: p_commit => fnd_api.g_false,
8090: p_init_msg_list => fnd_api.g_true,
8091: p_validation_level => fnd_api.g_valid_level_full,
8092: p_txn_line_rec => l_p_tl_rec,
8093: p_txn_line_detail_tbl => l_p_tld_tbl,
8094: p_txn_party_detail_tbl => l_p_tpd_tbl,
8095: p_txn_pty_acct_dtl_tbl => l_p_tpa_tbl,
8106: x_return_status => l_return_status,
8107: x_msg_count => l_msg_count,
8108: x_msg_data => l_msg_data);
8109:
8110: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8111: RAISE fnd_api.g_exc_error;
8112: END IF;
8113:
8114: UPDATE csi_t_transaction_lines
8107: x_msg_count => l_msg_count,
8108: x_msg_data => l_msg_data);
8109:
8110: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8111: RAISE fnd_api.g_exc_error;
8112: END IF;
8113:
8114: UPDATE csi_t_transaction_lines
8115: SET processing_status = 'PROCESSED'
8115: SET processing_status = 'PROCESSED'
8116: WHERE transaction_line_id = l_p_tl_rec.transaction_line_id;
8117:
8118: EXCEPTION
8119: WHEN fnd_api.g_exc_error THEN
8120: x_return_status := fnd_api.g_ret_sts_error;
8121: END query_tld_and_update_ib;
8122:
8123: /* Main interface program for Order Fulfillment */
8116: WHERE transaction_line_id = l_p_tl_rec.transaction_line_id;
8117:
8118: EXCEPTION
8119: WHEN fnd_api.g_exc_error THEN
8120: x_return_status := fnd_api.g_ret_sts_error;
8121: END query_tld_and_update_ib;
8122:
8123: /* Main interface program for Order Fulfillment */
8124: PROCEDURE order_fulfillment(
8234: l_ratio_split_qty number := 0;
8235:
8236: l_debug_level number;
8237: l_error_message varchar2(2000);
8238: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
8239: l_msg_data varchar2(2000);
8240: l_msg_count number;
8241:
8242: ---Added (Start) for m-to-m enhancements
8268: BEGIN
8269:
8270: savepoint order_fulfillment;
8271:
8272: x_return_status := fnd_api.g_ret_sts_success;
8273: l_error_rec := px_trx_error_rec;
8274:
8275: l_debug_level := csi_t_gen_utility_pvt.g_debug_level;
8276:
8303: p_transaction_type_id => l_txn_type_id,
8304: x_sub_type_id => l_txn_sub_type_id,
8305: x_return_status => l_return_status);
8306:
8307: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8308: raise fnd_api.g_exc_error;
8309: END IF;
8310:
8311: l_default_info_rec.sub_type_id := l_txn_sub_type_id;
8304: x_sub_type_id => l_txn_sub_type_id,
8305: x_return_status => l_return_status);
8306:
8307: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8308: raise fnd_api.g_exc_error;
8309: END IF;
8310:
8311: l_default_info_rec.sub_type_id := l_txn_sub_type_id;
8312:
8315: p_sub_type_id => l_txn_sub_type_id,
8316: x_sub_type_rec => l_sub_type_rec,
8317: x_return_status => l_return_status);
8318:
8319: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8320: RAISE fnd_api.g_exc_error;
8321: END IF;
8322:
8323: l_default_info_rec.src_change_owner := l_sub_type_rec.src_change_owner;
8316: x_sub_type_rec => l_sub_type_rec,
8317: x_return_status => l_return_status);
8318:
8319: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8320: RAISE fnd_api.g_exc_error;
8321: END IF;
8322:
8323: l_default_info_rec.src_change_owner := l_sub_type_rec.src_change_owner;
8324: l_default_info_rec.src_change_owner_code := l_sub_type_rec.src_change_owner_code;
8341: WHEN no_data_found THEN
8342: fnd_message.set_name('CSI','CSI_INT_OE_LINE_ID_INVALID');
8343: fnd_message.set_token('OE_LINE_ID', p_order_line_id);
8344: fnd_msg_pub.add;
8345: RAISE fnd_api.g_exc_error;
8346: END;
8347:
8348: IF l_order_line_rec.org_id is null THEN
8349: l_order_line_rec.org_id := l_order_header_rec.org_id;
8412: IF l_order_line_rec.fulfilled_quantity <= 0 THEN
8413: fnd_message.set_name('CSI', 'CSI_ORDER_LINE_NOT_FULFILLED');
8414: fnd_message.set_token('FULFILLED_QUANTITY', l_order_line_rec.fulfilled_quantity);
8415: fnd_msg_pub.add;
8416: RAISE fnd_api.g_exc_error;
8417: END IF;
8418: END IF;
8419:
8420: get_partner_order_info(
8423: x_current_site_use_id => l_current_site_use_id,
8424: x_install_site_use_id => l_install_site_use_id,
8425: x_return_status => l_return_status);
8426:
8427: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8428: RAISE fnd_api.g_exc_error;
8429: END IF;
8430:
8431:
8424: x_install_site_use_id => l_install_site_use_id,
8425: x_return_status => l_return_status);
8426:
8427: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8428: RAISE fnd_api.g_exc_error;
8429: END IF;
8430:
8431:
8432: IF nvl(l_current_site_use_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
8428: RAISE fnd_api.g_exc_error;
8429: END IF;
8430:
8431:
8432: IF nvl(l_current_site_use_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
8433: BEGIN
8434: SELECT HCAS.party_site_id
8435: INTO l_party_site_id
8436: FROM hz_cust_site_uses_all HCSU,
8443: fnd_message.set_name('CSI','CSI_TXN_SITE_USE_INVALID');
8444: fnd_message.set_token('SITE_USE_ID',l_current_site_use_id);
8445: fnd_message.set_token('SITE_USE_CODE','SITE_USE_ID');
8446: fnd_msg_pub.add;
8447: RAISE fnd_api.g_exc_error;
8448: END;
8449: END IF;
8450:
8451: IF nvl(l_install_site_use_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
8447: RAISE fnd_api.g_exc_error;
8448: END;
8449: END IF;
8450:
8451: IF nvl(l_install_site_use_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
8452: BEGIN
8453: SELECT HCAS.party_site_id
8454: INTO l_party_site_id
8455: FROM hz_cust_site_uses_all HCSU,
8462: fnd_message.set_name('CSI','CSI_TXN_SITE_USE_INVALID');
8463: fnd_message.set_token('SITE_USE_ID',l_install_site_use_id);
8464: fnd_message.set_token('SITE_USE_CODE','SITE_USE_ID');
8465: fnd_msg_pub.add;
8466: RAISE fnd_api.g_exc_error;
8467: END;
8468: END IF;
8469:
8470: -- IF l_order_line_rec.sold_to_org_id is not null THEN
8467: END;
8468: END IF;
8469:
8470: -- IF l_order_line_rec.sold_to_org_id is not null THEN
8471: IF nvl(l_end_customer_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
8472: SELECT party_id
8473: INTO l_owner_party_id
8474: FROM hz_cust_accounts
8475: WHERE cust_account_id = l_end_customer_id;
8566: l_macd_processing := csi_interface_pkg.check_macd_processing(
8567: p_config_session_key => l_om_session_key,
8568: x_return_status => l_return_status);
8569:
8570: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8571: RAISE fnd_api.g_exc_error;
8572: END IF;
8573:
8574: IF l_macd_processing THEN
8567: p_config_session_key => l_om_session_key,
8568: x_return_status => l_return_status);
8569:
8570: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8571: RAISE fnd_api.g_exc_error;
8572: END IF;
8573:
8574: IF l_macd_processing THEN
8575: -- srramakr TSO with Equipment
8625: debug(' Order Line ID : '||l_ul_instance_rec.last_oe_order_line_id);
8626: --
8627: csi_item_instance_pub.update_item_instance(
8628: p_api_version => 1.0,
8629: p_commit => fnd_api.g_false,
8630: p_init_msg_list => fnd_api.g_true,
8631: p_validation_level => fnd_api.g_valid_level_full,
8632: p_instance_rec => l_ul_instance_rec,
8633: p_party_tbl => l_u_parties_tbl,
8626: --
8627: csi_item_instance_pub.update_item_instance(
8628: p_api_version => 1.0,
8629: p_commit => fnd_api.g_false,
8630: p_init_msg_list => fnd_api.g_true,
8631: p_validation_level => fnd_api.g_valid_level_full,
8632: p_instance_rec => l_ul_instance_rec,
8633: p_party_tbl => l_u_parties_tbl,
8634: p_account_tbl => l_u_pty_accts_tbl,
8627: csi_item_instance_pub.update_item_instance(
8628: p_api_version => 1.0,
8629: p_commit => fnd_api.g_false,
8630: p_init_msg_list => fnd_api.g_true,
8631: p_validation_level => fnd_api.g_valid_level_full,
8632: p_instance_rec => l_ul_instance_rec,
8633: p_party_tbl => l_u_parties_tbl,
8634: p_account_tbl => l_u_pty_accts_tbl,
8635: p_org_assignments_tbl => l_u_org_units_tbl,
8641: x_return_status => l_return_status,
8642: x_msg_count => l_msg_count,
8643: x_msg_data => l_msg_data);
8644: --
8645: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8646: RAISE fnd_api.g_exc_error;
8647: ELSE
8648: UPDATE csi_t_txn_line_details
8649: SET processing_status = 'PROCESSED'
8642: x_msg_count => l_msg_count,
8643: x_msg_data => l_msg_data);
8644: --
8645: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8646: RAISE fnd_api.g_exc_error;
8647: ELSE
8648: UPDATE csi_t_txn_line_details
8649: SET processing_status = 'PROCESSED'
8650: WHERE transaction_line_id = l_ul_txn_line_id;
8659: p_order_line_id => p_order_line_id,
8660: x_return_status => l_return_status,
8661: x_return_message => l_error_message);
8662:
8663: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8664: RAISE fnd_api.g_exc_error;
8665: END IF;
8666:
8667: RAISE skip_regular_process;
8660: x_return_status => l_return_status,
8661: x_return_message => l_error_message);
8662:
8663: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8664: RAISE fnd_api.g_exc_error;
8665: END IF;
8666:
8667: RAISE skip_regular_process;
8668:
8736: px_default_info_rec => l_default_info_rec,
8737: x_config_rec => l_config_rec,
8738: x_return_status => l_return_status);
8739:
8740: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8741: RAISE fnd_api.g_exc_error;
8742: END IF;
8743:
8744: IF l_order_line_rec.item_type_code = 'CLASS' THEN
8737: x_config_rec => l_config_rec,
8738: x_return_status => l_return_status);
8739:
8740: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8741: RAISE fnd_api.g_exc_error;
8742: END IF;
8743:
8744: IF l_order_line_rec.item_type_code = 'CLASS' THEN
8745: IF l_config_rec.make_flag = 'Y' THEN
8782: px_csi_txn_rec => l_csi_txn_rec,
8783: x_config_instances => l_config_instances,
8784: x_return_status => l_return_status);
8785:
8786: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8787: RAISE fnd_api.g_exc_error;
8788: END IF;
8789: END IF;
8790:
8783: x_config_instances => l_config_instances,
8784: x_return_status => l_return_status);
8785:
8786: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8787: RAISE fnd_api.g_exc_error;
8788: END IF;
8789: END IF;
8790:
8791: IF l_order_line_rec.item_type_code = 'OPTION' AND l_inv_transactable_flag = 'Y' THEN
8800: px_default_info_rec => l_default_info_rec,
8801: x_wip_processing => l_wip_processing,
8802: x_return_status => l_return_status);
8803:
8804: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8805: RAISE fnd_api.g_exc_error;
8806: END IF;
8807:
8808: IF l_wip_processing THEN
8801: x_wip_processing => l_wip_processing,
8802: x_return_status => l_return_status);
8803:
8804: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8805: RAISE fnd_api.g_exc_error;
8806: END IF;
8807:
8808: IF l_wip_processing THEN
8809: RAISE skip_regular_process;
8822: px_config_instances => l_config_instances,
8823: x_reship_found => l_config_reship_found,
8824: x_return_status => l_return_status);
8825:
8826: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8827: RAISE fnd_api.g_exc_error;
8828: END IF;
8829: END IF;
8830:
8823: x_reship_found => l_config_reship_found,
8824: x_return_status => l_return_status);
8825:
8826: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8827: RAISE fnd_api.g_exc_error;
8828: END IF;
8829: END IF;
8830:
8831: IF l_config_reship_found THEN
8859: p_option_item_id => l_order_line_rec.inventory_item_id,
8860: x_option_instances => l_option_instances,
8861: x_return_status => l_return_status);
8862:
8863: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8864: RAISE fnd_api.g_exc_error;
8865: END IF;
8866:
8867: IF l_option_instances.COUNT > 0 THEN
8860: x_option_instances => l_option_instances,
8861: x_return_status => l_return_status);
8862:
8863: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8864: RAISE fnd_api.g_exc_error;
8865: END IF;
8866:
8867: IF l_option_instances.COUNT > 0 THEN
8868: FOR l_o_ind IN l_option_instances.FIRST .. l_option_instances.LAST
8873: p_order_line_id => p_order_line_id,
8874: px_csi_txn_rec => l_csi_txn_rec,
8875: x_return_status => l_return_status);
8876:
8877: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8878: RAISE fnd_api.g_exc_error;
8879: END IF;
8880: END LOOP;
8881: END IF;
8874: px_csi_txn_rec => l_csi_txn_rec,
8875: x_return_status => l_return_status);
8876:
8877: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8878: RAISE fnd_api.g_exc_error;
8879: END IF;
8880: END LOOP;
8881: END IF;
8882: END IF;
8933: p_om_vld_org_id => l_default_info_rec.om_vld_org_id,
8934: x_trackable_line_tbl => l_trk_child_tbl,
8935: x_return_status => l_return_status);
8936:
8937: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8938: RAISE fnd_api.g_exc_error;
8939: END IF;
8940:
8941: IF l_trk_child_tbl.count > 0 THEN
8934: x_trackable_line_tbl => l_trk_child_tbl,
8935: x_return_status => l_return_status);
8936:
8937: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8938: RAISE fnd_api.g_exc_error;
8939: END IF;
8940:
8941: IF l_trk_child_tbl.count > 0 THEN
8942:
8951: p_om_vld_org_id => l_default_info_rec.om_vld_org_id,
8952: x_parent_line_rec => l_trk_parent_rec,
8953: x_return_status => l_return_status);
8954:
8955: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8956: RAISE fnd_api.g_exc_error;
8957: END IF;
8958:
8959: IF nvl(l_trk_parent_rec.line_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
8952: x_parent_line_rec => l_trk_parent_rec,
8953: x_return_status => l_return_status);
8954:
8955: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8956: RAISE fnd_api.g_exc_error;
8957: END IF;
8958:
8959: IF nvl(l_trk_parent_rec.line_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
8960: l_ratio_split_flag := 'Y';
8955: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8956: RAISE fnd_api.g_exc_error;
8957: END IF;
8958:
8959: IF nvl(l_trk_parent_rec.line_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
8960: l_ratio_split_flag := 'Y';
8961: l_split_flag := 'Y';
8962: --fix for bug5096435
8963: IF l_order_line_rec.model_remnant_flag = 'Y' THEN
9074: csi_t_utilities_pvt.cascade_child(
9075: p_data_string => l_model_hierarchy,
9076: x_return_status => l_return_status );
9077:
9078: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9079: RAISE fnd_api.g_exc_error;
9080: END IF;
9081:
9082: -- call cascade
9075: p_data_string => l_model_hierarchy,
9076: x_return_status => l_return_status );
9077:
9078: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9079: RAISE fnd_api.g_exc_error;
9080: END IF;
9081:
9082: -- call cascade
9083: l_found := TRUE;
9109: fnd_message.set_name('CSI', 'CSI_TXN_SRC_ALREADY_PROCESSED');
9110: fnd_message.set_token('SRC_TBL', l_src_txn_table);
9111: fnd_message.set_token('SRC_ID', p_order_line_id);
9112: fnd_msg_pub.add;
9113: RAISE fnd_api.g_exc_error;
9114: END IF;
9115:
9116: UPDATE csi_t_transaction_lines
9117: SET processing_status = 'IN_PROCESS'
9126: l_txn_line_detail_query_rec.source_transaction_flag := 'Y';
9127:
9128: csi_t_txn_details_grp.get_transaction_details(
9129: p_api_version => 1,
9130: p_commit => fnd_api.g_false,
9131: p_init_msg_list => fnd_api.g_true,
9132: p_validation_level => fnd_api.g_valid_level_full,
9133: p_txn_line_query_rec => l_txn_line_query_rec,
9134: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
9127:
9128: csi_t_txn_details_grp.get_transaction_details(
9129: p_api_version => 1,
9130: p_commit => fnd_api.g_false,
9131: p_init_msg_list => fnd_api.g_true,
9132: p_validation_level => fnd_api.g_valid_level_full,
9133: p_txn_line_query_rec => l_txn_line_query_rec,
9134: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
9135: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
9128: csi_t_txn_details_grp.get_transaction_details(
9129: p_api_version => 1,
9130: p_commit => fnd_api.g_false,
9131: p_init_msg_list => fnd_api.g_true,
9132: p_validation_level => fnd_api.g_valid_level_full,
9133: p_txn_line_query_rec => l_txn_line_query_rec,
9134: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
9135: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
9136: p_get_parties_flag => fnd_api.g_false,
9132: p_validation_level => fnd_api.g_valid_level_full,
9133: p_txn_line_query_rec => l_txn_line_query_rec,
9134: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
9135: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
9136: p_get_parties_flag => fnd_api.g_false,
9137: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
9138: p_get_pty_accts_flag => fnd_api.g_false,
9139: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
9140: p_get_ii_rltns_flag => fnd_api.g_true,
9134: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
9135: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
9136: p_get_parties_flag => fnd_api.g_false,
9137: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
9138: p_get_pty_accts_flag => fnd_api.g_false,
9139: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
9140: p_get_ii_rltns_flag => fnd_api.g_true,
9141: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
9142: p_get_org_assgns_flag => fnd_api.g_false,
9136: p_get_parties_flag => fnd_api.g_false,
9137: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
9138: p_get_pty_accts_flag => fnd_api.g_false,
9139: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
9140: p_get_ii_rltns_flag => fnd_api.g_true,
9141: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
9142: p_get_org_assgns_flag => fnd_api.g_false,
9143: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
9144: p_get_ext_attrib_vals_flag => fnd_api.g_false,
9138: p_get_pty_accts_flag => fnd_api.g_false,
9139: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
9140: p_get_ii_rltns_flag => fnd_api.g_true,
9141: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
9142: p_get_org_assgns_flag => fnd_api.g_false,
9143: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
9144: p_get_ext_attrib_vals_flag => fnd_api.g_false,
9145: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
9146: p_get_csi_attribs_flag => fnd_api.g_false,
9140: p_get_ii_rltns_flag => fnd_api.g_true,
9141: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
9142: p_get_org_assgns_flag => fnd_api.g_false,
9143: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
9144: p_get_ext_attrib_vals_flag => fnd_api.g_false,
9145: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
9146: p_get_csi_attribs_flag => fnd_api.g_false,
9147: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
9148: p_get_csi_iea_values_flag => fnd_api.g_false,
9142: p_get_org_assgns_flag => fnd_api.g_false,
9143: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
9144: p_get_ext_attrib_vals_flag => fnd_api.g_false,
9145: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
9146: p_get_csi_attribs_flag => fnd_api.g_false,
9147: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
9148: p_get_csi_iea_values_flag => fnd_api.g_false,
9149: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
9150: p_get_txn_systems_flag => fnd_api.g_false,
9144: p_get_ext_attrib_vals_flag => fnd_api.g_false,
9145: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
9146: p_get_csi_attribs_flag => fnd_api.g_false,
9147: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
9148: p_get_csi_iea_values_flag => fnd_api.g_false,
9149: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
9150: p_get_txn_systems_flag => fnd_api.g_false,
9151: x_txn_systems_tbl => l_g_txn_systems_tbl,
9152: x_return_status => l_return_status,
9146: p_get_csi_attribs_flag => fnd_api.g_false,
9147: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
9148: p_get_csi_iea_values_flag => fnd_api.g_false,
9149: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
9150: p_get_txn_systems_flag => fnd_api.g_false,
9151: x_txn_systems_tbl => l_g_txn_systems_tbl,
9152: x_return_status => l_return_status,
9153: x_msg_count => l_msg_count,
9154: x_msg_data => l_msg_data);
9152: x_return_status => l_return_status,
9153: x_msg_count => l_msg_count,
9154: x_msg_data => l_msg_data);
9155:
9156: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9157: raise fnd_api.g_exc_error;
9158: END IF;
9159:
9160: l_txn_line_rec.transaction_line_id := l_transaction_line_id;
9153: x_msg_count => l_msg_count,
9154: x_msg_data => l_msg_data);
9155:
9156: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9157: raise fnd_api.g_exc_error;
9158: END IF;
9159:
9160: l_txn_line_rec.transaction_line_id := l_transaction_line_id;
9161:
9183: p_line_dtl_tbl => l_g_line_dtl_tbl,
9184: px_csi_txn_rec => l_csi_txn_rec,
9185: x_return_status => l_return_status);
9186:
9187: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9188: RAISE fnd_api.g_exc_error;
9189: END IF;
9190:
9191: goto DEMO_FULFILL;
9184: px_csi_txn_rec => l_csi_txn_rec,
9185: x_return_status => l_return_status);
9186:
9187: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9188: RAISE fnd_api.g_exc_error;
9189: END IF;
9190:
9191: goto DEMO_FULFILL;
9192:
9201: x_tld_tbl => l_line_dtl_tbl,
9202: x_tiir_tbl => l_ii_rltns_tbl,
9203: x_return_status => l_return_status);
9204:
9205: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9206: RAISE fnd_api.g_exc_error;
9207: END IF;
9208:
9209: l_default_info_rec.transaction_line_id := l_txn_line_rec.transaction_line_id;
9202: x_tiir_tbl => l_ii_rltns_tbl,
9203: x_return_status => l_return_status);
9204:
9205: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9206: RAISE fnd_api.g_exc_error;
9207: END IF;
9208:
9209: l_default_info_rec.transaction_line_id := l_txn_line_rec.transaction_line_id;
9210:
9233: p_quantity_ratio => l_ratio_split_qty,
9234: px_line_dtl_tbl => l_line_dtl_tbl,
9235: x_return_status => l_return_status);
9236:
9237: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9238: raise fnd_api.g_exc_error;
9239: END IF;
9240:
9241: ELSE
9234: px_line_dtl_tbl => l_line_dtl_tbl,
9235: x_return_status => l_return_status);
9236:
9237: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9238: raise fnd_api.g_exc_error;
9239: END IF;
9240:
9241: ELSE
9242:
9244: p_line_dtl_tbl => l_line_dtl_tbl,
9245: p_ii_rltns_tbl => l_ii_rltns_tbl,
9246: x_return_status => l_return_status);
9247:
9248: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9249: raise fnd_api.g_exc_error;
9250: END IF;
9251:
9252: ---added (start) for m-to-m enhancements
9245: p_ii_rltns_tbl => l_ii_rltns_tbl,
9246: x_return_status => l_return_status);
9247:
9248: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9249: raise fnd_api.g_exc_error;
9250: END IF;
9251:
9252: ---added (start) for m-to-m enhancements
9253: csi_utl_pkg.build_txn_relations(
9254: l_line_dtl_tbl,
9255: l_temp_txn_ii_rltns_tbl,
9256: x_return_status);
9257:
9258: IF NOT(x_return_status = fnd_api.g_ret_sts_success) THEN
9259: RAISE fnd_api.g_exc_error;
9260: END IF;
9261:
9262: IF l_temp_txn_ii_rltns_tbl.count > 0 THEN
9255: l_temp_txn_ii_rltns_tbl,
9256: x_return_status);
9257:
9258: IF NOT(x_return_status = fnd_api.g_ret_sts_success) THEN
9259: RAISE fnd_api.g_exc_error;
9260: END IF;
9261:
9262: IF l_temp_txn_ii_rltns_tbl.count > 0 THEN
9263: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
9261:
9262: IF l_temp_txn_ii_rltns_tbl.count > 0 THEN
9263: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
9264: p_api_version => 1.0,
9265: p_commit => fnd_api.g_false,
9266: p_init_msg_list => fnd_api.g_true,
9267: p_validation_level => fnd_api.g_valid_level_full,
9268: px_txn_ii_rltns_tbl => l_temp_txn_ii_rltns_tbl,
9269: x_return_status => x_return_status,
9262: IF l_temp_txn_ii_rltns_tbl.count > 0 THEN
9263: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
9264: p_api_version => 1.0,
9265: p_commit => fnd_api.g_false,
9266: p_init_msg_list => fnd_api.g_true,
9267: p_validation_level => fnd_api.g_valid_level_full,
9268: px_txn_ii_rltns_tbl => l_temp_txn_ii_rltns_tbl,
9269: x_return_status => x_return_status,
9270: x_msg_count => l_msg_count,
9263: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
9264: p_api_version => 1.0,
9265: p_commit => fnd_api.g_false,
9266: p_init_msg_list => fnd_api.g_true,
9267: p_validation_level => fnd_api.g_valid_level_full,
9268: px_txn_ii_rltns_tbl => l_temp_txn_ii_rltns_tbl,
9269: x_return_status => x_return_status,
9270: x_msg_count => l_msg_count,
9271: x_msg_data => l_msg_data);
9269: x_return_status => x_return_status,
9270: x_msg_count => l_msg_count,
9271: x_msg_data => l_msg_data);
9272:
9273: IF NOT(x_return_status = fnd_api.g_ret_sts_success) THEN
9274: raise fnd_api.g_exc_error;
9275: END IF;
9276: END IF ; ---l_temp_txn_ii_rltns_tbl.count>0
9277: ---added (end) for m-to-m enhancements
9270: x_msg_count => l_msg_count,
9271: x_msg_data => l_msg_data);
9272:
9273: IF NOT(x_return_status = fnd_api.g_ret_sts_success) THEN
9274: raise fnd_api.g_exc_error;
9275: END IF;
9276: END IF ; ---l_temp_txn_ii_rltns_tbl.count>0
9277: ---added (end) for m-to-m enhancements
9278:
9293: create_csi_transaction(
9294: px_csi_txn_rec => l_csi_txn_rec,
9295: x_return_status => l_return_status);
9296:
9297: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9298: RAISE fnd_api.g_exc_error;
9299: END IF;
9300:
9301: debug(' ato_rebuild_flag : '||l_ato_rebuild_flag);
9294: px_csi_txn_rec => l_csi_txn_rec,
9295: x_return_status => l_return_status);
9296:
9297: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9298: RAISE fnd_api.g_exc_error;
9299: END IF;
9300:
9301: debug(' ato_rebuild_flag : '||l_ato_rebuild_flag);
9302:
9310: px_default_info_rec => l_default_info_rec,
9311: px_csi_txn_rec => l_csi_txn_rec,
9312: x_return_status => l_return_status);
9313:
9314: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9315: RAISE fnd_api.g_exc_error;
9316: END IF;
9317: ELSE
9318:
9311: px_csi_txn_rec => l_csi_txn_rec,
9312: x_return_status => l_return_status);
9313:
9314: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9315: RAISE fnd_api.g_exc_error;
9316: END IF;
9317: ELSE
9318:
9319: /* this routine checks for any relation within the order lines and builds
9328: px_default_info_rec => l_default_info_rec,
9329: px_csi_txn_rec => l_csi_txn_rec,
9330: x_return_status => l_return_status);
9331:
9332: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9333: RAISE fnd_api.g_exc_error;
9334: END IF;
9335:
9336: END IF;
9329: px_csi_txn_rec => l_csi_txn_rec,
9330: x_return_status => l_return_status);
9331:
9332: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9333: RAISE fnd_api.g_exc_error;
9334: END IF;
9335:
9336: END IF;
9337: END IF;
9338:
9339: debug('Model remnant flag...'||l_order_line_rec.model_remnant_flag);
9340:
9341:
9342: IF nvl(l_order_line_rec.link_to_line_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
9343:
9344: IF l_ato_rebuild_flag = 'N' THEN
9345:
9346: build_parent_relation(
9353: px_default_info_rec => l_default_info_rec,
9354: px_csi_txn_rec => l_csi_txn_rec,
9355: x_return_status => l_return_status);
9356:
9357: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9358: RAISE fnd_api.g_exc_error;
9359: END IF;
9360:
9361: END IF;
9354: px_csi_txn_rec => l_csi_txn_rec,
9355: x_return_status => l_return_status);
9356:
9357: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9358: RAISE fnd_api.g_exc_error;
9359: END IF;
9360:
9361: END IF;
9362:
9382: px_csi_txn_rec => l_csi_txn_rec,
9383: px_error_rec => l_error_rec,
9384: x_return_status => l_return_status);
9385:
9386: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9387: RAISE fnd_api.g_exc_error;
9388: END IF;
9389:
9390: debug('order fulfillment integration successfull for order line_id : '||p_order_line_id);
9383: px_error_rec => l_error_rec,
9384: x_return_status => l_return_status);
9385:
9386: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9387: RAISE fnd_api.g_exc_error;
9388: END IF;
9389:
9390: debug('order fulfillment integration successfull for order line_id : '||p_order_line_id);
9391:
9390: debug('order fulfillment integration successfull for order line_id : '||p_order_line_id);
9391:
9392: EXCEPTION
9393: WHEN skip_regular_process THEN
9394: x_return_status := fnd_api.g_ret_sts_success;
9395: WHEN fnd_api.g_exc_error THEN
9396: rollback to order_fulfillment;
9397: x_return_status := fnd_api.g_ret_sts_error;
9398: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
9391:
9392: EXCEPTION
9393: WHEN skip_regular_process THEN
9394: x_return_status := fnd_api.g_ret_sts_success;
9395: WHEN fnd_api.g_exc_error THEN
9396: rollback to order_fulfillment;
9397: x_return_status := fnd_api.g_ret_sts_error;
9398: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
9399: l_error_rec.error_text := l_error_message;
9393: WHEN skip_regular_process THEN
9394: x_return_status := fnd_api.g_ret_sts_success;
9395: WHEN fnd_api.g_exc_error THEN
9396: rollback to order_fulfillment;
9397: x_return_status := fnd_api.g_ret_sts_error;
9398: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
9399: l_error_rec.error_text := l_error_message;
9400: debug('Error(E) :'||l_error_message);
9401: px_trx_error_rec := l_error_rec;
9416: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
9417: fnd_message.set_token('MESSAGE',substr(sqlerrm,1,540));
9418: fnd_msg_pub.add;
9419:
9420: x_return_status := fnd_api.g_ret_sts_error;
9421: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
9422: l_error_rec.error_text := l_error_message;
9423: debug('Error(O) :'||l_error_message);
9424: px_trx_error_rec := l_error_rec;
9467: l_c_tiir_tbl csi_t_datastructures_grp.txn_ii_rltns_tbl;
9468:
9469: l_continue boolean := TRUE;
9470:
9471: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
9472: l_msg_count number;
9473: l_msg_data varchar2(2000);
9474:
9475: l_install_party_site_id number;
9476:
9477: BEGIN
9478:
9479: /* Initialize API return status to success */
9480: x_return_status := fnd_api.g_ret_sts_success;
9481:
9482: api_log('construct_txn_dtls');
9483:
9484: /* assign values for the columns in Txn_line_rec */
9493: p_transaction_type_id => 51,
9494: x_sub_type_id => l_sub_type_id,
9495: x_return_status => l_return_status);
9496:
9497: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9498: raise fnd_api.g_exc_error;
9499: END IF;
9500:
9501: /*------------------------------------------------------*/
9494: x_sub_type_id => l_sub_type_id,
9495: x_return_status => l_return_status);
9496:
9497: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9498: raise fnd_api.g_exc_error;
9499: END IF;
9500:
9501: /*------------------------------------------------------*/
9502: /* Check if transaction_line_rec exists .If it does not */
9581:
9582: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
9583: fnd_message.set_token('MESSAGE','insert_row failed '||sqlerrm);
9584: fnd_msg_pub.add;
9585: raise fnd_api.g_exc_error;
9586: END;
9587: END ;
9588: IF l_continue THEN
9589: exit;
9606: WHEN no_data_found THEN
9607: fnd_message.set_name('CSI','CSI_INT_PTY_SITE_MISSING');
9608: fnd_message.set_token('LOCATION_ID', x_order_shipment_tbl(i).ib_current_loc_id);
9609: fnd_msg_pub.add;
9610: raise fnd_api.g_exc_error;
9611: WHEN too_many_rows THEN
9612: fnd_message.set_name('CSI','CSI_INT_MANY_PTY_SITE_FOUND');
9613: fnd_message.set_token('LOCATION_ID', x_order_shipment_tbl(i).ib_current_loc_id);
9614: fnd_msg_pub.add;
9611: WHEN too_many_rows THEN
9612: fnd_message.set_name('CSI','CSI_INT_MANY_PTY_SITE_FOUND');
9613: fnd_message.set_token('LOCATION_ID', x_order_shipment_tbl(i).ib_current_loc_id);
9614: fnd_msg_pub.add;
9615: raise fnd_api.g_exc_error;
9616: END;
9617:
9618: IF x_order_shipment_tbl(i).ib_install_loc is not null
9619: AND
9618: IF x_order_shipment_tbl(i).ib_install_loc is not null
9619: AND
9620: x_order_shipment_tbl(i).ib_install_loc_id is not null
9621: AND
9622: x_order_shipment_tbl(i).ib_install_loc_id <> fnd_api.g_miss_num
9623: THEN
9624: BEGIN
9625: SELECT party_site_id
9626: INTO l_install_party_site_id
9632: WHEN no_data_found THEN
9633: fnd_message.set_name('CSI','CSI_INT_PTY_SITE_MISSING');
9634: fnd_message.set_token('LOCATION_ID', x_order_shipment_tbl(i).ib_install_loc_id);
9635: fnd_msg_pub.add;
9636: raise fnd_api.g_exc_error;
9637: WHEN too_many_rows THEN
9638: fnd_message.set_name('CSI','CSI_INT_MANY_PTY_SITE_FOUND');
9639: fnd_message.set_token('LOCATION_ID', x_order_shipment_tbl(i).ib_install_loc_id);
9640: fnd_msg_pub.add;
9637: WHEN too_many_rows THEN
9638: fnd_message.set_name('CSI','CSI_INT_MANY_PTY_SITE_FOUND');
9639: fnd_message.set_token('LOCATION_ID', x_order_shipment_tbl(i).ib_install_loc_id);
9640: fnd_msg_pub.add;
9641: raise fnd_api.g_exc_error;
9642: END;
9643: END IF;
9644:
9645: -- IF p_trackable_parent AND x_order_shipment_tbl(i).shipped_quantity > 1 THEN
9663:
9664: /* assign values for the columns in Txn_line_details_tbl */
9665: IF ( x_order_shipment_tbl(i).instance_id is not null
9666: AND
9667: x_order_shipment_tbl(i).instance_id <> fnd_api.g_miss_num )
9668: THEN
9669: l_c_tld_tbl(i).instance_id := x_order_shipment_tbl(i).instance_id;
9670: l_c_tld_tbl(i).instance_exists_flag := 'Y';
9671:
9671:
9672: l_inst_party_id := csi_utl_pkg.get_instance_party_id(x_order_shipment_tbl(i).instance_id);
9673:
9674: IF l_inst_party_id = -1 THEN
9675: raise fnd_api.g_exc_error;
9676: END IF;
9677:
9678: END IF;
9679:
9681: l_c_tld_tbl(i).sub_type_id := l_sub_type_id ;
9682: l_c_tld_tbl(i).inventory_item_id := x_order_shipment_tbl(i).inventory_item_id ;
9683: l_c_tld_tbl(i).inv_organization_id := x_order_shipment_tbl(i).organization_id ;
9684: l_c_tld_tbl(i).inventory_revision := x_order_shipment_tbl(i).revision ;
9685: l_c_tld_tbl(i).item_condition_id := fnd_api.g_miss_num;
9686: l_c_tld_tbl(i).instance_type_code := fnd_api.g_miss_char;
9687: l_c_tld_tbl(i).quantity := x_order_shipment_tbl(i).shipped_quantity ;
9688: l_c_tld_tbl(i).unit_of_measure := x_order_shipment_tbl(i).transaction_uom ;
9689: l_c_tld_tbl(i).serial_number := x_order_shipment_tbl(i).serial_number;
9682: l_c_tld_tbl(i).inventory_item_id := x_order_shipment_tbl(i).inventory_item_id ;
9683: l_c_tld_tbl(i).inv_organization_id := x_order_shipment_tbl(i).organization_id ;
9684: l_c_tld_tbl(i).inventory_revision := x_order_shipment_tbl(i).revision ;
9685: l_c_tld_tbl(i).item_condition_id := fnd_api.g_miss_num;
9686: l_c_tld_tbl(i).instance_type_code := fnd_api.g_miss_char;
9687: l_c_tld_tbl(i).quantity := x_order_shipment_tbl(i).shipped_quantity ;
9688: l_c_tld_tbl(i).unit_of_measure := x_order_shipment_tbl(i).transaction_uom ;
9689: l_c_tld_tbl(i).serial_number := x_order_shipment_tbl(i).serial_number;
9690: l_c_tld_tbl(i).lot_number := x_order_shipment_tbl(i).lot_number;
9709:
9710: -- l_inst_party_id := csi_utl_pkg.get_instance_party_id(l_instance_id);
9711:
9712: -- IF l_inst_party_id = -1 THEN
9713: -- raise fnd_api.g_exc_error;
9714: -- END IF;
9715:
9716: /* assign values for the columns in txn_party_detail_tbl*/
9717: l_c_tpd_tbl(i).instance_party_id := l_inst_party_id;
9747: l_c_tpad_tbl(i).object_version_number := 1;
9748: l_c_tpad_tbl(i).txn_party_details_index := i;
9749:
9750: /*assign values for the columns in x_txn_org_assgn_tbl */
9751: IF nvl(x_order_shipment_tbl(i).sold_from_org_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num
9752: THEN
9753: l_c_toa_tbl(i).txn_operating_unit_id := fnd_api.g_miss_num;
9754: l_c_toa_tbl(i).txn_line_detail_id := fnd_api.g_miss_num;
9755: l_c_toa_tbl(i).instance_ou_id := fnd_api.g_miss_num;
9749:
9750: /*assign values for the columns in x_txn_org_assgn_tbl */
9751: IF nvl(x_order_shipment_tbl(i).sold_from_org_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num
9752: THEN
9753: l_c_toa_tbl(i).txn_operating_unit_id := fnd_api.g_miss_num;
9754: l_c_toa_tbl(i).txn_line_detail_id := fnd_api.g_miss_num;
9755: l_c_toa_tbl(i).instance_ou_id := fnd_api.g_miss_num;
9756: l_c_toa_tbl(i).operating_unit_id := x_order_shipment_tbl(i).sold_from_org_id;
9757: l_c_toa_tbl(i).relationship_type_code := 'SOLD_FROM';
9750: /*assign values for the columns in x_txn_org_assgn_tbl */
9751: IF nvl(x_order_shipment_tbl(i).sold_from_org_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num
9752: THEN
9753: l_c_toa_tbl(i).txn_operating_unit_id := fnd_api.g_miss_num;
9754: l_c_toa_tbl(i).txn_line_detail_id := fnd_api.g_miss_num;
9755: l_c_toa_tbl(i).instance_ou_id := fnd_api.g_miss_num;
9756: l_c_toa_tbl(i).operating_unit_id := x_order_shipment_tbl(i).sold_from_org_id;
9757: l_c_toa_tbl(i).relationship_type_code := 'SOLD_FROM';
9758: l_c_toa_tbl(i).preserve_detail_flag := 'Y';
9751: IF nvl(x_order_shipment_tbl(i).sold_from_org_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num
9752: THEN
9753: l_c_toa_tbl(i).txn_operating_unit_id := fnd_api.g_miss_num;
9754: l_c_toa_tbl(i).txn_line_detail_id := fnd_api.g_miss_num;
9755: l_c_toa_tbl(i).instance_ou_id := fnd_api.g_miss_num;
9756: l_c_toa_tbl(i).operating_unit_id := x_order_shipment_tbl(i).sold_from_org_id;
9757: l_c_toa_tbl(i).relationship_type_code := 'SOLD_FROM';
9758: l_c_toa_tbl(i).preserve_detail_flag := 'Y';
9759: l_c_toa_tbl(i).txn_line_details_index := i;
9771:
9772: -- call api to create the transaction line details
9773: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
9774: p_api_version => 1.0 ,
9775: p_commit => fnd_api.g_false,
9776: p_init_msg_list => fnd_api.g_true,
9777: p_validation_level => fnd_api.g_valid_level_none,
9778: p_txn_line_dtl_index => l_index,
9779: p_txn_line_dtl_rec => l_c_tld_rec,
9772: -- call api to create the transaction line details
9773: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
9774: p_api_version => 1.0 ,
9775: p_commit => fnd_api.g_false,
9776: p_init_msg_list => fnd_api.g_true,
9777: p_validation_level => fnd_api.g_valid_level_none,
9778: p_txn_line_dtl_index => l_index,
9779: p_txn_line_dtl_rec => l_c_tld_rec,
9780: px_txn_party_dtl_tbl => l_c_tpd_tbl,
9773: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
9774: p_api_version => 1.0 ,
9775: p_commit => fnd_api.g_false,
9776: p_init_msg_list => fnd_api.g_true,
9777: p_validation_level => fnd_api.g_valid_level_none,
9778: p_txn_line_dtl_index => l_index,
9779: p_txn_line_dtl_rec => l_c_tld_rec,
9780: px_txn_party_dtl_tbl => l_c_tpd_tbl,
9781: px_txn_pty_acct_detail_tbl => l_c_tpad_tbl,
9785: x_return_status => l_return_status,
9786: x_msg_count => l_msg_count,
9787: x_msg_data => l_msg_data);
9788:
9789: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9790: raise fnd_api.g_exc_error;
9791: END IF;
9792:
9793: -- END LOOP;
9786: x_msg_count => l_msg_count,
9787: x_msg_data => l_msg_data);
9788:
9789: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9790: raise fnd_api.g_exc_error;
9791: END IF;
9792:
9793: -- END LOOP;
9794:
9795: END LOOP; --end of processing all shipping table
9796: END IF; -- shipping table count > 0
9797:
9798: EXCEPTION
9799: WHEN fnd_api.g_exc_error THEN
9800: x_return_status := fnd_api.g_ret_sts_error;
9801: WHEN fnd_api.g_exc_unexpected_error THEN
9802: x_return_status := fnd_api.g_ret_sts_unexp_error;
9803: END construct_txn_dtls;
9796: END IF; -- shipping table count > 0
9797:
9798: EXCEPTION
9799: WHEN fnd_api.g_exc_error THEN
9800: x_return_status := fnd_api.g_ret_sts_error;
9801: WHEN fnd_api.g_exc_unexpected_error THEN
9802: x_return_status := fnd_api.g_ret_sts_unexp_error;
9803: END construct_txn_dtls;
9804:
9797:
9798: EXCEPTION
9799: WHEN fnd_api.g_exc_error THEN
9800: x_return_status := fnd_api.g_ret_sts_error;
9801: WHEN fnd_api.g_exc_unexpected_error THEN
9802: x_return_status := fnd_api.g_ret_sts_unexp_error;
9803: END construct_txn_dtls;
9804:
9805:
9798: EXCEPTION
9799: WHEN fnd_api.g_exc_error THEN
9800: x_return_status := fnd_api.g_ret_sts_error;
9801: WHEN fnd_api.g_exc_unexpected_error THEN
9802: x_return_status := fnd_api.g_ret_sts_unexp_error;
9803: END construct_txn_dtls;
9804:
9805:
9806: PROCEDURE logical_drop_ship(
9818: p_order_line_id number;
9819:
9820: l_debug_level number;
9821: l_error_message varchar2(2000);
9822: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
9823: l_msg_data varchar2(2000);
9824: l_msg_count number;
9825:
9826: skip_regular_process exception;
9996: l_partner_owner_acct_id NUMBER;
9997:
9998: BEGIN
9999:
10000: x_return_status := fnd_api.g_ret_sts_success;
10001: l_error_rec := px_trx_error_rec;
10002:
10003: l_debug_level := csi_t_gen_utility_pvt.g_debug_level;
10004:
10027: p_mtl_transaction_id => p_mtl_txn_id,
10028: x_order_line_rec => l_order_line_rec,
10029: x_return_status => l_return_status);
10030:
10031: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10032: raise fnd_api.g_exc_error;
10033: END IF;
10034:
10035: dbms_application_info.set_client_info(l_order_line_rec.org_id);
10028: x_order_line_rec => l_order_line_rec,
10029: x_return_status => l_return_status);
10030:
10031: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10032: raise fnd_api.g_exc_error;
10033: END IF;
10034:
10035: dbms_application_info.set_client_info(l_order_line_rec.org_id);
10036:
10101: THEN
10102: IF l_partner_rec.END_CUSTOMER_ID is null Then
10103: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
10104: fnd_msg_pub.add;
10105: raise fnd_api.g_exc_error;
10106: ELSE
10107: mmt_rec.ib_owner := l_partner_rec.ib_owner;
10108: mmt_rec.end_customer_id := l_partner_rec.end_customer_id;
10109: END IF;
10109: END IF;
10110: ELSIF l_partner_rec.IB_OWNER = 'INSTALL_BASE'
10111: THEN
10112: mmt_rec.ib_owner := l_partner_rec.ib_owner;
10113: mmt_rec.end_customer_id := fnd_api.g_miss_num;
10114: ELSE
10115: mmt_rec.end_customer_id := mmt_rec.sold_to_org_id;
10116: END IF;
10117:
10123: IF l_partner_rec.end_customer_site_use_id is null
10124: THEN
10125: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
10126: fnd_msg_pub.add;
10127: raise fnd_api.g_exc_error;
10128: ELSE
10129: mmt_rec.ib_install_loc_id := l_partner_rec.end_customer_site_use_id;
10130: END IF;
10131: ELSIF mmt_rec.ib_install_loc = 'SHIP_TO'
10133: IF mmt_rec.ship_to_org_id is null
10134: THEN
10135: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
10136: fnd_msg_pub.add;
10137: raise fnd_api.g_exc_error;
10138: ELSE
10139: mmt_rec.ib_install_loc_id := mmt_rec.ship_to_org_id;
10140: END IF;
10141: ELSIF mmt_rec.ib_install_loc = 'SOLD_TO'
10143: IF l_partner_rec.SOLD_TO_SITE_USE_ID is null -- 3412544 mmt_rec.sold_to_org_id is null
10144: THEN
10145: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
10146: fnd_msg_pub.add;
10147: raise fnd_api.g_exc_error;
10148: ELSE
10149: mmt_rec.ib_install_loc_id := l_partner_rec.SOLD_TO_SITE_USE_ID; -- 3412544 mmt_rec.sold_to_org_id;
10150: END IF;
10151: ELSIF mmt_rec.ib_install_loc = 'DELIVER_TO'
10153: IF mmt_rec.deliver_to_org_id is null
10154: THEN
10155: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
10156: fnd_msg_pub.add;
10157: raise fnd_api.g_exc_error;
10158: ELSE
10159: mmt_rec.ib_install_loc_id := mmt_rec.deliver_to_org_id;
10160: END IF;
10161: ELSIF mmt_rec.ib_install_loc = 'BILL_TO'
10163: IF mmt_rec.invoice_to_org_id is null
10164: THEN
10165: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
10166: fnd_msg_pub.add;
10167: raise fnd_api.g_exc_error;
10168: ELSE
10169: mmt_rec.ib_install_loc_id := mmt_rec.invoice_to_org_id;
10170: END IF;
10171: ELSIF mmt_rec.ib_install_loc = 'INSTALL_BASE'
10169: mmt_rec.ib_install_loc_id := mmt_rec.invoice_to_org_id;
10170: END IF;
10171: ELSIF mmt_rec.ib_install_loc = 'INSTALL_BASE'
10172: THEN
10173: mmt_rec.ib_install_loc_id := fnd_api.g_miss_num;
10174: END IF;
10175: ELSE
10176: mmt_rec.ib_install_loc_id := mmt_rec.ship_to_org_id;
10177: END IF;
10184: IF l_partner_rec.end_customer_site_use_id is null
10185: THEN
10186: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
10187: fnd_msg_pub.add;
10188: raise fnd_api.g_exc_error;
10189: ELSE
10190: mmt_rec.ib_current_loc_id := l_partner_rec.end_customer_site_use_id;
10191: END IF;
10192: ELSIF mmt_rec.ib_current_loc = 'SHIP_TO'
10194: IF mmt_rec.ship_to_org_id is null
10195: THEN
10196: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
10197: fnd_msg_pub.add;
10198: raise fnd_api.g_exc_error;
10199: ELSE
10200: mmt_rec.ib_current_loc_id := mmt_rec.ship_to_org_id;
10201: END IF;
10202: ELSIF mmt_rec.ib_current_loc = 'SOLD_TO'
10204: IF l_partner_rec.SOLD_TO_SITE_USE_ID is null -- 3412544 mmt_rec.sold_to_org_id is null
10205: THEN
10206: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
10207: fnd_msg_pub.add;
10208: raise fnd_api.g_exc_error;
10209: ELSE
10210: mmt_rec.ib_current_loc_id := l_partner_rec.SOLD_TO_SITE_USE_ID; -- 3412544 mmt_rec.sold_to_org_id;
10211: END IF;
10212: ELSIF mmt_rec.ib_current_loc = 'DELIVER_TO'
10214: IF mmt_rec.deliver_to_org_id is null
10215: THEN
10216: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
10217: fnd_msg_pub.add;
10218: raise fnd_api.g_exc_error;
10219: ELSE
10220: mmt_rec.ib_current_loc_id := mmt_rec.deliver_to_org_id;
10221: END IF;
10222: ELSIF mmt_rec.ib_current_loc = 'BILL_TO'
10224: IF mmt_rec.invoice_to_org_id is null
10225: THEN
10226: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
10227: fnd_msg_pub.add;
10228: raise fnd_api.g_exc_error;
10229: ELSE
10230: mmt_rec.ib_current_loc_id := mmt_rec.invoice_to_org_id;
10231: END IF;
10232: ELSIF mmt_rec.ib_current_loc = 'INSTALL_BASE'
10230: mmt_rec.ib_current_loc_id := mmt_rec.invoice_to_org_id;
10231: END IF;
10232: ELSIF mmt_rec.ib_current_loc = 'INSTALL_BASE'
10233: THEN
10234: mmt_rec.ib_current_loc_id := fnd_api.g_miss_num;
10235: END IF;
10236: ELSE
10237: mmt_rec.ib_current_loc_id := mmt_rec.ship_to_org_id;
10238: END IF;
10242: p_cust_acct_id => mmt_rec.end_customer_id, -- mmt_rec.sold_to_org_id,
10243: x_party_id => l_party_id,
10244: x_return_status => l_return_status);
10245:
10246: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10247: raise fnd_api.g_exc_error;
10248: END IF;
10249:
10250: debug('Customer_id :'||mmt_rec.end_customer_id); -- mmt_rec.sold_to_org_id);
10243: x_party_id => l_party_id,
10244: x_return_status => l_return_status);
10245:
10246: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10247: raise fnd_api.g_exc_error;
10248: END IF;
10249:
10250: debug('Customer_id :'||mmt_rec.end_customer_id); -- mmt_rec.sold_to_org_id);
10251: debug('Party_id :'||l_party_id);
10250: debug('Customer_id :'||mmt_rec.end_customer_id); -- mmt_rec.sold_to_org_id);
10251: debug('Party_id :'||l_party_id);
10252:
10253: IF l_party_id = -1 THEN
10254: raise fnd_api.g_exc_error;
10255: END IF;
10256:
10257: /* Convert the shipped qty to UOM in OM */
10258: inv_convert.inv_um_conversion (
10264: debug('UOM Conv Factor :'||l_uom_rate);
10265:
10266: IF l_uom_rate = -99999 THEN
10267: debug('inv_convert.inv_um_conversion failed ');
10268: raise fnd_api.g_exc_error;
10269: END IF;
10270:
10271: l_shipped_qty := (l_uom_rate * mmt_rec.shipped_quantity);
10272:
10344:
10345: l_inst_party_id := csi_utl_pkg.get_instance_party_id(l_exp_instance_id);
10346:
10347: IF l_inst_party_id = -1 THEN
10348: raise fnd_api.g_exc_error;
10349: END IF;
10350:
10351: p_party_tbl(1).instance_party_id := l_inst_party_id;
10352: p_party_tbl(1).instance_id := l_exp_instance_id;
10368: p_party_account_tbl(1).relationship_type_code := 'OWNER';
10369: p_party_account_tbl(1).bill_to_address := mmt_rec.invoice_to_org_id;
10370: p_party_account_tbl(1).ship_to_address := mmt_rec.ship_to_org_id;
10371:
10372: p_txn_rec.transaction_id := fnd_api.g_miss_num;
10373: p_txn_rec.transaction_date := sysdate;
10374: p_txn_rec.source_transaction_date := sysdate;
10375: p_txn_rec.transaction_type_id := l_txn_type_id;
10376:
10373: p_txn_rec.transaction_date := sysdate;
10374: p_txn_rec.source_transaction_date := sysdate;
10375: p_txn_rec.transaction_type_id := l_txn_type_id;
10376:
10377: l_trx_rec.transaction_id := fnd_api.g_miss_num;
10378:
10379: csi_t_gen_utility_pvt.dump_api_info(
10380: p_api_name => 'update_item_instance',
10381: p_pkg_name => 'csi_item_instance_pub');
10381: p_pkg_name => 'csi_item_instance_pub');
10382:
10383: csi_item_instance_pub.update_item_instance(
10384: p_api_version => 1.0,
10385: p_commit => fnd_api.g_false,
10386: p_init_msg_list => fnd_api.g_true,
10387: p_validation_level => fnd_api.g_valid_level_full,
10388: p_instance_rec => p_instance_rec,
10389: p_ext_attrib_values_tbl => p_ext_attrib_values_tbl,
10382:
10383: csi_item_instance_pub.update_item_instance(
10384: p_api_version => 1.0,
10385: p_commit => fnd_api.g_false,
10386: p_init_msg_list => fnd_api.g_true,
10387: p_validation_level => fnd_api.g_valid_level_full,
10388: p_instance_rec => p_instance_rec,
10389: p_ext_attrib_values_tbl => p_ext_attrib_values_tbl,
10390: p_party_tbl => p_party_tbl,
10383: csi_item_instance_pub.update_item_instance(
10384: p_api_version => 1.0,
10385: p_commit => fnd_api.g_false,
10386: p_init_msg_list => fnd_api.g_true,
10387: p_validation_level => fnd_api.g_valid_level_full,
10388: p_instance_rec => p_instance_rec,
10389: p_ext_attrib_values_tbl => p_ext_attrib_values_tbl,
10390: p_party_tbl => p_party_tbl,
10391: p_account_tbl => p_party_account_tbl,
10397: x_return_status => l_return_status,
10398: x_msg_count => x_msg_count,
10399: x_msg_data => x_msg_data );
10400:
10401: IF NOT(l_return_status = fnd_api.g_ret_sts_success) THEN
10402: debug('csi_item_instance_pub.expire_item_instance');
10403: raise fnd_api.g_exc_error;
10404: END IF;
10405:
10399: x_msg_data => x_msg_data );
10400:
10401: IF NOT(l_return_status = fnd_api.g_ret_sts_success) THEN
10402: debug('csi_item_instance_pub.expire_item_instance');
10403: raise fnd_api.g_exc_error;
10404: END IF;
10405:
10406: BEGIN
10407: SELECT object_version_number
10428: p_trackable_parent => p_trackable_parent,
10429: x_trx_line_id => x_trx_line_id,
10430: x_return_status => l_return_status );
10431:
10432: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10433: raise fnd_api.g_exc_error;
10434: END IF;
10435:
10436: ELSE
10429: x_trx_line_id => x_trx_line_id,
10430: x_return_status => l_return_status );
10431:
10432: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10433: raise fnd_api.g_exc_error;
10434: END IF;
10435:
10436: ELSE
10437:
10447: p_message_id => null,
10448: x_return_status => l_return_status,
10449: px_trx_error_rec => l_error_rec);
10450:
10451: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10452: RAISE fnd_api.g_exc_error;
10453: END IF;
10454:
10455:
10448: x_return_status => l_return_status,
10449: px_trx_error_rec => l_error_rec);
10450:
10451: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10452: RAISE fnd_api.g_exc_error;
10453: END IF;
10454:
10455:
10456:
10454:
10455:
10456:
10457: EXCEPTION
10458: WHEN fnd_api.g_exc_error THEN
10459: x_return_status := fnd_api.g_ret_sts_error;
10460: l_error_rec.source_id := p_mtl_txn_id; -- For Bug 4168922
10461: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
10462: l_error_rec.error_text := l_error_message;
10455:
10456:
10457: EXCEPTION
10458: WHEN fnd_api.g_exc_error THEN
10459: x_return_status := fnd_api.g_ret_sts_error;
10460: l_error_rec.source_id := p_mtl_txn_id; -- For Bug 4168922
10461: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
10462: l_error_rec.error_text := l_error_message;
10463: debug('Error(E) :'||l_error_message);
10467: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
10468: fnd_message.set_token('MESSAGE',substr(sqlerrm,1,540));
10469: fnd_msg_pub.add;
10470:
10471: x_return_status := fnd_api.g_ret_sts_error;
10472: l_error_rec.source_id := p_mtl_txn_id; -- For 4168922
10473: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
10474: l_error_rec.error_text := l_error_message;
10475: debug('Error(O) :'||l_error_message);
10483: x_return_status OUT NOCOPY varchar2,
10484: x_error_message OUT NOCOPY varchar2)
10485: IS
10486:
10487: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
10488: l_message_id NUMBER;
10489: l_error_code NUMBER;
10490: l_error_message VARCHAR2(4000);
10491:
10490: l_error_message VARCHAR2(4000);
10491:
10492: BEGIN
10493:
10494: x_return_status := fnd_api.g_ret_sts_success;
10495:
10496: csi_ont_txn_pub.PostTransaction(
10497: p_order_line_id => p_order_line_id,
10498: x_message_id => l_message_id,
10499: x_error_code => l_error_code,
10500: x_return_status => l_return_status,
10501: x_error_message => l_error_message);
10502:
10503: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10504: RAISE fnd_api.g_exc_error;
10505: END IF;
10506:
10507: EXCEPTION
10500: x_return_status => l_return_status,
10501: x_error_message => l_error_message);
10502:
10503: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10504: RAISE fnd_api.g_exc_error;
10505: END IF;
10506:
10507: EXCEPTION
10508: WHEN fnd_api.g_exc_error THEN
10504: RAISE fnd_api.g_exc_error;
10505: END IF;
10506:
10507: EXCEPTION
10508: WHEN fnd_api.g_exc_error THEN
10509: x_return_status := fnd_api.g_ret_sts_error;
10510: END order_fulfillment;
10511:
10512: /* to be used in the fulfillment workflow for the ib interface */
10505: END IF;
10506:
10507: EXCEPTION
10508: WHEN fnd_api.g_exc_error THEN
10509: x_return_status := fnd_api.g_ret_sts_error;
10510: END order_fulfillment;
10511:
10512: /* to be used in the fulfillment workflow for the ib interface */
10513: PROCEDURE fulfill_wf(
10537: x_message_id => l_message_id,
10538: x_error_code => l_error_code,
10539: x_error_message => l_error_message);
10540:
10541: IF l_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
10542: resultout := 'COMPLETE:N';
10543: RETURN;
10544: ELSE
10545: resultout := 'COMPLETE:Y';
10591: l_error_rec csi_datastructures_pub.transaction_error_rec;
10592:
10593: BEGIN
10594:
10595: x_return_status := FND_API.G_RET_STS_SUCCESS;
10596:
10597: csi_t_gen_utility_pvt.build_file_name(
10598: p_file_segment1 => 'csi',
10599: p_file_segment2 => to_char(sysdate, 'DDMMYY'),
10614: p_transaction_id => p_order_line_id,
10615: x_trx_return_status => l_return_status,
10616: x_trx_error_rec => l_error_rec);
10617:
10618: IF (l_return_status <> fnd_api.g_ret_sts_success) then
10619: csi_inv_trxs_pkg.log_csi_error(l_error_rec);
10620: END IF;
10621:
10622: ELSE
10633: x_error_message => l_error_message);
10634:
10635: IF (l_error_message is not null) THEN
10636: x_error_message := l_error_message;
10637: RAISE fnd_api.g_exc_error;
10638: END IF;
10639:
10640: END IF;
10641:
10639:
10640: END IF;
10641:
10642: EXCEPTION
10643: WHEN fnd_api.g_exc_error THEN
10644: x_return_status := fnd_api.g_ret_sts_error;
10645: WHEN others THEN
10646: x_return_status := fnd_api.g_ret_sts_unexp_error;
10647: x_error_message := substr(sqlerrm, 1, 255);
10640: END IF;
10641:
10642: EXCEPTION
10643: WHEN fnd_api.g_exc_error THEN
10644: x_return_status := fnd_api.g_ret_sts_error;
10645: WHEN others THEN
10646: x_return_status := fnd_api.g_ret_sts_unexp_error;
10647: x_error_message := substr(sqlerrm, 1, 255);
10648: END fulfill_old_line;
10642: EXCEPTION
10643: WHEN fnd_api.g_exc_error THEN
10644: x_return_status := fnd_api.g_ret_sts_error;
10645: WHEN others THEN
10646: x_return_status := fnd_api.g_ret_sts_unexp_error;
10647: x_error_message := substr(sqlerrm, 1, 255);
10648: END fulfill_old_line;
10649:
10650: --
10759: BEGIN
10760: l_line_count := 0;
10761: ASO_ORDER_FEEDBACK_PUB.GET_NOTICE (
10762: p_api_version => 1.0,
10763: p_init_msg_list => FND_API.G_TRUE,
10764: p_commit => FND_API.G_FALSE,
10765: x_return_status => l_return_status,
10766: x_msg_count => l_msg_count,
10767: x_msg_data => l_msg_data,
10760: l_line_count := 0;
10761: ASO_ORDER_FEEDBACK_PUB.GET_NOTICE (
10762: p_api_version => 1.0,
10763: p_init_msg_list => FND_API.G_TRUE,
10764: p_commit => FND_API.G_FALSE,
10765: x_return_status => l_return_status,
10766: x_msg_count => l_msg_count,
10767: x_msg_data => l_msg_data,
10768: p_app_short_name => 'CS',
10795: x_Lot_Serial_tbl => l_lot_serial_tbl,
10796: x_old_Lot_Serial_tbl => l_old_lot_serial_tbl,
10797: x_action_request_tbl => l_action_request_tbl);
10798: --
10799: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
10800: retcode := 2;
10801: fnd_file.put_line(fnd_file.log, 'Finished execution in failing to get queue message.');
10802: fnd_file.put_line(fnd_file.output, 'Process Old Order Lines Program finished with error. ');
10803: l_msg_index := 1;
10802: fnd_file.put_line(fnd_file.output, 'Process Old Order Lines Program finished with error. ');
10803: l_msg_index := 1;
10804: WHILE l_msg_count > 0
10805: LOOP
10806: l_msg_data := FND_MSG_PUB.GET( l_msg_index, FND_API.G_FALSE);
10807: fnd_file.PUT_LINE(fnd_file.log, 'message data = '||l_msg_data);
10808: l_msg_index := l_msg_index + 1;
10809: l_msg_count := l_msg_count - 1;
10810: END LOOP;
10811: ROLLBACK TO PROCESS_OLD_ORDER_LINES;
10812: RETURN;
10813: END IF;
10814: --
10815: EXIT WHEN l_no_more_messages = FND_API.G_TRUE;
10816: --
10817: l_line_count := l_line_tbl.count;
10818:
10819: IF l_line_count <= 0 THEN
10921: fulfill_old_line(
10922: p_order_line_id => l_line_tbl(l_count).line_id,
10923: x_return_status => l_return_status,
10924: x_error_message => l_error_message);
10925: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
10926: fnd_file.put_line(fnd_file.log,'Error while creating the Instance '
10927: ||'----'||l_error_message);
10928: fnd_file.put_line(fnd_file.log,'Please Use the Transaction Re-processing FORM to re-process this line..');
10929: Raise Process_Next;
10947: When ASO_HANDLE_NORMAL then
10948: fnd_file.put_line(fnd_file.log, 'adding message to exception queue...');
10949: ASO_ORDER_FEEDBACk_PUB.HANDLE_EXCEPTION(
10950: p_api_version => 1.0,
10951: p_init_msg_list => FND_API.G_FALSE,
10952: p_commit => FND_API.G_FALSE,
10953: x_return_status => l_return_status,
10954: x_msg_count => l_msg_count,
10955: x_msg_data => l_msg_data,
10948: fnd_file.put_line(fnd_file.log, 'adding message to exception queue...');
10949: ASO_ORDER_FEEDBACk_PUB.HANDLE_EXCEPTION(
10950: p_api_version => 1.0,
10951: p_init_msg_list => FND_API.G_FALSE,
10952: p_commit => FND_API.G_FALSE,
10953: x_return_status => l_return_status,
10954: x_msg_count => l_msg_count,
10955: x_msg_data => l_msg_data,
10956: p_app_short_name => 'CS',
10994: BEGIN
10995: l_line_count := 0;
10996: ASO_ORDER_FEEDBACK_PUB.GET_EXCEPTION (
10997: p_api_version => 1.0,
10998: p_init_msg_list => FND_API.G_TRUE,
10999: p_commit => FND_API.G_FALSE,
11000: x_return_status => l_return_status,
11001: x_msg_count => l_msg_count,
11002: x_msg_data => l_msg_data,
10995: l_line_count := 0;
10996: ASO_ORDER_FEEDBACK_PUB.GET_EXCEPTION (
10997: p_api_version => 1.0,
10998: p_init_msg_list => FND_API.G_TRUE,
10999: p_commit => FND_API.G_FALSE,
11000: x_return_status => l_return_status,
11001: x_msg_count => l_msg_count,
11002: x_msg_data => l_msg_data,
11003: p_app_short_name => 'CS',
11032: x_Lot_Serial_tbl => l_lot_serial_tbl,
11033: x_old_Lot_Serial_tbl => l_old_lot_serial_tbl,
11034: x_action_request_tbl => l_action_request_tbl);
11035: --
11036: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
11037: retcode := 2;
11038: fnd_file.put_line(fnd_file.log, 'Finished execution in failing to get Exception queue message.');
11039: fnd_file.put_line(fnd_file.output, 'Process Old Order Lines Program finished with error. ');
11040: l_msg_index := 1;
11039: fnd_file.put_line(fnd_file.output, 'Process Old Order Lines Program finished with error. ');
11040: l_msg_index := 1;
11041: WHILE l_msg_count > 0
11042: LOOP
11043: l_msg_data := FND_MSG_PUB.GET(l_msg_index, FND_API.G_FALSE);
11044: fnd_file.PUT_LINE(fnd_file.log, 'message data = '||l_msg_data);
11045: l_msg_index := l_msg_index + 1;
11046: l_msg_count := l_msg_count - 1;
11047: END LOOP;
11048: ROLLBACK TO PROCESS_OLD_ORDER_LINES;
11049: RETURN;
11050: END IF;
11051: --
11052: EXIT WHEN l_no_more_messages = FND_API.G_TRUE;
11053: --
11054: l_line_count := l_line_tbl.count;
11055:
11056: IF l_line_count <= 0 THEN
11154: fulfill_old_line(
11155: p_order_line_id => l_line_tbl(l_count).line_id,
11156: x_return_status => l_return_status,
11157: x_error_message => l_error_message);
11158: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
11159: fnd_file.put_line(fnd_file.log,'Error while creating the Instance '
11160: ||'----'||l_error_message);
11161: fnd_file.put_line(fnd_file.log,'Please Use the Transaction Re-processing FORM to re-process this line..');
11162: Raise Process_Next;
11180: When ASO_HANDLE_EXCEPTION then
11181: fnd_file.put_line(fnd_file.log, 'Adding message to exception queue again ...');
11182: ASO_ORDER_FEEDBACk_PUB.HANDLE_EXCEPTION (
11183: p_api_version => 1.0,
11184: p_init_msg_list => FND_API.G_FALSE,
11185: p_commit => FND_API.G_FALSE,
11186: x_return_status => l_return_status,
11187: x_msg_count => l_msg_count,
11188: x_msg_data => l_msg_data,
11181: fnd_file.put_line(fnd_file.log, 'Adding message to exception queue again ...');
11182: ASO_ORDER_FEEDBACk_PUB.HANDLE_EXCEPTION (
11183: p_api_version => 1.0,
11184: p_init_msg_list => FND_API.G_FALSE,
11185: p_commit => FND_API.G_FALSE,
11186: x_return_status => l_return_status,
11187: x_msg_count => l_msg_count,
11188: x_msg_data => l_msg_data,
11189: p_app_short_name => 'CS',