[Home] [Help]
43: PROCEDURE create_csi_transaction(
44: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
45: x_return_status OUT nocopy varchar2)
46: IS
47: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
48: l_msg_count number;
49: l_msg_data varchar2(2000);
50:
51: BEGIN
49: l_msg_data varchar2(2000);
50:
51: BEGIN
52:
53: x_return_status := fnd_api.g_ret_sts_success;
54:
55: csi_t_gen_utility_pvt.dump_api_info(
56: p_api_name => 'create_transaction',
57: p_pkg_name => 'csi_transactions_pvt');
57: p_pkg_name => 'csi_transactions_pvt');
58:
59: csi_transactions_pvt.create_transaction(
60: p_api_version => 1.0,
61: p_commit => fnd_api.g_false,
62: p_init_msg_list => fnd_api.g_true,
63: p_validation_level => fnd_api.g_valid_level_full,
64: p_success_if_exists_flag => 'Y',
65: p_transaction_rec => px_csi_txn_rec,
58:
59: csi_transactions_pvt.create_transaction(
60: p_api_version => 1.0,
61: p_commit => fnd_api.g_false,
62: p_init_msg_list => fnd_api.g_true,
63: p_validation_level => fnd_api.g_valid_level_full,
64: p_success_if_exists_flag => 'Y',
65: p_transaction_rec => px_csi_txn_rec,
66: x_return_status => l_return_status,
59: csi_transactions_pvt.create_transaction(
60: p_api_version => 1.0,
61: p_commit => fnd_api.g_false,
62: p_init_msg_list => fnd_api.g_true,
63: p_validation_level => fnd_api.g_valid_level_full,
64: p_success_if_exists_flag => 'Y',
65: p_transaction_rec => px_csi_txn_rec,
66: x_return_status => l_return_status,
67: x_msg_count => l_msg_count,
66: x_return_status => l_return_status,
67: x_msg_count => l_msg_count,
68: x_msg_data => l_msg_data);
69:
70: IF l_return_status <> fnd_api.g_ret_sts_success THEN
71: RAISE fnd_api.g_exc_error;
72: END IF;
73:
74: debug(' csi_transaction_id : '||px_csi_txn_rec.transaction_id);
67: x_msg_count => l_msg_count,
68: x_msg_data => l_msg_data);
69:
70: IF l_return_status <> fnd_api.g_ret_sts_success THEN
71: RAISE fnd_api.g_exc_error;
72: END IF;
73:
74: debug(' csi_transaction_id : '||px_csi_txn_rec.transaction_id);
75:
73:
74: debug(' csi_transaction_id : '||px_csi_txn_rec.transaction_id);
75:
76: EXCEPTION
77: WHEN fnd_api.g_exc_error THEN
78: x_return_status := fnd_api.g_ret_sts_error;
79: END create_csi_transaction;
80:
81: PROCEDURE get_sub_type_rec(
74: debug(' csi_transaction_id : '||px_csi_txn_rec.transaction_id);
75:
76: EXCEPTION
77: WHEN fnd_api.g_exc_error THEN
78: x_return_status := fnd_api.g_ret_sts_error;
79: END create_csi_transaction;
80:
81: PROCEDURE get_sub_type_rec(
82: p_transaction_type_id IN number,
86: IS
87: l_sub_type_rec sub_type_rec;
88: BEGIN
89: api_log('get_sub_type_rec');
90: x_return_status := fnd_api.g_ret_sts_success;
91:
92: l_sub_type_rec.transaction_type_id := p_transaction_type_id;
93: l_sub_type_rec.sub_type_id := p_sub_type_id;
94:
120: fnd_message.set_name('CSI','CSI_INT_SUB_TYPE_REC_MISSING');
121: fnd_message.set_token('SUB_TYPE_ID', p_sub_type_id);
122: fnd_message.set_token('TRANSACTION_TYPE_ID', p_transaction_type_id);
123: fnd_msg_pub.add;
124: RAISE fnd_api.g_exc_error;
125: END;
126: x_sub_type_rec := l_sub_type_rec;
127: EXCEPTION
128: WHEN fnd_api.g_exc_error THEN
124: RAISE fnd_api.g_exc_error;
125: END;
126: x_sub_type_rec := l_sub_type_rec;
127: EXCEPTION
128: WHEN fnd_api.g_exc_error THEN
129: x_return_status := fnd_api.g_ret_sts_error;
130: END get_sub_type_rec;
131:
132:
125: END;
126: x_sub_type_rec := l_sub_type_rec;
127: EXCEPTION
128: WHEN fnd_api.g_exc_error THEN
129: x_return_status := fnd_api.g_ret_sts_error;
130: END get_sub_type_rec;
131:
132:
133: -- added for the bug 5464761
138: x_return_status OUT nocopy varchar2)
139: IS
140: l_src_instance_rec csi_datastructures_pub.instance_rec;
141: l_instance_tbl csi_datastructures_pub.instance_tbl;
142: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
143: l_msg_count number;
144: l_msg_data varchar2(2000);
145: BEGIN
146:
143: l_msg_count number;
144: l_msg_data varchar2(2000);
145: BEGIN
146:
147: x_return_status := fnd_api.g_ret_sts_success;
148:
149: api_log('auto_split_instances');
150:
151: l_src_instance_rec.instance_id := p_instance_rec.instance_id ;
174: p_api_name => 'split_item_instance_lines');
175:
176: csi_item_instance_pvt.split_item_instance_lines(
177: p_api_version => 1.0,
178: p_commit => fnd_api.g_false,
179: p_init_msg_list => fnd_api.g_true,
180: p_validation_level => fnd_api.g_valid_level_full,
181: p_source_instance_rec => l_src_instance_rec,
182: p_copy_ext_attribs => fnd_api.g_true,
175:
176: csi_item_instance_pvt.split_item_instance_lines(
177: p_api_version => 1.0,
178: p_commit => fnd_api.g_false,
179: p_init_msg_list => fnd_api.g_true,
180: p_validation_level => fnd_api.g_valid_level_full,
181: p_source_instance_rec => l_src_instance_rec,
182: p_copy_ext_attribs => fnd_api.g_true,
183: p_copy_org_assignments => fnd_api.g_true,
176: csi_item_instance_pvt.split_item_instance_lines(
177: p_api_version => 1.0,
178: p_commit => fnd_api.g_false,
179: p_init_msg_list => fnd_api.g_true,
180: p_validation_level => fnd_api.g_valid_level_full,
181: p_source_instance_rec => l_src_instance_rec,
182: p_copy_ext_attribs => fnd_api.g_true,
183: p_copy_org_assignments => fnd_api.g_true,
184: p_copy_parties => fnd_api.g_true,
178: p_commit => fnd_api.g_false,
179: p_init_msg_list => fnd_api.g_true,
180: p_validation_level => fnd_api.g_valid_level_full,
181: p_source_instance_rec => l_src_instance_rec,
182: p_copy_ext_attribs => fnd_api.g_true,
183: p_copy_org_assignments => fnd_api.g_true,
184: p_copy_parties => fnd_api.g_true,
185: p_copy_accounts => fnd_api.g_true,
186: p_copy_asset_assignments => fnd_api.g_true,
179: p_init_msg_list => fnd_api.g_true,
180: p_validation_level => fnd_api.g_valid_level_full,
181: p_source_instance_rec => l_src_instance_rec,
182: p_copy_ext_attribs => fnd_api.g_true,
183: p_copy_org_assignments => fnd_api.g_true,
184: p_copy_parties => fnd_api.g_true,
185: p_copy_accounts => fnd_api.g_true,
186: p_copy_asset_assignments => fnd_api.g_true,
187: p_copy_pricing_attribs => fnd_api.g_true,
180: p_validation_level => fnd_api.g_valid_level_full,
181: p_source_instance_rec => l_src_instance_rec,
182: p_copy_ext_attribs => fnd_api.g_true,
183: p_copy_org_assignments => fnd_api.g_true,
184: p_copy_parties => fnd_api.g_true,
185: p_copy_accounts => fnd_api.g_true,
186: p_copy_asset_assignments => fnd_api.g_true,
187: p_copy_pricing_attribs => fnd_api.g_true,
188: p_txn_rec => px_txn_rec,
181: p_source_instance_rec => l_src_instance_rec,
182: p_copy_ext_attribs => fnd_api.g_true,
183: p_copy_org_assignments => fnd_api.g_true,
184: p_copy_parties => fnd_api.g_true,
185: p_copy_accounts => fnd_api.g_true,
186: p_copy_asset_assignments => fnd_api.g_true,
187: p_copy_pricing_attribs => fnd_api.g_true,
188: p_txn_rec => px_txn_rec,
189: x_new_instance_tbl => l_instance_tbl,
182: p_copy_ext_attribs => fnd_api.g_true,
183: p_copy_org_assignments => fnd_api.g_true,
184: p_copy_parties => fnd_api.g_true,
185: p_copy_accounts => fnd_api.g_true,
186: p_copy_asset_assignments => fnd_api.g_true,
187: p_copy_pricing_attribs => fnd_api.g_true,
188: p_txn_rec => px_txn_rec,
189: x_new_instance_tbl => l_instance_tbl,
190: x_return_status => l_return_status,
183: p_copy_org_assignments => fnd_api.g_true,
184: p_copy_parties => fnd_api.g_true,
185: p_copy_accounts => fnd_api.g_true,
186: p_copy_asset_assignments => fnd_api.g_true,
187: p_copy_pricing_attribs => fnd_api.g_true,
188: p_txn_rec => px_txn_rec,
189: x_new_instance_tbl => l_instance_tbl,
190: x_return_status => l_return_status,
191: x_msg_count => l_msg_count,
190: x_return_status => l_return_status,
191: x_msg_count => l_msg_count,
192: x_msg_data => l_msg_data);
193:
194: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
195: RAISE fnd_api.g_exc_error;
196: END IF;
197:
198: x_instance_tbl := l_instance_tbl;
191: x_msg_count => l_msg_count,
192: x_msg_data => l_msg_data);
193:
194: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
195: RAISE fnd_api.g_exc_error;
196: END IF;
197:
198: x_instance_tbl := l_instance_tbl;
199:
197:
198: x_instance_tbl := l_instance_tbl;
199:
200: EXCEPTION
201: WHEN fnd_api.g_exc_error THEN
202: x_return_status := fnd_api.g_ret_sts_error;
203: END auto_split_instances;
204:
205:
198: x_instance_tbl := l_instance_tbl;
199:
200: EXCEPTION
201: WHEN fnd_api.g_exc_error THEN
202: x_return_status := fnd_api.g_ret_sts_error;
203: END auto_split_instances;
204:
205:
206: -- added for the bug 5464761
217: l_ind binary_integer := 0;
218: l_all_cps_tbl csi_order_ship_pub.customer_products_tbl;
219: l_single_cps_tbl csi_order_ship_pub.customer_products_tbl;
220: l_acp_ind binary_integer := 0;
221: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
222: l_msg_count number;
223: l_msg_data varchar2(2000);
224:
225:
305: px_txn_rec => px_csi_txn_rec,
306: x_instance_tbl => l_auto_split_instances,
307: x_return_status => l_return_status);
308:
309: IF l_return_status <> fnd_api.g_ret_sts_success THEN
310: RAISE fnd_api.g_exc_error;
311: END IF;
312: END IF;
313:
306: x_instance_tbl => l_auto_split_instances,
307: x_return_status => l_return_status);
308:
309: IF l_return_status <> fnd_api.g_ret_sts_success THEN
310: RAISE fnd_api.g_exc_error;
311: END IF;
312: END IF;
313:
314:
393: p_api_name => 'explode_bom');
394:
395: csi_item_instance_grp.explode_bom( -- changes done to call the Group API for performance issues, bug3722382
396: p_api_version => 1.0,
397: p_commit => fnd_api.g_false,
398: p_init_msg_list => fnd_api.g_true,
399: p_validation_level => fnd_api.g_valid_level_full,
400: p_source_instance_tbl => l_bom_std_item_tbl,
401: p_explosion_level => fnd_api.g_miss_num,
394:
395: csi_item_instance_grp.explode_bom( -- changes done to call the Group API for performance issues, bug3722382
396: p_api_version => 1.0,
397: p_commit => fnd_api.g_false,
398: p_init_msg_list => fnd_api.g_true,
399: p_validation_level => fnd_api.g_valid_level_full,
400: p_source_instance_tbl => l_bom_std_item_tbl,
401: p_explosion_level => fnd_api.g_miss_num,
402: p_txn_rec => px_csi_txn_rec,
395: csi_item_instance_grp.explode_bom( -- changes done to call the Group API for performance issues, bug3722382
396: p_api_version => 1.0,
397: p_commit => fnd_api.g_false,
398: p_init_msg_list => fnd_api.g_true,
399: p_validation_level => fnd_api.g_valid_level_full,
400: p_source_instance_tbl => l_bom_std_item_tbl,
401: p_explosion_level => fnd_api.g_miss_num,
402: p_txn_rec => px_csi_txn_rec,
403: x_return_status => l_return_status,
397: p_commit => fnd_api.g_false,
398: p_init_msg_list => fnd_api.g_true,
399: p_validation_level => fnd_api.g_valid_level_full,
400: p_source_instance_tbl => l_bom_std_item_tbl,
401: p_explosion_level => fnd_api.g_miss_num,
402: p_txn_rec => px_csi_txn_rec,
403: x_return_status => l_return_status,
404: x_msg_count => l_msg_count,
405: x_msg_data => l_msg_data);
403: x_return_status => l_return_status,
404: x_msg_count => l_msg_count,
405: x_msg_data => l_msg_data);
406:
407: IF l_return_status <> fnd_api.g_ret_sts_success THEN
408: RAISE fnd_api.g_exc_error;
409: END IF;
410:
411: debug('explode bom end time :'||to_char(sysdate, 'hh24:mi:ss'));
404: x_msg_count => l_msg_count,
405: x_msg_data => l_msg_data);
406:
407: IF l_return_status <> fnd_api.g_ret_sts_success THEN
408: RAISE fnd_api.g_exc_error;
409: END IF;
410:
411: debug('explode bom end time :'||to_char(sysdate, 'hh24:mi:ss'));
412: END IF;
437:
438: l_loop_count number := 1;
439: l_quantity number;
440:
441: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
442: l_msg_count number;
443: l_msg_data varchar2(4000);
444: l_bom_expl_org_flag VARCHAR2(3);
445:
444: l_bom_expl_org_flag VARCHAR2(3);
445:
446: BEGIN
447:
448: x_return_status := fnd_api.g_ret_sts_success;
449: api_log('create_dflt_txn_dtls');
450:
451: -- Bug 10285807
452: -- Fetch profile CSI_BOM_EXPLOSION_ORG
496: c_tld_tbl(l_ind).quantity := l_quantity;
497: c_tld_tbl(l_ind).unit_of_measure := p_order_line_rec.order_quantity_uom;
498: c_tld_tbl(l_ind).processing_status := 'IN_PROCESS';
499:
500: IF nvl(px_default_info_rec.current_party_site_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
501: c_tld_tbl(l_ind).location_type_code := 'HZ_PARTY_SITES';
502: c_tld_tbl(l_ind).location_id := px_default_info_rec.current_party_site_id;
503: END IF;
504:
501: c_tld_tbl(l_ind).location_type_code := 'HZ_PARTY_SITES';
502: c_tld_tbl(l_ind).location_id := px_default_info_rec.current_party_site_id;
503: END IF;
504:
505: IF nvl(px_default_info_rec.install_party_site_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
506: c_tld_tbl(l_ind).install_location_type_code := 'HZ_PARTY_SITES';
507: c_tld_tbl(l_ind).install_location_id := px_default_info_rec.install_party_site_id;
508: END IF;
509:
526: ELSE
527: c_tpd_tbl(l_ind).party_source_id := px_default_info_rec.internal_party_id;
528: END IF;
529:
530: IF nvl(p_order_line_rec.sold_from_org_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
531: c_oa_tbl(l_ind).operating_unit_id := p_order_line_rec.sold_from_org_id;
532: c_oa_tbl(l_ind).relationship_type_code := 'SOLD_FROM';
533: c_oa_tbl(l_ind).preserve_detail_flag := 'Y';
534: c_oa_tbl(l_ind).txn_line_details_index := l_ind;
537: END LOOP;
538:
539: csi_t_txn_details_grp.create_transaction_dtls(
540: p_api_version => 1.0,
541: p_commit => fnd_api.g_false,
542: p_init_msg_list => fnd_api.g_true,
543: p_validation_level => fnd_api.g_valid_level_full,
544: px_txn_line_rec => c_tl_rec,
545: px_txn_line_detail_tbl => c_tld_tbl,
538:
539: csi_t_txn_details_grp.create_transaction_dtls(
540: p_api_version => 1.0,
541: p_commit => fnd_api.g_false,
542: p_init_msg_list => fnd_api.g_true,
543: p_validation_level => fnd_api.g_valid_level_full,
544: px_txn_line_rec => c_tl_rec,
545: px_txn_line_detail_tbl => c_tld_tbl,
546: px_txn_party_detail_tbl => c_tpd_tbl,
539: csi_t_txn_details_grp.create_transaction_dtls(
540: p_api_version => 1.0,
541: p_commit => fnd_api.g_false,
542: p_init_msg_list => fnd_api.g_true,
543: p_validation_level => fnd_api.g_valid_level_full,
544: px_txn_line_rec => c_tl_rec,
545: px_txn_line_detail_tbl => c_tld_tbl,
546: px_txn_party_detail_tbl => c_tpd_tbl,
547: px_txn_pty_acct_detail_tbl => c_tpa_tbl,
552: x_return_status => l_return_status,
553: x_msg_count => l_msg_count,
554: x_msg_data => l_msg_data);
555:
556: IF l_return_status <> fnd_api.g_ret_sts_success THEN
557: RAISE fnd_api.g_exc_error;
558: END IF;
559:
560: x_txn_line_rec := c_tl_rec;
553: x_msg_count => l_msg_count,
554: x_msg_data => l_msg_data);
555:
556: IF l_return_status <> fnd_api.g_ret_sts_success THEN
557: RAISE fnd_api.g_exc_error;
558: END IF;
559:
560: x_txn_line_rec := c_tl_rec;
561: x_tld_tbl := c_tld_tbl;
561: x_tld_tbl := c_tld_tbl;
562: x_tiir_tbl := c_iir_tbl;
563:
564: EXCEPTION
565: WHEN fnd_api.g_exc_error THEN
566: x_return_status := fnd_api.g_ret_sts_error;
567: END create_dflt_txn_dtls;
568:
569: PROCEDURE get_parent_txn_line_status (
562: x_tiir_tbl := c_iir_tbl;
563:
564: EXCEPTION
565: WHEN fnd_api.g_exc_error THEN
566: x_return_status := fnd_api.g_ret_sts_error;
567: END create_dflt_txn_dtls;
568:
569: PROCEDURE get_parent_txn_line_status (
570: p_parent_line_id IN number,
603: x_return_status OUT NOCOPY varchar2)
604: IS
605: BEGIN
606:
607: x_return_status := fnd_api.g_ret_sts_success;
608:
609: x_instance_rec.instance_id := p_instance_header_rec.instance_id;
610: x_instance_rec.instance_number := p_instance_header_rec.instance_number;
611: x_instance_rec.external_reference := p_instance_header_rec.external_reference;
679: p_instance_header_tbl IN csi_datastructures_pub.instance_header_tbl,
680: x_instance_tbl OUT NOCOPY csi_datastructures_pub.instance_tbl,
681: x_return_status OUT NOCOPY varchar2)
682: IS
683: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
684: BEGIN
685:
686: x_return_status := fnd_api.g_ret_sts_success;
687:
682: IS
683: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
684: BEGIN
685:
686: x_return_status := fnd_api.g_ret_sts_success;
687:
688: IF p_instance_header_tbl.COUNT > 0 THEN
689: FOR l_ind IN p_instance_header_tbl.FIRST .. p_instance_header_tbl.LAST
690: LOOP
728:
729: l_instance_tbl csi_datastructures_pub.instance_tbl;
730: x_ind binary_integer := 0;
731:
732: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
733: l_msg_data varchar2(2000);
734: l_msg_count number;
735:
736: BEGIN
733: l_msg_data varchar2(2000);
734: l_msg_count number;
735:
736: BEGIN
737: x_return_status := fnd_api.g_ret_sts_success;
738: api_log('split_instances_using_copy');
739:
740: IF nvl(p_instance_rec.instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
741:
736: BEGIN
737: x_return_status := fnd_api.g_ret_sts_success;
738: api_log('split_instances_using_copy');
739:
740: IF nvl(p_instance_rec.instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
741:
742: l_instance_rec := p_instance_rec;
743:
744: IF p_instance_rec.quantity > 1 THEN
773: debug(' quantity : '||l_u_instance_rec.quantity);
774:
775: csi_item_instance_pub.update_item_instance(
776: p_api_version => 1.0,
777: p_commit => fnd_api.g_false,
778: p_init_msg_list => fnd_api.g_true,
779: p_validation_level => fnd_api.g_valid_level_full,
780: p_instance_rec => l_u_instance_rec,
781: p_party_tbl => l_u_parties_tbl,
774:
775: csi_item_instance_pub.update_item_instance(
776: p_api_version => 1.0,
777: p_commit => fnd_api.g_false,
778: p_init_msg_list => fnd_api.g_true,
779: p_validation_level => fnd_api.g_valid_level_full,
780: p_instance_rec => l_u_instance_rec,
781: p_party_tbl => l_u_parties_tbl,
782: p_account_tbl => l_u_pty_accts_tbl,
775: csi_item_instance_pub.update_item_instance(
776: p_api_version => 1.0,
777: p_commit => fnd_api.g_false,
778: p_init_msg_list => fnd_api.g_true,
779: p_validation_level => fnd_api.g_valid_level_full,
780: p_instance_rec => l_u_instance_rec,
781: p_party_tbl => l_u_parties_tbl,
782: p_account_tbl => l_u_pty_accts_tbl,
783: p_org_assignments_tbl => l_u_org_units_tbl,
789: x_return_status => l_return_status,
790: x_msg_count => l_msg_count,
791: x_msg_data => l_msg_data);
792:
793: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
794: RAISE fnd_api.g_exc_error;
795: END IF;
796:
797: x_ind := x_ind + 1;
790: x_msg_count => l_msg_count,
791: x_msg_data => l_msg_data);
792:
793: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
794: RAISE fnd_api.g_exc_error;
795: END IF;
796:
797: x_ind := x_ind + 1;
798: l_instance_tbl(x_ind) := p_instance_rec;
807: debug(' Inside API :csi_item_instance_pub.copy_item_instance');
808:
809: csi_item_instance_pub.copy_item_instance(
810: p_api_version => 1.0,
811: p_commit => fnd_api.g_false,
812: p_init_msg_list => fnd_api.g_true,
813: p_validation_level => fnd_api.g_valid_level_full,
814: p_source_instance_rec => l_instance_rec,
815: p_copy_ext_attribs => fnd_api.g_true,
808:
809: csi_item_instance_pub.copy_item_instance(
810: p_api_version => 1.0,
811: p_commit => fnd_api.g_false,
812: p_init_msg_list => fnd_api.g_true,
813: p_validation_level => fnd_api.g_valid_level_full,
814: p_source_instance_rec => l_instance_rec,
815: p_copy_ext_attribs => fnd_api.g_true,
816: p_copy_org_assignments => fnd_api.g_true,
809: csi_item_instance_pub.copy_item_instance(
810: p_api_version => 1.0,
811: p_commit => fnd_api.g_false,
812: p_init_msg_list => fnd_api.g_true,
813: p_validation_level => fnd_api.g_valid_level_full,
814: p_source_instance_rec => l_instance_rec,
815: p_copy_ext_attribs => fnd_api.g_true,
816: p_copy_org_assignments => fnd_api.g_true,
817: p_copy_parties => fnd_api.g_true,
811: p_commit => fnd_api.g_false,
812: p_init_msg_list => fnd_api.g_true,
813: p_validation_level => fnd_api.g_valid_level_full,
814: p_source_instance_rec => l_instance_rec,
815: p_copy_ext_attribs => fnd_api.g_true,
816: p_copy_org_assignments => fnd_api.g_true,
817: p_copy_parties => fnd_api.g_true,
818: p_copy_party_contacts => fnd_api.g_true,
819: p_copy_accounts => fnd_api.g_true,
812: p_init_msg_list => fnd_api.g_true,
813: p_validation_level => fnd_api.g_valid_level_full,
814: p_source_instance_rec => l_instance_rec,
815: p_copy_ext_attribs => fnd_api.g_true,
816: p_copy_org_assignments => fnd_api.g_true,
817: p_copy_parties => fnd_api.g_true,
818: p_copy_party_contacts => fnd_api.g_true,
819: p_copy_accounts => fnd_api.g_true,
820: p_copy_asset_assignments => fnd_api.g_true,
813: p_validation_level => fnd_api.g_valid_level_full,
814: p_source_instance_rec => l_instance_rec,
815: p_copy_ext_attribs => fnd_api.g_true,
816: p_copy_org_assignments => fnd_api.g_true,
817: p_copy_parties => fnd_api.g_true,
818: p_copy_party_contacts => fnd_api.g_true,
819: p_copy_accounts => fnd_api.g_true,
820: p_copy_asset_assignments => fnd_api.g_true,
821: p_copy_pricing_attribs => fnd_api.g_true,
814: p_source_instance_rec => l_instance_rec,
815: p_copy_ext_attribs => fnd_api.g_true,
816: p_copy_org_assignments => fnd_api.g_true,
817: p_copy_parties => fnd_api.g_true,
818: p_copy_party_contacts => fnd_api.g_true,
819: p_copy_accounts => fnd_api.g_true,
820: p_copy_asset_assignments => fnd_api.g_true,
821: p_copy_pricing_attribs => fnd_api.g_true,
822: p_copy_inst_children => fnd_api.g_false,
815: p_copy_ext_attribs => fnd_api.g_true,
816: p_copy_org_assignments => fnd_api.g_true,
817: p_copy_parties => fnd_api.g_true,
818: p_copy_party_contacts => fnd_api.g_true,
819: p_copy_accounts => fnd_api.g_true,
820: p_copy_asset_assignments => fnd_api.g_true,
821: p_copy_pricing_attribs => fnd_api.g_true,
822: p_copy_inst_children => fnd_api.g_false,
823: p_txn_rec => px_csi_txn_rec,
816: p_copy_org_assignments => fnd_api.g_true,
817: p_copy_parties => fnd_api.g_true,
818: p_copy_party_contacts => fnd_api.g_true,
819: p_copy_accounts => fnd_api.g_true,
820: p_copy_asset_assignments => fnd_api.g_true,
821: p_copy_pricing_attribs => fnd_api.g_true,
822: p_copy_inst_children => fnd_api.g_false,
823: p_txn_rec => px_csi_txn_rec,
824: x_new_instance_tbl => l_copy_instance_tbl,
817: p_copy_parties => fnd_api.g_true,
818: p_copy_party_contacts => fnd_api.g_true,
819: p_copy_accounts => fnd_api.g_true,
820: p_copy_asset_assignments => fnd_api.g_true,
821: p_copy_pricing_attribs => fnd_api.g_true,
822: p_copy_inst_children => fnd_api.g_false,
823: p_txn_rec => px_csi_txn_rec,
824: x_new_instance_tbl => l_copy_instance_tbl,
825: x_return_status => l_return_status,
818: p_copy_party_contacts => fnd_api.g_true,
819: p_copy_accounts => fnd_api.g_true,
820: p_copy_asset_assignments => fnd_api.g_true,
821: p_copy_pricing_attribs => fnd_api.g_true,
822: p_copy_inst_children => fnd_api.g_false,
823: p_txn_rec => px_csi_txn_rec,
824: x_new_instance_tbl => l_copy_instance_tbl,
825: x_return_status => l_return_status,
826: x_msg_count => l_msg_count,
825: x_return_status => l_return_status,
826: x_msg_count => l_msg_count,
827: x_msg_data => l_msg_data);
828:
829: IF l_return_status <> fnd_api.g_ret_sts_success THEN
830: RAISE fnd_api.g_exc_error;
831: END IF;
832:
833: IF l_copy_instance_tbl.COUNT > 0 THEN
826: x_msg_count => l_msg_count,
827: x_msg_data => l_msg_data);
828:
829: IF l_return_status <> fnd_api.g_ret_sts_success THEN
830: RAISE fnd_api.g_exc_error;
831: END IF;
832:
833: IF l_copy_instance_tbl.COUNT > 0 THEN
834: FOR c_ind IN l_copy_instance_tbl.FIRST .. l_copy_instance_tbl.LAST
840: debug(' quantity : '||l_copy_instance_tbl(c_ind).quantity);
841:
842: IF l_parent_instance_id is not null THEN
843:
844: l_ii_rltns_tbl(1).relationship_id := fnd_api.g_miss_num;
845: l_ii_rltns_tbl(1).relationship_type_code := 'COMPONENT-OF';
846: l_ii_rltns_tbl(1).object_id := l_parent_instance_id;
847: l_ii_rltns_tbl(1).subject_id := l_copy_instance_tbl(c_ind).instance_id;
848:
849: debug(' Inside API :csi_ii_relationships_pub.create_relationship');
850:
851: csi_ii_relationships_pub.create_relationship(
852: p_api_version => 1.0,
853: p_commit => fnd_api.g_false,
854: p_init_msg_list => fnd_api.g_true,
855: p_validation_level => fnd_api.g_valid_level_full,
856: p_relationship_tbl => l_ii_rltns_tbl,
857: p_txn_rec => px_csi_txn_rec,
850:
851: csi_ii_relationships_pub.create_relationship(
852: p_api_version => 1.0,
853: p_commit => fnd_api.g_false,
854: p_init_msg_list => fnd_api.g_true,
855: p_validation_level => fnd_api.g_valid_level_full,
856: p_relationship_tbl => l_ii_rltns_tbl,
857: p_txn_rec => px_csi_txn_rec,
858: x_return_status => l_return_status,
851: csi_ii_relationships_pub.create_relationship(
852: p_api_version => 1.0,
853: p_commit => fnd_api.g_false,
854: p_init_msg_list => fnd_api.g_true,
855: p_validation_level => fnd_api.g_valid_level_full,
856: p_relationship_tbl => l_ii_rltns_tbl,
857: p_txn_rec => px_csi_txn_rec,
858: x_return_status => l_return_status,
859: x_msg_count => l_msg_count,
858: x_return_status => l_return_status,
859: x_msg_count => l_msg_count,
860: x_msg_data => l_msg_data);
861:
862: IF l_return_status <> fnd_api.g_ret_sts_success THEN
863: RAISE fnd_api.g_exc_error;
864: END IF;
865:
866: END IF;
859: x_msg_count => l_msg_count,
860: x_msg_data => l_msg_data);
861:
862: IF l_return_status <> fnd_api.g_ret_sts_success THEN
863: RAISE fnd_api.g_exc_error;
864: END IF;
865:
866: END IF;
867: END LOOP;
887:
888: x_instance_tbl := l_instance_tbl;
889: END IF;
890: EXCEPTION
891: WHEN fnd_api.g_exc_error THEN
892: x_return_status := fnd_api.g_ret_sts_error;
893: END split_instances_using_copy;
894:
895: PROCEDURE split_instance(
888: x_instance_tbl := l_instance_tbl;
889: END IF;
890: EXCEPTION
891: WHEN fnd_api.g_exc_error THEN
892: x_return_status := fnd_api.g_ret_sts_error;
893: END split_instances_using_copy;
894:
895: PROCEDURE split_instance(
896: p_instance_id IN number,
907:
908: l_quantity1 number;
909: l_quantity2 number;
910:
911: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
912: l_msg_data varchar2(2000);
913: l_msg_count number;
914: BEGIN
915:
912: l_msg_data varchar2(2000);
913: l_msg_count number;
914: BEGIN
915:
916: x_return_status := fnd_api.g_ret_sts_success;
917: api_log('split_instance');
918:
919: SELECT quantity,
920: object_version_number
933: p_api_name => 'split_item_instance');
934:
935: csi_item_instance_pvt.split_item_instance (
936: p_api_version => 1.0,
937: p_commit => fnd_api.g_false,
938: p_init_msg_list => fnd_api.g_true,
939: p_validation_level => fnd_api.g_valid_level_full,
940: p_source_instance_rec => l_src_instance_rec,
941: p_quantity1 => l_quantity1,
934:
935: csi_item_instance_pvt.split_item_instance (
936: p_api_version => 1.0,
937: p_commit => fnd_api.g_false,
938: p_init_msg_list => fnd_api.g_true,
939: p_validation_level => fnd_api.g_valid_level_full,
940: p_source_instance_rec => l_src_instance_rec,
941: p_quantity1 => l_quantity1,
942: p_quantity2 => l_quantity2,
935: csi_item_instance_pvt.split_item_instance (
936: p_api_version => 1.0,
937: p_commit => fnd_api.g_false,
938: p_init_msg_list => fnd_api.g_true,
939: p_validation_level => fnd_api.g_valid_level_full,
940: p_source_instance_rec => l_src_instance_rec,
941: p_quantity1 => l_quantity1,
942: p_quantity2 => l_quantity2,
943: p_copy_ext_attribs => fnd_api.g_true,
939: p_validation_level => fnd_api.g_valid_level_full,
940: p_source_instance_rec => l_src_instance_rec,
941: p_quantity1 => l_quantity1,
942: p_quantity2 => l_quantity2,
943: p_copy_ext_attribs => fnd_api.g_true,
944: p_copy_org_assignments => fnd_api.g_true,
945: p_copy_parties => fnd_api.g_true,
946: p_copy_accounts => fnd_api.g_true,
947: p_copy_asset_assignments => fnd_api.g_true,
940: p_source_instance_rec => l_src_instance_rec,
941: p_quantity1 => l_quantity1,
942: p_quantity2 => l_quantity2,
943: p_copy_ext_attribs => fnd_api.g_true,
944: p_copy_org_assignments => fnd_api.g_true,
945: p_copy_parties => fnd_api.g_true,
946: p_copy_accounts => fnd_api.g_true,
947: p_copy_asset_assignments => fnd_api.g_true,
948: p_copy_pricing_attribs => fnd_api.g_true,
941: p_quantity1 => l_quantity1,
942: p_quantity2 => l_quantity2,
943: p_copy_ext_attribs => fnd_api.g_true,
944: p_copy_org_assignments => fnd_api.g_true,
945: p_copy_parties => fnd_api.g_true,
946: p_copy_accounts => fnd_api.g_true,
947: p_copy_asset_assignments => fnd_api.g_true,
948: p_copy_pricing_attribs => fnd_api.g_true,
949: p_txn_rec => px_csi_txn_rec,
942: p_quantity2 => l_quantity2,
943: p_copy_ext_attribs => fnd_api.g_true,
944: p_copy_org_assignments => fnd_api.g_true,
945: p_copy_parties => fnd_api.g_true,
946: p_copy_accounts => fnd_api.g_true,
947: p_copy_asset_assignments => fnd_api.g_true,
948: p_copy_pricing_attribs => fnd_api.g_true,
949: p_txn_rec => px_csi_txn_rec,
950: x_new_instance_rec => l_new_instance_rec,
943: p_copy_ext_attribs => fnd_api.g_true,
944: p_copy_org_assignments => fnd_api.g_true,
945: p_copy_parties => fnd_api.g_true,
946: p_copy_accounts => fnd_api.g_true,
947: p_copy_asset_assignments => fnd_api.g_true,
948: p_copy_pricing_attribs => fnd_api.g_true,
949: p_txn_rec => px_csi_txn_rec,
950: x_new_instance_rec => l_new_instance_rec,
951: x_return_status => l_return_status,
944: p_copy_org_assignments => fnd_api.g_true,
945: p_copy_parties => fnd_api.g_true,
946: p_copy_accounts => fnd_api.g_true,
947: p_copy_asset_assignments => fnd_api.g_true,
948: p_copy_pricing_attribs => fnd_api.g_true,
949: p_txn_rec => px_csi_txn_rec,
950: x_new_instance_rec => l_new_instance_rec,
951: x_return_status => l_return_status,
952: x_msg_count => l_msg_count,
951: x_return_status => l_return_status,
952: x_msg_count => l_msg_count,
953: x_msg_data => l_msg_data);
954:
955: IF l_return_status <> fnd_api.g_ret_sts_success THEN
956: RAISE fnd_api.g_exc_error;
957: END IF;
958:
959: x_instance_rec := l_new_instance_rec;
952: x_msg_count => l_msg_count,
953: x_msg_data => l_msg_data);
954:
955: IF l_return_status <> fnd_api.g_ret_sts_success THEN
956: RAISE fnd_api.g_exc_error;
957: END IF;
958:
959: x_instance_rec := l_new_instance_rec;
960:
959: x_instance_rec := l_new_instance_rec;
960:
961:
962: EXCEPTION
963: WHEN fnd_api.g_exc_error THEN
964: x_return_status := fnd_api.g_ret_sts_error;
965: END split_instance;
966:
967: PROCEDURE split_instance_using_ratio(
960:
961:
962: EXCEPTION
963: WHEN fnd_api.g_exc_error THEN
964: x_return_status := fnd_api.g_ret_sts_error;
965: END split_instance;
966:
967: PROCEDURE split_instance_using_ratio(
968: p_instance_id IN number,
979: l_init_instance_rec csi_datastructures_pub.instance_rec;
980: l_parent_instance_id number;
981: l_ii_rltns_tbl csi_datastructures_pub.ii_relationship_tbl;
982:
983: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
984: l_msg_data varchar2(2000);
985: l_msg_count number;
986:
987: l_split_flag boolean := FALSE;
1024: c_pa_ind binary_integer;
1025:
1026: BEGIN
1027:
1028: x_return_status := fnd_api.g_ret_sts_success;
1029:
1030: api_log('split_instance_using_ratio');
1031:
1032: l_s_ind := 0;
1037:
1038: -- get the instance party and party account info
1039: csi_item_instance_pub.get_item_instance_details(
1040: p_api_version => 1.0,
1041: p_commit => fnd_api.g_false,
1042: p_init_msg_list => fnd_api.g_true,
1043: p_validation_level => fnd_api.g_valid_level_full,
1044: p_instance_rec => l_g_instance_rec,
1045: p_get_parties => fnd_api.g_true,
1038: -- get the instance party and party account info
1039: csi_item_instance_pub.get_item_instance_details(
1040: p_api_version => 1.0,
1041: p_commit => fnd_api.g_false,
1042: p_init_msg_list => fnd_api.g_true,
1043: p_validation_level => fnd_api.g_valid_level_full,
1044: p_instance_rec => l_g_instance_rec,
1045: p_get_parties => fnd_api.g_true,
1046: p_party_header_tbl => l_g_ph_tbl,
1039: csi_item_instance_pub.get_item_instance_details(
1040: p_api_version => 1.0,
1041: p_commit => fnd_api.g_false,
1042: p_init_msg_list => fnd_api.g_true,
1043: p_validation_level => fnd_api.g_valid_level_full,
1044: p_instance_rec => l_g_instance_rec,
1045: p_get_parties => fnd_api.g_true,
1046: p_party_header_tbl => l_g_ph_tbl,
1047: p_get_accounts => fnd_api.g_true,
1041: p_commit => fnd_api.g_false,
1042: p_init_msg_list => fnd_api.g_true,
1043: p_validation_level => fnd_api.g_valid_level_full,
1044: p_instance_rec => l_g_instance_rec,
1045: p_get_parties => fnd_api.g_true,
1046: p_party_header_tbl => l_g_ph_tbl,
1047: p_get_accounts => fnd_api.g_true,
1048: p_account_header_tbl => l_g_pah_tbl,
1049: p_get_org_assignments => fnd_api.g_false,
1043: p_validation_level => fnd_api.g_valid_level_full,
1044: p_instance_rec => l_g_instance_rec,
1045: p_get_parties => fnd_api.g_true,
1046: p_party_header_tbl => l_g_ph_tbl,
1047: p_get_accounts => fnd_api.g_true,
1048: p_account_header_tbl => l_g_pah_tbl,
1049: p_get_org_assignments => fnd_api.g_false,
1050: p_org_header_tbl => l_g_ouh_tbl,
1051: p_get_pricing_attribs => fnd_api.g_false,
1045: p_get_parties => fnd_api.g_true,
1046: p_party_header_tbl => l_g_ph_tbl,
1047: p_get_accounts => fnd_api.g_true,
1048: p_account_header_tbl => l_g_pah_tbl,
1049: p_get_org_assignments => fnd_api.g_false,
1050: p_org_header_tbl => l_g_ouh_tbl,
1051: p_get_pricing_attribs => fnd_api.g_false,
1052: p_pricing_attrib_tbl => l_g_pa_tbl,
1053: p_get_ext_attribs => fnd_api.g_false,
1047: p_get_accounts => fnd_api.g_true,
1048: p_account_header_tbl => l_g_pah_tbl,
1049: p_get_org_assignments => fnd_api.g_false,
1050: p_org_header_tbl => l_g_ouh_tbl,
1051: p_get_pricing_attribs => fnd_api.g_false,
1052: p_pricing_attrib_tbl => l_g_pa_tbl,
1053: p_get_ext_attribs => fnd_api.g_false,
1054: p_ext_attrib_tbl => l_g_eav_tbl,
1055: p_ext_attrib_def_tbl => l_g_ea_tbl,
1049: p_get_org_assignments => fnd_api.g_false,
1050: p_org_header_tbl => l_g_ouh_tbl,
1051: p_get_pricing_attribs => fnd_api.g_false,
1052: p_pricing_attrib_tbl => l_g_pa_tbl,
1053: p_get_ext_attribs => fnd_api.g_false,
1054: p_ext_attrib_tbl => l_g_eav_tbl,
1055: p_ext_attrib_def_tbl => l_g_ea_tbl,
1056: p_get_asset_assignments => fnd_api.g_false,
1057: p_asset_header_tbl => l_g_iah_tbl,
1052: p_pricing_attrib_tbl => l_g_pa_tbl,
1053: p_get_ext_attribs => fnd_api.g_false,
1054: p_ext_attrib_tbl => l_g_eav_tbl,
1055: p_ext_attrib_def_tbl => l_g_ea_tbl,
1056: p_get_asset_assignments => fnd_api.g_false,
1057: p_asset_header_tbl => l_g_iah_tbl,
1058: p_time_stamp => l_g_time_stamp,
1059: x_return_status => l_return_status,
1060: x_msg_count => l_msg_count,
1059: x_return_status => l_return_status,
1060: x_msg_count => l_msg_count,
1061: x_msg_data => l_msg_data);
1062:
1063: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1064: RAISE fnd_api.g_exc_error;
1065: END IF;
1066:
1067: make_non_header_rec(
1060: x_msg_count => l_msg_count,
1061: x_msg_data => l_msg_data);
1062:
1063: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1064: RAISE fnd_api.g_exc_error;
1065: END IF;
1066:
1067: make_non_header_rec(
1068: p_instance_header_rec => l_g_instance_rec,
1106:
1107: l_c_instance_rec := l_instance_rec;
1108:
1109: -- substitute create specific attributes
1110: l_c_instance_rec.instance_id := fnd_api.g_miss_num;
1111: l_c_instance_rec.instance_number := fnd_api.g_miss_char;
1112: l_c_instance_rec.object_version_number := 1.0;
1113: l_c_instance_rec.vld_organization_id := p_organization_id;
1114: l_c_instance_rec.quantity := p_qty_ratio;
1107: l_c_instance_rec := l_instance_rec;
1108:
1109: -- substitute create specific attributes
1110: l_c_instance_rec.instance_id := fnd_api.g_miss_num;
1111: l_c_instance_rec.instance_number := fnd_api.g_miss_char;
1112: l_c_instance_rec.object_version_number := 1.0;
1113: l_c_instance_rec.vld_organization_id := p_organization_id;
1114: l_c_instance_rec.quantity := p_qty_ratio;
1115:
1121: IF l_g_ph_tbl.COUNT > 0 THEN
1122:
1123: FOR l_pt_ind IN l_g_ph_tbl.FIRST ..l_g_ph_tbl.LAST
1124: LOOP
1125: l_c_parties_tbl(l_pt_ind).instance_party_id := fnd_api.g_miss_num;
1126: l_c_parties_tbl(l_pt_ind).instance_id := fnd_api.g_miss_num;
1127: l_c_parties_tbl(l_pt_ind).party_id :=
1128: l_g_ph_tbl(l_pt_ind).party_id;
1129: l_c_parties_tbl(l_pt_ind).party_source_table :=
1122:
1123: FOR l_pt_ind IN l_g_ph_tbl.FIRST ..l_g_ph_tbl.LAST
1124: LOOP
1125: l_c_parties_tbl(l_pt_ind).instance_party_id := fnd_api.g_miss_num;
1126: l_c_parties_tbl(l_pt_ind).instance_id := fnd_api.g_miss_num;
1127: l_c_parties_tbl(l_pt_ind).party_id :=
1128: l_g_ph_tbl(l_pt_ind).party_id;
1129: l_c_parties_tbl(l_pt_ind).party_source_table :=
1130: l_g_ph_tbl(l_pt_ind).party_source_table;
1139: IF l_g_pah_tbl(l_pa_ind).instance_party_id = l_g_ph_tbl(l_pt_ind).instance_party_id
1140: THEN
1141: c_pa_ind := c_pa_ind + 1;
1142: l_c_pty_accts_tbl(c_pa_ind).parent_tbl_index := l_pt_ind;
1143: l_c_pty_accts_tbl(c_pa_ind).ip_account_id := fnd_api.g_miss_num;
1144: l_c_pty_accts_tbl(c_pa_ind).instance_party_id := fnd_api.g_miss_num;
1145: l_c_pty_accts_tbl(c_pa_ind).party_account_id :=
1146: l_g_pah_tbl(l_pa_ind).party_account_id;
1147: l_c_pty_accts_tbl(c_pa_ind).relationship_type_code :=
1140: THEN
1141: c_pa_ind := c_pa_ind + 1;
1142: l_c_pty_accts_tbl(c_pa_ind).parent_tbl_index := l_pt_ind;
1143: l_c_pty_accts_tbl(c_pa_ind).ip_account_id := fnd_api.g_miss_num;
1144: l_c_pty_accts_tbl(c_pa_ind).instance_party_id := fnd_api.g_miss_num;
1145: l_c_pty_accts_tbl(c_pa_ind).party_account_id :=
1146: l_g_pah_tbl(l_pa_ind).party_account_id;
1147: l_c_pty_accts_tbl(c_pa_ind).relationship_type_code :=
1148: l_g_pah_tbl(l_pa_ind).relationship_type_code;
1159: debug(' Inside API :csi_item_instance_pub.create_item_instance');
1160:
1161: csi_item_instance_pub.create_item_instance(
1162: p_api_version => 1.0,
1163: p_commit => fnd_api.g_false,
1164: p_init_msg_list => fnd_api.g_true,
1165: p_validation_level => fnd_api.g_valid_level_full,
1166: p_instance_rec => l_c_instance_rec,
1167: p_party_tbl => l_c_parties_tbl,
1160:
1161: csi_item_instance_pub.create_item_instance(
1162: p_api_version => 1.0,
1163: p_commit => fnd_api.g_false,
1164: p_init_msg_list => fnd_api.g_true,
1165: p_validation_level => fnd_api.g_valid_level_full,
1166: p_instance_rec => l_c_instance_rec,
1167: p_party_tbl => l_c_parties_tbl,
1168: p_account_tbl => l_c_pty_accts_tbl,
1161: csi_item_instance_pub.create_item_instance(
1162: p_api_version => 1.0,
1163: p_commit => fnd_api.g_false,
1164: p_init_msg_list => fnd_api.g_true,
1165: p_validation_level => fnd_api.g_valid_level_full,
1166: p_instance_rec => l_c_instance_rec,
1167: p_party_tbl => l_c_parties_tbl,
1168: p_account_tbl => l_c_pty_accts_tbl,
1169: p_org_assignments_tbl => l_c_org_units_tbl,
1174: x_return_status => l_return_status,
1175: x_msg_count => l_msg_count,
1176: x_msg_data => l_msg_data );
1177:
1178: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1179: RAISE fnd_api.g_exc_error;
1180: END IF;
1181:
1182: debug(' new_instance_id : '||l_c_instance_rec.instance_id);
1175: x_msg_count => l_msg_count,
1176: x_msg_data => l_msg_data );
1177:
1178: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1179: RAISE fnd_api.g_exc_error;
1180: END IF;
1181:
1182: debug(' new_instance_id : '||l_c_instance_rec.instance_id);
1183:
1187: l_ii_rltns_tbl.delete;
1188:
1189: IF l_parent_instance_id is not null THEN
1190:
1191: l_ii_rltns_tbl(1).relationship_id := fnd_api.g_miss_num;
1192: l_ii_rltns_tbl(1).relationship_type_code := 'COMPONENT-OF';
1193: l_ii_rltns_tbl(1).object_id := l_parent_instance_id;
1194: l_ii_rltns_tbl(1).subject_id := l_c_instance_rec.instance_id;
1195:
1196: debug(' Inside API :csi_ii_relationships_pub.create_relationship');
1197:
1198: csi_ii_relationships_pub.create_relationship(
1199: p_api_version => 1.0,
1200: p_commit => fnd_api.g_false,
1201: p_init_msg_list => fnd_api.g_true,
1202: p_validation_level => fnd_api.g_valid_level_full,
1203: p_relationship_tbl => l_ii_rltns_tbl,
1204: p_txn_rec => px_csi_txn_rec,
1197:
1198: csi_ii_relationships_pub.create_relationship(
1199: p_api_version => 1.0,
1200: p_commit => fnd_api.g_false,
1201: p_init_msg_list => fnd_api.g_true,
1202: p_validation_level => fnd_api.g_valid_level_full,
1203: p_relationship_tbl => l_ii_rltns_tbl,
1204: p_txn_rec => px_csi_txn_rec,
1205: x_return_status => l_return_status,
1198: csi_ii_relationships_pub.create_relationship(
1199: p_api_version => 1.0,
1200: p_commit => fnd_api.g_false,
1201: p_init_msg_list => fnd_api.g_true,
1202: p_validation_level => fnd_api.g_valid_level_full,
1203: p_relationship_tbl => l_ii_rltns_tbl,
1204: p_txn_rec => px_csi_txn_rec,
1205: x_return_status => l_return_status,
1206: x_msg_count => l_msg_count,
1205: x_return_status => l_return_status,
1206: x_msg_count => l_msg_count,
1207: x_msg_data => l_msg_data);
1208:
1209: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1210: RAISE fnd_api.g_exc_error;
1211: END IF;
1212:
1213: END IF;
1206: x_msg_count => l_msg_count,
1207: x_msg_data => l_msg_data);
1208:
1209: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1210: RAISE fnd_api.g_exc_error;
1211: END IF;
1212:
1213: END IF;
1214:
1227: debug(' old_instance_id : '||l_u_instance_rec.instance_id);
1228:
1229: csi_item_instance_pub.update_item_instance(
1230: p_api_version => 1.0,
1231: p_commit => fnd_api.g_false,
1232: p_init_msg_list => fnd_api.g_true,
1233: p_validation_level => fnd_api.g_valid_level_full,
1234: p_instance_rec => l_u_instance_rec,
1235: p_party_tbl => l_u_parties_tbl,
1228:
1229: csi_item_instance_pub.update_item_instance(
1230: p_api_version => 1.0,
1231: p_commit => fnd_api.g_false,
1232: p_init_msg_list => fnd_api.g_true,
1233: p_validation_level => fnd_api.g_valid_level_full,
1234: p_instance_rec => l_u_instance_rec,
1235: p_party_tbl => l_u_parties_tbl,
1236: p_account_tbl => l_u_pty_accts_tbl,
1229: csi_item_instance_pub.update_item_instance(
1230: p_api_version => 1.0,
1231: p_commit => fnd_api.g_false,
1232: p_init_msg_list => fnd_api.g_true,
1233: p_validation_level => fnd_api.g_valid_level_full,
1234: p_instance_rec => l_u_instance_rec,
1235: p_party_tbl => l_u_parties_tbl,
1236: p_account_tbl => l_u_pty_accts_tbl,
1237: p_org_assignments_tbl => l_u_org_units_tbl,
1243: x_return_status => l_return_status,
1244: x_msg_count => l_msg_count,
1245: x_msg_data => l_msg_data);
1246:
1247: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
1248: RAISE fnd_api.g_exc_error;
1249: END IF;
1250:
1251: ELSE
1244: x_msg_count => l_msg_count,
1245: x_msg_data => l_msg_data);
1246:
1247: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
1248: RAISE fnd_api.g_exc_error;
1249: END IF;
1250:
1251: ELSE
1252:
1295:
1296: x_splitted_instances := l_splitted_instances;
1297:
1298: EXCEPTION
1299: WHEN fnd_api.g_exc_error THEN
1300: x_return_status := fnd_api.g_ret_sts_error;
1301: END split_instance_using_ratio;
1302:
1303:
1296: x_splitted_instances := l_splitted_instances;
1297:
1298: EXCEPTION
1299: WHEN fnd_api.g_exc_error THEN
1300: x_return_status := fnd_api.g_ret_sts_error;
1301: END split_instance_using_ratio;
1302:
1303:
1304: PROCEDURE query_immediate_children (
1376: l_lpad_string varchar2(80);
1377:
1378: BEGIN
1379:
1380: x_return_status := fnd_api.g_ret_sts_success;
1381: api_log('get_ib_trackable_children');
1382:
1383: debug('lvl_0_line_id : '||p_current_line_id);
1384: l_final_ind := 0;
1487:
1488: l_nxt_ind binary_integer;
1489: l_final_ind binary_integer;
1490:
1491: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
1492:
1493: BEGIN
1494:
1495: x_return_status := fnd_api.g_ret_sts_success;
1491: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
1492:
1493: BEGIN
1494:
1495: x_return_status := fnd_api.g_ret_sts_success;
1496:
1497: l_final_ind := 0;
1498:
1499: get_ib_trackable_children(
1570: AND default_flag = 'Y';
1571:
1572: EXCEPTION
1573: WHEN no_data_found THEN
1574: x_return_status := fnd_api.g_ret_sts_error;
1575: FND_MESSAGE.set_name('CSI','CSI_INVALID_TXN_TYPE_ID');
1576: FND_MSG_PUB.add;
1577: WHEN too_many_rows THEN
1578: x_return_status := fnd_api.g_ret_sts_error;
1574: x_return_status := fnd_api.g_ret_sts_error;
1575: FND_MESSAGE.set_name('CSI','CSI_INVALID_TXN_TYPE_ID');
1576: FND_MSG_PUB.add;
1577: WHEN too_many_rows THEN
1578: x_return_status := fnd_api.g_ret_sts_error;
1579: FND_MESSAGE.set_name('CSI','CSI_INVALID_TXN_TYPE_ID');
1580: FND_MSG_PUB.add;
1581: END get_txn_sub_type_id;
1582:
1605:
1606: l_c_pty_ind binary_integer;
1607: l_c_pa_ind binary_integer;
1608:
1609: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
1610: l_msg_count number;
1611: l_msg_data varchar2(2000);
1612:
1613: BEGIN
1611: l_msg_data varchar2(2000);
1612:
1613: BEGIN
1614:
1615: x_return_status := fnd_api.g_ret_sts_success;
1616:
1617: api_log('split_txn_dtls');
1618:
1619: l_split_count := 0;
1635:
1636: -- get_txn_line_details
1637: csi_t_txn_details_grp.get_transaction_details(
1638: p_api_version => 1,
1639: p_commit => fnd_api.g_false,
1640: p_init_msg_list => fnd_api.g_true,
1641: p_validation_level => fnd_api.g_valid_level_full,
1642: p_txn_line_query_rec => l_txn_line_query_rec,
1643: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1636: -- get_txn_line_details
1637: csi_t_txn_details_grp.get_transaction_details(
1638: p_api_version => 1,
1639: p_commit => fnd_api.g_false,
1640: p_init_msg_list => fnd_api.g_true,
1641: p_validation_level => fnd_api.g_valid_level_full,
1642: p_txn_line_query_rec => l_txn_line_query_rec,
1643: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1644: x_txn_line_detail_tbl => l_line_dtl_tbl,
1637: csi_t_txn_details_grp.get_transaction_details(
1638: p_api_version => 1,
1639: p_commit => fnd_api.g_false,
1640: p_init_msg_list => fnd_api.g_true,
1641: p_validation_level => fnd_api.g_valid_level_full,
1642: p_txn_line_query_rec => l_txn_line_query_rec,
1643: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1644: x_txn_line_detail_tbl => l_line_dtl_tbl,
1645: p_get_parties_flag => fnd_api.g_true,
1641: p_validation_level => fnd_api.g_valid_level_full,
1642: p_txn_line_query_rec => l_txn_line_query_rec,
1643: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1644: x_txn_line_detail_tbl => l_line_dtl_tbl,
1645: p_get_parties_flag => fnd_api.g_true,
1646: x_txn_party_detail_tbl => l_pty_dtl_tbl,
1647: p_get_pty_accts_flag => fnd_api.g_true,
1648: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1649: p_get_ii_rltns_flag => fnd_api.g_false,
1643: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1644: x_txn_line_detail_tbl => l_line_dtl_tbl,
1645: p_get_parties_flag => fnd_api.g_true,
1646: x_txn_party_detail_tbl => l_pty_dtl_tbl,
1647: p_get_pty_accts_flag => fnd_api.g_true,
1648: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1649: p_get_ii_rltns_flag => fnd_api.g_false,
1650: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1651: p_get_org_assgns_flag => fnd_api.g_true,
1645: p_get_parties_flag => fnd_api.g_true,
1646: x_txn_party_detail_tbl => l_pty_dtl_tbl,
1647: p_get_pty_accts_flag => fnd_api.g_true,
1648: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1649: p_get_ii_rltns_flag => fnd_api.g_false,
1650: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1651: p_get_org_assgns_flag => fnd_api.g_true,
1652: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1653: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1647: p_get_pty_accts_flag => fnd_api.g_true,
1648: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1649: p_get_ii_rltns_flag => fnd_api.g_false,
1650: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1651: p_get_org_assgns_flag => fnd_api.g_true,
1652: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1653: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1654: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1655: p_get_csi_attribs_flag => fnd_api.g_false,
1649: p_get_ii_rltns_flag => fnd_api.g_false,
1650: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1651: p_get_org_assgns_flag => fnd_api.g_true,
1652: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1653: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1654: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1655: p_get_csi_attribs_flag => fnd_api.g_false,
1656: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1657: p_get_csi_iea_values_flag => fnd_api.g_false,
1651: p_get_org_assgns_flag => fnd_api.g_true,
1652: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1653: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1654: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1655: p_get_csi_attribs_flag => fnd_api.g_false,
1656: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1657: p_get_csi_iea_values_flag => fnd_api.g_false,
1658: x_csi_iea_values_tbl => l_csi_eav_tbl,
1659: p_get_txn_systems_flag => fnd_api.g_false,
1653: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1654: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1655: p_get_csi_attribs_flag => fnd_api.g_false,
1656: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1657: p_get_csi_iea_values_flag => fnd_api.g_false,
1658: x_csi_iea_values_tbl => l_csi_eav_tbl,
1659: p_get_txn_systems_flag => fnd_api.g_false,
1660: x_txn_systems_tbl => l_txn_systems_tbl,
1661: x_return_status => l_return_status,
1655: p_get_csi_attribs_flag => fnd_api.g_false,
1656: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1657: p_get_csi_iea_values_flag => fnd_api.g_false,
1658: x_csi_iea_values_tbl => l_csi_eav_tbl,
1659: p_get_txn_systems_flag => fnd_api.g_false,
1660: x_txn_systems_tbl => l_txn_systems_tbl,
1661: x_return_status => l_return_status,
1662: x_msg_count => l_msg_count,
1663: x_msg_data => l_msg_data);
1661: x_return_status => l_return_status,
1662: x_msg_count => l_msg_count,
1663: x_msg_data => l_msg_data);
1664:
1665: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1666: debug('Error getting txn details for splitting the source for model.');
1667: RAISE fnd_api.g_exc_error;
1668: END IF;
1669:
1663: x_msg_data => l_msg_data);
1664:
1665: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1666: debug('Error getting txn details for splitting the source for model.');
1667: RAISE fnd_api.g_exc_error;
1668: END IF;
1669:
1670: FOR l_ind in 1..(p_line_dtl_tbl(l_td_ind).quantity - 1)
1671: LOOP
1692: ---Added (End) for m-to-m enhancements
1693:
1694: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
1695: p_api_version => 1.0,
1696: p_commit => fnd_api.g_false,
1697: p_init_msg_list => fnd_api.g_true,
1698: p_validation_level => fnd_api.g_valid_level_full,
1699: p_txn_line_dtl_index => 1,
1700: p_txn_line_dtl_rec => l_line_dtl_rec,
1693:
1694: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
1695: p_api_version => 1.0,
1696: p_commit => fnd_api.g_false,
1697: p_init_msg_list => fnd_api.g_true,
1698: p_validation_level => fnd_api.g_valid_level_full,
1699: p_txn_line_dtl_index => 1,
1700: p_txn_line_dtl_rec => l_line_dtl_rec,
1701: px_txn_party_dtl_tbl => l_pty_dtl_tbl,
1694: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
1695: p_api_version => 1.0,
1696: p_commit => fnd_api.g_false,
1697: p_init_msg_list => fnd_api.g_true,
1698: p_validation_level => fnd_api.g_valid_level_full,
1699: p_txn_line_dtl_index => 1,
1700: p_txn_line_dtl_rec => l_line_dtl_rec,
1701: px_txn_party_dtl_tbl => l_pty_dtl_tbl,
1702: px_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1706: x_return_status => l_return_status,
1707: x_msg_count => l_msg_count,
1708: x_msg_data => l_msg_data);
1709:
1710: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1711: debug('Error creating txn details for splitting the source for model.');
1712: raise fnd_api.g_exc_error;
1713: END IF;
1714:
1708: x_msg_data => l_msg_data);
1709:
1710: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1711: debug('Error creating txn details for splitting the source for model.');
1712: raise fnd_api.g_exc_error;
1713: END IF;
1714:
1715: l_line_dtl_tbl(1) := l_line_dtl_rec;
1716:
1729:
1730: debug('Splitted Transaction Details :'||l_split_count );
1731:
1732: EXCEPTION
1733: WHEN fnd_api.g_exc_error THEN
1734: l_return_status := FND_API.g_ret_sts_error;
1735: END split_txn_dtls;
1736:
1737: PROCEDURE split_txn_dtls_with_ratio(
1730: debug('Splitted Transaction Details :'||l_split_count );
1731:
1732: EXCEPTION
1733: WHEN fnd_api.g_exc_error THEN
1734: l_return_status := FND_API.g_ret_sts_error;
1735: END split_txn_dtls;
1736:
1737: PROCEDURE split_txn_dtls_with_ratio(
1738: p_quantity_ratio IN number,
1758:
1759: l_o_line_dtl_tbl csi_t_datastructures_grp.txn_line_detail_tbl;
1760: l_o_ind binary_integer := 0;
1761:
1762: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
1763: l_msg_count number;
1764: l_msg_data varchar2(2000);
1765:
1766: BEGIN
1764: l_msg_data varchar2(2000);
1765:
1766: BEGIN
1767:
1768: x_return_status := fnd_api.g_ret_sts_success;
1769: api_log('split_txn_dtls_with_ratio');
1770:
1771: IF px_line_dtl_tbl.COUNT > 0 THEN
1772: FOR l_td_ind in px_line_dtl_tbl.FIRST .. px_line_dtl_tbl.LAST
1786:
1787: -- get_txn_line_details
1788: csi_t_txn_details_grp.get_transaction_details(
1789: p_api_version => 1,
1790: p_commit => fnd_api.g_false,
1791: p_init_msg_list => fnd_api.g_true,
1792: p_validation_level => fnd_api.g_valid_level_full,
1793: p_txn_line_query_rec => l_txn_line_query_rec,
1794: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1787: -- get_txn_line_details
1788: csi_t_txn_details_grp.get_transaction_details(
1789: p_api_version => 1,
1790: p_commit => fnd_api.g_false,
1791: p_init_msg_list => fnd_api.g_true,
1792: p_validation_level => fnd_api.g_valid_level_full,
1793: p_txn_line_query_rec => l_txn_line_query_rec,
1794: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1795: x_txn_line_detail_tbl => l_line_dtl_tbl,
1788: csi_t_txn_details_grp.get_transaction_details(
1789: p_api_version => 1,
1790: p_commit => fnd_api.g_false,
1791: p_init_msg_list => fnd_api.g_true,
1792: p_validation_level => fnd_api.g_valid_level_full,
1793: p_txn_line_query_rec => l_txn_line_query_rec,
1794: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1795: x_txn_line_detail_tbl => l_line_dtl_tbl,
1796: p_get_parties_flag => fnd_api.g_true,
1792: p_validation_level => fnd_api.g_valid_level_full,
1793: p_txn_line_query_rec => l_txn_line_query_rec,
1794: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1795: x_txn_line_detail_tbl => l_line_dtl_tbl,
1796: p_get_parties_flag => fnd_api.g_true,
1797: x_txn_party_detail_tbl => l_pty_dtl_tbl,
1798: p_get_pty_accts_flag => fnd_api.g_true,
1799: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1800: p_get_ii_rltns_flag => fnd_api.g_false,
1794: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
1795: x_txn_line_detail_tbl => l_line_dtl_tbl,
1796: p_get_parties_flag => fnd_api.g_true,
1797: x_txn_party_detail_tbl => l_pty_dtl_tbl,
1798: p_get_pty_accts_flag => fnd_api.g_true,
1799: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1800: p_get_ii_rltns_flag => fnd_api.g_false,
1801: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1802: p_get_org_assgns_flag => fnd_api.g_true,
1796: p_get_parties_flag => fnd_api.g_true,
1797: x_txn_party_detail_tbl => l_pty_dtl_tbl,
1798: p_get_pty_accts_flag => fnd_api.g_true,
1799: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1800: p_get_ii_rltns_flag => fnd_api.g_false,
1801: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1802: p_get_org_assgns_flag => fnd_api.g_true,
1803: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1804: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1798: p_get_pty_accts_flag => fnd_api.g_true,
1799: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1800: p_get_ii_rltns_flag => fnd_api.g_false,
1801: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1802: p_get_org_assgns_flag => fnd_api.g_true,
1803: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1804: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1805: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1806: p_get_csi_attribs_flag => fnd_api.g_false,
1800: p_get_ii_rltns_flag => fnd_api.g_false,
1801: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
1802: p_get_org_assgns_flag => fnd_api.g_true,
1803: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1804: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1805: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1806: p_get_csi_attribs_flag => fnd_api.g_false,
1807: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1808: p_get_csi_iea_values_flag => fnd_api.g_false,
1802: p_get_org_assgns_flag => fnd_api.g_true,
1803: x_txn_org_assgn_tbl => l_org_assgn_tbl,
1804: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1805: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1806: p_get_csi_attribs_flag => fnd_api.g_false,
1807: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1808: p_get_csi_iea_values_flag => fnd_api.g_false,
1809: x_csi_iea_values_tbl => l_csi_eav_tbl,
1810: p_get_txn_systems_flag => fnd_api.g_false,
1804: p_get_ext_attrib_vals_flag => fnd_api.g_true,
1805: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
1806: p_get_csi_attribs_flag => fnd_api.g_false,
1807: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1808: p_get_csi_iea_values_flag => fnd_api.g_false,
1809: x_csi_iea_values_tbl => l_csi_eav_tbl,
1810: p_get_txn_systems_flag => fnd_api.g_false,
1811: x_txn_systems_tbl => l_txn_systems_tbl,
1812: x_return_status => l_return_status,
1806: p_get_csi_attribs_flag => fnd_api.g_false,
1807: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
1808: p_get_csi_iea_values_flag => fnd_api.g_false,
1809: x_csi_iea_values_tbl => l_csi_eav_tbl,
1810: p_get_txn_systems_flag => fnd_api.g_false,
1811: x_txn_systems_tbl => l_txn_systems_tbl,
1812: x_return_status => l_return_status,
1813: x_msg_count => l_msg_count,
1814: x_msg_data => l_msg_data);
1812: x_return_status => l_return_status,
1813: x_msg_count => l_msg_count,
1814: x_msg_data => l_msg_data);
1815:
1816: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1817: RAISE fnd_api.g_exc_error;
1818: END IF;
1819:
1820: IF l_line_dtl_tbl.COUNT > 0 THEN
1813: x_msg_count => l_msg_count,
1814: x_msg_data => l_msg_data);
1815:
1816: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1817: RAISE fnd_api.g_exc_error;
1818: END IF;
1819:
1820: IF l_line_dtl_tbl.COUNT > 0 THEN
1821:
1843: -- create transaction detail
1844:
1845: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
1846: p_api_version => 1.0,
1847: p_commit => fnd_api.g_false,
1848: p_init_msg_list => fnd_api.g_true,
1849: p_validation_level => fnd_api.g_valid_level_full,
1850: p_txn_line_dtl_index => 1,
1851: p_txn_line_dtl_rec => l_line_dtl_rec,
1844:
1845: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
1846: p_api_version => 1.0,
1847: p_commit => fnd_api.g_false,
1848: p_init_msg_list => fnd_api.g_true,
1849: p_validation_level => fnd_api.g_valid_level_full,
1850: p_txn_line_dtl_index => 1,
1851: p_txn_line_dtl_rec => l_line_dtl_rec,
1852: px_txn_party_dtl_tbl => l_pty_dtl_tbl,
1845: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
1846: p_api_version => 1.0,
1847: p_commit => fnd_api.g_false,
1848: p_init_msg_list => fnd_api.g_true,
1849: p_validation_level => fnd_api.g_valid_level_full,
1850: p_txn_line_dtl_index => 1,
1851: p_txn_line_dtl_rec => l_line_dtl_rec,
1852: px_txn_party_dtl_tbl => l_pty_dtl_tbl,
1853: px_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
1857: x_return_status => l_return_status,
1858: x_msg_count => l_msg_count,
1859: x_msg_data => l_msg_data);
1860:
1861: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1862: raise fnd_api.g_exc_error;
1863: END IF;
1864:
1865: l_o_ind := l_o_ind + 1;
1858: x_msg_count => l_msg_count,
1859: x_msg_data => l_msg_data);
1860:
1861: IF l_return_status <> fnd_api.g_ret_sts_success THEN
1862: raise fnd_api.g_exc_error;
1863: END IF;
1864:
1865: l_o_ind := l_o_ind + 1;
1866: l_o_line_dtl_tbl(l_o_ind) := l_line_dtl_rec;
1884: END IF;
1885: px_line_dtl_tbl := l_o_line_dtl_tbl;
1886:
1887: EXCEPTION
1888: WHEN fnd_api.g_exc_error THEN
1889: l_return_status := FND_API.g_ret_sts_error;
1890: END split_txn_dtls_with_ratio;
1891:
1892: /* private routine to determine the item type of the order line */
1885: px_line_dtl_tbl := l_o_line_dtl_tbl;
1886:
1887: EXCEPTION
1888: WHEN fnd_api.g_exc_error THEN
1889: l_return_status := FND_API.g_ret_sts_error;
1890: END split_txn_dtls_with_ratio;
1891:
1892: /* private routine to determine the item type of the order line */
1893: PROCEDURE get_item_type(
1977: l_parent_line_rec oe_order_pub.line_rec_type;
1978:
1979: BEGIN
1980:
1981: x_return_status := fnd_api.g_ret_sts_success;
1982:
1983: api_log('get_ib_trackable_parent');
1984:
1985: BEGIN
2056: l_n_org_assgn_tbl csi_t_datastructures_grp.txn_org_assgn_tbl;
2057: l_n_ext_attrib_tbl csi_t_datastructures_grp.txn_ext_attrib_vals_tbl;
2058: l_n_ii_rltns_tbl csi_t_datastructures_grp.txn_ii_rltns_tbl;
2059:
2060: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
2061: l_msg_count number;
2062: l_msg_data varchar2(4000);
2063:
2064: BEGIN
2062: l_msg_data varchar2(4000);
2063:
2064: BEGIN
2065:
2066: x_return_status := fnd_api.g_ret_sts_success;
2067:
2068: api_log('build_non_source_rec');
2069:
2070: l_g_instance_rec.instance_id := p_instance_id;
2070: l_g_instance_rec.instance_id := p_instance_id;
2071:
2072: debug(' instance_id : '||p_instance_id);
2073:
2074: IF nvl(p_instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
2075:
2076: csi_t_gen_utility_pvt.dump_api_info(
2077: p_pkg_name => 'csi_item_instance_pub',
2078: p_api_name => 'get_item_instance_details');
2079:
2080: -- get the instance party and party account info
2081: csi_item_instance_pub.get_item_instance_details(
2082: p_api_version => 1.0,
2083: p_commit => fnd_api.g_false,
2084: p_init_msg_list => fnd_api.g_true,
2085: p_validation_level => fnd_api.g_valid_level_full,
2086: p_instance_rec => l_g_instance_rec,
2087: p_get_parties => fnd_api.g_false,
2080: -- get the instance party and party account info
2081: csi_item_instance_pub.get_item_instance_details(
2082: p_api_version => 1.0,
2083: p_commit => fnd_api.g_false,
2084: p_init_msg_list => fnd_api.g_true,
2085: p_validation_level => fnd_api.g_valid_level_full,
2086: p_instance_rec => l_g_instance_rec,
2087: p_get_parties => fnd_api.g_false,
2088: p_party_header_tbl => l_g_ph_tbl,
2081: csi_item_instance_pub.get_item_instance_details(
2082: p_api_version => 1.0,
2083: p_commit => fnd_api.g_false,
2084: p_init_msg_list => fnd_api.g_true,
2085: p_validation_level => fnd_api.g_valid_level_full,
2086: p_instance_rec => l_g_instance_rec,
2087: p_get_parties => fnd_api.g_false,
2088: p_party_header_tbl => l_g_ph_tbl,
2089: p_get_accounts => fnd_api.g_false,
2083: p_commit => fnd_api.g_false,
2084: p_init_msg_list => fnd_api.g_true,
2085: p_validation_level => fnd_api.g_valid_level_full,
2086: p_instance_rec => l_g_instance_rec,
2087: p_get_parties => fnd_api.g_false,
2088: p_party_header_tbl => l_g_ph_tbl,
2089: p_get_accounts => fnd_api.g_false,
2090: p_account_header_tbl => l_g_pah_tbl,
2091: p_get_org_assignments => fnd_api.g_false,
2085: p_validation_level => fnd_api.g_valid_level_full,
2086: p_instance_rec => l_g_instance_rec,
2087: p_get_parties => fnd_api.g_false,
2088: p_party_header_tbl => l_g_ph_tbl,
2089: p_get_accounts => fnd_api.g_false,
2090: p_account_header_tbl => l_g_pah_tbl,
2091: p_get_org_assignments => fnd_api.g_false,
2092: p_org_header_tbl => l_g_ouh_tbl,
2093: p_get_pricing_attribs => fnd_api.g_false,
2087: p_get_parties => fnd_api.g_false,
2088: p_party_header_tbl => l_g_ph_tbl,
2089: p_get_accounts => fnd_api.g_false,
2090: p_account_header_tbl => l_g_pah_tbl,
2091: p_get_org_assignments => fnd_api.g_false,
2092: p_org_header_tbl => l_g_ouh_tbl,
2093: p_get_pricing_attribs => fnd_api.g_false,
2094: p_pricing_attrib_tbl => l_g_pa_tbl,
2095: p_get_ext_attribs => fnd_api.g_false,
2089: p_get_accounts => fnd_api.g_false,
2090: p_account_header_tbl => l_g_pah_tbl,
2091: p_get_org_assignments => fnd_api.g_false,
2092: p_org_header_tbl => l_g_ouh_tbl,
2093: p_get_pricing_attribs => fnd_api.g_false,
2094: p_pricing_attrib_tbl => l_g_pa_tbl,
2095: p_get_ext_attribs => fnd_api.g_false,
2096: p_ext_attrib_tbl => l_g_eav_tbl,
2097: p_ext_attrib_def_tbl => l_g_ea_tbl,
2091: p_get_org_assignments => fnd_api.g_false,
2092: p_org_header_tbl => l_g_ouh_tbl,
2093: p_get_pricing_attribs => fnd_api.g_false,
2094: p_pricing_attrib_tbl => l_g_pa_tbl,
2095: p_get_ext_attribs => fnd_api.g_false,
2096: p_ext_attrib_tbl => l_g_eav_tbl,
2097: p_ext_attrib_def_tbl => l_g_ea_tbl,
2098: p_get_asset_assignments => fnd_api.g_false,
2099: p_asset_header_tbl => l_g_iah_tbl,
2094: p_pricing_attrib_tbl => l_g_pa_tbl,
2095: p_get_ext_attribs => fnd_api.g_false,
2096: p_ext_attrib_tbl => l_g_eav_tbl,
2097: p_ext_attrib_def_tbl => l_g_ea_tbl,
2098: p_get_asset_assignments => fnd_api.g_false,
2099: p_asset_header_tbl => l_g_iah_tbl,
2100: p_time_stamp => l_g_time_stamp,
2101: x_return_status => l_return_status,
2102: x_msg_count => l_msg_count,
2101: x_return_status => l_return_status,
2102: x_msg_count => l_msg_count,
2103: x_msg_data => l_msg_data);
2104:
2105: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2106: RAISE fnd_api.g_exc_error;
2107: END IF;
2108:
2109: l_n_line_dtl_rec.txn_line_detail_id := fnd_api.g_miss_num;
2102: x_msg_count => l_msg_count,
2103: x_msg_data => l_msg_data);
2104:
2105: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2106: RAISE fnd_api.g_exc_error;
2107: END IF;
2108:
2109: l_n_line_dtl_rec.txn_line_detail_id := fnd_api.g_miss_num;
2110: l_n_line_dtl_rec.transaction_line_id := p_transaction_line_id;
2105: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2106: RAISE fnd_api.g_exc_error;
2107: END IF;
2108:
2109: l_n_line_dtl_rec.txn_line_detail_id := fnd_api.g_miss_num;
2110: l_n_line_dtl_rec.transaction_line_id := p_transaction_line_id;
2111: l_n_line_dtl_rec.sub_type_id := px_default_info_rec.sub_type_id;
2112: l_n_line_dtl_rec.processing_status := 'IN_PROCESS';
2113: l_n_line_dtl_rec.source_transaction_flag := 'N';
2128: l_n_line_dtl_rec.object_version_number := 1.0;
2129:
2130: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
2131: p_api_version => 1.0,
2132: p_commit => fnd_api.g_false,
2133: p_init_msg_list => fnd_api.g_true,
2134: p_validation_level => fnd_api.g_valid_level_full,
2135: p_txn_line_dtl_index => 1,
2136: p_txn_line_dtl_rec => l_n_line_dtl_rec,
2129:
2130: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
2131: p_api_version => 1.0,
2132: p_commit => fnd_api.g_false,
2133: p_init_msg_list => fnd_api.g_true,
2134: p_validation_level => fnd_api.g_valid_level_full,
2135: p_txn_line_dtl_index => 1,
2136: p_txn_line_dtl_rec => l_n_line_dtl_rec,
2137: px_txn_party_dtl_tbl => l_n_pty_dtl_tbl,
2130: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
2131: p_api_version => 1.0,
2132: p_commit => fnd_api.g_false,
2133: p_init_msg_list => fnd_api.g_true,
2134: p_validation_level => fnd_api.g_valid_level_full,
2135: p_txn_line_dtl_index => 1,
2136: p_txn_line_dtl_rec => l_n_line_dtl_rec,
2137: px_txn_party_dtl_tbl => l_n_pty_dtl_tbl,
2138: px_txn_pty_acct_detail_tbl => l_n_pty_acct_tbl,
2142: x_return_status => l_return_status,
2143: x_msg_count => l_msg_count,
2144: x_msg_data => l_msg_data);
2145:
2146: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2147: RAISE fnd_api.g_exc_error;
2148: END IF;
2149: debug('non_source_tld_id : '||l_n_line_dtl_rec.txn_line_detail_id);
2150: END IF;
2143: x_msg_count => l_msg_count,
2144: x_msg_data => l_msg_data);
2145:
2146: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2147: RAISE fnd_api.g_exc_error;
2148: END IF;
2149: debug('non_source_tld_id : '||l_n_line_dtl_rec.txn_line_detail_id);
2150: END IF;
2151: x_txn_line_dtl_id := l_n_line_dtl_rec.txn_line_detail_id;
2149: debug('non_source_tld_id : '||l_n_line_dtl_rec.txn_line_detail_id);
2150: END IF;
2151: x_txn_line_dtl_id := l_n_line_dtl_rec.txn_line_detail_id;
2152: EXCEPTION
2153: WHEN fnd_api.g_exc_error THEN
2154: x_return_status := fnd_api.g_ret_sts_error;
2155: END build_non_source_rec;
2156:
2157: PROCEDURE get_tld(
2150: END IF;
2151: x_txn_line_dtl_id := l_n_line_dtl_rec.txn_line_detail_id;
2152: EXCEPTION
2153: WHEN fnd_api.g_exc_error THEN
2154: x_return_status := fnd_api.g_ret_sts_error;
2155: END build_non_source_rec;
2156:
2157: PROCEDURE get_tld(
2158: p_source_table IN varchar2,
2175: l_csi_ea_tbl csi_t_datastructures_grp.csi_ext_attribs_tbl;
2176: l_csi_eav_tbl csi_t_datastructures_grp.csi_ext_attrib_vals_tbl;
2177: l_txn_systems_tbl csi_t_datastructures_grp.txn_systems_tbl;
2178:
2179: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
2180: l_msg_data varchar2(2000);
2181: l_msg_count number;
2182:
2183: BEGIN
2181: l_msg_count number;
2182:
2183: BEGIN
2184:
2185: x_return_status := fnd_api.g_ret_sts_success;
2186:
2187: api_log('get_tld');
2188:
2189: l_txn_line_query_rec.source_transaction_table := p_source_table;
2192: l_txn_line_detail_query_rec.processing_status := p_processing_status;
2193:
2194: csi_t_txn_details_grp.get_transaction_details(
2195: p_api_version => 1,
2196: p_commit => fnd_api.g_false,
2197: p_init_msg_list => fnd_api.g_true,
2198: p_validation_level => fnd_api.g_valid_level_full,
2199: p_txn_line_query_rec => l_txn_line_query_rec,
2200: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2193:
2194: csi_t_txn_details_grp.get_transaction_details(
2195: p_api_version => 1,
2196: p_commit => fnd_api.g_false,
2197: p_init_msg_list => fnd_api.g_true,
2198: p_validation_level => fnd_api.g_valid_level_full,
2199: p_txn_line_query_rec => l_txn_line_query_rec,
2200: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2201: x_txn_line_detail_tbl => l_line_dtl_tbl,
2194: csi_t_txn_details_grp.get_transaction_details(
2195: p_api_version => 1,
2196: p_commit => fnd_api.g_false,
2197: p_init_msg_list => fnd_api.g_true,
2198: p_validation_level => fnd_api.g_valid_level_full,
2199: p_txn_line_query_rec => l_txn_line_query_rec,
2200: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2201: x_txn_line_detail_tbl => l_line_dtl_tbl,
2202: p_get_parties_flag => fnd_api.g_false,
2198: p_validation_level => fnd_api.g_valid_level_full,
2199: p_txn_line_query_rec => l_txn_line_query_rec,
2200: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2201: x_txn_line_detail_tbl => l_line_dtl_tbl,
2202: p_get_parties_flag => fnd_api.g_false,
2203: x_txn_party_detail_tbl => l_pty_dtl_tbl,
2204: p_get_pty_accts_flag => fnd_api.g_false,
2205: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
2206: p_get_ii_rltns_flag => fnd_api.g_false,
2200: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2201: x_txn_line_detail_tbl => l_line_dtl_tbl,
2202: p_get_parties_flag => fnd_api.g_false,
2203: x_txn_party_detail_tbl => l_pty_dtl_tbl,
2204: p_get_pty_accts_flag => fnd_api.g_false,
2205: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
2206: p_get_ii_rltns_flag => fnd_api.g_false,
2207: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2208: p_get_org_assgns_flag => fnd_api.g_false,
2202: p_get_parties_flag => fnd_api.g_false,
2203: x_txn_party_detail_tbl => l_pty_dtl_tbl,
2204: p_get_pty_accts_flag => fnd_api.g_false,
2205: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
2206: p_get_ii_rltns_flag => fnd_api.g_false,
2207: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2208: p_get_org_assgns_flag => fnd_api.g_false,
2209: x_txn_org_assgn_tbl => l_org_assgn_tbl,
2210: p_get_ext_attrib_vals_flag => fnd_api.g_false,
2204: p_get_pty_accts_flag => fnd_api.g_false,
2205: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
2206: p_get_ii_rltns_flag => fnd_api.g_false,
2207: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2208: p_get_org_assgns_flag => fnd_api.g_false,
2209: x_txn_org_assgn_tbl => l_org_assgn_tbl,
2210: p_get_ext_attrib_vals_flag => fnd_api.g_false,
2211: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2212: p_get_csi_attribs_flag => fnd_api.g_false,
2206: p_get_ii_rltns_flag => fnd_api.g_false,
2207: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2208: p_get_org_assgns_flag => fnd_api.g_false,
2209: x_txn_org_assgn_tbl => l_org_assgn_tbl,
2210: p_get_ext_attrib_vals_flag => fnd_api.g_false,
2211: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2212: p_get_csi_attribs_flag => fnd_api.g_false,
2213: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2214: p_get_csi_iea_values_flag => fnd_api.g_false,
2208: p_get_org_assgns_flag => fnd_api.g_false,
2209: x_txn_org_assgn_tbl => l_org_assgn_tbl,
2210: p_get_ext_attrib_vals_flag => fnd_api.g_false,
2211: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2212: p_get_csi_attribs_flag => fnd_api.g_false,
2213: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2214: p_get_csi_iea_values_flag => fnd_api.g_false,
2215: x_csi_iea_values_tbl => l_csi_eav_tbl,
2216: p_get_txn_systems_flag => fnd_api.g_false,
2210: p_get_ext_attrib_vals_flag => fnd_api.g_false,
2211: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2212: p_get_csi_attribs_flag => fnd_api.g_false,
2213: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2214: p_get_csi_iea_values_flag => fnd_api.g_false,
2215: x_csi_iea_values_tbl => l_csi_eav_tbl,
2216: p_get_txn_systems_flag => fnd_api.g_false,
2217: x_txn_systems_tbl => l_txn_systems_tbl,
2218: x_return_status => l_return_status,
2212: p_get_csi_attribs_flag => fnd_api.g_false,
2213: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2214: p_get_csi_iea_values_flag => fnd_api.g_false,
2215: x_csi_iea_values_tbl => l_csi_eav_tbl,
2216: p_get_txn_systems_flag => fnd_api.g_false,
2217: x_txn_systems_tbl => l_txn_systems_tbl,
2218: x_return_status => l_return_status,
2219: x_msg_count => l_msg_count,
2220: x_msg_data => l_msg_data);
2218: x_return_status => l_return_status,
2219: x_msg_count => l_msg_count,
2220: x_msg_data => l_msg_data);
2221:
2222: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2223: raise fnd_api.g_exc_error;
2224: END IF;
2225:
2226: x_line_dtl_tbl := l_line_dtl_tbl;
2219: x_msg_count => l_msg_count,
2220: x_msg_data => l_msg_data);
2221:
2222: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2223: raise fnd_api.g_exc_error;
2224: END IF;
2225:
2226: x_line_dtl_tbl := l_line_dtl_tbl;
2227:
2225:
2226: x_line_dtl_tbl := l_line_dtl_tbl;
2227:
2228: EXCEPTION
2229: WHEN fnd_api.g_exc_error THEN
2230: x_return_status := fnd_api.g_ret_sts_error;
2231: END get_tld;
2232:
2233: PROCEDURE get_ato_options_only(
2226: x_line_dtl_tbl := l_line_dtl_tbl;
2227:
2228: EXCEPTION
2229: WHEN fnd_api.g_exc_error THEN
2230: x_return_status := fnd_api.g_ret_sts_error;
2231: END get_tld;
2232:
2233: PROCEDURE get_ato_options_only(
2234: px_line_tbl IN OUT nocopy oe_order_pub.line_tbl_type,
2236: IS
2237: o_line_tbl oe_order_pub.line_tbl_type;
2238: o_ind binary_integer := 0;
2239: BEGIN
2240: x_return_status := fnd_api.g_ret_sts_success;
2241: api_log('get_ato_options_only');
2242:
2243: IF px_line_tbl.COUNT > 0 THEN
2244: FOR l_ind IN px_line_tbl.FIRST .. px_line_tbl.LAST
2252:
2253: px_line_tbl := o_line_tbl;
2254:
2255: EXCEPTION
2256: WHEN fnd_api.g_exc_error THEN
2257: x_return_status := fnd_api.g_ret_sts_error;
2258: END get_ato_options_only;
2259:
2260: PROCEDURE get_parent_instances(
2253: px_line_tbl := o_line_tbl;
2254:
2255: EXCEPTION
2256: WHEN fnd_api.g_exc_error THEN
2257: x_return_status := fnd_api.g_ret_sts_error;
2258: END get_ato_options_only;
2259:
2260: PROCEDURE get_parent_instances(
2261: p_parent_line_id IN number,
2280: l_ind binary_integer := 0;
2281:
2282: BEGIN
2283:
2284: x_return_status := fnd_api.g_ret_sts_success;
2285:
2286: api_log('get_parent_instances');
2287:
2288: FOR inst_rec IN inst_cur
2326: l_install_site_use_id number;
2327:
2328: BEGIN
2329:
2330: x_return_status := fnd_api.g_ret_sts_success;
2331:
2332: api_log('get_partner_order_info');
2333:
2334: -- for partner ordering
2336: p_order_line_id => p_order_line_rec.line_id,
2337: x_partner_order_rec => l_partner_rec);
2338:
2339: -- customer
2340: IF nvl(l_partner_rec.ib_owner, fnd_api.g_miss_char) <> fnd_api.g_miss_char THEN
2341: IF l_partner_rec.ib_owner = 'INSTALL_BASE' THEN
2342: l_end_customer_id := fnd_api.g_miss_num;
2343: ELSE
2344:
2338:
2339: -- customer
2340: IF nvl(l_partner_rec.ib_owner, fnd_api.g_miss_char) <> fnd_api.g_miss_char THEN
2341: IF l_partner_rec.ib_owner = 'INSTALL_BASE' THEN
2342: l_end_customer_id := fnd_api.g_miss_num;
2343: ELSE
2344:
2345: IF l_partner_rec.ib_owner = 'END_CUSTOMER' THEN
2346: l_end_customer_id := l_partner_rec.end_customer_id;
2347: ELSIF l_partner_rec.ib_owner = 'SOLD_TO' THEN
2348: l_end_customer_id := p_order_line_rec.sold_to_org_id;
2349: END IF;
2350:
2351: IF nvl(l_end_customer_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
2352: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
2353: fnd_msg_pub.add;
2354: RAISE fnd_api.g_exc_error;
2355: END IF;
2350:
2351: IF nvl(l_end_customer_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
2352: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
2353: fnd_msg_pub.add;
2354: RAISE fnd_api.g_exc_error;
2355: END IF;
2356:
2357: END IF;
2358: ELSE
2360: l_end_customer_id := p_order_line_rec.sold_to_org_id;
2361: END IF;
2362:
2363: -- current location
2364: IF nvl(l_partner_rec.ib_current_location, fnd_api.g_miss_char) <> fnd_api.g_miss_char THEN
2365: IF l_partner_rec.ib_current_location = 'INSTALL_BASE' THEN
2366: l_current_site_use_id := fnd_api.g_miss_num;
2367: ELSE
2368:
2362:
2363: -- current location
2364: IF nvl(l_partner_rec.ib_current_location, fnd_api.g_miss_char) <> fnd_api.g_miss_char THEN
2365: IF l_partner_rec.ib_current_location = 'INSTALL_BASE' THEN
2366: l_current_site_use_id := fnd_api.g_miss_num;
2367: ELSE
2368:
2369: IF l_partner_rec.ib_current_location = 'END_CUSTOMER' THEN
2370: l_current_site_use_id := l_partner_rec.end_customer_site_use_id;
2376: l_current_site_use_id := p_order_line_rec.deliver_to_org_id;
2377: ELSIF l_partner_rec.ib_current_location = 'BILL_TO' THEN
2378: l_current_site_use_id := p_order_line_rec.invoice_to_org_id;
2379: END IF;
2380: IF nvl(l_current_site_use_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
2381: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
2382: fnd_msg_pub.add;
2383: RAISE fnd_api.g_exc_error;
2384: END IF;
2379: END IF;
2380: IF nvl(l_current_site_use_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
2381: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
2382: fnd_msg_pub.add;
2383: RAISE fnd_api.g_exc_error;
2384: END IF;
2385:
2386: END IF;
2387:
2390: l_current_site_use_id := p_order_line_rec.ship_to_org_id;
2391: END IF;
2392:
2393: -- installed at location
2394: IF nvl(l_partner_rec.ib_installed_at_location, fnd_api.g_miss_char) <> fnd_api.g_miss_char THEN
2395: IF l_partner_rec.ib_installed_at_location = 'INSTALL_BASE' THEN
2396: l_install_site_use_id := fnd_api.g_miss_num;
2397: ELSE
2398:
2392:
2393: -- installed at location
2394: IF nvl(l_partner_rec.ib_installed_at_location, fnd_api.g_miss_char) <> fnd_api.g_miss_char THEN
2395: IF l_partner_rec.ib_installed_at_location = 'INSTALL_BASE' THEN
2396: l_install_site_use_id := fnd_api.g_miss_num;
2397: ELSE
2398:
2399: IF l_partner_rec.ib_installed_at_location = 'END_CUSTOMER' THEN
2400: l_install_site_use_id := l_partner_rec.end_customer_site_use_id;
2406: l_install_site_use_id := p_order_line_rec.deliver_to_org_id;
2407: ELSIF l_partner_rec.ib_installed_at_location = 'BILL_TO' THEN
2408: l_install_site_use_id := p_order_line_rec.invoice_to_org_id;
2409: END IF;
2410: IF nvl(l_install_site_use_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
2411: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
2412: fnd_msg_pub.add;
2413: RAISE fnd_api.g_exc_error;
2414: END IF;
2409: END IF;
2410: IF nvl(l_install_site_use_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
2411: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
2412: fnd_msg_pub.add;
2413: RAISE fnd_api.g_exc_error;
2414: END IF;
2415:
2416: END IF;
2417:
2428: x_current_site_use_id := l_current_site_use_id;
2429: x_install_site_use_id := l_install_site_use_id;
2430:
2431: EXCEPTION
2432: WHEN fnd_api.g_exc_error THEN
2433: x_return_status := fnd_api.g_ret_sts_error;
2434: END get_partner_order_info;
2435:
2436:
2429: x_install_site_use_id := l_install_site_use_id;
2430:
2431: EXCEPTION
2432: WHEN fnd_api.g_exc_error THEN
2433: x_return_status := fnd_api.g_ret_sts_error;
2434: END get_partner_order_info;
2435:
2436:
2437: PROCEDURE convert_wip_instance_to_cp(
2483: l_src_change_owner varchar2(1);
2484: l_src_change_owner_to_code varchar2(1);
2485: l_src_status_id number;
2486:
2487: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
2488: l_msg_count number;
2489: l_msg_data varchar2(2000);
2490:
2491: l_ind binary_integer := 0;
2504: x_sub_type_id OUT nocopy number,
2505: x_cascade_owner_flag OUT nocopy varchar2,
2506: x_tld_found OUT NOCOPY VARCHAR2 )
2507: IS
2508: l_tld_found VARCHAR2(1) := fnd_api.g_false;
2509: l_txn_line_detail_id NUMBER;
2510: l_tld_tbl csi_t_datastructures_grp.txn_line_detail_tbl;
2511: l_txn_line_query_rec csi_t_datastructures_grp.txn_line_query_rec;
2512: l_txn_line_detail_query_rec csi_t_datastructures_grp.txn_line_detail_query_rec;
2514: l_ext_attrib_tbl csi_t_datastructures_grp.txn_ext_attrib_vals_tbl;
2515: l_csi_ea_tbl csi_t_datastructures_grp.csi_ext_attribs_tbl;
2516: l_csi_iea_values_tbl csi_t_datastructures_grp.csi_ext_attrib_vals_tbl;
2517: l_ii_rltns_tbl csi_t_datastructures_grp.txn_ii_rltns_tbl;
2518: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
2519: l_msg_count number;
2520: l_msg_data varchar2(2000);
2521:
2522: BEGIN
2526: IF p_tld_tbl(p_ind).instance_id = p_instance_id THEN
2527: x_sub_type_id := p_tld_tbl(p_ind).sub_type_id;
2528: x_cascade_owner_flag := p_tld_tbl(p_ind).cascade_owner_flag;
2529: l_txn_line_detail_id := p_tld_tbl(p_ind).txn_line_detail_id;
2530: l_tld_found := fnd_api.g_true;
2531: exit;
2532: END IF;
2533: END LOOP;
2534:
2531: exit;
2532: END IF;
2533: END LOOP;
2534:
2535: IF l_tld_found = fnd_api.g_false THEN
2536: x_sub_type_id := p_tld_tbl(1).sub_type_id;
2537: x_cascade_owner_flag := p_tld_tbl(1).cascade_owner_flag;
2538: l_txn_line_detail_id := p_tld_tbl(1).txn_line_detail_id;
2539: END IF;
2541:
2542: -- get_txn_line_details
2543: csi_t_txn_details_grp.get_transaction_details(
2544: p_api_version => 1,
2545: p_commit => fnd_api.g_false,
2546: p_init_msg_list => fnd_api.g_true,
2547: p_validation_level => fnd_api.g_valid_level_full,
2548: p_txn_line_query_rec => l_txn_line_query_rec,
2549: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2542: -- get_txn_line_details
2543: csi_t_txn_details_grp.get_transaction_details(
2544: p_api_version => 1,
2545: p_commit => fnd_api.g_false,
2546: p_init_msg_list => fnd_api.g_true,
2547: p_validation_level => fnd_api.g_valid_level_full,
2548: p_txn_line_query_rec => l_txn_line_query_rec,
2549: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2550: x_txn_line_detail_tbl => l_tld_tbl,
2543: csi_t_txn_details_grp.get_transaction_details(
2544: p_api_version => 1,
2545: p_commit => fnd_api.g_false,
2546: p_init_msg_list => fnd_api.g_true,
2547: p_validation_level => fnd_api.g_valid_level_full,
2548: p_txn_line_query_rec => l_txn_line_query_rec,
2549: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2550: x_txn_line_detail_tbl => l_tld_tbl,
2551: p_get_parties_flag => fnd_api.g_true,
2547: p_validation_level => fnd_api.g_valid_level_full,
2548: p_txn_line_query_rec => l_txn_line_query_rec,
2549: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2550: x_txn_line_detail_tbl => l_tld_tbl,
2551: p_get_parties_flag => fnd_api.g_true,
2552: x_txn_party_detail_tbl => x_pty_dtl_tbl,
2553: p_get_pty_accts_flag => fnd_api.g_true,
2554: x_txn_pty_acct_detail_tbl => x_pty_acct_tbl,
2555: p_get_ii_rltns_flag => fnd_api.g_false,
2549: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
2550: x_txn_line_detail_tbl => l_tld_tbl,
2551: p_get_parties_flag => fnd_api.g_true,
2552: x_txn_party_detail_tbl => x_pty_dtl_tbl,
2553: p_get_pty_accts_flag => fnd_api.g_true,
2554: x_txn_pty_acct_detail_tbl => x_pty_acct_tbl,
2555: p_get_ii_rltns_flag => fnd_api.g_false,
2556: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2557: p_get_org_assgns_flag => fnd_api.g_true,
2551: p_get_parties_flag => fnd_api.g_true,
2552: x_txn_party_detail_tbl => x_pty_dtl_tbl,
2553: p_get_pty_accts_flag => fnd_api.g_true,
2554: x_txn_pty_acct_detail_tbl => x_pty_acct_tbl,
2555: p_get_ii_rltns_flag => fnd_api.g_false,
2556: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2557: p_get_org_assgns_flag => fnd_api.g_true,
2558: x_txn_org_assgn_tbl => x_org_assgn_tbl,
2559: p_get_ext_attrib_vals_flag => fnd_api.g_true,
2553: p_get_pty_accts_flag => fnd_api.g_true,
2554: x_txn_pty_acct_detail_tbl => x_pty_acct_tbl,
2555: p_get_ii_rltns_flag => fnd_api.g_false,
2556: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2557: p_get_org_assgns_flag => fnd_api.g_true,
2558: x_txn_org_assgn_tbl => x_org_assgn_tbl,
2559: p_get_ext_attrib_vals_flag => fnd_api.g_true,
2560: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2561: p_get_csi_attribs_flag => fnd_api.g_false,
2555: p_get_ii_rltns_flag => fnd_api.g_false,
2556: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
2557: p_get_org_assgns_flag => fnd_api.g_true,
2558: x_txn_org_assgn_tbl => x_org_assgn_tbl,
2559: p_get_ext_attrib_vals_flag => fnd_api.g_true,
2560: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2561: p_get_csi_attribs_flag => fnd_api.g_false,
2562: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2563: p_get_csi_iea_values_flag => fnd_api.g_false,
2557: p_get_org_assgns_flag => fnd_api.g_true,
2558: x_txn_org_assgn_tbl => x_org_assgn_tbl,
2559: p_get_ext_attrib_vals_flag => fnd_api.g_true,
2560: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2561: p_get_csi_attribs_flag => fnd_api.g_false,
2562: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2563: p_get_csi_iea_values_flag => fnd_api.g_false,
2564: x_csi_iea_values_tbl => l_csi_iea_values_tbl,
2565: p_get_txn_systems_flag => fnd_api.g_false,
2559: p_get_ext_attrib_vals_flag => fnd_api.g_true,
2560: x_txn_ext_attrib_vals_tbl => l_ext_attrib_tbl,
2561: p_get_csi_attribs_flag => fnd_api.g_false,
2562: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2563: p_get_csi_iea_values_flag => fnd_api.g_false,
2564: x_csi_iea_values_tbl => l_csi_iea_values_tbl,
2565: p_get_txn_systems_flag => fnd_api.g_false,
2566: x_txn_systems_tbl => l_txn_systems_tbl,
2567: x_return_status => l_return_status,
2561: p_get_csi_attribs_flag => fnd_api.g_false,
2562: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
2563: p_get_csi_iea_values_flag => fnd_api.g_false,
2564: x_csi_iea_values_tbl => l_csi_iea_values_tbl,
2565: p_get_txn_systems_flag => fnd_api.g_false,
2566: x_txn_systems_tbl => l_txn_systems_tbl,
2567: x_return_status => l_return_status,
2568: x_msg_count => l_msg_count,
2569: x_msg_data => l_msg_data);
2567: x_return_status => l_return_status,
2568: x_msg_count => l_msg_count,
2569: x_msg_data => l_msg_data);
2570: IF nvl(l_tld_tbl.count,0) > 0 THEN
2571: l_tld_found := fnd_api.g_true ;
2572: px_tld_tbl(1) := l_tld_tbl(1);
2573: ELSE
2574: l_tld_found := fnd_api.g_false;
2575: x_sub_type_id := px_default_info_rec.sub_type_id;
2570: IF nvl(l_tld_tbl.count,0) > 0 THEN
2571: l_tld_found := fnd_api.g_true ;
2572: px_tld_tbl(1) := l_tld_tbl(1);
2573: ELSE
2574: l_tld_found := fnd_api.g_false;
2575: x_sub_type_id := px_default_info_rec.sub_type_id;
2576: x_cascade_owner_flag := px_default_info_rec.ownership_cascade_at_txn;
2577:
2578: END IF;
2575: x_sub_type_id := px_default_info_rec.sub_type_id;
2576: x_cascade_owner_flag := px_default_info_rec.ownership_cascade_at_txn;
2577:
2578: END IF;
2579: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2580: debug('Error getting txn details before converting item instance to customer product.');
2581: RAISE fnd_api.g_exc_error;
2582: ELSE
2583: csi_t_utilities_pvt.convert_ids_to_index(
2577:
2578: END IF;
2579: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2580: debug('Error getting txn details before converting item instance to customer product.');
2581: RAISE fnd_api.g_exc_error;
2582: ELSE
2583: csi_t_utilities_pvt.convert_ids_to_index(
2584: px_line_dtl_tbl => px_tld_tbl,
2585: px_pty_dtl_tbl => x_pty_dtl_tbl,
2597: END get_info_from_tld;
2598:
2599: BEGIN
2600:
2601: x_return_status := fnd_api.g_ret_sts_success;
2602: api_log('convert_wip_instance_to_cp');
2603:
2604: -- check if the instance is in WIP
2605: SELECT object_version_number,
2668: x_sub_type_id => l_sub_type_id,
2669: x_cascade_owner_flag => l_cascade_owner_flag,
2670: x_tld_found => l_tld_found );
2671:
2672: IF l_tld_found = fnd_api.g_true THEN
2673: FOR l_index IN l_tld_tbl.FIRST..l_tld_tbl.FIRST
2674: LOOP
2675: l_u_instance_rec.instance_id := p_instance_id;
2676: l_u_instance_rec.instance_number := fnd_api.g_miss_char;
2672: IF l_tld_found = fnd_api.g_true THEN
2673: FOR l_index IN l_tld_tbl.FIRST..l_tld_tbl.FIRST
2674: LOOP
2675: l_u_instance_rec.instance_id := p_instance_id;
2676: l_u_instance_rec.instance_number := fnd_api.g_miss_char;
2677: l_u_instance_rec.external_reference := nvl(l_tld_tbl(l_index).external_reference,fnd_api.g_miss_char);
2678: l_u_instance_rec.unit_of_measure := l_tld_tbl(l_index).unit_of_measure;
2679: l_u_instance_rec.instance_condition_id := nvl(l_tld_tbl(l_index).item_condition_id,fnd_api.g_miss_num);
2680: l_u_instance_rec.sellable_flag := nvl(l_tld_tbl(l_index).sellable_flag,fnd_api.g_miss_char);
2673: FOR l_index IN l_tld_tbl.FIRST..l_tld_tbl.FIRST
2674: LOOP
2675: l_u_instance_rec.instance_id := p_instance_id;
2676: l_u_instance_rec.instance_number := fnd_api.g_miss_char;
2677: l_u_instance_rec.external_reference := nvl(l_tld_tbl(l_index).external_reference,fnd_api.g_miss_char);
2678: l_u_instance_rec.unit_of_measure := l_tld_tbl(l_index).unit_of_measure;
2679: l_u_instance_rec.instance_condition_id := nvl(l_tld_tbl(l_index).item_condition_id,fnd_api.g_miss_num);
2680: l_u_instance_rec.sellable_flag := nvl(l_tld_tbl(l_index).sellable_flag,fnd_api.g_miss_char);
2681: l_u_instance_rec.system_id := nvl(l_tld_tbl(l_index).csi_system_id ,fnd_api.g_miss_num);
2675: l_u_instance_rec.instance_id := p_instance_id;
2676: l_u_instance_rec.instance_number := fnd_api.g_miss_char;
2677: l_u_instance_rec.external_reference := nvl(l_tld_tbl(l_index).external_reference,fnd_api.g_miss_char);
2678: l_u_instance_rec.unit_of_measure := l_tld_tbl(l_index).unit_of_measure;
2679: l_u_instance_rec.instance_condition_id := nvl(l_tld_tbl(l_index).item_condition_id,fnd_api.g_miss_num);
2680: l_u_instance_rec.sellable_flag := nvl(l_tld_tbl(l_index).sellable_flag,fnd_api.g_miss_char);
2681: l_u_instance_rec.system_id := nvl(l_tld_tbl(l_index).csi_system_id ,fnd_api.g_miss_num);
2682: l_u_instance_rec.instance_type_code := nvl(l_tld_tbl(l_index).instance_type_code,fnd_api.g_miss_char);
2683: l_u_instance_rec.install_date := nvl(l_tld_tbl(l_index).installation_date,fnd_api.g_miss_date);
2676: l_u_instance_rec.instance_number := fnd_api.g_miss_char;
2677: l_u_instance_rec.external_reference := nvl(l_tld_tbl(l_index).external_reference,fnd_api.g_miss_char);
2678: l_u_instance_rec.unit_of_measure := l_tld_tbl(l_index).unit_of_measure;
2679: l_u_instance_rec.instance_condition_id := nvl(l_tld_tbl(l_index).item_condition_id,fnd_api.g_miss_num);
2680: l_u_instance_rec.sellable_flag := nvl(l_tld_tbl(l_index).sellable_flag,fnd_api.g_miss_char);
2681: l_u_instance_rec.system_id := nvl(l_tld_tbl(l_index).csi_system_id ,fnd_api.g_miss_num);
2682: l_u_instance_rec.instance_type_code := nvl(l_tld_tbl(l_index).instance_type_code,fnd_api.g_miss_char);
2683: l_u_instance_rec.install_date := nvl(l_tld_tbl(l_index).installation_date,fnd_api.g_miss_date);
2684: BEGIN
2677: l_u_instance_rec.external_reference := nvl(l_tld_tbl(l_index).external_reference,fnd_api.g_miss_char);
2678: l_u_instance_rec.unit_of_measure := l_tld_tbl(l_index).unit_of_measure;
2679: l_u_instance_rec.instance_condition_id := nvl(l_tld_tbl(l_index).item_condition_id,fnd_api.g_miss_num);
2680: l_u_instance_rec.sellable_flag := nvl(l_tld_tbl(l_index).sellable_flag,fnd_api.g_miss_char);
2681: l_u_instance_rec.system_id := nvl(l_tld_tbl(l_index).csi_system_id ,fnd_api.g_miss_num);
2682: l_u_instance_rec.instance_type_code := nvl(l_tld_tbl(l_index).instance_type_code,fnd_api.g_miss_char);
2683: l_u_instance_rec.install_date := nvl(l_tld_tbl(l_index).installation_date,fnd_api.g_miss_date);
2684: BEGIN
2685: IF NVL( p_instance_id , fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
2678: l_u_instance_rec.unit_of_measure := l_tld_tbl(l_index).unit_of_measure;
2679: l_u_instance_rec.instance_condition_id := nvl(l_tld_tbl(l_index).item_condition_id,fnd_api.g_miss_num);
2680: l_u_instance_rec.sellable_flag := nvl(l_tld_tbl(l_index).sellable_flag,fnd_api.g_miss_char);
2681: l_u_instance_rec.system_id := nvl(l_tld_tbl(l_index).csi_system_id ,fnd_api.g_miss_num);
2682: l_u_instance_rec.instance_type_code := nvl(l_tld_tbl(l_index).instance_type_code,fnd_api.g_miss_char);
2683: l_u_instance_rec.install_date := nvl(l_tld_tbl(l_index).installation_date,fnd_api.g_miss_date);
2684: BEGIN
2685: IF NVL( p_instance_id , fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
2686: SELECT active_start_date
2679: l_u_instance_rec.instance_condition_id := nvl(l_tld_tbl(l_index).item_condition_id,fnd_api.g_miss_num);
2680: l_u_instance_rec.sellable_flag := nvl(l_tld_tbl(l_index).sellable_flag,fnd_api.g_miss_char);
2681: l_u_instance_rec.system_id := nvl(l_tld_tbl(l_index).csi_system_id ,fnd_api.g_miss_num);
2682: l_u_instance_rec.instance_type_code := nvl(l_tld_tbl(l_index).instance_type_code,fnd_api.g_miss_char);
2683: l_u_instance_rec.install_date := nvl(l_tld_tbl(l_index).installation_date,fnd_api.g_miss_date);
2684: BEGIN
2685: IF NVL( p_instance_id , fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
2686: SELECT active_start_date
2687: INTO l_u_instance_rec.active_start_date
2681: l_u_instance_rec.system_id := nvl(l_tld_tbl(l_index).csi_system_id ,fnd_api.g_miss_num);
2682: l_u_instance_rec.instance_type_code := nvl(l_tld_tbl(l_index).instance_type_code,fnd_api.g_miss_char);
2683: l_u_instance_rec.install_date := nvl(l_tld_tbl(l_index).installation_date,fnd_api.g_miss_date);
2684: BEGIN
2685: IF NVL( p_instance_id , fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
2686: SELECT active_start_date
2687: INTO l_u_instance_rec.active_start_date
2688: FROM csi_item_instances
2689: WHERE instance_id = p_instance_id;
2687: INTO l_u_instance_rec.active_start_date
2688: FROM csi_item_instances
2689: WHERE instance_id = p_instance_id;
2690: ELSE
2691: l_u_instance_rec.active_start_date := nvl(l_tld_tbl(l_index).active_start_date,fnd_api.g_miss_date);
2692: END IF;
2693: EXCEPTION
2694: WHEN OTHERS THEN
2695: l_u_instance_rec.active_start_date := nvl(l_tld_tbl(l_index).active_start_date,fnd_api.g_miss_date);
2691: l_u_instance_rec.active_start_date := nvl(l_tld_tbl(l_index).active_start_date,fnd_api.g_miss_date);
2692: END IF;
2693: EXCEPTION
2694: WHEN OTHERS THEN
2695: l_u_instance_rec.active_start_date := nvl(l_tld_tbl(l_index).active_start_date,fnd_api.g_miss_date);
2696: END;
2697:
2698: l_u_instance_rec.active_end_date := nvl(l_tld_tbl(l_index).active_end_date,fnd_api.g_miss_date);
2699: l_u_instance_rec.location_type_code := 'HZ_PARTY_SITES';
2694: WHEN OTHERS THEN
2695: l_u_instance_rec.active_start_date := nvl(l_tld_tbl(l_index).active_start_date,fnd_api.g_miss_date);
2696: END;
2697:
2698: l_u_instance_rec.active_end_date := nvl(l_tld_tbl(l_index).active_end_date,fnd_api.g_miss_date);
2699: l_u_instance_rec.location_type_code := 'HZ_PARTY_SITES';
2700: l_u_instance_rec.location_id := l_party_site_id;
2701: l_u_instance_rec.return_by_date := nvl(l_tld_tbl(l_index).return_by_date,fnd_api.g_miss_date);
2702:
2697:
2698: l_u_instance_rec.active_end_date := nvl(l_tld_tbl(l_index).active_end_date,fnd_api.g_miss_date);
2699: l_u_instance_rec.location_type_code := 'HZ_PARTY_SITES';
2700: l_u_instance_rec.location_id := l_party_site_id;
2701: l_u_instance_rec.return_by_date := nvl(l_tld_tbl(l_index).return_by_date,fnd_api.g_miss_date);
2702:
2703: IF l_pty_dtl_tbl.COUNT > 0 THEN
2704: FOR l_p_ind IN l_pty_dtl_tbl.FIRST .. l_pty_dtl_tbl.LAST
2705: LOOP
2710: IF l_pty_dtl_tbl(l_pc_ind).contact_flag = 'Y'
2711: AND
2712: l_pty_dtl_tbl(l_pc_ind).contact_party_id = l_p_ind
2713: THEN
2714: IF nvl(l_u_instance_rec.instance_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num Then
2715:
2716: BEGIN
2717: IF l_pty_dtl_tbl(l_p_ind).relationship_type_code = 'OWNER' THEN
2718: SELECT instance_party_id
2740: fnd_message.set_token('INSTANCE_ID',l_u_instance_rec.instance_id);
2741: fnd_message.set_token('RELATIONSHIP_TYPE_CODE',l_pty_dtl_tbl(l_p_ind).relationship_type_code);
2742: fnd_msg_pub.add;
2743: IF l_pty_dtl_tbl(l_p_ind).relationship_type_code = 'OWNER' THEN
2744: x_return_status := fnd_api.g_ret_sts_error;
2745: raise fnd_api.g_exc_error;
2746: ELSE
2747: l_pty_dtl_tbl(l_pc_ind).contact_party_id := l_ind;
2748: END IF;
2741: fnd_message.set_token('RELATIONSHIP_TYPE_CODE',l_pty_dtl_tbl(l_p_ind).relationship_type_code);
2742: fnd_msg_pub.add;
2743: IF l_pty_dtl_tbl(l_p_ind).relationship_type_code = 'OWNER' THEN
2744: x_return_status := fnd_api.g_ret_sts_error;
2745: raise fnd_api.g_exc_error;
2746: ELSE
2747: l_pty_dtl_tbl(l_pc_ind).contact_party_id := l_ind;
2748: END IF;
2749: WHEN too_many_rows THEN
2750: fnd_message.set_name('CSI','CSI_INT_MANY_INSTA_PTY_FOUND');
2751: fnd_message.set_token('INSTANCE_ID',l_u_instance_rec.instance_id);
2752: fnd_message.set_token('RELATIONSHIP_TYPE_CODE',l_pty_dtl_tbl(l_p_ind).relationship_type_code);
2753: fnd_msg_pub.add;
2754: x_return_status := fnd_api.g_ret_sts_error;
2755: raise fnd_api.g_exc_error;
2756: END;
2757: ELSE
2758: l_pty_dtl_tbl(l_pc_ind).contact_party_id := l_ind;
2751: fnd_message.set_token('INSTANCE_ID',l_u_instance_rec.instance_id);
2752: fnd_message.set_token('RELATIONSHIP_TYPE_CODE',l_pty_dtl_tbl(l_p_ind).relationship_type_code);
2753: fnd_msg_pub.add;
2754: x_return_status := fnd_api.g_ret_sts_error;
2755: raise fnd_api.g_exc_error;
2756: END;
2757: ELSE
2758: l_pty_dtl_tbl(l_pc_ind).contact_party_id := l_ind;
2759: END IF;
2793: l_src_status_id
2794: FROM csi_ib_txn_types
2795: WHERE sub_type_id = l_sub_type_id;
2796:
2797: l_u_instance_rec.instance_status_id := nvl(l_src_status_id, fnd_api.g_miss_num);
2798:
2799: IF l_src_change_owner = 'Y' AND l_src_change_owner_to_code = 'E' THEN
2800:
2801: l_owner_party_id := px_default_info_rec.owner_party_id;
2828: WHERE instance_party_id = l_instance_party_id
2829: AND relationship_type_code = 'OWNER';
2830: EXCEPTION
2831: WHEN no_data_found THEN
2832: l_ip_account_id := fnd_api.g_miss_num;
2833: l_acct_object_ver_num := 1;
2834: END;
2835:
2836: l_u_party_acct_tbl(1).ip_account_id := l_ip_account_id;
2853: p_pkg_name => 'csi_item_instance_pub');
2854:
2855: csi_item_instance_pub.update_item_instance(
2856: p_api_version => 1.0,
2857: p_commit => fnd_api.g_false,
2858: p_init_msg_list => fnd_api.g_true,
2859: p_validation_level => fnd_api.g_valid_level_full,
2860: p_instance_rec => l_u_instance_rec,
2861: p_ext_attrib_values_tbl => l_u_ext_attrib_val_tbl,
2854:
2855: csi_item_instance_pub.update_item_instance(
2856: p_api_version => 1.0,
2857: p_commit => fnd_api.g_false,
2858: p_init_msg_list => fnd_api.g_true,
2859: p_validation_level => fnd_api.g_valid_level_full,
2860: p_instance_rec => l_u_instance_rec,
2861: p_ext_attrib_values_tbl => l_u_ext_attrib_val_tbl,
2862: p_party_tbl => l_u_party_tbl,
2855: csi_item_instance_pub.update_item_instance(
2856: p_api_version => 1.0,
2857: p_commit => fnd_api.g_false,
2858: p_init_msg_list => fnd_api.g_true,
2859: p_validation_level => fnd_api.g_valid_level_full,
2860: p_instance_rec => l_u_instance_rec,
2861: p_ext_attrib_values_tbl => l_u_ext_attrib_val_tbl,
2862: p_party_tbl => l_u_party_tbl,
2863: p_account_tbl => l_u_party_acct_tbl,
2869: x_return_status => l_return_status,
2870: x_msg_count => l_msg_count,
2871: x_msg_data => l_msg_data);
2872:
2873: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
2874: RAISE fnd_api.g_exc_error;
2875: END IF;
2876:
2877: debug('wip issued instance converted to cp. instance_id : '||l_u_instance_rec.instance_id);
2870: x_msg_count => l_msg_count,
2871: x_msg_data => l_msg_data);
2872:
2873: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
2874: RAISE fnd_api.g_exc_error;
2875: END IF;
2876:
2877: debug('wip issued instance converted to cp. instance_id : '||l_u_instance_rec.instance_id);
2878:
2887: l_u_instance_rec => l_u_instance_rec,
2888: px_csi_txn_rec =>px_csi_txn_rec,
2889: x_return_status =>l_return_status);
2890:
2891: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2892: RAISE fnd_api.g_exc_error;
2893: END IF;
2894: END IF;
2895:
2888: px_csi_txn_rec =>px_csi_txn_rec,
2889: x_return_status =>l_return_status);
2890:
2891: IF l_return_status <> fnd_api.g_ret_sts_success THEN
2892: RAISE fnd_api.g_exc_error;
2893: END IF;
2894: END IF;
2895:
2896: EXCEPTION
2893: END IF;
2894: END IF;
2895:
2896: EXCEPTION
2897: WHEN fnd_api.g_exc_error THEN
2898: x_return_status := fnd_api.g_ret_sts_error;
2899: END convert_wip_instance_to_cp;
2900:
2901: PROCEDURE get_wip_instances(
2894: END IF;
2895:
2896: EXCEPTION
2897: WHEN fnd_api.g_exc_error THEN
2898: x_return_status := fnd_api.g_ret_sts_error;
2899: END convert_wip_instance_to_cp;
2900:
2901: PROCEDURE get_wip_instances(
2902: p_wip_entity_id IN number,
2955:
2956: l_soi_instance_rec csi_datastructures_pub.instance_rec;
2957:
2958: l_splitted_instances csi_datastructures_pub.instance_tbl;
2959: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
2960:
2961: BEGIN
2962:
2963: x_return_status := fnd_api.g_ret_sts_success;
2959: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
2960:
2961: BEGIN
2962:
2963: x_return_status := fnd_api.g_ret_sts_success;
2964: api_log('get_wip_instances');
2965:
2966: IF p_option_serial_code in (1, 6) THEN
2967: FOR wip_inst_rec IN wip_nsrl_inst_cur(
3005: fnd_message.set_token('INV_ITEM_ID', p_inventory_item_id);
3006: fnd_message.set_token('WIP_ENTITY_ID', p_wip_entity_id);
3007: fnd_msg_pub.add;
3008:
3009: RAISE fnd_api.g_exc_error;
3010: END IF;
3011:
3012:
3013: IF p_option_serial_code = 6 THEN
3027: px_csi_txn_rec => px_csi_txn_rec,
3028: x_instance_tbl => l_splitted_instances,
3029: x_return_status => l_return_status);
3030:
3031: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3032: RAISE fnd_api.g_exc_error;
3033: END IF;
3034:
3035: IF l_splitted_instances.COUNT > 0 THEN
3028: x_instance_tbl => l_splitted_instances,
3029: x_return_status => l_return_status);
3030:
3031: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3032: RAISE fnd_api.g_exc_error;
3033: END IF;
3034:
3035: IF l_splitted_instances.COUNT > 0 THEN
3036: FOR spl_ind IN l_splitted_instances.FIRST .. l_splitted_instances.LAST
3069: END IF;
3070: x_wip_instances := l_wip_instances;
3071:
3072: EXCEPTION
3073: WHEN fnd_api.g_exc_error THEN
3074: x_return_status := fnd_api.g_ret_sts_error;
3075: END get_wip_instances;
3076:
3077: PROCEDURE get_wip_instances_for_line(
3070: x_wip_instances := l_wip_instances;
3071:
3072: EXCEPTION
3073: WHEN fnd_api.g_exc_error THEN
3074: x_return_status := fnd_api.g_ret_sts_error;
3075: END get_wip_instances;
3076:
3077: PROCEDURE get_wip_instances_for_line(
3078: p_option_line_rec IN oe_order_lines_all%rowtype,
3100: l_option_count number := 0;
3101:
3102: l_new_instance_rec csi_datastructures_pub.instance_rec;
3103:
3104: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
3105:
3106: FUNCTION tot_wip_inst_qty(
3107: p_wip_instances IN wip_instances)
3108: RETURN number
3126: n_ind binary_integer:= 0;
3127: l_n_wip_instances wip_instances;
3128: l_parent_instance_id number;
3129: BEGIN
3130: x_return_status := fnd_api.g_ret_sts_success;
3131: api_log('get_in_rel_options');
3132: IF px_wip_instances.count > 0 THEN
3133: FOR l_ind IN px_wip_instances.FIRST ..px_wip_instances.LAST
3134: LOOP
3158: END IF;
3159: debug(' in_rel_options.count : '||l_n_wip_instances.COUNT);
3160: px_wip_instances := l_n_wip_instances;
3161: EXCEPTION
3162: WHEN fnd_api.g_exc_error THEN
3163: x_return_status := fnd_api.g_ret_sts_error;
3164: END get_in_rel_options;
3165:
3166: PROCEDURE mark_and_get(
3159: debug(' in_rel_options.count : '||l_n_wip_instances.COUNT);
3160: px_wip_instances := l_n_wip_instances;
3161: EXCEPTION
3162: WHEN fnd_api.g_exc_error THEN
3163: x_return_status := fnd_api.g_ret_sts_error;
3164: END get_in_rel_options;
3165:
3166: PROCEDURE mark_and_get(
3167: px_wip_instances IN OUT nocopy wip_instances,
3226: END filter_processed_options;
3227:
3228: BEGIN
3229:
3230: x_return_status := fnd_api.g_ret_sts_success;
3231:
3232: api_log('get_wip_instances_for_line');
3233:
3234: l_wip_instances := px_wip_instances;
3250: get_in_rel_options(
3251: p_config_instances => p_config_instances,
3252: px_wip_instances => l_in_rel_wip_instances,
3253: x_return_status => l_return_status);
3254: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3255: RAISE fnd_api.g_exc_error;
3256: END IF;
3257: debug('l_in_rel_wip_instances.count: ' || l_in_rel_wip_instances.COUNT);
3258:
3251: p_config_instances => p_config_instances,
3252: px_wip_instances => l_in_rel_wip_instances,
3253: x_return_status => l_return_status);
3254: IF x_return_status <> fnd_api.g_ret_sts_success THEN
3255: RAISE fnd_api.g_exc_error;
3256: END IF;
3257: debug('l_in_rel_wip_instances.count: ' || l_in_rel_wip_instances.COUNT);
3258:
3259: --fix for bug 4705806:If all the option instances for the order line are not in_rel
3296: LOOP
3297: mark_and_get(
3298: px_wip_instances => l_temp_wip_instances,
3299: x_wip_instance => l_n_wip_instance);
3300: IF nvl(l_n_wip_instance.instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
3301: n_ind := n_ind + 1;
3302: l_n_wip_instances(n_ind) := l_n_wip_instance;
3303: END IF;
3304: END LOOP;
3322: px_csi_txn_rec => px_csi_txn_rec,
3323: x_instance_rec => l_new_instance_rec,
3324: x_return_status => l_return_status);
3325:
3326: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3327: RAISE fnd_api.g_exc_error;
3328: END IF;
3329:
3330: n_ind := n_ind + 1;
3323: x_instance_rec => l_new_instance_rec,
3324: x_return_status => l_return_status);
3325:
3326: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3327: RAISE fnd_api.g_exc_error;
3328: END IF;
3329:
3330: n_ind := n_ind + 1;
3331: l_n_wip_instances(n_ind).instance_id := l_new_instance_rec.instance_id;
3360: px_csi_txn_rec => px_csi_txn_rec,
3361: x_splitted_instances => l_splitted_instances,
3362: x_return_status => l_return_status);
3363:
3364: IF l_return_status <> fnd_Api.g_ret_sts_success THEN
3365: RAISE fnd_api.g_exc_error;
3366: END IF;
3367:
3368: IF l_splitted_instances.COUNT > 0 THEN
3361: x_splitted_instances => l_splitted_instances,
3362: x_return_status => l_return_status);
3363:
3364: IF l_return_status <> fnd_Api.g_ret_sts_success THEN
3365: RAISE fnd_api.g_exc_error;
3366: END IF;
3367:
3368: IF l_splitted_instances.COUNT > 0 THEN
3369: FOR l_ind IN l_splitted_instances.FIRST .. l_splitted_instances.LAST
3392: mark_and_get(
3393: px_wip_instances => l_temp_wip_instances,
3394: x_wip_instance => l_n_wip_instance);
3395:
3396: IF nvl(l_n_wip_instance.instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
3397: n_ind := n_ind + 1;
3398: l_n_wip_instances(n_ind) := l_n_wip_instance;
3399: END IF;
3400: END LOOP;
3419: px_csi_txn_rec => px_csi_txn_rec,
3420: x_splitted_instances => l_splitted_instances,
3421: x_return_status => l_return_status);
3422:
3423: IF l_return_status <> fnd_Api.g_ret_sts_success THEN
3424: RAISE fnd_api.g_exc_error;
3425: END IF;
3426:
3427: IF l_splitted_instances.COUNT > 0 THEN
3420: x_splitted_instances => l_splitted_instances,
3421: x_return_status => l_return_status);
3422:
3423: IF l_return_status <> fnd_Api.g_ret_sts_success THEN
3424: RAISE fnd_api.g_exc_error;
3425: END IF;
3426:
3427: IF l_splitted_instances.COUNT > 0 THEN
3428: FOR l_ind IN l_splitted_instances.FIRST .. l_splitted_instances.LAST
3456: mark_and_get(
3457: px_wip_instances => l_temp_wip_instances,
3458: x_wip_instance => l_n_wip_instance);
3459:
3460: IF nvl(l_n_wip_instance.instance_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
3461: n_ind := n_ind + 1;
3462: l_n_wip_instances(n_ind) := l_n_wip_instance;
3463: END IF;
3464: END LOOP;
3488: END LOOP;
3489: END IF;
3490:
3491: EXCEPTION
3492: WHEN fnd_api.g_exc_error THEN
3493: x_return_status := fnd_api.g_ret_sts_error;
3494: END get_wip_instances_for_line;
3495:
3496: -- enhancements to be made in the genealogy area in this routine
3489: END IF;
3490:
3491: EXCEPTION
3492: WHEN fnd_api.g_exc_error THEN
3493: x_return_status := fnd_api.g_ret_sts_error;
3494: END get_wip_instances_for_line;
3495:
3496: -- enhancements to be made in the genealogy area in this routine
3497: PROCEDURE distribute_wip_instances(
3530: END mark_and_get;
3531:
3532: BEGIN
3533:
3534: x_return_status := fnd_api.g_ret_sts_success;
3535: api_log('distribute_wip_instances');
3536:
3537: l_parent_instances := p_parent_instances;
3538: l_wip_instances := p_wip_instances;
3582:
3583: x_ii_rltns_tbl := l_ii_rltns_tbl;
3584:
3585: EXCEPTION
3586: WHEN fnd_api.g_exc_error THEN
3587: x_return_status := fnd_api.g_ret_sts_error;
3588: END distribute_wip_instances;
3589:
3590: PROCEDURE make_or_buy_from_unit_txn(
3583: x_ii_rltns_tbl := l_ii_rltns_tbl;
3584:
3585: EXCEPTION
3586: WHEN fnd_api.g_exc_error THEN
3587: x_return_status := fnd_api.g_ret_sts_error;
3588: END distribute_wip_instances;
3589:
3590: PROCEDURE make_or_buy_from_unit_txn(
3591: p_serial_number IN varchar2,
3834:
3835: l_config_rec config_rec;
3836: l_wip_found boolean := FALSE;
3837: l_parent_ato_line_id number;
3838: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
3839:
3840: BEGIN
3841:
3842: x_return_status := fnd_api.g_ret_sts_success;
3838: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
3839:
3840: BEGIN
3841:
3842: x_return_status := fnd_api.g_ret_sts_success;
3843: api_log('get_config_info');
3844:
3845: BEGIN
3846: SELECT oel.line_id,
3943: THEN
3944: get_sub_model_wip_info(
3945: px_config_rec => l_config_rec,
3946: x_return_status => l_return_status);
3947: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3948: RAISE fnd_api.g_exc_error;
3949: END IF;
3950: ELSE
3951: l_config_rec.sub_config_make_flag := 'N';
3944: get_sub_model_wip_info(
3945: px_config_rec => l_config_rec,
3946: x_return_status => l_return_status);
3947: IF l_return_status <> fnd_api.g_ret_sts_success THEN
3948: RAISE fnd_api.g_exc_error;
3949: END IF;
3950: ELSE
3951: l_config_rec.sub_config_make_flag := 'N';
3952: END IF;
3985:
3986: x_config_rec := l_config_rec;
3987:
3988: EXCEPTION
3989: WHEN fnd_api.g_exc_error THEN
3990: x_return_status := fnd_api.g_ret_sts_error;
3991: END get_config_info;
3992:
3993: PROCEDURE get_config_nsrl_instances(
3986: x_config_rec := l_config_rec;
3987:
3988: EXCEPTION
3989: WHEN fnd_api.g_exc_error THEN
3990: x_return_status := fnd_api.g_ret_sts_error;
3991: END get_config_info;
3992:
3993: PROCEDURE get_config_nsrl_instances(
3994: p_config_rec IN config_rec,
4006: l_c_ind binary_integer := 0;
4007: l_config_instances config_serial_inst_tbl;
4008:
4009: BEGIN
4010: x_return_status := fnd_api.g_ret_sts_success;
4011: api_log('get_config_nsrl_instances');
4012: FOR config_inst_rec IN config_inst_cur
4013: LOOP
4014: l_c_ind := l_c_ind + 1;
4032:
4033: x_config_instances := l_config_instances;
4034:
4035: EXCEPTION
4036: WHEN fnd_api.g_exc_error THEN
4037: x_return_status := fnd_api.g_ret_sts_error;
4038: END get_config_nsrl_instances;
4039:
4040: PROCEDURE get_config_srl_instances(
4033: x_config_instances := l_config_instances;
4034:
4035: EXCEPTION
4036: WHEN fnd_api.g_exc_error THEN
4037: x_return_status := fnd_api.g_ret_sts_error;
4038: END get_config_nsrl_instances;
4039:
4040: PROCEDURE get_config_srl_instances(
4041: p_config_rec IN config_rec,
4110: l_order_hdr_rec oe_order_headers_all%rowtype;
4111: l_order_line_rec oe_order_lines_all%rowtype;
4112: l_tld_tbl csi_t_datastructures_grp.txn_line_detail_tbl;
4113:
4114: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4115:
4116: BEGIN
4117:
4118: x_return_status := fnd_api.g_ret_sts_success;
4114: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4115:
4116: BEGIN
4117:
4118: x_return_status := fnd_api.g_ret_sts_success;
4119: api_log('get_config_srl_instances');
4120:
4121: IF p_sub_config_flag = 'N' THEN
4122: FOR inst_rec IN inst_cur
4251: p_tld_tbl => l_tld_tbl,
4252: px_default_info_rec => px_default_info_rec,
4253: px_csi_txn_rec => px_csi_txn_rec,
4254: x_return_status => l_return_status);
4255: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4256: RAISE fnd_api.g_exc_error;
4257: END IF;
4258: l_config_instances(l_c_ind).location_type_code := 'HZ_PARTY_SITES';
4259: END IF;
4252: px_default_info_rec => px_default_info_rec,
4253: px_csi_txn_rec => px_csi_txn_rec,
4254: x_return_status => l_return_status);
4255: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4256: RAISE fnd_api.g_exc_error;
4257: END IF;
4258: l_config_instances(l_c_ind).location_type_code := 'HZ_PARTY_SITES';
4259: END IF;
4260:
4276:
4277: x_config_instances := l_config_instances;
4278:
4279: EXCEPTION
4280: WHEN fnd_api.g_exc_error THEN
4281: x_return_status := fnd_api.g_ret_sts_error;
4282: END get_config_srl_instances;
4283:
4284: PROCEDURE get_config_shipped_serials(
4277: x_config_instances := l_config_instances;
4278:
4279: EXCEPTION
4280: WHEN fnd_api.g_exc_error THEN
4281: x_return_status := fnd_api.g_ret_sts_error;
4282: END get_config_srl_instances;
4283:
4284: PROCEDURE get_config_shipped_serials(
4285: px_config_instances IN OUT nocopy config_serial_inst_tbl,
4287: IS
4288: l_config_instances config_serial_inst_tbl;
4289: l_c_ind binary_integer := 0;
4290: BEGIN
4291: x_return_status := fnd_api.g_ret_sts_success;
4292: api_log('get_config_shipped_serials');
4293: IF px_config_instances.COUNT > 0 THEN
4294: FOR l_ind IN px_config_instances.FIRST .. px_config_instances.LAST
4295: LOOP
4301: END IF;
4302: debug(' shipped srls count : '||l_config_instances.COUNT);
4303: px_config_instances := l_config_instances;
4304: EXCEPTION
4305: WHEN fnd_api.g_exc_error THEN
4306: x_return_status := fnd_api.g_ret_sts_error;
4307: END get_config_shipped_serials;
4308:
4309: PROCEDURE check_for_re_shipment(
4302: debug(' shipped srls count : '||l_config_instances.COUNT);
4303: px_config_instances := l_config_instances;
4304: EXCEPTION
4305: WHEN fnd_api.g_exc_error THEN
4306: x_return_status := fnd_api.g_ret_sts_error;
4307: END get_config_shipped_serials;
4308:
4309: PROCEDURE check_for_re_shipment(
4310: p_header_id IN number,
4322: AND NOT (ct.transaction_type_id = 51 AND ct.source_header_ref_id = p_header_id)
4323: ORDER BY ct.transaction_date desc;
4324:
4325: BEGIN
4326: x_return_status := fnd_api.g_ret_sts_success;
4327: api_log('check_for_re_shipment');
4328: x_reship_found := FALSE;
4329: IF px_config_instances.COUNT > 0 THEN
4330: FOR l_ind IN px_config_instances.FIRST .. px_config_instances.LAST
4345: debug(' reship_flag : '||px_config_instances(l_ind).reship_flag);
4346: END LOOP;
4347: END IF;
4348: EXCEPTION
4349: WHEN fnd_api.g_exc_error THEN
4350: x_return_status := fnd_api.g_ret_sts_error;
4351: END check_for_re_shipment;
4352:
4353: PROCEDURE get_reship_count(
4346: END LOOP;
4347: END IF;
4348: EXCEPTION
4349: WHEN fnd_api.g_exc_error THEN
4350: x_return_status := fnd_api.g_ret_sts_error;
4351: END check_for_re_shipment;
4352:
4353: PROCEDURE get_reship_count(
4354: p_config_instances IN config_serial_inst_tbl,
4356: x_return_status OUT NOCOPY varchar2)
4357: IS
4358: l_reship_count number := 0;
4359: BEGIN
4360: x_return_status := fnd_api.g_ret_sts_success;
4361: IF p_config_instances.COUNT > 0 THEN
4362: FOR l_ind IN p_config_instances.FIRST .. p_config_instances.LAST
4363: LOOP
4364: IF p_config_instances(l_ind).reship_flag = 'Y' THEN
4368: END IF;
4369: debug(' reship count : '||l_reship_count);
4370: x_reship_count := l_reship_count;
4371: EXCEPTION
4372: WHEN fnd_api.g_exc_error THEN
4373: x_return_status := fnd_api.g_ret_sts_error;
4374: END get_reship_count;
4375:
4376: PROCEDURE eliminate_reshipped_instances(
4369: debug(' reship count : '||l_reship_count);
4370: x_reship_count := l_reship_count;
4371: EXCEPTION
4372: WHEN fnd_api.g_exc_error THEN
4373: x_return_status := fnd_api.g_ret_sts_error;
4374: END get_reship_count;
4375:
4376: PROCEDURE eliminate_reshipped_instances(
4377: p_config_instances IN config_serial_inst_tbl,
4381: l_instances_tbl csi_datastructures_pub.instance_tbl;
4382: l_i_ind binary_integer := 0;
4383: l_reshipped boolean := FALSE;
4384: BEGIN
4385: x_return_status := fnd_api.g_ret_sts_success;
4386: api_log('eliminate_reshipped_instances');
4387:
4388: IF px_instances_tbl.COUNT > 0 THEN
4389: FOR l_ind IN px_instances_tbl.FIRST .. px_instances_tbl.LAST
4409: END IF;
4410: debug(' after eliminating the reshipped instances - COUNT :'||l_instances_tbl.COUNT);
4411: px_instances_tbl := l_instances_tbl;
4412: EXCEPTION
4413: WHEN fnd_api.g_exc_error THEN
4414: x_return_status := fnd_api.g_ret_sts_error;
4415: END eliminate_reshipped_instances;
4416:
4417: PROCEDURE get_option_instances(
4410: debug(' after eliminating the reshipped instances - COUNT :'||l_instances_tbl.COUNT);
4411: px_instances_tbl := l_instances_tbl;
4412: EXCEPTION
4413: WHEN fnd_api.g_exc_error THEN
4414: x_return_status := fnd_api.g_ret_sts_error;
4415: END eliminate_reshipped_instances;
4416:
4417: PROCEDURE get_option_instances(
4418: p_config_instance_id IN number,
4438: l_option_instances(option_inst_cur%rowcount).instance_id := option_inst_rec.instance_id;
4439: END LOOP;
4440: x_option_instances := l_option_instances;
4441: EXCEPTION
4442: WHEN fnd_api.g_exc_error THEN
4443: x_return_status := fnd_api.g_ret_sts_error;
4444: END get_option_instances;
4445:
4446: /* when the serialized config item is shipped it moves the options along with */
4439: END LOOP;
4440: x_option_instances := l_option_instances;
4441: EXCEPTION
4442: WHEN fnd_api.g_exc_error THEN
4443: x_return_status := fnd_api.g_ret_sts_error;
4444: END get_option_instances;
4445:
4446: /* when the serialized config item is shipped it moves the options along with */
4447: /* it because relations are created at the time of wip completion. When the */
4466: l_u_pricing_attribs_tbl csi_datastructures_pub.pricing_attribs_tbl;
4467: l_u_org_units_tbl csi_datastructures_pub.organization_units_tbl;
4468: l_u_inst_id_lst csi_datastructures_pub.id_tbl;
4469:
4470: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4471: l_msg_count number;
4472: l_msg_data varchar2(2000);
4473:
4474: BEGIN
4472: l_msg_data varchar2(2000);
4473:
4474: BEGIN
4475:
4476: x_return_status := fnd_api.g_ret_sts_success;
4477: api_log('stamp_om_line');
4478:
4479: -- check if the instance is in WIP
4480: SELECT object_version_number
4495: debug(' instance_ovn : '||l_u_instance_rec.object_version_number);
4496:
4497: csi_item_instance_pub.update_item_instance(
4498: p_api_version => 1.0,
4499: p_commit => fnd_api.g_false,
4500: p_init_msg_list => fnd_api.g_true,
4501: p_validation_level => fnd_api.g_valid_level_full,
4502: p_instance_rec => l_u_instance_rec,
4503: p_ext_attrib_values_tbl => l_u_ext_attrib_val_tbl,
4496:
4497: csi_item_instance_pub.update_item_instance(
4498: p_api_version => 1.0,
4499: p_commit => fnd_api.g_false,
4500: p_init_msg_list => fnd_api.g_true,
4501: p_validation_level => fnd_api.g_valid_level_full,
4502: p_instance_rec => l_u_instance_rec,
4503: p_ext_attrib_values_tbl => l_u_ext_attrib_val_tbl,
4504: p_party_tbl => l_u_party_tbl,
4497: csi_item_instance_pub.update_item_instance(
4498: p_api_version => 1.0,
4499: p_commit => fnd_api.g_false,
4500: p_init_msg_list => fnd_api.g_true,
4501: p_validation_level => fnd_api.g_valid_level_full,
4502: p_instance_rec => l_u_instance_rec,
4503: p_ext_attrib_values_tbl => l_u_ext_attrib_val_tbl,
4504: p_party_tbl => l_u_party_tbl,
4505: p_account_tbl => l_u_party_acct_tbl,
4511: x_return_status => l_return_status,
4512: x_msg_count => l_msg_count,
4513: x_msg_data => l_msg_data);
4514:
4515: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
4516: RAISE fnd_api.g_exc_error;
4517: END IF;
4518:
4519: debug('wip issued component instance updated with the om info. instance_id : '||
4512: x_msg_count => l_msg_count,
4513: x_msg_data => l_msg_data);
4514:
4515: IF l_return_status not in (fnd_api.g_ret_sts_success, 'W') THEN
4516: RAISE fnd_api.g_exc_error;
4517: END IF;
4518:
4519: debug('wip issued component instance updated with the om info. instance_id : '||
4520: l_u_instance_rec.instance_id);
4519: debug('wip issued component instance updated with the om info. instance_id : '||
4520: l_u_instance_rec.instance_id);
4521:
4522: EXCEPTION
4523: WHEN fnd_api.g_exc_error THEN
4524: x_return_status := fnd_api.g_ret_sts_error;
4525: END stamp_om_line;
4526:
4527: PROCEDURE stamp_om_line_for_options(
4520: l_u_instance_rec.instance_id);
4521:
4522: EXCEPTION
4523: WHEN fnd_api.g_exc_error THEN
4524: x_return_status := fnd_api.g_ret_sts_error;
4525: END stamp_om_line;
4526:
4527: PROCEDURE stamp_om_line_for_options(
4528: p_order_hdr_rec IN oe_order_headers_all%rowtype,
4532: px_default_info_rec IN OUT nocopy default_info_rec,
4533: px_csi_txn_rec IN OUT nocopy csi_datastructures_pub.transaction_rec,
4534: x_return_status OUT nocopy varchar2)
4535: IS
4536: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4537: BEGIN
4538: x_return_status := fnd_api.g_ret_sts_success;
4539: api_log('stamp_om_line_for_options');
4540:
4534: x_return_status OUT nocopy varchar2)
4535: IS
4536: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4537: BEGIN
4538: x_return_status := fnd_api.g_ret_sts_success;
4539: api_log('stamp_om_line_for_options');
4540:
4541: IF p_wip_instances.COUNT > 0 THEN
4542: FOR l_ind IN p_wip_instances.FIRST .. p_wip_instances.LAST
4549: p_order_line_id => p_order_line_rec.line_id,
4550: px_csi_txn_rec => px_csi_txn_rec,
4551: x_return_status => l_return_status);
4552:
4553: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4554: RAISE fnd_api.g_exc_error;
4555: END IF;
4556:
4557: ELSE
4550: px_csi_txn_rec => px_csi_txn_rec,
4551: x_return_status => l_return_status);
4552:
4553: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4554: RAISE fnd_api.g_exc_error;
4555: END IF;
4556:
4557: ELSE
4558:
4564: px_default_info_rec => px_default_info_rec,
4565: px_csi_txn_rec => px_csi_txn_rec,
4566: x_return_status => l_return_status);
4567:
4568: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4569: RAISE fnd_api.g_exc_error;
4570: END IF;
4571:
4572: END IF;
4565: px_csi_txn_rec => px_csi_txn_rec,
4566: x_return_status => l_return_status);
4567:
4568: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4569: RAISE fnd_api.g_exc_error;
4570: END IF;
4571:
4572: END IF;
4573:
4574: END LOOP;
4575: END IF;
4576:
4577: EXCEPTION
4578: WHEN fnd_api.g_exc_error THEN
4579: x_return_status := fnd_api.g_ret_sts_error;
4580: END stamp_om_line_for_options;
4581:
4582: PROCEDURE get_config_serial_code(
4575: END IF;
4576:
4577: EXCEPTION
4578: WHEN fnd_api.g_exc_error THEN
4579: x_return_status := fnd_api.g_ret_sts_error;
4580: END stamp_om_line_for_options;
4581:
4582: PROCEDURE get_config_serial_code(
4583: p_ato_line_id IN number,
4593: AND msi.organization_id = oel.ship_from_org_id
4594: AND msi.inventory_item_id = oel.inventory_item_id;
4595: BEGIN
4596:
4597: x_return_status := fnd_api.g_ret_sts_success;
4598: api_log('get_config_serial_code');
4599: FOR config_rec IN config_cur
4600: LOOP
4601: x_serial_code := config_rec.serial_number_control_code;
4601: x_serial_code := config_rec.serial_number_control_code;
4602: END LOOP;
4603:
4604: EXCEPTION
4605: WHEN fnd_api.g_exc_error THEN
4606: x_return_status := fnd_api.g_ret_sts_error;
4607: END get_config_serial_code;
4608:
4609:
4602: END LOOP;
4603:
4604: EXCEPTION
4605: WHEN fnd_api.g_exc_error THEN
4606: x_return_status := fnd_api.g_ret_sts_error;
4607: END get_config_serial_code;
4608:
4609:
4610: PROCEDURE break_relation(
4615: IS
4616: l_exp_rltns_rec csi_datastructures_pub.ii_relationship_rec;
4617: l_instance_id_lst csi_datastructures_pub.id_tbl;
4618:
4619: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4620: l_msg_count number;
4621: l_msg_data varchar2(2000);
4622: BEGIN
4623: x_return_status := fnd_api.g_ret_sts_success;
4619: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4620: l_msg_count number;
4621: l_msg_data varchar2(2000);
4622: BEGIN
4623: x_return_status := fnd_api.g_ret_sts_success;
4624: api_log('break_relation');
4625:
4626: l_exp_rltns_rec.relationship_id := p_relationship_id;
4627: l_exp_rltns_rec.object_version_number:= p_relationship_ovn;
4627: l_exp_rltns_rec.object_version_number:= p_relationship_ovn;
4628:
4629: debug(' relationship_id :'||l_exp_rltns_rec.relationship_id);
4630:
4631: IF nvl(p_relationship_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
4632: SELECT object_version_number
4633: INTO l_exp_rltns_rec.object_version_number
4634: FROM csi_ii_relationships
4635: WHERE relationship_id = l_exp_rltns_rec.relationship_id;
4640: p_api_name => 'expire_relationship');
4641:
4642: csi_ii_relationships_pub.expire_relationship(
4643: p_api_version => 1.0,
4644: p_commit => fnd_api.g_false,
4645: p_init_msg_list => fnd_api.g_false,
4646: p_validation_level => fnd_api.g_valid_level_full,
4647: p_relationship_rec => l_exp_rltns_rec,
4648: p_txn_rec => px_csi_txn_rec,
4641:
4642: csi_ii_relationships_pub.expire_relationship(
4643: p_api_version => 1.0,
4644: p_commit => fnd_api.g_false,
4645: p_init_msg_list => fnd_api.g_false,
4646: p_validation_level => fnd_api.g_valid_level_full,
4647: p_relationship_rec => l_exp_rltns_rec,
4648: p_txn_rec => px_csi_txn_rec,
4649: x_instance_id_lst => l_instance_id_lst,
4642: csi_ii_relationships_pub.expire_relationship(
4643: p_api_version => 1.0,
4644: p_commit => fnd_api.g_false,
4645: p_init_msg_list => fnd_api.g_false,
4646: p_validation_level => fnd_api.g_valid_level_full,
4647: p_relationship_rec => l_exp_rltns_rec,
4648: p_txn_rec => px_csi_txn_rec,
4649: x_instance_id_lst => l_instance_id_lst,
4650: x_return_status => l_return_status,
4650: x_return_status => l_return_status,
4651: x_msg_count => l_msg_count,
4652: x_msg_data => l_msg_data);
4653:
4654: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4655: RAISE fnd_api.g_exc_error;
4656: END IF;
4657: END IF;
4658: EXCEPTION
4651: x_msg_count => l_msg_count,
4652: x_msg_data => l_msg_data);
4653:
4654: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4655: RAISE fnd_api.g_exc_error;
4656: END IF;
4657: END IF;
4658: EXCEPTION
4659: WHEN fnd_api.g_exc_error THEN
4655: RAISE fnd_api.g_exc_error;
4656: END IF;
4657: END IF;
4658: EXCEPTION
4659: WHEN fnd_api.g_exc_error THEN
4660: x_return_status := fnd_api.g_ret_sts_error;
4661: END break_relation;
4662:
4663: /* this routine check the relationship record for the ato component in WIP */
4656: END IF;
4657: END IF;
4658: EXCEPTION
4659: WHEN fnd_api.g_exc_error THEN
4660: x_return_status := fnd_api.g_ret_sts_error;
4661: END break_relation;
4662:
4663: /* this routine check the relationship record for the ato component in WIP */
4664: /* and breaks the relation */
4673: l_relationship_query_rec csi_datastructures_pub.relationship_query_rec;
4674: l_relationship_tbl csi_datastructures_pub.ii_relationship_tbl;
4675: l_time_stamp date := sysdate;
4676:
4677: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4678: l_msg_count number := 0;
4679: l_msg_data varchar2(2000);
4680:
4681: BEGIN
4679: l_msg_data varchar2(2000);
4680:
4681: BEGIN
4682:
4683: x_return_status := fnd_api.g_ret_sts_success;
4684: api_log('check_and_break_relation');
4685:
4686: debug(' subject instance id :'||p_instance_id);
4687:
4693: p_api_name => 'get_relationships');
4694:
4695: csi_ii_relationships_pub.get_relationships(
4696: p_api_version => 1.0,
4697: p_commit => fnd_api.g_false,
4698: p_init_msg_list => fnd_api.g_true,
4699: p_validation_level => fnd_api.g_valid_level_full,
4700: p_relationship_query_rec => l_relationship_query_rec,
4701: p_depth => 1,
4694:
4695: csi_ii_relationships_pub.get_relationships(
4696: p_api_version => 1.0,
4697: p_commit => fnd_api.g_false,
4698: p_init_msg_list => fnd_api.g_true,
4699: p_validation_level => fnd_api.g_valid_level_full,
4700: p_relationship_query_rec => l_relationship_query_rec,
4701: p_depth => 1,
4702: p_time_stamp => l_time_stamp,
4695: csi_ii_relationships_pub.get_relationships(
4696: p_api_version => 1.0,
4697: p_commit => fnd_api.g_false,
4698: p_init_msg_list => fnd_api.g_true,
4699: p_validation_level => fnd_api.g_valid_level_full,
4700: p_relationship_query_rec => l_relationship_query_rec,
4701: p_depth => 1,
4702: p_time_stamp => l_time_stamp,
4703: p_active_relationship_only => fnd_api.g_true,
4699: p_validation_level => fnd_api.g_valid_level_full,
4700: p_relationship_query_rec => l_relationship_query_rec,
4701: p_depth => 1,
4702: p_time_stamp => l_time_stamp,
4703: p_active_relationship_only => fnd_api.g_true,
4704: x_relationship_tbl => l_relationship_tbl,
4705: x_return_status => l_return_status,
4706: x_msg_count => l_msg_count,
4707: x_msg_data => l_msg_data);
4705: x_return_status => l_return_status,
4706: x_msg_count => l_msg_count,
4707: x_msg_data => l_msg_data);
4708:
4709: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4710: RAISE fnd_api.g_exc_error;
4711: END IF;
4712:
4713: debug(' relationship table count :'||l_relationship_tbl.COUNT);
4706: x_msg_count => l_msg_count,
4707: x_msg_data => l_msg_data);
4708:
4709: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4710: RAISE fnd_api.g_exc_error;
4711: END IF;
4712:
4713: debug(' relationship table count :'||l_relationship_tbl.COUNT);
4714:
4721: p_relationship_ovn => l_relationship_tbl(l_ind).object_version_number,
4722: px_csi_txn_rec => px_csi_txn_rec,
4723: x_return_status => l_return_status);
4724:
4725: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4726: RAISE fnd_api.g_exc_error;
4727: END IF;
4728:
4729: END LOOP;
4722: px_csi_txn_rec => px_csi_txn_rec,
4723: x_return_status => l_return_status);
4724:
4725: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4726: RAISE fnd_api.g_exc_error;
4727: END IF;
4728:
4729: END LOOP;
4730: END IF;
4731:
4732: debug('check and break relation successful.');
4733:
4734: EXCEPTION
4735: WHEN fnd_api.g_exc_error THEN
4736: x_return_status := fnd_api.g_ret_sts_error;
4737: END check_and_break_relation;
4738:
4739: PROCEDURE mark_and_get_config(
4732: debug('check and break relation successful.');
4733:
4734: EXCEPTION
4735: WHEN fnd_api.g_exc_error THEN
4736: x_return_status := fnd_api.g_ret_sts_error;
4737: END check_and_break_relation;
4738:
4739: PROCEDURE mark_and_get_config(
4740: px_config_instances IN OUT nocopy config_serial_inst_tbl,
4742: x_return_status OUT nocopy varchar2)
4743: IS
4744: px_ind binary_integer := 0;
4745: BEGIN
4746: x_return_status := fnd_api.g_ret_sts_success;
4747: api_log('mark_and_get_config');
4748:
4749: IF px_config_instances.COUNT > 0 THEN
4750: px_ind := px_config_instances.NEXT(px_ind);
4756: END IF;
4757: END IF;
4758:
4759: EXCEPTION
4760: WHEN fnd_api.g_exc_error THEN
4761: x_return_status := fnd_api.g_ret_sts_error;
4762: END mark_and_get_config;
4763:
4764: PROCEDURE mark_and_get_src_tld(
4757: END IF;
4758:
4759: EXCEPTION
4760: WHEN fnd_api.g_exc_error THEN
4761: x_return_status := fnd_api.g_ret_sts_error;
4762: END mark_and_get_config;
4763:
4764: PROCEDURE mark_and_get_src_tld(
4765: px_src_tld_tbl IN OUT nocopy csi_t_datastructures_grp.txn_line_detail_tbl,
4767: x_return_status OUT nocopy varchar2)
4768: IS
4769: px_ind binary_integer := 0;
4770: BEGIN
4771: x_return_status := fnd_api.g_ret_sts_success;
4772: api_log('mark_and_get_src_tld');
4773:
4774: IF px_src_tld_tbl.COUNT > 0 THEN
4775: px_ind := px_src_tld_tbl.NEXT(px_ind);
4781: END IF;
4782: END IF;
4783:
4784: EXCEPTION
4785: WHEN fnd_api.g_exc_error THEN
4786: x_return_status := fnd_api.g_ret_sts_error;
4787: END mark_and_get_src_tld;
4788:
4789: PROCEDURE mark_and_get_nsrl_option(
4782: END IF;
4783:
4784: EXCEPTION
4785: WHEN fnd_api.g_exc_error THEN
4786: x_return_status := fnd_api.g_ret_sts_error;
4787: END mark_and_get_src_tld;
4788:
4789: PROCEDURE mark_and_get_nsrl_option(
4790: p_class_quantity IN number,
4802: l_vld_organization_id number;
4803:
4804: l_splitted_instances csi_datastructures_pub.instance_tbl;
4805:
4806: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4807: l_msg_count number;
4808: l_msg_data varchar2(2000);
4809:
4810: BEGIN
4807: l_msg_count number;
4808: l_msg_data varchar2(2000);
4809:
4810: BEGIN
4811: x_return_status := fnd_api.g_ret_sts_success;
4812: api_log('mark_and_get_nsrl_option');
4813:
4814: px_ind := 0;
4815:
4838: px_csi_txn_rec => px_csi_txn_rec,
4839: x_splitted_instances => l_splitted_instances,
4840: x_return_status => l_return_status);
4841:
4842: IF l_return_status <> fnd_Api.g_ret_sts_success THEN
4843: RAISE fnd_api.g_exc_error;
4844: END IF;
4845:
4846: px_new_ind := px_ind;
4839: x_splitted_instances => l_splitted_instances,
4840: x_return_status => l_return_status);
4841:
4842: IF l_return_status <> fnd_Api.g_ret_sts_success THEN
4843: RAISE fnd_api.g_exc_error;
4844: END IF;
4845:
4846: px_new_ind := px_ind;
4847:
4865: AND subject_id = px_ii_rltns_tbl(px_new_ind).subject_id
4866: AND relationship_type_code = 'COMPONENT-OF';
4867: EXCEPTION
4868: WHEN no_data_found THEN
4869: px_ii_rltns_tbl(px_new_ind).relationship_id := fnd_api.g_miss_num;
4870: END;
4871: END IF;
4872: END LOOP;
4873: END IF;
4871: END IF;
4872: END LOOP;
4873: END IF;
4874:
4875: IF nvl(px_ii_rltns_tbl(px_ind).relationship_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
4876: break_relation(
4877: p_relationship_id => px_ii_rltns_tbl(px_ind).relationship_id,
4878: p_relationship_ovn => px_ii_rltns_tbl(px_ind).object_version_number,
4879: px_csi_txn_rec => px_csi_txn_rec,
4878: p_relationship_ovn => px_ii_rltns_tbl(px_ind).object_version_number,
4879: px_csi_txn_rec => px_csi_txn_rec,
4880: x_return_status => l_return_status);
4881:
4882: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4883: RAISE fnd_api.g_exc_error;
4884: END IF;
4885: END IF;
4886:
4879: px_csi_txn_rec => px_csi_txn_rec,
4880: x_return_status => l_return_status);
4881:
4882: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4883: RAISE fnd_api.g_exc_error;
4884: END IF;
4885: END IF;
4886:
4887: px_ii_rltns_tbl.DELETE(px_ind);
4887: px_ii_rltns_tbl.DELETE(px_ind);
4888:
4889: ELSE
4890:
4891: IF nvl(px_ii_rltns_tbl(px_ind).relationship_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
4892: break_relation(
4893: p_relationship_id => px_ii_rltns_tbl(px_ind).relationship_id,
4894: p_relationship_ovn => px_ii_rltns_tbl(px_ind).object_version_number,
4895: px_csi_txn_rec => px_csi_txn_rec,
4894: p_relationship_ovn => px_ii_rltns_tbl(px_ind).object_version_number,
4895: px_csi_txn_rec => px_csi_txn_rec,
4896: x_return_status => l_return_status);
4897:
4898: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4899: RAISE fnd_api.g_exc_error;
4900: END IF;
4901: END IF;
4902:
4895: px_csi_txn_rec => px_csi_txn_rec,
4896: x_return_status => l_return_status);
4897:
4898: IF l_return_status <> fnd_api.g_ret_sts_success THEN
4899: RAISE fnd_api.g_exc_error;
4900: END IF;
4901: END IF;
4902:
4903: px_ii_rltns_tbl.DELETE(px_ind);
4904:
4905: END IF;
4906: END IF;
4907: EXCEPTION
4908: WHEN fnd_api.g_exc_error THEN
4909: x_return_status := fnd_api.g_ret_sts_error;
4910: END mark_and_get_nsrl_option;
4911:
4912: PROCEDURE mark_and_get_srl_option(
4905: END IF;
4906: END IF;
4907: EXCEPTION
4908: WHEN fnd_api.g_exc_error THEN
4909: x_return_status := fnd_api.g_ret_sts_error;
4910: END mark_and_get_nsrl_option;
4911:
4912: PROCEDURE mark_and_get_srl_option(
4913: px_ii_rltns_tbl IN OUT nocopy csi_datastructures_pub.ii_relationship_tbl,
4915: x_return_status OUT nocopy varchar2)
4916: IS
4917: px_ind binary_integer := 0;
4918: BEGIN
4919: x_return_status := fnd_api.g_ret_sts_success;
4920: api_log('mark_and_get_srl_option');
4921: IF px_ii_rltns_tbl.COUNT > 0 THEN
4922: px_ind := px_ii_rltns_tbl.NEXT(px_ind);
4923: x_option_ii_rltns_rec := px_ii_rltns_tbl(px_ind);
4923: x_option_ii_rltns_rec := px_ii_rltns_tbl(px_ind);
4924: px_ii_rltns_tbl.DELETE(px_ind);
4925: END IF;
4926: EXCEPTION
4927: WHEN fnd_api.g_exc_error THEN
4928: x_return_status := fnd_api.g_ret_sts_error;
4929: END mark_and_get_srl_option;
4930:
4931: PROCEDURE filter_option_instances(
4924: px_ii_rltns_tbl.DELETE(px_ind);
4925: END IF;
4926: EXCEPTION
4927: WHEN fnd_api.g_exc_error THEN
4928: x_return_status := fnd_api.g_ret_sts_error;
4929: END mark_and_get_srl_option;
4930:
4931: PROCEDURE filter_option_instances(
4932: p_option_line_rec IN oe_order_pub.line_rec_type,
4940: l_option_instance varchar2(1);
4941: l_ind binary_integer := 0;
4942: l_ii_rltns_tbl csi_datastructures_pub.ii_relationship_tbl;
4943: l_wip_instances wip_instances;
4944: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
4945: CURSOR option_cp_cur IS
4946: SELECT cii.instance_id
4947: FROM csi_item_instances cii
4948: WHERE cii.inventory_item_id = p_option_line_rec.inventory_item_id
4955: AND ctld.source_transaction_flag = 'N'
4956: AND ctld.instance_id = cii.instance_id);
4957: BEGIN
4958:
4959: x_return_status := fnd_api.g_ret_sts_success;
4960: api_log('filter_option_instances');
4961:
4962: IF px_ii_rltns_tbl.COUNT > 0 THEN
4963: FOR px_ind IN px_ii_rltns_tbl.FIRST .. px_ii_rltns_tbl.LAST
4995: p_config_rec => p_config_rec,
4996: px_csi_txn_rec => px_csi_txn_rec,
4997: x_wip_instances => l_wip_instances,
4998: x_return_status => l_return_status);
4999: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5000: RAISE fnd_api.g_exc_error;
5001: END IF;
5002:
5003: IF l_wip_instances.COUNT > 0 THEN
4996: px_csi_txn_rec => px_csi_txn_rec,
4997: x_wip_instances => l_wip_instances,
4998: x_return_status => l_return_status);
4999: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5000: RAISE fnd_api.g_exc_error;
5001: END IF;
5002:
5003: IF l_wip_instances.COUNT > 0 THEN
5004: FOR w_ind IN l_wip_instances.FIRST .. l_wip_instances.LAST
5023:
5024: px_ii_rltns_tbl := l_ii_rltns_tbl;
5025:
5026: EXCEPTION
5027: WHEN fnd_api.g_exc_error THEN
5028: x_return_status := fnd_api.g_ret_sts_error;
5029: END filter_option_instances;
5030:
5031: PROCEDURE check_wip_requirements(
5024: px_ii_rltns_tbl := l_ii_rltns_tbl;
5025:
5026: EXCEPTION
5027: WHEN fnd_api.g_exc_error THEN
5028: x_return_status := fnd_api.g_ret_sts_error;
5029: END filter_option_instances;
5030:
5031: PROCEDURE check_wip_requirements(
5032: p_wip_entity_id IN number,
5189: AND msi.comms_nl_trackable_flag = 'Y'
5190: ORDER BY bet.sort_order;
5191: BEGIN
5192: -- Initialize API return status to success
5193: x_return_status := FND_API.G_RET_STS_SUCCESS;
5194:
5195: debug( 'build_option_child_line_tbl');
5196:
5197: IF p_explosion_level IS NULL OR
5194:
5195: debug( 'build_option_child_line_tbl');
5196:
5197: IF p_explosion_level IS NULL OR
5198: p_explosion_level = FND_API.G_MISS_NUM THEN
5199: l_csi_bom_explosion_level := to_number(fnd_profile.value('CSI_BOM_EXPLOSION_LEVEL'));
5200: ELSE
5201: l_csi_bom_explosion_level := p_explosion_level;
5202: END IF;
5246: debug (' Bom explosion error code < 0'|| l_Error_Code ||' '||l_err_msg);
5247: END IF;
5248: FND_MESSAGE.SET_NAME('CSI','CSI_API_CORE_BOM_EXPL_ERROR');
5249: FND_MSG_PUB.Add;
5250: x_return_status := fnd_api.g_ret_sts_error;
5251: RAISE FND_API.G_EXC_ERROR;
5252: END IF; -- error
5253:
5254:
5247: END IF;
5248: FND_MESSAGE.SET_NAME('CSI','CSI_API_CORE_BOM_EXPL_ERROR');
5249: FND_MSG_PUB.Add;
5250: x_return_status := fnd_api.g_ret_sts_error;
5251: RAISE FND_API.G_EXC_ERROR;
5252: END IF; -- error
5253:
5254:
5255: debug('Start of BOM loop..');
5349: ORDER BY bet.sort_order;
5350:
5351: BEGIN
5352: -- Initialize API return status to success
5353: x_return_status := FND_API.G_RET_STS_SUCCESS;
5354:
5355: debug('Start get_trackable_bom_comp_count');
5356:
5357: l_csi_bom_explosion_level := to_number(fnd_profile.value('CSI_BOM_EXPLOSION_LEVEL'));
5383: debug (' Bom explosion error code < 0'|| l_Error_Code ||' '||l_err_msg);
5384: END IF;
5385: --FND_MESSAGE.SET_NAME('CSI','CSI_API_CORE_BOM_EXPL_ERROR');
5386: --FND_MSG_PUB.Add;
5387: --x_return_status := fnd_api.g_ret_sts_error;
5388: RAISE FND_API.G_EXC_ERROR;
5389: END IF;
5390:
5391: FOR v_rec IN BOM_CSR(l_group_id)
5384: END IF;
5385: --FND_MESSAGE.SET_NAME('CSI','CSI_API_CORE_BOM_EXPL_ERROR');
5386: --FND_MSG_PUB.Add;
5387: --x_return_status := fnd_api.g_ret_sts_error;
5388: RAISE FND_API.G_EXC_ERROR;
5389: END IF;
5390:
5391: FOR v_rec IN BOM_CSR(l_group_id)
5392: LOOP
5400: debug('End get_trackable_bom_comp_count');
5401: x_trk_child_cnt := l_child_line_tbl.COUNT;
5402:
5403: EXCEPTION
5404: WHEN FND_API.G_EXC_ERROR THEN
5405: x_trk_child_cnt := 0;
5406: WHEN OTHERS THEN
5407: x_trk_child_cnt := 0;
5408: END get_trackable_bom_comp_count;
5464: l_child_ind binary_integer := 0;
5465:
5466: l_msg_count number := 0;
5467: l_msg_data varchar2(2000);
5468: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
5469: l_option_flag VARCHAR2(1) := 'Y'; -- Added for bug10329599
5470: l_parent_inst_id NUMBER; --Added for bug 10403467
5471:
5472: --Addded Code for Bug 14126123
5497: x_config_instance OUT nocopy config_serial_inst_rec,
5498: x_return_status OUT nocopy varchar2)
5499: IS
5500: l_iir_tbl csi_datastructures_pub.ii_relationship_tbl;
5501: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
5502: l_msg_count number;
5503: l_msg_data varchar2(2000);
5504: BEGIN
5505:
5502: l_msg_count number;
5503: l_msg_data varchar2(2000);
5504: BEGIN
5505:
5506: x_return_status := fnd_api.g_ret_sts_success;
5507:
5508: api_log('get_config_wrt_child');
5509:
5510: IF p_parent_is_oc THEN
5510: IF p_parent_is_oc THEN
5511:
5512: csi_item_instance_grp.get_all_parents(
5513: p_api_version => 1.0,
5514: p_commit => fnd_api.g_false,
5515: p_init_msg_list => fnd_api.g_true,
5516: p_validation_level => fnd_api.g_valid_level_full,
5517: p_subject_id => p_parent_instance.instance_id,
5518: x_rel_tbl => l_iir_tbl,
5511:
5512: csi_item_instance_grp.get_all_parents(
5513: p_api_version => 1.0,
5514: p_commit => fnd_api.g_false,
5515: p_init_msg_list => fnd_api.g_true,
5516: p_validation_level => fnd_api.g_valid_level_full,
5517: p_subject_id => p_parent_instance.instance_id,
5518: x_rel_tbl => l_iir_tbl,
5519: x_return_status => l_return_status,
5512: csi_item_instance_grp.get_all_parents(
5513: p_api_version => 1.0,
5514: p_commit => fnd_api.g_false,
5515: p_init_msg_list => fnd_api.g_true,
5516: p_validation_level => fnd_api.g_valid_level_full,
5517: p_subject_id => p_parent_instance.instance_id,
5518: x_rel_tbl => l_iir_tbl,
5519: x_return_status => l_return_status,
5520: x_msg_count => l_msg_count,
5519: x_return_status => l_return_status,
5520: x_msg_count => l_msg_count,
5521: x_msg_data => l_msg_data);
5522:
5523: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5524: RAISE fnd_api.g_exc_error;
5525: END IF;
5526: IF l_iir_tbl.COUNT > 0 THEN
5527: FOR iir_ind IN l_iir_tbl.FIRST .. l_iir_tbl.LAST
5520: x_msg_count => l_msg_count,
5521: x_msg_data => l_msg_data);
5522:
5523: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5524: RAISE fnd_api.g_exc_error;
5525: END IF;
5526: IF l_iir_tbl.COUNT > 0 THEN
5527: FOR iir_ind IN l_iir_tbl.FIRST .. l_iir_tbl.LAST
5528: LOOP
5543: x_config_instance.instance_id := p_parent_instance.instance_id;
5544: END IF;
5545: debug(' config_instance_id : '||x_config_instance.instance_id);
5546: EXCEPTION
5547: WHEN fnd_api.g_exc_error THEN
5548: x_return_status := fnd_api.g_ret_sts_error;
5549: END get_config_wrt_child;
5550:
5551: BEGIN
5544: END IF;
5545: debug(' config_instance_id : '||x_config_instance.instance_id);
5546: EXCEPTION
5547: WHEN fnd_api.g_exc_error THEN
5548: x_return_status := fnd_api.g_ret_sts_error;
5549: END get_config_wrt_child;
5550:
5551: BEGIN
5552:
5549: END get_config_wrt_child;
5550:
5551: BEGIN
5552:
5553: x_return_status := fnd_api.g_ret_sts_success;
5554:
5555: api_log('rebuild_relation_for_ato');
5556:
5557: -- Bug 10329599
5573: p_processing_status => 'IN_PROCESS',
5574: x_line_dtl_tbl => l_src_tld_tbl,
5575: x_return_status => l_return_status);
5576:
5577: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5578: RAISE fnd_api.g_exc_error;
5579: END IF;
5580:
5581: get_ib_trackable_parent(
5574: x_line_dtl_tbl => l_src_tld_tbl,
5575: x_return_status => l_return_status);
5576:
5577: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5578: RAISE fnd_api.g_exc_error;
5579: END IF;
5580:
5581: get_ib_trackable_parent(
5582: p_current_line_id => p_order_line_rec.line_id,
5583: p_om_vld_org_id => px_default_info_rec.om_vld_org_id,
5584: x_parent_line_rec => l_parent_line_rec,
5585: x_return_status => l_return_status);
5586:
5587: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5588: RAISE fnd_api.g_exc_error;
5589: END IF;
5590:
5591: l_config_class_ratio := p_order_line_rec.ordered_quantity/l_parent_line_rec.ordered_quantity;
5584: x_parent_line_rec => l_parent_line_rec,
5585: x_return_status => l_return_status);
5586:
5587: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5588: RAISE fnd_api.g_exc_error;
5589: END IF;
5590:
5591: l_config_class_ratio := p_order_line_rec.ordered_quantity/l_parent_line_rec.ordered_quantity;
5592: debug(' config_class_ratio : '||l_config_class_ratio);
5599: px_default_info_rec => px_default_info_rec,
5600: px_csi_txn_rec => px_csi_txn_rec,
5601: x_config_instances => l_sub_config_instances,
5602: x_return_status => l_return_status);
5603: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5604: RAISE fnd_api.g_exc_error;
5605: END IF;
5606:
5607: IF p_order_line_rec.ato_line_id = l_parent_line_rec.line_id THEN
5600: px_csi_txn_rec => px_csi_txn_rec,
5601: x_config_instances => l_sub_config_instances,
5602: x_return_status => l_return_status);
5603: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5604: RAISE fnd_api.g_exc_error;
5605: END IF;
5606:
5607: IF p_order_line_rec.ato_line_id = l_parent_line_rec.line_id THEN
5608: l_parent_is_oc := FALSE;
5614: p_config_rec => p_config_rec,
5615: p_sub_config_flag => 'N',
5616: x_config_instances => l_config_instances,
5617: x_return_status => l_return_status);
5618: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5619: RAISE fnd_api.g_exc_error;
5620: END IF;
5621: ELSE
5622: l_config_instances := p_config_instances;
5615: p_sub_config_flag => 'N',
5616: x_config_instances => l_config_instances,
5617: x_return_status => l_return_status);
5618: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5619: RAISE fnd_api.g_exc_error;
5620: END IF;
5621: ELSE
5622: l_config_instances := p_config_instances;
5623: END IF;
5661: px_default_info_rec => px_default_info_rec,
5662: x_txn_line_dtl_id => l_config_ns_tld_id,
5663: x_return_status => l_return_status);
5664:
5665: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5666: RAISE fnd_api.g_exc_error;
5667: END IF;
5668:
5669: oct_ind := 0;
5662: x_txn_line_dtl_id => l_config_ns_tld_id,
5663: x_return_status => l_return_status);
5664:
5665: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5666: RAISE fnd_api.g_exc_error;
5667: END IF;
5668:
5669: oct_ind := 0;
5670: l_oc_tld_tbl.DELETE;
5676: px_src_tld_tbl => l_temp_src_tld_tbl,
5677: x_src_tld_rec => l_oc_tld_rec,
5678: x_return_status => l_return_status);
5679:
5680: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5681: RAISE fnd_api.g_exc_error;
5682: END IF;
5683:
5684: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5677: x_src_tld_rec => l_oc_tld_rec,
5678: x_return_status => l_return_status);
5679:
5680: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5681: RAISE fnd_api.g_exc_error;
5682: END IF;
5683:
5684: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5685:
5680: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5681: RAISE fnd_api.g_exc_error;
5682: END IF;
5683:
5684: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5685:
5686: oct_ind := oct_ind + 1;
5687: l_oc_tld_tbl(oct_ind) := l_oc_tld_rec;
5688:
5702: p_parent_instance => l_parent_instances(pi_ind),
5703: x_config_instance => l_config_instance,
5704: x_return_status => l_return_status);
5705:
5706: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5707: RAISE fnd_api.g_exc_error;
5708: END IF;
5709:
5710: IF p_config_rec.serial_code in (2, 5) THEN
5703: x_config_instance => l_config_instance,
5704: x_return_status => l_return_status);
5705:
5706: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5707: RAISE fnd_api.g_exc_error;
5708: END IF;
5709:
5710: IF p_config_rec.serial_code in (2, 5) THEN
5711:
5718: mark_and_get_src_tld(
5719: px_src_tld_tbl => l_oc_tld_tbl,
5720: x_src_tld_rec => l_oc_tld_rec,
5721: x_return_status => l_return_status);
5722: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5723: RAISE fnd_api.g_exc_error;
5724: END IF;
5725:
5726: break_relation(
5719: px_src_tld_tbl => l_oc_tld_tbl,
5720: x_src_tld_rec => l_oc_tld_rec,
5721: x_return_status => l_return_status);
5722: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5723: RAISE fnd_api.g_exc_error;
5724: END IF;
5725:
5726: break_relation(
5727: p_relationship_id => sc_inst_rec.relationship_id,
5728: p_relationship_ovn => sc_inst_rec.object_version_number,
5729: px_csi_txn_rec => px_csi_txn_rec,
5730: x_return_status => l_return_status);
5731:
5732: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5733: RAISE fnd_api.g_exc_error;
5734: END IF;
5735:
5736: build_non_source_rec(
5729: px_csi_txn_rec => px_csi_txn_rec,
5730: x_return_status => l_return_status);
5731:
5732: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5733: RAISE fnd_api.g_exc_error;
5734: END IF;
5735:
5736: build_non_source_rec(
5737: p_transaction_line_id => px_default_info_rec.transaction_line_id,
5739: px_default_info_rec => px_default_info_rec,
5740: x_txn_line_dtl_id => l_config_ns_tld_id,
5741: x_return_status => l_return_status);
5742:
5743: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5744: RAISE fnd_api.g_exc_error;
5745: END IF;
5746:
5747: pcm_ind := pcm_ind + 1;
5740: x_txn_line_dtl_id => l_config_ns_tld_id,
5741: x_return_status => l_return_status);
5742:
5743: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5744: RAISE fnd_api.g_exc_error;
5745: END IF;
5746:
5747: pcm_ind := pcm_ind + 1;
5748: l_pcm_tbl(pcm_ind).object_tld_id := l_oc_tld_rec.txn_line_detail_id;
5760: px_src_tld_tbl => l_oc_tld_tbl,
5761: x_src_tld_rec => l_oc_tld_rec,
5762: x_return_status => l_return_status);
5763:
5764: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5765: RAISE fnd_api.g_exc_error;
5766: END IF;
5767:
5768: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num
5761: x_src_tld_rec => l_oc_tld_rec,
5762: x_return_status => l_return_status);
5763:
5764: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5765: RAISE fnd_api.g_exc_error;
5766: END IF;
5767:
5768: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num
5769: THEN
5764: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5765: RAISE fnd_api.g_exc_error;
5766: END IF;
5767:
5768: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num
5769: THEN
5770:
5771: mark_and_get_config(
5772: px_config_instances => l_sub_config_instances,
5780: px_default_info_rec => px_default_info_rec,
5781: x_txn_line_dtl_id => l_sub_config_ns_tld_id,
5782: x_return_status => l_return_status);
5783:
5784: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5785: RAISE fnd_api.g_exc_error;
5786: END IF;
5787:
5788: pcm_ind := pcm_ind + 1;
5781: x_txn_line_dtl_id => l_sub_config_ns_tld_id,
5782: x_return_status => l_return_status);
5783:
5784: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5785: RAISE fnd_api.g_exc_error;
5786: END IF;
5787:
5788: pcm_ind := pcm_ind + 1;
5789: l_pcm_tbl(pcm_ind).object_tld_id := l_oc_tld_rec.txn_line_detail_id;
5807: p_om_vld_org_id => px_default_info_rec.om_vld_org_id,
5808: x_trackable_line_tbl => l_child_line_tbl,
5809: x_return_status => l_return_status);
5810:
5811: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5812: RAISE fnd_api.g_exc_error;
5813: END IF;
5814:
5815: get_ato_options_only(
5808: x_trackable_line_tbl => l_child_line_tbl,
5809: x_return_status => l_return_status);
5810:
5811: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5812: RAISE fnd_api.g_exc_error;
5813: END IF;
5814:
5815: get_ato_options_only(
5816: px_line_tbl => l_child_line_tbl,
5815: get_ato_options_only(
5816: px_line_tbl => l_child_line_tbl,
5817: x_return_status => l_return_status);
5818:
5819: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5820: RAISE fnd_api.g_exc_error;
5821: END IF;
5822:
5823: l_temp_src_tld_tbl := l_src_tld_tbl;
5816: px_line_tbl => l_child_line_tbl,
5817: x_return_status => l_return_status);
5818:
5819: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5820: RAISE fnd_api.g_exc_error;
5821: END IF;
5822:
5823: l_temp_src_tld_tbl := l_src_tld_tbl;
5824:
5834: px_default_info_rec => px_default_info_rec,
5835: px_csi_txn_rec => px_csi_txn_rec,
5836: x_config_instances => l_config_instances,
5837: x_return_status => l_return_status);
5838: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5839: RAISE fnd_api.g_exc_error;
5840: END IF;
5841: END IF;
5842: END IF;
5835: px_csi_txn_rec => px_csi_txn_rec,
5836: x_config_instances => l_config_instances,
5837: x_return_status => l_return_status);
5838: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5839: RAISE fnd_api.g_exc_error;
5840: END IF;
5841: END IF;
5842: END IF;
5843:
5845: get_config_shipped_serials(
5846: px_config_instances => l_config_instances,
5847: x_return_status => l_return_status);
5848:
5849: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5850: RAISE fnd_api.g_exc_error;
5851: END IF;
5852: END IF;
5853:
5846: px_config_instances => l_config_instances,
5847: x_return_status => l_return_status);
5848:
5849: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5850: RAISE fnd_api.g_exc_error;
5851: END IF;
5852: END IF;
5853:
5854: --Addded Code for Bug 14126123
5887: px_default_info_rec => px_default_info_rec,
5888: x_txn_line_dtl_id => l_config_ns_tld_id,
5889: x_return_status => l_return_status);
5890:
5891: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5892: RAISE fnd_api.g_exc_error;
5893: END IF;
5894:
5895: oct_ind := 0;
5888: x_txn_line_dtl_id => l_config_ns_tld_id,
5889: x_return_status => l_return_status);
5890:
5891: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5892: RAISE fnd_api.g_exc_error;
5893: END IF;
5894:
5895: oct_ind := 0;
5896:
5901: px_src_tld_tbl => l_temp_src_tld_tbl,
5902: x_src_tld_rec => l_oc_tld_rec,
5903: x_return_status => l_return_status);
5904:
5905: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5906: RAISE fnd_api.g_exc_error;
5907: END IF;
5908:
5909: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5902: x_src_tld_rec => l_oc_tld_rec,
5903: x_return_status => l_return_status);
5904:
5905: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5906: RAISE fnd_api.g_exc_error;
5907: END IF;
5908:
5909: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5910:
5905: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5906: RAISE fnd_api.g_exc_error;
5907: END IF;
5908:
5909: IF nvl(l_oc_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
5910:
5911: oct_ind := oct_ind + 1;
5912: l_oc_tld_tbl(oct_ind) := l_oc_tld_rec;
5913:
5931: p_api_name => 'get_relationships');
5932:
5933: csi_ii_relationships_pub.get_relationships(
5934: p_api_version => 1.0,
5935: p_commit => fnd_api.g_false,
5936: p_init_msg_list => fnd_api.g_true,
5937: p_validation_level => fnd_api.g_valid_level_full,
5938: p_relationship_query_rec => l_ii_rltns_qry_rec,
5939: p_depth => 1,
5932:
5933: csi_ii_relationships_pub.get_relationships(
5934: p_api_version => 1.0,
5935: p_commit => fnd_api.g_false,
5936: p_init_msg_list => fnd_api.g_true,
5937: p_validation_level => fnd_api.g_valid_level_full,
5938: p_relationship_query_rec => l_ii_rltns_qry_rec,
5939: p_depth => 1,
5940: p_time_stamp => l_time_stamp,
5933: csi_ii_relationships_pub.get_relationships(
5934: p_api_version => 1.0,
5935: p_commit => fnd_api.g_false,
5936: p_init_msg_list => fnd_api.g_true,
5937: p_validation_level => fnd_api.g_valid_level_full,
5938: p_relationship_query_rec => l_ii_rltns_qry_rec,
5939: p_depth => 1,
5940: p_time_stamp => l_time_stamp,
5941: p_active_relationship_only => fnd_api.g_true,
5937: p_validation_level => fnd_api.g_valid_level_full,
5938: p_relationship_query_rec => l_ii_rltns_qry_rec,
5939: p_depth => 1,
5940: p_time_stamp => l_time_stamp,
5941: p_active_relationship_only => fnd_api.g_true,
5942: x_relationship_tbl => l_ii_rltns_tbl,
5943: x_return_status => l_return_status,
5944: x_msg_count => l_msg_count,
5945: x_msg_data => l_msg_data);
5943: x_return_status => l_return_status,
5944: x_msg_count => l_msg_count,
5945: x_msg_data => l_msg_data);
5946:
5947: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5948: RAISE fnd_api.g_exc_error;
5949: END IF;
5950:
5951: debug(' ii relationship count :'||l_ii_rltns_tbl.COUNT);
5944: x_msg_count => l_msg_count,
5945: x_msg_data => l_msg_data);
5946:
5947: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5948: RAISE fnd_api.g_exc_error;
5949: END IF;
5950:
5951: debug(' ii relationship count :'||l_ii_rltns_tbl.COUNT);
5952:
5989: ,x_child_line_tbl => l_child_line_tbl
5990: ,x_return_status => l_return_status
5991: );
5992: debug('After build_option_child_line_tbl, l_child_line_tbl.count : '||l_child_line_tbl.count);
5993: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5994: RAISE fnd_api.g_exc_error;
5995: END IF;
5996: END IF; --And of code added for bug 10329599
5997:
5990: ,x_return_status => l_return_status
5991: );
5992: debug('After build_option_child_line_tbl, l_child_line_tbl.count : '||l_child_line_tbl.count);
5993: IF l_return_status <> fnd_api.g_ret_sts_success THEN
5994: RAISE fnd_api.g_exc_error;
5995: END IF;
5996: END IF; --And of code added for bug 10329599
5997:
5998: IF l_child_line_tbl.COUNT > 0 THEN
6032: px_csi_txn_rec => px_csi_txn_rec,
6033: x_return_status => l_return_status);
6034:
6035: --Included the return status check, as part of fixing bug 4514821
6036: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6037: RAISE fnd_api.g_exc_error;
6038: END IF;
6039: debug('ii relationship count :'||l_ii_rltns_tbl.COUNT);
6040:
6033: x_return_status => l_return_status);
6034:
6035: --Included the return status check, as part of fixing bug 4514821
6036: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6037: RAISE fnd_api.g_exc_error;
6038: END IF;
6039: debug('ii relationship count :'||l_ii_rltns_tbl.COUNT);
6040:
6041:
6056: px_ii_rltns_tbl => l_ii_rltns_tbl,
6057: x_option_ii_rltns_rec => l_option_ii_rltns_rec,
6058: x_return_status => l_return_status);
6059:
6060: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6061: RAISE fnd_api.g_exc_error;
6062: END IF;
6063:
6064: build_non_source_rec(
6057: x_option_ii_rltns_rec => l_option_ii_rltns_rec,
6058: x_return_status => l_return_status);
6059:
6060: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6061: RAISE fnd_api.g_exc_error;
6062: END IF;
6063:
6064: build_non_source_rec(
6065: p_transaction_line_id => px_default_info_rec.transaction_line_id,
6067: px_default_info_rec => px_default_info_rec,
6068: x_txn_line_dtl_id => l_option_ns_tld_id,
6069: x_return_status => l_return_status);
6070:
6071: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6072: RAISE fnd_api.g_exc_error;
6073: END IF;
6074:
6075: IF nvl(l_option_ii_rltns_rec.relationship_id, fnd_api.g_miss_num) <>
6068: x_txn_line_dtl_id => l_option_ns_tld_id,
6069: x_return_status => l_return_status);
6070:
6071: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6072: RAISE fnd_api.g_exc_error;
6073: END IF;
6074:
6075: IF nvl(l_option_ii_rltns_rec.relationship_id, fnd_api.g_miss_num) <>
6076: fnd_api.g_miss_num
6071: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6072: RAISE fnd_api.g_exc_error;
6073: END IF;
6074:
6075: IF nvl(l_option_ii_rltns_rec.relationship_id, fnd_api.g_miss_num) <>
6076: fnd_api.g_miss_num
6077: THEN
6078: break_relation(
6079: p_relationship_id => l_option_ii_rltns_rec.relationship_id,
6072: RAISE fnd_api.g_exc_error;
6073: END IF;
6074:
6075: IF nvl(l_option_ii_rltns_rec.relationship_id, fnd_api.g_miss_num) <>
6076: fnd_api.g_miss_num
6077: THEN
6078: break_relation(
6079: p_relationship_id => l_option_ii_rltns_rec.relationship_id,
6080: p_relationship_ovn => l_option_ii_rltns_rec.object_version_number,
6080: p_relationship_ovn => l_option_ii_rltns_rec.object_version_number,
6081: px_csi_txn_rec => px_csi_txn_rec,
6082: x_return_status => l_return_status);
6083:
6084: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6085: RAISE fnd_api.g_exc_error;
6086: END IF;
6087: END IF;
6088:
6081: px_csi_txn_rec => px_csi_txn_rec,
6082: x_return_status => l_return_status);
6083:
6084: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6085: RAISE fnd_api.g_exc_error;
6086: END IF;
6087: END IF;
6088:
6089: debug(' l_option_ns_tld_id ' || l_option_ns_tld_id);
6086: END IF;
6087: END IF;
6088:
6089: debug(' l_option_ns_tld_id ' || l_option_ns_tld_id);
6090: IF nvl(l_option_ns_tld_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN -- Added if for bug 12653744
6091: pcm_ind := pcm_ind + 1;
6092: l_pcm_tbl(pcm_ind).object_tld_id := l_oc_tld_tbl(l_oc_ind).txn_line_detail_id;
6093: l_pcm_tbl(pcm_ind).subject_tld_id := l_option_ns_tld_id;
6094: END IF;
6104: px_ii_rltns_tbl => l_ii_rltns_tbl,
6105: x_option_ii_rltns_rec => l_option_ii_rltns_rec,
6106: x_return_status => l_return_status);
6107:
6108: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6109: RAISE fnd_api.g_exc_error;
6110: END IF;
6111:
6112: IF nvl(l_option_ii_rltns_rec.subject_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num
6105: x_option_ii_rltns_rec => l_option_ii_rltns_rec,
6106: x_return_status => l_return_status);
6107:
6108: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6109: RAISE fnd_api.g_exc_error;
6110: END IF;
6111:
6112: IF nvl(l_option_ii_rltns_rec.subject_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num
6113: THEN
6108: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6109: RAISE fnd_api.g_exc_error;
6110: END IF;
6111:
6112: IF nvl(l_option_ii_rltns_rec.subject_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num
6113: THEN
6114: build_non_source_rec(
6115: p_transaction_line_id => px_default_info_rec.transaction_line_id,
6116: p_instance_id => l_option_ii_rltns_rec.subject_id,
6117: px_default_info_rec => px_default_info_rec,
6118: x_txn_line_dtl_id => l_option_ns_tld_id,
6119: x_return_status => l_return_status);
6120:
6121: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6122: RAISE fnd_api.g_exc_error;
6123: END IF;
6124:
6125: pcm_ind := pcm_ind + 1;
6118: x_txn_line_dtl_id => l_option_ns_tld_id,
6119: x_return_status => l_return_status);
6120:
6121: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6122: RAISE fnd_api.g_exc_error;
6123: END IF;
6124:
6125: pcm_ind := pcm_ind + 1;
6126: l_pcm_tbl(pcm_ind).object_tld_id := l_oc_tld_tbl(l_oc_ind).txn_line_detail_id;
6150: IF l_pcm_tbl.COUNT > 0 THEN
6151: FOR l_pcm_ind IN l_pcm_tbl.FIRST .. l_pcm_tbl.LAST
6152: LOOP
6153: -- build ii_rltns table
6154: l_t_rltns_tbl(l_pcm_ind).txn_relationship_id := fnd_api.g_miss_num;
6155: l_t_rltns_tbl(l_pcm_ind).transaction_line_id := px_default_info_rec.transaction_line_id;
6156: l_t_rltns_tbl(l_pcm_ind).subject_id := l_pcm_tbl(l_pcm_ind).subject_tld_id;
6157: l_t_rltns_tbl(l_pcm_ind).object_id := l_pcm_tbl(l_pcm_ind).object_tld_id;
6158: l_t_rltns_tbl(l_pcm_ind).relationship_type_code := 'COMPONENT-OF';
6162: END LOOP;
6163:
6164: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
6165: p_api_version => 1.0,
6166: p_commit => fnd_api.g_false,
6167: p_init_msg_list => fnd_api.g_true,
6168: p_validation_level => fnd_api.g_valid_level_full,
6169: px_txn_ii_rltns_tbl => l_t_rltns_tbl,
6170: x_return_status => l_return_status,
6163:
6164: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
6165: p_api_version => 1.0,
6166: p_commit => fnd_api.g_false,
6167: p_init_msg_list => fnd_api.g_true,
6168: p_validation_level => fnd_api.g_valid_level_full,
6169: px_txn_ii_rltns_tbl => l_t_rltns_tbl,
6170: x_return_status => l_return_status,
6171: x_msg_count => l_msg_count,
6164: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
6165: p_api_version => 1.0,
6166: p_commit => fnd_api.g_false,
6167: p_init_msg_list => fnd_api.g_true,
6168: p_validation_level => fnd_api.g_valid_level_full,
6169: px_txn_ii_rltns_tbl => l_t_rltns_tbl,
6170: x_return_status => l_return_status,
6171: x_msg_count => l_msg_count,
6172: x_msg_data => l_msg_data);
6169: px_txn_ii_rltns_tbl => l_t_rltns_tbl,
6170: x_return_status => l_return_status,
6171: x_msg_count => l_msg_count,
6172: x_msg_data => l_msg_data);
6173: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6174: RAISe fnd_api.g_exc_error;
6175: END IF;
6176:
6177: END IF; -- pcm tbl count > 0
6170: x_return_status => l_return_status,
6171: x_msg_count => l_msg_count,
6172: x_msg_data => l_msg_data);
6173: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6174: RAISe fnd_api.g_exc_error;
6175: END IF;
6176:
6177: END IF; -- pcm tbl count > 0
6178:
6186: px_default_info_rec => px_default_info_rec,
6187: px_csi_txn_rec => px_csi_txn_rec,
6188: x_return_status => l_return_status);
6189:
6190: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6191: debug('Error from build_child_relation_lines');
6192: RAISe fnd_api.g_exc_error;
6193: END IF;
6194:
6188: x_return_status => l_return_status);
6189:
6190: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6191: debug('Error from build_child_relation_lines');
6192: RAISe fnd_api.g_exc_error;
6193: END IF;
6194:
6195: END IF; -- l_non_wip_child_line_tbl.COUNT > 0
6196: -- End Bug 10248175
6195: END IF; -- l_non_wip_child_line_tbl.COUNT > 0
6196: -- End Bug 10248175
6197:
6198: EXCEPTION
6199: WHEN fnd_api.g_exc_error THEN
6200: x_return_status := fnd_api.g_ret_sts_error;
6201: END rebuild_relation_for_ato;
6202:
6203: -- child order line instances should get hooked in to the ib trackable parent order line
6196: -- End Bug 10248175
6197:
6198: EXCEPTION
6199: WHEN fnd_api.g_exc_error THEN
6200: x_return_status := fnd_api.g_ret_sts_error;
6201: END rebuild_relation_for_ato;
6202:
6203: -- child order line instances should get hooked in to the ib trackable parent order line
6204: PROCEDURE build_parent_relation(
6234: l_i_ind binary_integer := 0;
6235: l_object_id number;
6236: l_subject_id number;
6237:
6238: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6239: l_msg_data varchar2(2000);
6240: l_msg_count number;
6241:
6242:
6250:
6251: BEGIN
6252:
6253:
6254: x_return_status := fnd_api.g_ret_sts_success;
6255: api_log('build_parent_relation');
6256:
6257: l_config_instances := p_config_instances;
6258:
6261: p_om_vld_org_id => px_default_info_rec.om_vld_org_id,
6262: x_parent_line_rec => l_parent_line_rec,
6263: x_return_status => l_return_status);
6264:
6265: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6266: RAISE fnd_api.g_exc_error;
6267: END IF;
6268:
6269: IF nvl(l_parent_line_rec.line_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6262: x_parent_line_rec => l_parent_line_rec,
6263: x_return_status => l_return_status);
6264:
6265: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6266: RAISE fnd_api.g_exc_error;
6267: END IF;
6268:
6269: IF nvl(l_parent_line_rec.line_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6270:
6265: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6266: RAISE fnd_api.g_exc_error;
6267: END IF;
6268:
6269: IF nvl(l_parent_line_rec.line_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6270:
6271: get_tld(
6272: p_source_table => 'OE_ORDER_LINES_ALL',
6273: p_source_id => p_order_line_rec.line_id,
6275: p_processing_status => 'IN_PROCESS',
6276: x_line_dtl_tbl => l_line_dtl_tbl,
6277: x_return_status => l_return_status);
6278:
6279: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6280: RAISE fnd_api.g_exc_error;
6281: END IF;
6282:
6283: l_child_of_sub_ato_mdl := 'N';
6276: x_line_dtl_tbl => l_line_dtl_tbl,
6277: x_return_status => l_return_status);
6278:
6279: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6280: RAISE fnd_api.g_exc_error;
6281: END IF;
6282:
6283: l_child_of_sub_ato_mdl := 'N';
6284:
6299: AND
6300: p_order_line_rec.ato_line_id = l_parent_line_rec.line_id
6301: )
6302: THEN
6303: IF nvl(p_config_rec.line_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6304: oe_line_util.query_row(
6305: p_line_id => p_config_rec.line_id,
6306: x_line_rec => l_parent_line_rec);
6307: END IF;
6322: px_default_info_rec => px_default_info_rec,
6323: px_csi_txn_rec => px_csi_txn_rec,
6324: x_config_instances => l_config_instances,
6325: x_return_status => l_return_status);
6326: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6327: RAISE fnd_api.g_exc_error;
6328: END IF;
6329:
6330: END IF;
6323: px_csi_txn_rec => px_csi_txn_rec,
6324: x_config_instances => l_config_instances,
6325: x_return_status => l_return_status);
6326: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6327: RAISE fnd_api.g_exc_error;
6328: END IF;
6329:
6330: END IF;
6331: END IF;
6345: split_txn_dtls_with_ratio(
6346: p_quantity_ratio => l_qty_ratio,
6347: px_line_dtl_tbl => l_line_dtl_tbl,
6348: x_return_status => l_return_status);
6349: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6350: RAISE fnd_api.g_exc_error;
6351: END IF;
6352:
6353: END IF;
6346: p_quantity_ratio => l_qty_ratio,
6347: px_line_dtl_tbl => l_line_dtl_tbl,
6348: x_return_status => l_return_status);
6349: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6350: RAISE fnd_api.g_exc_error;
6351: END IF;
6352:
6353: END IF;
6354:
6380: p_pkg_name => 'csi_item_instance_pub');
6381:
6382: csi_item_instance_pub.get_item_instances(
6383: p_api_version => 1.0,
6384: p_commit => fnd_api.g_false,
6385: p_init_msg_list => fnd_api.g_true,
6386: p_validation_level => fnd_api.g_valid_level_full,
6387: p_instance_query_rec => l_inst_query_rec,
6388: p_party_query_rec => l_party_query_rec,
6381:
6382: csi_item_instance_pub.get_item_instances(
6383: p_api_version => 1.0,
6384: p_commit => fnd_api.g_false,
6385: p_init_msg_list => fnd_api.g_true,
6386: p_validation_level => fnd_api.g_valid_level_full,
6387: p_instance_query_rec => l_inst_query_rec,
6388: p_party_query_rec => l_party_query_rec,
6389: p_account_query_rec => l_pty_acct_query_rec,
6382: csi_item_instance_pub.get_item_instances(
6383: p_api_version => 1.0,
6384: p_commit => fnd_api.g_false,
6385: p_init_msg_list => fnd_api.g_true,
6386: p_validation_level => fnd_api.g_valid_level_full,
6387: p_instance_query_rec => l_inst_query_rec,
6388: p_party_query_rec => l_party_query_rec,
6389: p_account_query_rec => l_pty_acct_query_rec,
6390: p_transaction_id => null,
6387: p_instance_query_rec => l_inst_query_rec,
6388: p_party_query_rec => l_party_query_rec,
6389: p_account_query_rec => l_pty_acct_query_rec,
6390: p_transaction_id => null,
6391: p_resolve_id_columns => fnd_api.g_false,
6392: p_active_instance_only => fnd_api.g_true,
6393: x_instance_header_tbl => l_instance_hdr_tbl,
6394: x_return_status => l_return_status,
6395: x_msg_count => l_msg_count,
6388: p_party_query_rec => l_party_query_rec,
6389: p_account_query_rec => l_pty_acct_query_rec,
6390: p_transaction_id => null,
6391: p_resolve_id_columns => fnd_api.g_false,
6392: p_active_instance_only => fnd_api.g_true,
6393: x_instance_header_tbl => l_instance_hdr_tbl,
6394: x_return_status => l_return_status,
6395: x_msg_count => l_msg_count,
6396: x_msg_data => l_msg_data );
6394: x_return_status => l_return_status,
6395: x_msg_count => l_msg_count,
6396: x_msg_data => l_msg_data );
6397:
6398: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6399: RAISE fnd_api.g_exc_error;
6400: END IF;
6401:
6402: IF l_instance_hdr_tbl.COUNT > 0 THEN
6395: x_msg_count => l_msg_count,
6396: x_msg_data => l_msg_data );
6397:
6398: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6399: RAISE fnd_api.g_exc_error;
6400: END IF;
6401:
6402: IF l_instance_hdr_tbl.COUNT > 0 THEN
6403: l_instance_found := TRUE;
6421: eliminate_reshipped_instances(
6422: p_config_instances => l_config_instances,
6423: px_instances_tbl => l_instance_tbl,
6424: x_return_status => l_return_status);
6425: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6426: RAISE fnd_api.g_exc_error;
6427: END IF;
6428: END IF;
6429:
6422: p_config_instances => l_config_instances,
6423: px_instances_tbl => l_instance_tbl,
6424: x_return_status => l_return_status);
6425: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6426: RAISE fnd_api.g_exc_error;
6427: END IF;
6428: END IF;
6429:
6430: IF l_instance_tbl.COUNT > 0 THEN
6437: px_default_info_rec => px_default_info_rec,
6438: x_txn_line_dtl_id => l_ns_tld_id,
6439: x_return_status => l_return_status);
6440:
6441: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6442: raise fnd_api.g_exc_error;
6443: END IF;
6444:
6445: l_object_id := l_ns_tld_id;
6438: x_txn_line_dtl_id => l_ns_tld_id,
6439: x_return_status => l_return_status);
6440:
6441: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6442: raise fnd_api.g_exc_error;
6443: END IF;
6444:
6445: l_object_id := l_ns_tld_id;
6446:
6455: px_src_tld_tbl => l_line_dtl_tbl,
6456: x_src_tld_rec => l_child_tld_rec,
6457: x_return_status => l_return_status);
6458:
6459: IF nvl(l_child_tld_rec.txn_line_detail_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
6460:
6461: l_subject_id := l_child_tld_rec.txn_line_detail_id;
6462: l_qty_allocated := l_qty_allocated + l_child_tld_rec.quantity;
6463:
6474:
6475: l_t_iir_tbl.DELETE;
6476:
6477: -- build ii_rltns table
6478: l_t_iir_tbl(1).txn_relationship_id := fnd_api.g_miss_num;
6479: l_t_iir_tbl(1).transaction_line_id := p_txn_line_rec.transaction_line_id;
6480: l_t_iir_tbl(1).subject_id := l_subject_id;
6481: l_t_iir_tbl(1).object_id := l_object_id;
6482: l_t_iir_tbl(1).relationship_type_code := 'COMPONENT-OF';
6485: l_t_iir_tbl(1).object_type := 'T';
6486:
6487: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
6488: p_api_version => 1.0,
6489: p_commit => fnd_api.g_false,
6490: p_init_msg_list => fnd_api.g_true,
6491: p_validation_level => fnd_api.g_valid_level_full,
6492: px_txn_ii_rltns_tbl => l_t_iir_tbl,
6493: x_return_status => l_return_status,
6486:
6487: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
6488: p_api_version => 1.0,
6489: p_commit => fnd_api.g_false,
6490: p_init_msg_list => fnd_api.g_true,
6491: p_validation_level => fnd_api.g_valid_level_full,
6492: px_txn_ii_rltns_tbl => l_t_iir_tbl,
6493: x_return_status => l_return_status,
6494: x_msg_count => l_msg_count,
6487: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
6488: p_api_version => 1.0,
6489: p_commit => fnd_api.g_false,
6490: p_init_msg_list => fnd_api.g_true,
6491: p_validation_level => fnd_api.g_valid_level_full,
6492: px_txn_ii_rltns_tbl => l_t_iir_tbl,
6493: x_return_status => l_return_status,
6494: x_msg_count => l_msg_count,
6495: x_msg_data => l_msg_data);
6493: x_return_status => l_return_status,
6494: x_msg_count => l_msg_count,
6495: x_msg_data => l_msg_data);
6496:
6497: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6498: RAISE fnd_api.g_exc_error;
6499: END IF;
6500:
6501: IF l_satisfied = 'Y' THEN
6494: x_msg_count => l_msg_count,
6495: x_msg_data => l_msg_data);
6496:
6497: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6498: RAISE fnd_api.g_exc_error;
6499: END IF;
6500:
6501: IF l_satisfied = 'Y' THEN
6502: exit;
6515:
6516: END IF; -- found an ib trackable parent
6517:
6518: EXCEPTION
6519: WHEN fnd_api.g_exc_error THEN
6520: x_return_status := fnd_api.g_ret_sts_error;
6521: END build_parent_relation;
6522:
6523: PROCEDURE mark_and_get_instances(
6516: END IF; -- found an ib trackable parent
6517:
6518: EXCEPTION
6519: WHEN fnd_api.g_exc_error THEN
6520: x_return_status := fnd_api.g_ret_sts_error;
6521: END build_parent_relation;
6522:
6523: PROCEDURE mark_and_get_instances(
6524: p_qty_ratio IN number,
6533: l_old_qty number;
6534: x_ind binary_integer := 0;
6535: px_ind binary_integer := 0;
6536: --fix for bug5096435
6537: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6538: l_new_instance_rec csi_datastructures_pub.instance_rec;
6539: BEGIN
6540: x_return_status := fnd_api.g_ret_sts_success;
6541: api_log('mark_and_get_instances');
6536: --fix for bug5096435
6537: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6538: l_new_instance_rec csi_datastructures_pub.instance_rec;
6539: BEGIN
6540: x_return_status := fnd_api.g_ret_sts_success;
6541: api_log('mark_and_get_instances');
6542:
6543: l_satisfied := 'N';
6544: IF px_instance_tbl.COUNT > 0 THEN
6568: p_quantity => l_new_qty,
6569: px_csi_txn_rec => px_csi_txn_rec,
6570: x_instance_rec => l_new_instance_rec,
6571: x_return_status => l_return_status);
6572: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6573: RAISE fnd_api.g_exc_error;
6574: END IF;
6575: debug('New instance created after splitiing : ' || l_new_instance_rec.instance_id);
6576: px_instance_tbl(px_instance_tbl.LAST+1) := l_new_instance_rec;
6569: px_csi_txn_rec => px_csi_txn_rec,
6570: x_instance_rec => l_new_instance_rec,
6571: x_return_status => l_return_status);
6572: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6573: RAISE fnd_api.g_exc_error;
6574: END IF;
6575: debug('New instance created after splitiing : ' || l_new_instance_rec.instance_id);
6576: px_instance_tbl(px_instance_tbl.LAST+1) := l_new_instance_rec;
6577: px_instance_tbl.DELETE(px_ind);
6620: l_object_id number;
6621: l_subject_id number;
6622: l_ns_tld_id number;
6623:
6624: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6625: l_msg_data varchar2(2000);
6626: l_msg_count number;
6627:
6628: BEGIN
6625: l_msg_data varchar2(2000);
6626: l_msg_count number;
6627:
6628: BEGIN
6629: x_return_status := fnd_api.g_ret_sts_success;
6630: api_log('build_child_relation_lines');
6631:
6632: l_child_line_tbl := p_child_line_tbl;
6633:
6663: p_processing_status => 'IN_PROCESS',
6664: x_line_dtl_tbl => l_tld_tbl,
6665: x_return_status => l_return_status);
6666:
6667: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6668: RAISE fnd_api.g_exc_error;
6669: END IF;
6670:
6671: FOR l_ind in l_child_line_tbl.FIRST..l_child_line_tbl.LAST
6664: x_line_dtl_tbl => l_tld_tbl,
6665: x_return_status => l_return_status);
6666:
6667: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6668: RAISE fnd_api.g_exc_error;
6669: END IF;
6670:
6671: FOR l_ind in l_child_line_tbl.FIRST..l_child_line_tbl.LAST
6672: LOOP
6716: p_pkg_name => 'csi_item_instance_pub');
6717:
6718: csi_item_instance_pub.get_item_instances(
6719: p_api_version => 1.0,
6720: p_commit => fnd_api.g_false,
6721: p_init_msg_list => fnd_api.g_true,
6722: p_validation_level => fnd_api.g_valid_level_full,
6723: p_instance_query_rec => l_inst_query_rec,
6724: p_party_query_rec => l_party_query_rec,
6717:
6718: csi_item_instance_pub.get_item_instances(
6719: p_api_version => 1.0,
6720: p_commit => fnd_api.g_false,
6721: p_init_msg_list => fnd_api.g_true,
6722: p_validation_level => fnd_api.g_valid_level_full,
6723: p_instance_query_rec => l_inst_query_rec,
6724: p_party_query_rec => l_party_query_rec,
6725: p_account_query_rec => l_pty_acct_query_rec,
6718: csi_item_instance_pub.get_item_instances(
6719: p_api_version => 1.0,
6720: p_commit => fnd_api.g_false,
6721: p_init_msg_list => fnd_api.g_true,
6722: p_validation_level => fnd_api.g_valid_level_full,
6723: p_instance_query_rec => l_inst_query_rec,
6724: p_party_query_rec => l_party_query_rec,
6725: p_account_query_rec => l_pty_acct_query_rec,
6726: p_transaction_id => null,
6723: p_instance_query_rec => l_inst_query_rec,
6724: p_party_query_rec => l_party_query_rec,
6725: p_account_query_rec => l_pty_acct_query_rec,
6726: p_transaction_id => null,
6727: p_resolve_id_columns => fnd_api.g_false,
6728: p_active_instance_only => fnd_api.g_true,
6729: x_instance_header_tbl => l_instance_hdr_tbl,
6730: x_return_status => l_return_status,
6731: x_msg_count => l_msg_count,
6724: p_party_query_rec => l_party_query_rec,
6725: p_account_query_rec => l_pty_acct_query_rec,
6726: p_transaction_id => null,
6727: p_resolve_id_columns => fnd_api.g_false,
6728: p_active_instance_only => fnd_api.g_true,
6729: x_instance_header_tbl => l_instance_hdr_tbl,
6730: x_return_status => l_return_status,
6731: x_msg_count => l_msg_count,
6732: x_msg_data => l_msg_data);
6730: x_return_status => l_return_status,
6731: x_msg_count => l_msg_count,
6732: x_msg_data => l_msg_data);
6733:
6734: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6735: RAISE fnd_api.g_exc_error;
6736: END IF;
6737:
6738: IF l_instance_hdr_tbl.COUNT > 0 THEN
6731: x_msg_count => l_msg_count,
6732: x_msg_data => l_msg_data);
6733:
6734: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6735: RAISE fnd_api.g_exc_error;
6736: END IF;
6737:
6738: IF l_instance_hdr_tbl.COUNT > 0 THEN
6739: debug('instances found for the child order line COUNT : '||l_instance_hdr_tbl.COUNT);
6770: p_instance_header_tbl => l_temp_instance_hdr_tbl,
6771: x_instance_tbl => l_instance_tbl,
6772: x_return_status => l_return_status);
6773:
6774: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6775: RAISE fnd_api.g_exc_error;
6776: END IF;
6777:
6778: l_temp_instance_hdr_tbl.DELETE;
6771: x_instance_tbl => l_instance_tbl,
6772: x_return_status => l_return_status);
6773:
6774: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6775: RAISE fnd_api.g_exc_error;
6776: END IF;
6777:
6778: l_temp_instance_hdr_tbl.DELETE;
6779: FOR t_ind IN l_tld_tbl.FIRST .. l_tld_tbl.LAST
6788: px_csi_txn_rec => px_csi_txn_rec,
6789: x_instance_tbl => l_alloc_instance_tbl,
6790: x_return_status => l_return_status);
6791:
6792: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6793: RAISE fnd_api.g_exc_error;
6794: END IF;
6795:
6796: FOR a_ind IN l_alloc_instance_tbl.FIRST .. l_alloc_instance_tbl.LAST
6789: x_instance_tbl => l_alloc_instance_tbl,
6790: x_return_status => l_return_status);
6791:
6792: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6793: RAISE fnd_api.g_exc_error;
6794: END IF;
6795:
6796: FOR a_ind IN l_alloc_instance_tbl.FIRST .. l_alloc_instance_tbl.LAST
6797: LOOP
6804: px_default_info_rec => px_default_info_rec,
6805: x_txn_line_dtl_id => l_ns_tld_id,
6806: x_return_status => l_return_status);
6807:
6808: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6809: RAISE fnd_api.g_exc_error;
6810: END IF;
6811:
6812: l_object_id := l_tld_tbl(t_ind).txn_line_detail_id;
6805: x_txn_line_dtl_id => l_ns_tld_id,
6806: x_return_status => l_return_status);
6807:
6808: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6809: RAISE fnd_api.g_exc_error;
6810: END IF;
6811:
6812: l_object_id := l_tld_tbl(t_ind).txn_line_detail_id;
6813: l_subject_id := l_ns_tld_id;
6817:
6818: -- create ii_relationship
6819: l_t_iir_tbl.DELETE;
6820: -- build ii_rltns table
6821: l_t_iir_tbl(1).txn_relationship_id := fnd_api.g_miss_num;
6822: l_t_iir_tbl(1).transaction_line_id := px_default_info_rec.transaction_line_id;
6823: l_t_iir_tbl(1).subject_id := l_subject_id;
6824: l_t_iir_tbl(1).object_id := l_object_id;
6825: l_t_iir_tbl(1).relationship_type_code := 'COMPONENT-OF';
6828: l_t_iir_tbl(1).object_type := 'T';
6829:
6830: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
6831: p_api_version => 1.0,
6832: p_commit => fnd_api.g_false,
6833: p_init_msg_list => fnd_api.g_true,
6834: p_validation_level => fnd_api.g_valid_level_full,
6835: px_txn_ii_rltns_tbl => l_t_iir_tbl,
6836: x_return_status => l_return_status,
6829:
6830: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
6831: p_api_version => 1.0,
6832: p_commit => fnd_api.g_false,
6833: p_init_msg_list => fnd_api.g_true,
6834: p_validation_level => fnd_api.g_valid_level_full,
6835: px_txn_ii_rltns_tbl => l_t_iir_tbl,
6836: x_return_status => l_return_status,
6837: x_msg_count => l_msg_count,
6830: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
6831: p_api_version => 1.0,
6832: p_commit => fnd_api.g_false,
6833: p_init_msg_list => fnd_api.g_true,
6834: p_validation_level => fnd_api.g_valid_level_full,
6835: px_txn_ii_rltns_tbl => l_t_iir_tbl,
6836: x_return_status => l_return_status,
6837: x_msg_count => l_msg_count,
6838: x_msg_data => l_msg_data);
6836: x_return_status => l_return_status,
6837: x_msg_count => l_msg_count,
6838: x_msg_data => l_msg_data);
6839:
6840: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6841: RAISE fnd_api.g_exc_error;
6842: END IF;
6843:
6844: END LOOP; --<
6837: x_msg_count => l_msg_count,
6838: x_msg_data => l_msg_data);
6839:
6840: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6841: RAISE fnd_api.g_exc_error;
6842: END IF;
6843:
6844: END LOOP; --<
6845:
6850: END IF; --<
6851:
6852:
6853: EXCEPTION
6854: WHEN fnd_api.g_exc_error THEN
6855: debug('Error - g_exc_error in build_child_relation_lines');
6856: x_return_status := fnd_api.g_ret_sts_error;
6857: WHEN OTHERS THEN
6858: debug('Exception - OTHERS in build_child_relation_lines');
6852:
6853: EXCEPTION
6854: WHEN fnd_api.g_exc_error THEN
6855: debug('Error - g_exc_error in build_child_relation_lines');
6856: x_return_status := fnd_api.g_ret_sts_error;
6857: WHEN OTHERS THEN
6858: debug('Exception - OTHERS in build_child_relation_lines');
6859: debug('Exception Message - ' || substr(SQLERRM, 1, 255));
6860: x_return_status := fnd_api.g_ret_sts_error;
6856: x_return_status := fnd_api.g_ret_sts_error;
6857: WHEN OTHERS THEN
6858: debug('Exception - OTHERS in build_child_relation_lines');
6859: debug('Exception Message - ' || substr(SQLERRM, 1, 255));
6860: x_return_status := fnd_api.g_ret_sts_error;
6861: END build_child_relation_lines;
6862:
6863:
6864:
6895: l_object_id number;
6896: l_subject_id number;
6897: l_t_iir_tbl csi_t_datastructures_grp.txn_ii_rltns_tbl;
6898:
6899: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
6900: l_msg_data varchar2(2000);
6901: l_msg_count number;
6902:
6903: --fix for bug5096435
6909: l_temp_index number := 0;
6910:
6911: BEGIN
6912:
6913: x_return_status := fnd_api.g_ret_sts_success;
6914: api_log('build_child_relation');
6915:
6916: get_ib_trackable_children(
6917: p_current_line_id => p_order_line_rec.line_id,
6918: p_om_vld_org_id => px_default_info_rec.om_vld_org_id,
6919: x_trackable_line_tbl => l_child_line_tbl,
6920: x_return_status => l_return_status);
6921:
6922: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6923: RAISE fnd_api.g_exc_error;
6924: END IF;
6925:
6926: --fix for bug5096435
6919: x_trackable_line_tbl => l_child_line_tbl,
6920: x_return_status => l_return_status);
6921:
6922: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6923: RAISE fnd_api.g_exc_error;
6924: END IF;
6925:
6926: --fix for bug5096435
6927: --Here child_line_tbl is sorted and rearranged to ensure that
6955: p_processing_status => 'IN_PROCESS',
6956: x_line_dtl_tbl => l_tld_tbl,
6957: x_return_status => l_return_status);
6958:
6959: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6960: RAISE fnd_api.g_exc_error;
6961: END IF;
6962:
6963: FOR l_ind in l_child_line_tbl.FIRST..l_child_line_tbl.LAST
6956: x_line_dtl_tbl => l_tld_tbl,
6957: x_return_status => l_return_status);
6958:
6959: IF l_return_status <> fnd_api.g_ret_sts_success THEN
6960: RAISE fnd_api.g_exc_error;
6961: END IF;
6962:
6963: FOR l_ind in l_child_line_tbl.FIRST..l_child_line_tbl.LAST
6964: LOOP
7010: p_pkg_name => 'csi_item_instance_pub');
7011:
7012: csi_item_instance_pub.get_item_instances(
7013: p_api_version => 1.0,
7014: p_commit => fnd_api.g_false,
7015: p_init_msg_list => fnd_api.g_true,
7016: p_validation_level => fnd_api.g_valid_level_full,
7017: p_instance_query_rec => l_inst_query_rec,
7018: p_party_query_rec => l_party_query_rec,
7011:
7012: csi_item_instance_pub.get_item_instances(
7013: p_api_version => 1.0,
7014: p_commit => fnd_api.g_false,
7015: p_init_msg_list => fnd_api.g_true,
7016: p_validation_level => fnd_api.g_valid_level_full,
7017: p_instance_query_rec => l_inst_query_rec,
7018: p_party_query_rec => l_party_query_rec,
7019: p_account_query_rec => l_pty_acct_query_rec,
7012: csi_item_instance_pub.get_item_instances(
7013: p_api_version => 1.0,
7014: p_commit => fnd_api.g_false,
7015: p_init_msg_list => fnd_api.g_true,
7016: p_validation_level => fnd_api.g_valid_level_full,
7017: p_instance_query_rec => l_inst_query_rec,
7018: p_party_query_rec => l_party_query_rec,
7019: p_account_query_rec => l_pty_acct_query_rec,
7020: p_transaction_id => null,
7017: p_instance_query_rec => l_inst_query_rec,
7018: p_party_query_rec => l_party_query_rec,
7019: p_account_query_rec => l_pty_acct_query_rec,
7020: p_transaction_id => null,
7021: p_resolve_id_columns => fnd_api.g_false,
7022: p_active_instance_only => fnd_api.g_true,
7023: x_instance_header_tbl => l_instance_hdr_tbl,
7024: x_return_status => l_return_status,
7025: x_msg_count => l_msg_count,
7018: p_party_query_rec => l_party_query_rec,
7019: p_account_query_rec => l_pty_acct_query_rec,
7020: p_transaction_id => null,
7021: p_resolve_id_columns => fnd_api.g_false,
7022: p_active_instance_only => fnd_api.g_true,
7023: x_instance_header_tbl => l_instance_hdr_tbl,
7024: x_return_status => l_return_status,
7025: x_msg_count => l_msg_count,
7026: x_msg_data => l_msg_data);
7024: x_return_status => l_return_status,
7025: x_msg_count => l_msg_count,
7026: x_msg_data => l_msg_data);
7027:
7028: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7029: RAISE fnd_api.g_exc_error;
7030: END IF;
7031:
7032: debug('instances found for the child order line COUNT : '||l_instance_hdr_tbl.COUNT);
7025: x_msg_count => l_msg_count,
7026: x_msg_data => l_msg_data);
7027:
7028: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7029: RAISE fnd_api.g_exc_error;
7030: END IF;
7031:
7032: debug('instances found for the child order line COUNT : '||l_instance_hdr_tbl.COUNT);
7033: --fix for bug5096435
7062: p_instance_header_tbl => l_temp_instance_hdr_tbl, --end of fix for bug5096435
7063: x_instance_tbl => l_instance_tbl,
7064: x_return_status => l_return_status);
7065:
7066: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7067: RAISE fnd_api.g_exc_error;
7068: END IF;
7069:
7070: l_temp_instance_hdr_tbl.DELETE;
7063: x_instance_tbl => l_instance_tbl,
7064: x_return_status => l_return_status);
7065:
7066: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7067: RAISE fnd_api.g_exc_error;
7068: END IF;
7069:
7070: l_temp_instance_hdr_tbl.DELETE;
7071: FOR t_ind IN l_tld_tbl.FIRST .. l_tld_tbl.LAST
7081: px_csi_txn_rec => px_csi_txn_rec,
7082: x_instance_tbl => l_alloc_instance_tbl,
7083: x_return_status => l_return_status);
7084:
7085: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7086: RAISE fnd_api.g_exc_error;
7087: END IF;
7088:
7089: FOR a_ind IN l_alloc_instance_tbl.FIRST .. l_alloc_instance_tbl.LAST
7082: x_instance_tbl => l_alloc_instance_tbl,
7083: x_return_status => l_return_status);
7084:
7085: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7086: RAISE fnd_api.g_exc_error;
7087: END IF;
7088:
7089: FOR a_ind IN l_alloc_instance_tbl.FIRST .. l_alloc_instance_tbl.LAST
7090: LOOP
7095: px_default_info_rec => px_default_info_rec,
7096: x_txn_line_dtl_id => l_ns_tld_id,
7097: x_return_status => l_return_status);
7098:
7099: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7100: RAISE fnd_api.g_exc_error;
7101: END IF;
7102:
7103: l_object_id := l_tld_tbl(t_ind).txn_line_detail_id;
7096: x_txn_line_dtl_id => l_ns_tld_id,
7097: x_return_status => l_return_status);
7098:
7099: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7100: RAISE fnd_api.g_exc_error;
7101: END IF;
7102:
7103: l_object_id := l_tld_tbl(t_ind).txn_line_detail_id;
7104: l_subject_id := l_ns_tld_id;
7105:
7106: -- create ii_relationship
7107: l_t_iir_tbl.DELETE;
7108: -- build ii_rltns table
7109: l_t_iir_tbl(1).txn_relationship_id := fnd_api.g_miss_num;
7110: l_t_iir_tbl(1).transaction_line_id := p_txn_line_rec.transaction_line_id;
7111: l_t_iir_tbl(1).subject_id := l_subject_id;
7112: l_t_iir_tbl(1).object_id := l_object_id;
7113: l_t_iir_tbl(1).relationship_type_code := 'COMPONENT-OF';
7116: l_t_iir_tbl(1).object_type := 'T';
7117:
7118: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
7119: p_api_version => 1.0,
7120: p_commit => fnd_api.g_false,
7121: p_init_msg_list => fnd_api.g_true,
7122: p_validation_level => fnd_api.g_valid_level_full,
7123: px_txn_ii_rltns_tbl => l_t_iir_tbl,
7124: x_return_status => l_return_status,
7117:
7118: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
7119: p_api_version => 1.0,
7120: p_commit => fnd_api.g_false,
7121: p_init_msg_list => fnd_api.g_true,
7122: p_validation_level => fnd_api.g_valid_level_full,
7123: px_txn_ii_rltns_tbl => l_t_iir_tbl,
7124: x_return_status => l_return_status,
7125: x_msg_count => l_msg_count,
7118: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
7119: p_api_version => 1.0,
7120: p_commit => fnd_api.g_false,
7121: p_init_msg_list => fnd_api.g_true,
7122: p_validation_level => fnd_api.g_valid_level_full,
7123: px_txn_ii_rltns_tbl => l_t_iir_tbl,
7124: x_return_status => l_return_status,
7125: x_msg_count => l_msg_count,
7126: x_msg_data => l_msg_data);
7124: x_return_status => l_return_status,
7125: x_msg_count => l_msg_count,
7126: x_msg_data => l_msg_data);
7127:
7128: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7129: RAISE fnd_api.g_exc_error;
7130: END IF;
7131:
7132: END LOOP; --<
7125: x_msg_count => l_msg_count,
7126: x_msg_data => l_msg_data);
7127:
7128: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7129: RAISE fnd_api.g_exc_error;
7130: END IF;
7131:
7132: END LOOP; --<
7133:
7137: END LOOP; --<
7138: END IF; --<
7139:
7140: EXCEPTION
7141: WHEN fnd_api.g_exc_error THEN
7142: x_return_status := fnd_api.g_ret_sts_error;
7143: END build_child_relation;
7144:
7145: /* the wip issued instances for the ato options using the configured item */
7138: END IF; --<
7139:
7140: EXCEPTION
7141: WHEN fnd_api.g_exc_error THEN
7142: x_return_status := fnd_api.g_ret_sts_error;
7143: END build_child_relation;
7144:
7145: /* the wip issued instances for the ato options using the configured item */
7146: /* to wip job link and converts them as customer products and build the */
7174: l_return_status varchar2(1);
7175:
7176: BEGIN
7177:
7178: x_return_status := fnd_api.g_ret_sts_success;
7179:
7180: api_log('process_ato_option_nsrl');
7181:
7182: --assign the values for the csi_txn_rec
7210: px_csi_txn_rec => l_csi_txn_rec,
7211: x_wip_instances => l_wip_instances,
7212: x_return_status => l_return_status);
7213:
7214: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7215: RAISE fnd_api.g_exc_error;
7216: END IF;
7217:
7218: /* get the ib_trackable parent for the option item line */
7211: x_wip_instances => l_wip_instances,
7212: x_return_status => l_return_status);
7213:
7214: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7215: RAISE fnd_api.g_exc_error;
7216: END IF;
7217:
7218: /* get the ib_trackable parent for the option item line */
7219: csi_order_fulfill_pub.get_ib_trackable_parent(
7221: p_om_vld_org_id => px_default_info_rec.om_vld_org_id,
7222: x_parent_line_rec => l_parent_line_rec,
7223: x_return_status => l_return_status);
7224:
7225: IF x_return_status <> fnd_api.g_ret_sts_success THEN
7226: RAISE fnd_api.g_exc_error;
7227: END IF;
7228:
7229: l_parent_instances.DELETE;
7222: x_parent_line_rec => l_parent_line_rec,
7223: x_return_status => l_return_status);
7224:
7225: IF x_return_status <> fnd_api.g_ret_sts_success THEN
7226: RAISE fnd_api.g_exc_error;
7227: END IF;
7228:
7229: l_parent_instances.DELETE;
7230:
7227: END IF;
7228:
7229: l_parent_instances.DELETE;
7230:
7231: IF nvl(l_parent_line_rec.line_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
7232:
7233: l_qty_ratio := p_order_line_rec.ordered_quantity/l_parent_line_rec.ordered_quantity;
7234:
7235: debug(' parent_child_ratio :'||l_qty_ratio);
7280: px_csi_txn_rec => l_csi_txn_rec,
7281: px_wip_instances => l_wip_instances,
7282: x_return_status => l_return_status);
7283:
7284: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7285: RAISE fnd_api.g_exc_error;
7286: END IF;
7287:
7288: IF l_wip_instances.COUNT > 0 THEN
7281: px_wip_instances => l_wip_instances,
7282: x_return_status => l_return_status);
7283:
7284: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7285: RAISE fnd_api.g_exc_error;
7286: END IF;
7287:
7288: IF l_wip_instances.COUNT > 0 THEN
7289:
7295: px_default_info_rec => px_default_info_rec,
7296: px_csi_txn_rec => l_csi_txn_rec,
7297: x_return_status => l_return_status);
7298:
7299: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7300: RAISE fnd_api.g_exc_error;
7301: END IF;
7302:
7303: IF l_parent_instances.COUNT > 0 THEN
7296: px_csi_txn_rec => l_csi_txn_rec,
7297: x_return_status => l_return_status);
7298:
7299: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7300: RAISE fnd_api.g_exc_error;
7301: END IF;
7302:
7303: IF l_parent_instances.COUNT > 0 THEN
7304: distribute_wip_instances(
7310: px_default_info_rec => px_default_info_rec,
7311: x_ii_rltns_tbl => l_ii_rltns_tbl,
7312: x_return_status => l_return_status);
7313:
7314: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7315: RAISE fnd_api.g_exc_error;
7316: END IF;
7317: END IF;
7318:
7311: x_ii_rltns_tbl => l_ii_rltns_tbl,
7312: x_return_status => l_return_status);
7313:
7314: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7315: RAISE fnd_api.g_exc_error;
7316: END IF;
7317: END IF;
7318:
7319: END IF;
7327: p_api_name => 'create_relationship');
7328:
7329: csi_ii_relationships_pub.create_relationship(
7330: p_api_version => 1.0,
7331: p_commit => fnd_api.g_false,
7332: p_init_msg_list => fnd_api.g_true,
7333: p_validation_level => fnd_api.g_valid_level_full,
7334: p_relationship_tbl => l_ii_rltns_tbl,
7335: p_txn_rec => l_csi_txn_rec,
7328:
7329: csi_ii_relationships_pub.create_relationship(
7330: p_api_version => 1.0,
7331: p_commit => fnd_api.g_false,
7332: p_init_msg_list => fnd_api.g_true,
7333: p_validation_level => fnd_api.g_valid_level_full,
7334: p_relationship_tbl => l_ii_rltns_tbl,
7335: p_txn_rec => l_csi_txn_rec,
7336: x_return_status => l_return_status,
7329: csi_ii_relationships_pub.create_relationship(
7330: p_api_version => 1.0,
7331: p_commit => fnd_api.g_false,
7332: p_init_msg_list => fnd_api.g_true,
7333: p_validation_level => fnd_api.g_valid_level_full,
7334: p_relationship_tbl => l_ii_rltns_tbl,
7335: p_txn_rec => l_csi_txn_rec,
7336: x_return_status => l_return_status,
7337: x_msg_count => l_msg_count,
7336: x_return_status => l_return_status,
7337: x_msg_count => l_msg_count,
7338: x_msg_data => l_msg_data);
7339:
7340: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7341: RAISE fnd_api.g_exc_error;
7342: END IF;
7343:
7344: END IF;
7337: x_msg_count => l_msg_count,
7338: x_msg_data => l_msg_data);
7339:
7340: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7341: RAISE fnd_api.g_exc_error;
7342: END IF;
7343:
7344: END IF;
7345:
7345:
7346: debug('Order Fulfillment of ATO option item successful.');
7347:
7348: EXCEPTION
7349: WHEN fnd_api.g_exc_error THEN
7350: x_return_status := fnd_api.g_ret_sts_error;
7351: WHEN others then
7352: fnd_message.set_name ('FND','FND_GENERIC_MESSAGE');
7353: fnd_message.set_token('MESSAGE', substr(sqlerrm, 1, 300));
7346: debug('Order Fulfillment of ATO option item successful.');
7347:
7348: EXCEPTION
7349: WHEN fnd_api.g_exc_error THEN
7350: x_return_status := fnd_api.g_ret_sts_error;
7351: WHEN others then
7352: fnd_message.set_name ('FND','FND_GENERIC_MESSAGE');
7353: fnd_message.set_token('MESSAGE', substr(sqlerrm, 1, 300));
7354: fnd_msg_pub.add;
7351: WHEN others then
7352: fnd_message.set_name ('FND','FND_GENERIC_MESSAGE');
7353: fnd_message.set_token('MESSAGE', substr(sqlerrm, 1, 300));
7354: fnd_msg_pub.add;
7355: x_return_status := fnd_api.g_ret_sts_error;
7356: END process_ato_option_nsrl;
7357:
7358: PROCEDURE mark_and_get_class_instance(
7359: p_option_serial_code IN number,
7404: END IF;
7405: END srl_get_and_delete;
7406:
7407: BEGIN
7408: x_return_status := fnd_api.g_ret_sts_success;
7409: api_log('mark_and_get_class_instance');
7410:
7411: FOR class_inst_rec IN class_inst_cur
7412: LOOP
7430:
7431: END LOOP;
7432:
7433: EXCEPTION
7434: WHEN fnd_api.g_exc_error THEN
7435: x_return_status := fnd_api.g_ret_sts_error;
7436: END mark_and_get_class_instance;
7437:
7438: PROCEDURE get_config_parent(
7431: END LOOP;
7432:
7433: EXCEPTION
7434: WHEN fnd_api.g_exc_error THEN
7435: x_return_status := fnd_api.g_ret_sts_error;
7436: END mark_and_get_class_instance;
7437:
7438: PROCEDURE get_config_parent(
7439: p_wip_instance IN wip_instance,
7449: l_config_instance config_serial_inst_rec;
7450:
7451: l_msg_count number := 0;
7452: l_msg_data varchar2(2000);
7453: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7454:
7455: CURSOR inst_cur(p_instance_id IN number) IS
7456: SELECT instance_id,
7457: serial_number,
7460: WHERE instance_id = p_instance_id
7461: AND inventory_item_id = p_config_rec.item_id;
7462:
7463: BEGIN
7464: x_return_status := fnd_api.g_ret_sts_success;
7465: api_log('get_config_parent');
7466:
7467: l_ii_rltns_qry_rec.subject_id := p_wip_instance.instance_id;
7468: l_ii_rltns_qry_rec.relationship_type_code := 'COMPONENT-OF';
7475: p_api_name => 'get_relationships');
7476:
7477: csi_ii_relationships_pub.get_relationships(
7478: p_api_version => 1.0,
7479: p_commit => fnd_api.g_false,
7480: p_init_msg_list => fnd_api.g_true,
7481: p_validation_level => fnd_api.g_valid_level_full,
7482: p_relationship_query_rec => l_ii_rltns_qry_rec,
7483: p_depth => 1,
7476:
7477: csi_ii_relationships_pub.get_relationships(
7478: p_api_version => 1.0,
7479: p_commit => fnd_api.g_false,
7480: p_init_msg_list => fnd_api.g_true,
7481: p_validation_level => fnd_api.g_valid_level_full,
7482: p_relationship_query_rec => l_ii_rltns_qry_rec,
7483: p_depth => 1,
7484: p_time_stamp => l_time_stamp,
7477: csi_ii_relationships_pub.get_relationships(
7478: p_api_version => 1.0,
7479: p_commit => fnd_api.g_false,
7480: p_init_msg_list => fnd_api.g_true,
7481: p_validation_level => fnd_api.g_valid_level_full,
7482: p_relationship_query_rec => l_ii_rltns_qry_rec,
7483: p_depth => 1,
7484: p_time_stamp => l_time_stamp,
7485: p_active_relationship_only => fnd_api.g_true,
7481: p_validation_level => fnd_api.g_valid_level_full,
7482: p_relationship_query_rec => l_ii_rltns_qry_rec,
7483: p_depth => 1,
7484: p_time_stamp => l_time_stamp,
7485: p_active_relationship_only => fnd_api.g_true,
7486: x_relationship_tbl => l_ii_rltns_tbl,
7487: x_return_status => l_return_status,
7488: x_msg_count => l_msg_count,
7489: x_msg_data => l_msg_data);
7487: x_return_status => l_return_status,
7488: x_msg_count => l_msg_count,
7489: x_msg_data => l_msg_data);
7490:
7491: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7492: RAISE fnd_api.g_exc_error;
7493: END IF;
7494:
7495: debug(' ii_rltns_tbl count : '||l_ii_rltns_tbl.COUNT);
7488: x_msg_count => l_msg_count,
7489: x_msg_data => l_msg_data);
7490:
7491: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7492: RAISE fnd_api.g_exc_error;
7493: END IF;
7494:
7495: debug(' ii_rltns_tbl count : '||l_ii_rltns_tbl.COUNT);
7496:
7517:
7518: x_config_instance := l_config_instance;
7519:
7520: EXCEPTION
7521: WHEN fnd_api.g_exc_error THEN
7522: x_return_status := fnd_api.g_ret_sts_error;
7523: END get_config_parent;
7524:
7525: /* This routine is invoked from the fulfillment of ATO options of serialized*/
7518: x_config_instance := l_config_instance;
7519:
7520: EXCEPTION
7521: WHEN fnd_api.g_exc_error THEN
7522: x_return_status := fnd_api.g_ret_sts_error;
7523: END get_config_parent;
7524:
7525: /* This routine is invoked from the fulfillment of ATO options of serialized*/
7526: /* Identifies the wip issued instances that are tied in relation with the */
7563: do_nothing exception;
7564:
7565: BEGIN
7566:
7567: x_return_status := fnd_api.g_ret_sts_success;
7568:
7569: api_log('process_ato_option_srl');
7570:
7571: --assign the values for the csi_txn_rec
7596: px_csi_txn_rec => l_csi_txn_rec,
7597: x_wip_instances => l_wip_instances,
7598: x_return_status => l_return_status);
7599:
7600: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7601: RAISE fnd_api.g_exc_error;
7602: END IF;
7603:
7604: debug('wip_instances count :'||l_wip_instances.COUNT);
7597: x_wip_instances => l_wip_instances,
7598: x_return_status => l_return_status);
7599:
7600: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7601: RAISE fnd_api.g_exc_error;
7602: END IF;
7603:
7604: debug('wip_instances count :'||l_wip_instances.COUNT);
7605:
7609: p_om_vld_org_id => px_default_info_rec.om_vld_org_id,
7610: x_parent_line_rec => l_parent_line_rec,
7611: x_return_status => l_return_status);
7612:
7613: IF x_return_status <> fnd_api.g_ret_sts_success THEN
7614: RAISE fnd_api.g_exc_error;
7615: END IF;
7616:
7617: l_parent_instances.DELETE;
7610: x_parent_line_rec => l_parent_line_rec,
7611: x_return_status => l_return_status);
7612:
7613: IF x_return_status <> fnd_api.g_ret_sts_success THEN
7614: RAISE fnd_api.g_exc_error;
7615: END IF;
7616:
7617: l_parent_instances.DELETE;
7618:
7618:
7619: debug('l_parent_line_rec.line_id: ' || l_parent_line_rec.line_id);
7620: debug('p_order_line_rec.ato_line_id: ' || p_order_line_rec.ato_line_id);
7621:
7622: IF nvl(l_parent_line_rec.line_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
7623:
7624: -- if the trackable parent is the ato model then do nothing
7625: IF l_parent_line_rec.line_id = p_order_line_rec.ato_line_id THEN
7626:
7649: px_default_info_rec => px_default_info_rec,
7650: px_csi_txn_rec => l_csi_txn_rec,
7651: x_return_status => l_return_status);
7652:
7653: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7654: RAISE fnd_api.g_exc_error;
7655: END IF;
7656:
7657: RAISE do_nothing;
7650: px_csi_txn_rec => l_csi_txn_rec,
7651: x_return_status => l_return_status);
7652:
7653: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7654: RAISE fnd_api.g_exc_error;
7655: END IF;
7656:
7657: RAISE do_nothing;
7658: ELSE
7695: px_csi_txn_rec => l_csi_txn_rec,
7696: px_wip_instances => l_wip_instances,
7697: x_return_status => l_return_status);
7698:
7699: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7700: RAISE fnd_api.g_exc_error;
7701: END IF;
7702:
7703: IF l_wip_instances.COUNT > 0 THEN
7696: px_wip_instances => l_wip_instances,
7697: x_return_status => l_return_status);
7698:
7699: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7700: RAISE fnd_api.g_exc_error;
7701: END IF;
7702:
7703: IF l_wip_instances.COUNT > 0 THEN
7704: debug('Calling stamp_om_line_for_options');
7710: px_default_info_rec => px_default_info_rec,
7711: px_csi_txn_rec => l_csi_txn_rec,
7712: x_return_status => l_return_status);
7713:
7714: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7715: RAISE fnd_api.g_exc_error;
7716: END IF;
7717: END IF;
7718:
7711: px_csi_txn_rec => l_csi_txn_rec,
7712: x_return_status => l_return_status);
7713:
7714: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7715: RAISE fnd_api.g_exc_error;
7716: END IF;
7717: END IF;
7718:
7719: IF l_parent_instances.COUNT > 0 THEN
7729: p_config_rec => p_config_rec,
7730: x_config_instance => l_config_parent,
7731: x_return_status => l_return_status);
7732:
7733: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7734: RAISE fnd_api.g_exc_error;
7735: END IF;
7736:
7737: mark_and_get_class_instance(
7730: x_config_instance => l_config_parent,
7731: x_return_status => l_return_status);
7732:
7733: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7734: RAISE fnd_api.g_exc_error;
7735: END IF;
7736:
7737: mark_and_get_class_instance(
7738: p_option_serial_code => l_option_serial_code,
7742: px_class_instances => l_parent_instances,
7743: x_class_instance => l_class_instance,
7744: x_return_status => l_return_status);
7745:
7746: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7747: RAISE fnd_api.g_exc_error;
7748: END IF;
7749:
7750: IF l_class_instance.instance_id is not null THEN
7743: x_class_instance => l_class_instance,
7744: x_return_status => l_return_status);
7745:
7746: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7747: RAISE fnd_api.g_exc_error;
7748: END IF;
7749:
7750: IF l_class_instance.instance_id is not null THEN
7751: l_ii_ind := l_ii_ind + 1;
7748: END IF;
7749:
7750: IF l_class_instance.instance_id is not null THEN
7751: l_ii_ind := l_ii_ind + 1;
7752: l_ii_rltns_tbl(l_ii_ind).relationship_id := fnd_api.g_miss_num;
7753: l_ii_rltns_tbl(l_ii_ind).relationship_type_code := 'COMPONENT-OF';
7754: l_ii_rltns_tbl(l_ii_ind).object_id := l_class_instance.instance_id;
7755: l_ii_rltns_tbl(l_ii_ind).subject_id := l_wip_instances(l_w_ind).instance_id;
7756: l_ii_rltns_tbl(l_ii_ind).cascade_ownership_flag :=
7756: l_ii_rltns_tbl(l_ii_ind).cascade_ownership_flag :=
7757: px_default_info_rec.cascade_owner_flag;
7758: END IF;
7759:
7760: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7761: RAISE fnd_api.g_exc_error;
7762: END IF;
7763:
7764: IF l_config_parent.relationship_id is not null THEN
7757: px_default_info_rec.cascade_owner_flag;
7758: END IF;
7759:
7760: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7761: RAISE fnd_api.g_exc_error;
7762: END IF;
7763:
7764: IF l_config_parent.relationship_id is not null THEN
7765:
7768: p_relationship_ovn => l_config_parent.relationship_ovn,
7769: px_csi_txn_rec => l_csi_txn_rec,
7770: x_return_status => l_return_status);
7771:
7772: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7773: RAISE fnd_api.g_exc_error;
7774: END IF;
7775: END IF;
7776:
7769: px_csi_txn_rec => l_csi_txn_rec,
7770: x_return_status => l_return_status);
7771:
7772: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7773: RAISE fnd_api.g_exc_error;
7774: END IF;
7775: END IF;
7776:
7777: END LOOP;
7786: p_config_rec => p_config_rec,
7787: x_config_instance => l_config_parent,
7788: x_return_status => l_return_status);
7789:
7790: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7791: RAISE fnd_api.g_exc_error;
7792: END IF;
7793:
7794: mark_and_get_class_instance(
7787: x_config_instance => l_config_parent,
7788: x_return_status => l_return_status);
7789:
7790: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7791: RAISE fnd_api.g_exc_error;
7792: END IF;
7793:
7794: mark_and_get_class_instance(
7795: p_option_serial_code => l_option_serial_code,
7799: px_class_instances => l_parent_instances,
7800: x_class_instance => l_class_instance,
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: IF l_class_instance.instance_id is not null THEN
7800: x_class_instance => l_class_instance,
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: IF l_class_instance.instance_id is not null THEN
7808: l_ii_ind := l_ii_ind + 1;
7805: END IF;
7806:
7807: IF l_class_instance.instance_id is not null THEN
7808: l_ii_ind := l_ii_ind + 1;
7809: l_ii_rltns_tbl(l_ii_ind).relationship_id := fnd_api.g_miss_num;
7810: l_ii_rltns_tbl(l_ii_ind).relationship_type_code := 'COMPONENT-OF';
7811: l_ii_rltns_tbl(l_ii_ind).object_id := l_class_instance.instance_id;
7812: l_ii_rltns_tbl(l_ii_ind).subject_id := l_wip_instances(l_w_ind).instance_id;
7813: l_ii_rltns_tbl(l_ii_ind).cascade_ownership_flag := px_default_info_rec.cascade_owner_flag;
7820: p_relationship_ovn => l_config_parent.relationship_ovn,
7821: px_csi_txn_rec => l_csi_txn_rec,
7822: x_return_status => l_return_status);
7823:
7824: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7825: RAISE fnd_api.g_exc_error;
7826: END IF;
7827: END IF;
7828:
7821: px_csi_txn_rec => l_csi_txn_rec,
7822: x_return_status => l_return_status);
7823:
7824: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7825: RAISE fnd_api.g_exc_error;
7826: END IF;
7827: END IF;
7828:
7829: END LOOP;
7841: p_api_name => 'create_relationship');
7842:
7843: csi_ii_relationships_pub.create_relationship(
7844: p_api_version => 1.0,
7845: p_commit => fnd_api.g_false,
7846: p_init_msg_list => fnd_api.g_true,
7847: p_validation_level => fnd_api.g_valid_level_full,
7848: p_relationship_tbl => l_ii_rltns_tbl,
7849: p_txn_rec => l_csi_txn_rec,
7842:
7843: csi_ii_relationships_pub.create_relationship(
7844: p_api_version => 1.0,
7845: p_commit => fnd_api.g_false,
7846: p_init_msg_list => fnd_api.g_true,
7847: p_validation_level => fnd_api.g_valid_level_full,
7848: p_relationship_tbl => l_ii_rltns_tbl,
7849: p_txn_rec => l_csi_txn_rec,
7850: x_return_status => l_return_status,
7843: csi_ii_relationships_pub.create_relationship(
7844: p_api_version => 1.0,
7845: p_commit => fnd_api.g_false,
7846: p_init_msg_list => fnd_api.g_true,
7847: p_validation_level => fnd_api.g_valid_level_full,
7848: p_relationship_tbl => l_ii_rltns_tbl,
7849: p_txn_rec => l_csi_txn_rec,
7850: x_return_status => l_return_status,
7851: x_msg_count => l_msg_count,
7850: x_return_status => l_return_status,
7851: x_msg_count => l_msg_count,
7852: x_msg_data => l_msg_data);
7853:
7854: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7855: RAISE fnd_api.g_exc_error;
7856: END IF;
7857:
7858: END IF;
7851: x_msg_count => l_msg_count,
7852: x_msg_data => l_msg_data);
7853:
7854: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7855: RAISE fnd_api.g_exc_error;
7856: END IF;
7857:
7858: END IF;
7859:
7860: debug('Order Fulfillment of ATO option item successful.');
7861:
7862: EXCEPTION
7863: WHEN do_nothing THEN
7864: x_return_status := fnd_api.g_ret_sts_success;
7865: WHEN fnd_api.g_exc_error THEN
7866: x_return_status := fnd_api.g_ret_sts_error;
7867: WHEN others then
7868: fnd_message.set_name ('FND','FND_GENERIC_MESSAGE');
7861:
7862: EXCEPTION
7863: WHEN do_nothing THEN
7864: x_return_status := fnd_api.g_ret_sts_success;
7865: WHEN fnd_api.g_exc_error THEN
7866: x_return_status := fnd_api.g_ret_sts_error;
7867: WHEN others then
7868: fnd_message.set_name ('FND','FND_GENERIC_MESSAGE');
7869: fnd_message.set_token('MESSAGE', substr(sqlerrm, 1, 300));
7862: EXCEPTION
7863: WHEN do_nothing THEN
7864: x_return_status := fnd_api.g_ret_sts_success;
7865: WHEN fnd_api.g_exc_error THEN
7866: x_return_status := fnd_api.g_ret_sts_error;
7867: WHEN others then
7868: fnd_message.set_name ('FND','FND_GENERIC_MESSAGE');
7869: fnd_message.set_token('MESSAGE', substr(sqlerrm, 1, 300));
7870: fnd_msg_pub.add;
7867: WHEN others then
7868: fnd_message.set_name ('FND','FND_GENERIC_MESSAGE');
7869: fnd_message.set_token('MESSAGE', substr(sqlerrm, 1, 300));
7870: fnd_msg_pub.add;
7871: x_return_status := fnd_api.g_ret_sts_error;
7872: END process_ato_option_srl;
7873:
7874: -- for ato options that are processed from wip
7875: PROCEDURE process_ato_option_from_wip(
7881: x_wip_processing OUT NOCOPY boolean,
7882: x_return_status OUT NOCOPY varchar2)
7883: IS
7884:
7885: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
7886: l_wip_processing boolean := TRUE;
7887: l_src_tld_tbl csi_t_datastructures_grp.txn_line_detail_tbl;
7888: l_transaction_line_id number;
7889: l_mdl_ordered_qty number;
7891: l_qty_ratio number; --declared for bug5096435
7892:
7893: BEGIN
7894:
7895: x_return_status := fnd_api.g_ret_sts_success;
7896: api_log('process_ato_option_from_wip');
7897:
7898: l_wip_processing := TRUE;
7899:
7970: csi_t_utilities_pvt.cascade_child(
7971: p_data_string => l_model_hierarchy,
7972: x_return_status => l_return_status );
7973:
7974: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7975: RAISE fnd_api.g_exc_error;
7976: END IF;
7977: EXCEPTION
7978: WHEN no_data_found THEN
7971: p_data_string => l_model_hierarchy,
7972: x_return_status => l_return_status );
7973:
7974: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7975: RAISE fnd_api.g_exc_error;
7976: END IF;
7977: EXCEPTION
7978: WHEN no_data_found THEN
7979: l_transaction_line_id := null;
7988: p_processing_status => 'UNPROCESSED',
7989: x_line_dtl_tbl => l_src_tld_tbl,
7990: x_return_status => l_return_status);
7991:
7992: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7993: RAISE fnd_api.g_exc_error;
7994: END IF;
7995: END IF;
7996:
7989: x_line_dtl_tbl => l_src_tld_tbl,
7990: x_return_status => l_return_status);
7991:
7992: IF l_return_status <> fnd_api.g_ret_sts_success THEN
7993: RAISE fnd_api.g_exc_error;
7994: END IF;
7995: END IF;
7996:
7997: IF p_config_rec.serial_code in (1, 6) THEN
8003: p_tld_tbl => l_src_tld_tbl,
8004: px_default_info_rec => px_default_info_rec,
8005: x_return_status => l_return_status);
8006:
8007: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8008: RAISE fnd_api.g_exc_error;
8009: END IF;
8010:
8011: ELSIF p_config_rec.serial_code IN (2,5) THEN
8004: px_default_info_rec => px_default_info_rec,
8005: x_return_status => l_return_status);
8006:
8007: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8008: RAISE fnd_api.g_exc_error;
8009: END IF;
8010:
8011: ELSIF p_config_rec.serial_code IN (2,5) THEN
8012:
8018: p_tld_tbl => l_src_tld_tbl,
8019: px_default_info_rec => px_default_info_rec,
8020: x_return_status => l_return_status);
8021:
8022: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8023: RAISE fnd_api.g_exc_error;
8024: END IF;
8025:
8026: END IF;
8019: px_default_info_rec => px_default_info_rec,
8020: x_return_status => l_return_status);
8021:
8022: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8023: RAISE fnd_api.g_exc_error;
8024: END IF;
8025:
8026: END IF;
8027: END IF;
8026: END IF;
8027: END IF;
8028:
8029: EXCEPTION
8030: WHEN fnd_api.g_exc_error THEN
8031: x_return_status := fnd_api.g_ret_sts_error;
8032: END process_ato_option_from_wip;
8033:
8034: PROCEDURE get_source_tlds(
8027: END IF;
8028:
8029: EXCEPTION
8030: WHEN fnd_api.g_exc_error THEN
8031: x_return_status := fnd_api.g_ret_sts_error;
8032: END process_ato_option_from_wip;
8033:
8034: PROCEDURE get_source_tlds(
8035: p_tld_tbl IN csi_t_datastructures_grp.txn_line_detail_tbl,
8103: l_inst_owner_id number;
8104: l_inst_owner_type csi_i_parties.party_source_table%TYPE;
8105: l_internal_party_id number;
8106: l_ownership_override varchar2(1) := 'N';
8107: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
8108: l_msg_data varchar2(2000);
8109: l_msg_count number;
8110: l_inst_loc_id number;
8111: l_inst_loc_type csi_item_instances.location_type_code%TYPE;
8127: create_csi_transaction(
8128: px_csi_txn_rec => px_csi_txn_rec,
8129: x_return_status => l_return_status);
8130:
8131: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8132: RAISE fnd_api.g_exc_error;
8133: END IF;
8134:
8135: IF p_line_dtl_tbl.COUNT > 0 THEN
8128: px_csi_txn_rec => px_csi_txn_rec,
8129: x_return_status => l_return_status);
8130:
8131: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8132: RAISE fnd_api.g_exc_error;
8133: END IF;
8134:
8135: IF p_line_dtl_tbl.COUNT > 0 THEN
8136: FOR l_td_ind IN p_line_dtl_tbl.FIRST ..p_line_dtl_tbl.LAST
8134:
8135: IF p_line_dtl_tbl.COUNT > 0 THEN
8136: FOR l_td_ind IN p_line_dtl_tbl.FIRST ..p_line_dtl_tbl.LAST
8137: LOOP
8138: IF nvl(p_line_dtl_tbl(l_td_ind).instance_id, fnd_api.g_miss_num)
8139: <> fnd_api.g_miss_num
8140: THEN
8141:
8142: l_txn_line_detail_query_rec.txn_line_detail_id :=
8135: IF p_line_dtl_tbl.COUNT > 0 THEN
8136: FOR l_td_ind IN p_line_dtl_tbl.FIRST ..p_line_dtl_tbl.LAST
8137: LOOP
8138: IF nvl(p_line_dtl_tbl(l_td_ind).instance_id, fnd_api.g_miss_num)
8139: <> fnd_api.g_miss_num
8140: THEN
8141:
8142: l_txn_line_detail_query_rec.txn_line_detail_id :=
8143: p_line_dtl_tbl(l_td_ind).txn_line_detail_id;
8143: p_line_dtl_tbl(l_td_ind).txn_line_detail_id;
8144:
8145: csi_t_txn_details_grp.get_transaction_details(
8146: p_api_version => 1,
8147: p_commit => fnd_api.g_false,
8148: p_init_msg_list => fnd_api.g_true,
8149: p_validation_level => fnd_api.g_valid_level_full,
8150: p_txn_line_query_rec => l_txn_line_query_rec,
8151: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
8144:
8145: csi_t_txn_details_grp.get_transaction_details(
8146: p_api_version => 1,
8147: p_commit => fnd_api.g_false,
8148: p_init_msg_list => fnd_api.g_true,
8149: p_validation_level => fnd_api.g_valid_level_full,
8150: p_txn_line_query_rec => l_txn_line_query_rec,
8151: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
8152: x_txn_line_detail_tbl => l_line_dtl_tbl,
8145: csi_t_txn_details_grp.get_transaction_details(
8146: p_api_version => 1,
8147: p_commit => fnd_api.g_false,
8148: p_init_msg_list => fnd_api.g_true,
8149: p_validation_level => fnd_api.g_valid_level_full,
8150: p_txn_line_query_rec => l_txn_line_query_rec,
8151: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
8152: x_txn_line_detail_tbl => l_line_dtl_tbl,
8153: p_get_parties_flag => fnd_api.g_true,
8149: p_validation_level => fnd_api.g_valid_level_full,
8150: p_txn_line_query_rec => l_txn_line_query_rec,
8151: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
8152: x_txn_line_detail_tbl => l_line_dtl_tbl,
8153: p_get_parties_flag => fnd_api.g_true,
8154: x_txn_party_detail_tbl => l_pty_dtl_tbl,
8155: p_get_pty_accts_flag => fnd_api.g_true,
8156: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
8157: p_get_ii_rltns_flag => fnd_api.g_false,
8151: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
8152: x_txn_line_detail_tbl => l_line_dtl_tbl,
8153: p_get_parties_flag => fnd_api.g_true,
8154: x_txn_party_detail_tbl => l_pty_dtl_tbl,
8155: p_get_pty_accts_flag => fnd_api.g_true,
8156: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
8157: p_get_ii_rltns_flag => fnd_api.g_false,
8158: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
8159: p_get_org_assgns_flag => fnd_api.g_false,
8153: p_get_parties_flag => fnd_api.g_true,
8154: x_txn_party_detail_tbl => l_pty_dtl_tbl,
8155: p_get_pty_accts_flag => fnd_api.g_true,
8156: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
8157: p_get_ii_rltns_flag => fnd_api.g_false,
8158: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
8159: p_get_org_assgns_flag => fnd_api.g_false,
8160: x_txn_org_assgn_tbl => l_org_assgn_tbl,
8161: p_get_ext_attrib_vals_flag => fnd_api.g_false,
8155: p_get_pty_accts_flag => fnd_api.g_true,
8156: x_txn_pty_acct_detail_tbl => l_pty_acct_tbl,
8157: p_get_ii_rltns_flag => fnd_api.g_false,
8158: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
8159: p_get_org_assgns_flag => fnd_api.g_false,
8160: x_txn_org_assgn_tbl => l_org_assgn_tbl,
8161: p_get_ext_attrib_vals_flag => fnd_api.g_false,
8162: x_txn_ext_attrib_vals_tbl => l_txn_ext_attrib_tbl,
8163: p_get_csi_attribs_flag => fnd_api.g_false,
8157: p_get_ii_rltns_flag => fnd_api.g_false,
8158: x_txn_ii_rltns_tbl => l_ii_rltns_tbl,
8159: p_get_org_assgns_flag => fnd_api.g_false,
8160: x_txn_org_assgn_tbl => l_org_assgn_tbl,
8161: p_get_ext_attrib_vals_flag => fnd_api.g_false,
8162: x_txn_ext_attrib_vals_tbl => l_txn_ext_attrib_tbl,
8163: p_get_csi_attribs_flag => fnd_api.g_false,
8164: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
8165: p_get_csi_iea_values_flag => fnd_api.g_false,
8159: p_get_org_assgns_flag => fnd_api.g_false,
8160: x_txn_org_assgn_tbl => l_org_assgn_tbl,
8161: p_get_ext_attrib_vals_flag => fnd_api.g_false,
8162: x_txn_ext_attrib_vals_tbl => l_txn_ext_attrib_tbl,
8163: p_get_csi_attribs_flag => fnd_api.g_false,
8164: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
8165: p_get_csi_iea_values_flag => fnd_api.g_false,
8166: x_csi_iea_values_tbl => l_csi_eav_tbl,
8167: p_get_txn_systems_flag => fnd_api.g_false,
8161: p_get_ext_attrib_vals_flag => fnd_api.g_false,
8162: x_txn_ext_attrib_vals_tbl => l_txn_ext_attrib_tbl,
8163: p_get_csi_attribs_flag => fnd_api.g_false,
8164: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
8165: p_get_csi_iea_values_flag => fnd_api.g_false,
8166: x_csi_iea_values_tbl => l_csi_eav_tbl,
8167: p_get_txn_systems_flag => fnd_api.g_false,
8168: x_txn_systems_tbl => l_txn_systems_tbl,
8169: x_return_status => l_return_status,
8163: p_get_csi_attribs_flag => fnd_api.g_false,
8164: x_csi_ext_attribs_tbl => l_csi_ea_tbl,
8165: p_get_csi_iea_values_flag => fnd_api.g_false,
8166: x_csi_iea_values_tbl => l_csi_eav_tbl,
8167: p_get_txn_systems_flag => fnd_api.g_false,
8168: x_txn_systems_tbl => l_txn_systems_tbl,
8169: x_return_status => l_return_status,
8170: x_msg_count => l_msg_count,
8171: x_msg_data => l_msg_data);
8169: x_return_status => l_return_status,
8170: x_msg_count => l_msg_count,
8171: x_msg_data => l_msg_data);
8172:
8173: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8174: debug('Get transaction details failed for RMA Fulfillment.');
8175: RAISE fnd_api.g_exc_error;
8176: END IF;
8177:
8171: x_msg_data => l_msg_data);
8172:
8173: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8174: debug('Get transaction details failed for RMA Fulfillment.');
8175: RAISE fnd_api.g_exc_error;
8176: END IF;
8177:
8178: IF l_pty_dtl_tbl.COUNT > 0 THEN
8179: FOR l_ind IN l_pty_dtl_tbl.FIRST..l_pty_dtl_tbl.LAST
8187: ELSE
8188: debug('Party not found. Txn Line Dtl ID:'||p_line_dtl_tbl(l_td_ind).txn_line_detail_id);
8189: l_td_owner_id := null;
8190: l_td_owner_type := null;
8191: --RAISE fnd_api.g_exc_error;
8192: END IF;
8193:
8194: l_instance_rec.instance_id := l_line_dtl_tbl(1).instance_id;
8195:
8194: l_instance_rec.instance_id := l_line_dtl_tbl(1).instance_id;
8195:
8196: csi_item_instance_pub.get_item_instance_details(
8197: p_api_version => 1.0,
8198: p_commit => fnd_api.g_false,
8199: p_init_msg_list => fnd_api.g_true,
8200: p_validation_level => fnd_api.g_valid_level_full,
8201: p_instance_rec => l_instance_rec,
8202: p_get_parties => fnd_api.g_true,
8195:
8196: csi_item_instance_pub.get_item_instance_details(
8197: p_api_version => 1.0,
8198: p_commit => fnd_api.g_false,
8199: p_init_msg_list => fnd_api.g_true,
8200: p_validation_level => fnd_api.g_valid_level_full,
8201: p_instance_rec => l_instance_rec,
8202: p_get_parties => fnd_api.g_true,
8203: p_party_header_tbl => l_party_header_tbl,
8196: csi_item_instance_pub.get_item_instance_details(
8197: p_api_version => 1.0,
8198: p_commit => fnd_api.g_false,
8199: p_init_msg_list => fnd_api.g_true,
8200: p_validation_level => fnd_api.g_valid_level_full,
8201: p_instance_rec => l_instance_rec,
8202: p_get_parties => fnd_api.g_true,
8203: p_party_header_tbl => l_party_header_tbl,
8204: p_get_accounts => fnd_api.g_true,
8198: p_commit => fnd_api.g_false,
8199: p_init_msg_list => fnd_api.g_true,
8200: p_validation_level => fnd_api.g_valid_level_full,
8201: p_instance_rec => l_instance_rec,
8202: p_get_parties => fnd_api.g_true,
8203: p_party_header_tbl => l_party_header_tbl,
8204: p_get_accounts => fnd_api.g_true,
8205: p_account_header_tbl => l_account_header_tbl,
8206: p_get_org_assignments => fnd_api.g_false,
8200: p_validation_level => fnd_api.g_valid_level_full,
8201: p_instance_rec => l_instance_rec,
8202: p_get_parties => fnd_api.g_true,
8203: p_party_header_tbl => l_party_header_tbl,
8204: p_get_accounts => fnd_api.g_true,
8205: p_account_header_tbl => l_account_header_tbl,
8206: p_get_org_assignments => fnd_api.g_false,
8207: p_org_header_tbl => l_org_assignments_tbl,
8208: p_get_pricing_attribs => fnd_api.g_false,
8202: p_get_parties => fnd_api.g_true,
8203: p_party_header_tbl => l_party_header_tbl,
8204: p_get_accounts => fnd_api.g_true,
8205: p_account_header_tbl => l_account_header_tbl,
8206: p_get_org_assignments => fnd_api.g_false,
8207: p_org_header_tbl => l_org_assignments_tbl,
8208: p_get_pricing_attribs => fnd_api.g_false,
8209: p_pricing_attrib_tbl => l_pricing_attrib_tbl,
8210: p_get_ext_attribs => fnd_api.g_false,
8204: p_get_accounts => fnd_api.g_true,
8205: p_account_header_tbl => l_account_header_tbl,
8206: p_get_org_assignments => fnd_api.g_false,
8207: p_org_header_tbl => l_org_assignments_tbl,
8208: p_get_pricing_attribs => fnd_api.g_false,
8209: p_pricing_attrib_tbl => l_pricing_attrib_tbl,
8210: p_get_ext_attribs => fnd_api.g_false,
8211: p_ext_attrib_tbl => l_ext_attrib_tbl,
8212: p_ext_attrib_def_tbl => l_ext_attrib_def_tbl,
8206: p_get_org_assignments => fnd_api.g_false,
8207: p_org_header_tbl => l_org_assignments_tbl,
8208: p_get_pricing_attribs => fnd_api.g_false,
8209: p_pricing_attrib_tbl => l_pricing_attrib_tbl,
8210: p_get_ext_attribs => fnd_api.g_false,
8211: p_ext_attrib_tbl => l_ext_attrib_tbl,
8212: p_ext_attrib_def_tbl => l_ext_attrib_def_tbl,
8213: p_get_asset_assignments => fnd_api.g_false,
8214: p_asset_header_tbl => l_asset_assignment_tbl,
8209: p_pricing_attrib_tbl => l_pricing_attrib_tbl,
8210: p_get_ext_attribs => fnd_api.g_false,
8211: p_ext_attrib_tbl => l_ext_attrib_tbl,
8212: p_ext_attrib_def_tbl => l_ext_attrib_def_tbl,
8213: p_get_asset_assignments => fnd_api.g_false,
8214: p_asset_header_tbl => l_asset_assignment_tbl,
8215: p_time_stamp => l_time_stamp,
8216: x_return_status => l_return_status,
8217: x_msg_count => l_msg_count,
8216: x_return_status => l_return_status,
8217: x_msg_count => l_msg_count,
8218: x_msg_data => l_msg_data);
8219:
8220: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8221: debug('Get item instance details failed for RMA Fulfillment.');
8222: RAISE fnd_api.g_exc_error;
8223: END IF;
8224:
8218: x_msg_data => l_msg_data);
8219:
8220: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8221: debug('Get item instance details failed for RMA Fulfillment.');
8222: RAISE fnd_api.g_exc_error;
8223: END IF;
8224:
8225: l_inst_loc_type := l_instance_rec.location_type_code;
8226: l_inst_loc_id := l_instance_rec.location_id;
8224:
8225: l_inst_loc_type := l_instance_rec.location_type_code;
8226: l_inst_loc_id := l_instance_rec.location_id;
8227:
8228: IF nvl(l_line_dtl_tbl(1).inv_organization_id, fnd_api.g_miss_num)
8229: <> fnd_api.g_miss_num
8230: AND l_instance_rec.vld_organization_id <> l_line_dtl_tbl(1).inv_organization_id
8231: THEN
8232: l_vld_orgn_id := l_line_dtl_tbl(1).inv_organization_id; -- FP fix for bug 5072107
8225: l_inst_loc_type := l_instance_rec.location_type_code;
8226: l_inst_loc_id := l_instance_rec.location_id;
8227:
8228: IF nvl(l_line_dtl_tbl(1).inv_organization_id, fnd_api.g_miss_num)
8229: <> fnd_api.g_miss_num
8230: AND l_instance_rec.vld_organization_id <> l_line_dtl_tbl(1).inv_organization_id
8231: THEN
8232: l_vld_orgn_id := l_line_dtl_tbl(1).inv_organization_id; -- FP fix for bug 5072107
8233: IF l_instance_rec.inv_master_organization_id = l_line_dtl_tbl(1).inv_organization_id
8239: l_vld_orgn_id := l_instance_rec.vld_organization_id;
8240: ELSE
8241: fnd_message.set_name('CSI','CSI_INVALID_VLD_MAST_COMB');
8242: fnd_msg_pub.add;
8243: RAISE fnd_api.g_exc_error;
8244: END IF;
8245: END IF;
8246:
8247: /* loop thru the party table to figure out the Instance Owner */
8255: END IF;
8256: END LOOP;
8257: ELSE
8258: debug('Party not found. Instance:'||l_instance_rec.instance_id);
8259: RAISE fnd_api.g_exc_error;
8260: END IF;
8261:
8262: debug('Instance ID : '||l_instance_rec.instance_id);
8263: debug('Instance owner party type : '||l_inst_owner_type);
8276: -- If Party doesn't match orig party then install param authorization requd
8277: IF l_inst_owner_id = l_internal_party_id
8278: AND l_inst_owner_type = 'HZ_PARTIES' THEN
8279: -- check if TLD says expire? If yes, Invalid
8280: IF nvl(l_line_dtl_tbl(1).active_end_date, fnd_api.g_miss_date)
8281: <> fnd_api.g_miss_date THEN
8282: debug('Active End date :'||l_line_dtl_tbl(1).active_end_date
8283: || 'provided on transaction line detail: '
8284: || l_line_dtl_tbl(1).txn_line_detail_id);
8277: IF l_inst_owner_id = l_internal_party_id
8278: AND l_inst_owner_type = 'HZ_PARTIES' THEN
8279: -- check if TLD says expire? If yes, Invalid
8280: IF nvl(l_line_dtl_tbl(1).active_end_date, fnd_api.g_miss_date)
8281: <> fnd_api.g_miss_date THEN
8282: debug('Active End date :'||l_line_dtl_tbl(1).active_end_date
8283: || 'provided on transaction line detail: '
8284: || l_line_dtl_tbl(1).txn_line_detail_id);
8285: fnd_message.set_name('CSI','CSI_TXN_INVALID_INST_REF');
8284: || l_line_dtl_tbl(1).txn_line_detail_id);
8285: fnd_message.set_name('CSI','CSI_TXN_INVALID_INST_REF');
8286: fnd_message.set_token('INSTANCE_ID',l_instance_rec.instance_id);
8287: fnd_msg_pub.add;
8288: RAISE fnd_api.g_exc_error;
8289: ELSIF l_inst_loc_type
8290: NOT IN ( 'INVENTORY','HZ_PARTY_SITES', 'HZ_LOCATIONS', 'VENDOR_SITE', 'INTERNAL_SITE')
8291: THEN
8292: debug('Location type code is :'||l_inst_loc_type);
8293: fnd_message.set_name('CSI', 'CSI_TXN_SRC_LOC_INVALID');
8294: fnd_message.set_token('LOC_CODE', l_inst_loc_type);
8295: fnd_message.set_token('SRC_NAME', 'Conversion to a Customer Ownership ');
8296: fnd_msg_pub.add;
8297: RAISE fnd_api.g_exc_error;
8298: -- allow only externally located
8299: END IF;
8300: END IF;
8301:
8306: debug('Owner Change.');
8307: fnd_message.set_name('CSI', 'CSI_API_INVALID_PARTY_SOURCE');
8308: fnd_message.set_token('PARTY_SOURCE_TABLE', l_td_owner_type);
8309: fnd_msg_pub.add;
8310: RAISE fnd_api.g_exc_error;
8311: ELSIF l_td_owner_id <> l_inst_owner_id THEN
8312: IF l_ownership_override = 'Y' THEN
8313: debug('Ownership Change and is allowed.');
8314: ELSE
8317: fnd_message.set_token('OLD_PARTY_ID',l_inst_owner_id);
8318: fnd_message.set_token('NEW_PARTY_ID',l_td_owner_id);
8319: fnd_message.set_token('INSTANCE_ID',l_instance_rec.instance_id);
8320: fnd_msg_pub.add;
8321: RAISE fnd_api.g_exc_error;
8322: END IF;
8323: END IF;
8324: ELSE -- no owner entered in TD
8325: IF ((l_inst_owner_type = 'HZ_PARTIES' )
8327: THEN
8328: IF l_ownership_override = 'Y' THEN
8329: debug('Ownership Change and is allowed.');
8330: ELSE
8331: IF nvl(p_order_line_rec.end_customer_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num
8332: AND l_inst_owner_id <> p_order_line_rec.end_customer_id
8333: THEN -- end customer exists
8334: -- for normal NON-partner order, checks for ownership override will be
8335: -- done anyway later in update_install_base since we do not have party_id here
8338: fnd_message.set_token('OLD_PARTY_ID',l_inst_owner_id);
8339: fnd_message.set_token('NEW_PARTY_ID',l_td_owner_id);
8340: fnd_message.set_token('INSTANCE_ID',l_instance_rec.instance_id);
8341: fnd_msg_pub.add;
8342: RAISE fnd_api.g_exc_error;
8343: END IF;
8344: END IF;
8345: END IF;
8346: END IF;
8352: IF p_line_dtl_tbl(l_td_ind).quantity > l_instance_rec.quantity THEN
8353: fnd_message.set_name('CSI','CSI_INT_QTY_CHK_FAILED');
8354: fnd_message.set_token('INSTANCE_ID',l_instance_rec.instance_id);
8355: fnd_msg_pub.add;
8356: RAISE fnd_api.g_exc_error;
8357: ELSIF l_line_dtl_tbl(1).quantity < l_instance_rec.quantity THEN
8358: -- split the instance and process....
8359: l_quantity1 := l_instance_rec.quantity - l_line_dtl_tbl(1).quantity ;
8360: l_split_src_inst_rec.instance_id := l_instance_rec.instance_id;
8365: p_api_name => 'split_item_instance');
8366:
8367: csi_item_instance_pvt.split_item_instance (
8368: p_api_version => 1.0,
8369: p_commit => fnd_api.g_false,
8370: p_init_msg_list => fnd_api.g_true,
8371: p_validation_level => fnd_api.g_valid_level_full,
8372: p_source_instance_rec => l_split_src_inst_rec,
8373: p_quantity1 => l_quantity1,
8366:
8367: csi_item_instance_pvt.split_item_instance (
8368: p_api_version => 1.0,
8369: p_commit => fnd_api.g_false,
8370: p_init_msg_list => fnd_api.g_true,
8371: p_validation_level => fnd_api.g_valid_level_full,
8372: p_source_instance_rec => l_split_src_inst_rec,
8373: p_quantity1 => l_quantity1,
8374: p_quantity2 => l_line_dtl_tbl(1).quantity,
8367: csi_item_instance_pvt.split_item_instance (
8368: p_api_version => 1.0,
8369: p_commit => fnd_api.g_false,
8370: p_init_msg_list => fnd_api.g_true,
8371: p_validation_level => fnd_api.g_valid_level_full,
8372: p_source_instance_rec => l_split_src_inst_rec,
8373: p_quantity1 => l_quantity1,
8374: p_quantity2 => l_line_dtl_tbl(1).quantity,
8375: p_copy_ext_attribs => fnd_api.g_true,
8371: p_validation_level => fnd_api.g_valid_level_full,
8372: p_source_instance_rec => l_split_src_inst_rec,
8373: p_quantity1 => l_quantity1,
8374: p_quantity2 => l_line_dtl_tbl(1).quantity,
8375: p_copy_ext_attribs => fnd_api.g_true,
8376: p_copy_org_assignments => fnd_api.g_true,
8377: p_copy_parties => fnd_api.g_true,
8378: p_copy_accounts => fnd_api.g_true,
8379: p_copy_asset_assignments => fnd_api.g_true,
8372: p_source_instance_rec => l_split_src_inst_rec,
8373: p_quantity1 => l_quantity1,
8374: p_quantity2 => l_line_dtl_tbl(1).quantity,
8375: p_copy_ext_attribs => fnd_api.g_true,
8376: p_copy_org_assignments => fnd_api.g_true,
8377: p_copy_parties => fnd_api.g_true,
8378: p_copy_accounts => fnd_api.g_true,
8379: p_copy_asset_assignments => fnd_api.g_true,
8380: p_copy_pricing_attribs => fnd_api.g_true,
8373: p_quantity1 => l_quantity1,
8374: p_quantity2 => l_line_dtl_tbl(1).quantity,
8375: p_copy_ext_attribs => fnd_api.g_true,
8376: p_copy_org_assignments => fnd_api.g_true,
8377: p_copy_parties => fnd_api.g_true,
8378: p_copy_accounts => fnd_api.g_true,
8379: p_copy_asset_assignments => fnd_api.g_true,
8380: p_copy_pricing_attribs => fnd_api.g_true,
8381: p_txn_rec => px_csi_txn_rec,
8374: p_quantity2 => l_line_dtl_tbl(1).quantity,
8375: p_copy_ext_attribs => fnd_api.g_true,
8376: p_copy_org_assignments => fnd_api.g_true,
8377: p_copy_parties => fnd_api.g_true,
8378: p_copy_accounts => fnd_api.g_true,
8379: p_copy_asset_assignments => fnd_api.g_true,
8380: p_copy_pricing_attribs => fnd_api.g_true,
8381: p_txn_rec => px_csi_txn_rec,
8382: x_new_instance_rec => l_split_new_inst_rec,
8375: p_copy_ext_attribs => fnd_api.g_true,
8376: p_copy_org_assignments => fnd_api.g_true,
8377: p_copy_parties => fnd_api.g_true,
8378: p_copy_accounts => fnd_api.g_true,
8379: p_copy_asset_assignments => fnd_api.g_true,
8380: p_copy_pricing_attribs => fnd_api.g_true,
8381: p_txn_rec => px_csi_txn_rec,
8382: x_new_instance_rec => l_split_new_inst_rec,
8383: x_return_status => l_return_status,
8376: p_copy_org_assignments => fnd_api.g_true,
8377: p_copy_parties => fnd_api.g_true,
8378: p_copy_accounts => fnd_api.g_true,
8379: p_copy_asset_assignments => fnd_api.g_true,
8380: p_copy_pricing_attribs => fnd_api.g_true,
8381: p_txn_rec => px_csi_txn_rec,
8382: x_new_instance_rec => l_split_new_inst_rec,
8383: x_return_status => l_return_status,
8384: x_msg_count => l_msg_count,
8383: x_return_status => l_return_status,
8384: x_msg_count => l_msg_count,
8385: x_msg_data => l_msg_data);
8386:
8387: IF NOT(l_return_status = fnd_api.g_ret_sts_success) THEN
8388: debug('csi_item_instance_pvt.split_item_instance raised errors');
8389: raise fnd_api.g_exc_error;
8390: END IF;
8391: l_u_line_dtl_tbl(1).instance_id := l_split_new_inst_rec.instance_id;
8385: x_msg_data => l_msg_data);
8386:
8387: IF NOT(l_return_status = fnd_api.g_ret_sts_success) THEN
8388: debug('csi_item_instance_pvt.split_item_instance raised errors');
8389: raise fnd_api.g_exc_error;
8390: END IF;
8391: l_u_line_dtl_tbl(1).instance_id := l_split_new_inst_rec.instance_id;
8392: l_u_line_dtl_tbl(1).preserve_detail_flag := 'Y';
8393: debug('Newly split Instance ID : '||l_split_new_inst_rec.instance_id);
8398: l_u_txn_line_rec.transaction_line_id := p_line_dtl_tbl(l_td_ind).transaction_line_id;
8399:
8400: l_u_line_dtl_tbl(1).txn_line_detail_id := p_line_dtl_tbl(l_td_ind).txn_line_detail_id;
8401:
8402: IF nvl(l_vld_orgn_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
8403: l_u_line_dtl_tbl(1).inv_organization_id := l_vld_orgn_id; -- FP fix for bug 5072107
8404: END IF;
8405:
8406: l_u_line_dtl_tbl(1).transaction_line_id := p_line_dtl_tbl(l_td_ind).transaction_line_id;
8407: l_u_line_dtl_tbl(1).processing_status := 'IN_PROCESS';
8408:
8409: csi_t_txn_details_grp.update_txn_line_dtls(
8410: p_api_version => 1.0,
8411: p_commit => fnd_api.g_false,
8412: p_init_msg_list => fnd_api.g_true,
8413: p_validation_level => fnd_api.g_valid_level_full,
8414: p_txn_line_rec => l_u_txn_line_rec,
8415: p_txn_line_detail_tbl => l_u_line_dtl_tbl,
8408:
8409: csi_t_txn_details_grp.update_txn_line_dtls(
8410: p_api_version => 1.0,
8411: p_commit => fnd_api.g_false,
8412: p_init_msg_list => fnd_api.g_true,
8413: p_validation_level => fnd_api.g_valid_level_full,
8414: p_txn_line_rec => l_u_txn_line_rec,
8415: p_txn_line_detail_tbl => l_u_line_dtl_tbl,
8416: px_txn_ii_rltns_tbl => l_u_ii_rltns_tbl,
8409: csi_t_txn_details_grp.update_txn_line_dtls(
8410: p_api_version => 1.0,
8411: p_commit => fnd_api.g_false,
8412: p_init_msg_list => fnd_api.g_true,
8413: p_validation_level => fnd_api.g_valid_level_full,
8414: p_txn_line_rec => l_u_txn_line_rec,
8415: p_txn_line_detail_tbl => l_u_line_dtl_tbl,
8416: px_txn_ii_rltns_tbl => l_u_ii_rltns_tbl,
8417: px_txn_party_detail_tbl => l_u_pty_dtl_tbl,
8421: x_return_status => l_return_status,
8422: x_msg_count => l_msg_count,
8423: x_msg_data => l_msg_data);
8424:
8425: IF x_return_status <> fnd_api.g_ret_sts_success THEN
8426: debug('Update txn line dtls failed for RMA Fulfillment.');
8427: RAISE fnd_api.g_exc_error;
8428: END IF;
8429:
8423: x_msg_data => l_msg_data);
8424:
8425: IF x_return_status <> fnd_api.g_ret_sts_success THEN
8426: debug('Update txn line dtls failed for RMA Fulfillment.');
8427: RAISE fnd_api.g_exc_error;
8428: END IF;
8429:
8430: END IF;
8431: END LOOP;
8431: END LOOP;
8432: END IF;
8433:
8434: EXCEPTION
8435: WHEN fnd_api.g_exc_error THEN
8436: x_return_status := fnd_api.g_ret_sts_error;
8437:
8438: END demo_fulfillment;
8439:
8432: END IF;
8433:
8434: EXCEPTION
8435: WHEN fnd_api.g_exc_error THEN
8436: x_return_status := fnd_api.g_ret_sts_error;
8437:
8438: END demo_fulfillment;
8439:
8440: -- configurator fulfillment
8478:
8479: -- Added this for unlock_item_instances
8480: l_config_tbl csi_cz_int.config_tbl;
8481:
8482: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
8483: l_return_message varchar2(2000);
8484: l_msg_count number;
8485: l_msg_data varchar2(2000);
8486:
8485: l_msg_data varchar2(2000);
8486:
8487: BEGIN
8488:
8489: x_return_status := fnd_api.g_ret_sts_success;
8490:
8491: debug('Configurator fulfillment for order line id :'||p_order_line_id);
8492:
8493: api_log('cz_fulfillment');
8500: x_source_header_rec => l_source_header_rec,
8501: x_source_line_rec => l_source_line_rec,
8502: x_return_status => l_return_status);
8503:
8504: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8505: RAISE fnd_api.g_exc_error;
8506: END IF;
8507:
8508: -- check for user entered transaction details
8501: x_source_line_rec => l_source_line_rec,
8502: x_return_status => l_return_status);
8503:
8504: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8505: RAISE fnd_api.g_exc_error;
8506: END IF;
8507:
8508: -- check for user entered transaction details
8509: l_txn_line_rec.source_transaction_table := csi_interface_pkg.g_om_source_table;
8519: l_txn_line_query_rec.source_transaction_id := l_source_line_rec.source_line_id;
8520:
8521: csi_t_txn_details_grp.get_transaction_details(
8522: p_api_version => 1.0,
8523: p_commit => fnd_api.g_false,
8524: p_init_msg_list => fnd_api.g_true,
8525: p_validation_level => fnd_api.g_valid_level_full,
8526: p_txn_line_query_rec => l_txn_line_query_rec,
8527: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
8520:
8521: csi_t_txn_details_grp.get_transaction_details(
8522: p_api_version => 1.0,
8523: p_commit => fnd_api.g_false,
8524: p_init_msg_list => fnd_api.g_true,
8525: p_validation_level => fnd_api.g_valid_level_full,
8526: p_txn_line_query_rec => l_txn_line_query_rec,
8527: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
8528: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
8521: csi_t_txn_details_grp.get_transaction_details(
8522: p_api_version => 1.0,
8523: p_commit => fnd_api.g_false,
8524: p_init_msg_list => fnd_api.g_true,
8525: p_validation_level => fnd_api.g_valid_level_full,
8526: p_txn_line_query_rec => l_txn_line_query_rec,
8527: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
8528: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
8529: p_get_parties_flag => fnd_api.g_true,
8525: p_validation_level => fnd_api.g_valid_level_full,
8526: p_txn_line_query_rec => l_txn_line_query_rec,
8527: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
8528: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
8529: p_get_parties_flag => fnd_api.g_true,
8530: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
8531: p_get_pty_accts_flag => fnd_api.g_true,
8532: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
8533: p_get_ii_rltns_flag => fnd_api.g_false,
8527: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
8528: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
8529: p_get_parties_flag => fnd_api.g_true,
8530: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
8531: p_get_pty_accts_flag => fnd_api.g_true,
8532: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
8533: p_get_ii_rltns_flag => fnd_api.g_false,
8534: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
8535: p_get_org_assgns_flag => fnd_api.g_true,
8529: p_get_parties_flag => fnd_api.g_true,
8530: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
8531: p_get_pty_accts_flag => fnd_api.g_true,
8532: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
8533: p_get_ii_rltns_flag => fnd_api.g_false,
8534: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
8535: p_get_org_assgns_flag => fnd_api.g_true,
8536: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
8537: p_get_ext_attrib_vals_flag => fnd_api.g_false,
8531: p_get_pty_accts_flag => fnd_api.g_true,
8532: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
8533: p_get_ii_rltns_flag => fnd_api.g_false,
8534: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
8535: p_get_org_assgns_flag => fnd_api.g_true,
8536: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
8537: p_get_ext_attrib_vals_flag => fnd_api.g_false,
8538: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
8539: p_get_csi_attribs_flag => fnd_api.g_false,
8533: p_get_ii_rltns_flag => fnd_api.g_false,
8534: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
8535: p_get_org_assgns_flag => fnd_api.g_true,
8536: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
8537: p_get_ext_attrib_vals_flag => fnd_api.g_false,
8538: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
8539: p_get_csi_attribs_flag => fnd_api.g_false,
8540: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
8541: p_get_csi_iea_values_flag => fnd_api.g_false,
8535: p_get_org_assgns_flag => fnd_api.g_true,
8536: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
8537: p_get_ext_attrib_vals_flag => fnd_api.g_false,
8538: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
8539: p_get_csi_attribs_flag => fnd_api.g_false,
8540: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
8541: p_get_csi_iea_values_flag => fnd_api.g_false,
8542: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
8543: p_get_txn_systems_flag => fnd_api.g_false,
8537: p_get_ext_attrib_vals_flag => fnd_api.g_false,
8538: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
8539: p_get_csi_attribs_flag => fnd_api.g_false,
8540: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
8541: p_get_csi_iea_values_flag => fnd_api.g_false,
8542: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
8543: p_get_txn_systems_flag => fnd_api.g_false,
8544: x_txn_systems_tbl => l_g_txn_systems_tbl,
8545: x_return_status => l_return_status,
8539: p_get_csi_attribs_flag => fnd_api.g_false,
8540: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
8541: p_get_csi_iea_values_flag => fnd_api.g_false,
8542: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
8543: p_get_txn_systems_flag => fnd_api.g_false,
8544: x_txn_systems_tbl => l_g_txn_systems_tbl,
8545: x_return_status => l_return_status,
8546: x_msg_count => l_msg_count,
8547: x_msg_data => l_msg_data);
8545: x_return_status => l_return_status,
8546: x_msg_count => l_msg_count,
8547: x_msg_data => l_msg_data);
8548:
8549: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8550: RAISE fnd_api.g_exc_error;
8551: END IF;
8552:
8553: -- l_txn_line_rec.source_transaction_type_id := csi_interface_pkg.g_om_txn_type_id;
8546: x_msg_count => l_msg_count,
8547: x_msg_data => l_msg_data);
8548:
8549: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8550: RAISE fnd_api.g_exc_error;
8551: END IF;
8552:
8553: -- l_txn_line_rec.source_transaction_type_id := csi_interface_pkg.g_om_txn_type_id;
8554: l_txn_line_rec.source_transaction_type_id := csi_interface_pkg.g_macd_txn_type_id; --bug 5194812
8573: px_txn_org_assgn_tbl => l_txn_org_assgn_tbl,
8574: x_pricing_attribs_tbl => l_pricing_attribs_tbl,
8575: x_return_status => l_return_status);
8576:
8577: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8578: RAISE fnd_api.g_exc_error;
8579: END IF;
8580:
8581: ELSE -- if not entered then build a brand new one using the source info
8574: x_pricing_attribs_tbl => l_pricing_attribs_tbl,
8575: x_return_status => l_return_status);
8576:
8577: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8578: RAISE fnd_api.g_exc_error;
8579: END IF;
8580:
8581: ELSE -- if not entered then build a brand new one using the source info
8582:
8596: x_txn_org_assgn_tbl => l_txn_org_assgn_tbl,
8597: x_pricing_attribs_tbl => l_pricing_attribs_tbl,
8598: x_return_status => l_return_status);
8599:
8600: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8601: RAISE fnd_api.g_exc_error;
8602: END IF;
8603:
8604: END IF;
8597: x_pricing_attribs_tbl => l_pricing_attribs_tbl,
8598: x_return_status => l_return_status);
8599:
8600: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8601: RAISE fnd_api.g_exc_error;
8602: END IF;
8603:
8604: END IF;
8605:
8615: x_txn_ii_rltns_tbl => l_txn_ii_rltns_tbl,
8616: x_txn_eav_tbl => l_txn_eav_tbl,
8617: x_return_status => l_return_status);
8618:
8619: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8620: RAISE fnd_api.g_exc_error;
8621: END IF;
8622:
8623: -- Added the following call for unlockinig the config keys to be fulfilled
8616: x_txn_eav_tbl => l_txn_eav_tbl,
8617: x_return_status => l_return_status);
8618:
8619: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8620: RAISE fnd_api.g_exc_error;
8621: END IF;
8622:
8623: -- Added the following call for unlockinig the config keys to be fulfilled
8624: IF l_txn_line_detail_tbl.count > 0
8635: l_config_tbl(1).source_txn_line_ref1 := l_source_line_rec.source_line_id;
8636:
8637: csi_cz_int.unlock_item_instances(
8638: p_api_version => 1.0,
8639: p_init_msg_list => fnd_api.g_true,
8640: p_commit => fnd_api.g_false,
8641: p_validation_level => fnd_api.g_valid_level_full,
8642: p_config_tbl => l_config_tbl,
8643: x_return_status => l_return_status,
8636:
8637: csi_cz_int.unlock_item_instances(
8638: p_api_version => 1.0,
8639: p_init_msg_list => fnd_api.g_true,
8640: p_commit => fnd_api.g_false,
8641: p_validation_level => fnd_api.g_valid_level_full,
8642: p_config_tbl => l_config_tbl,
8643: x_return_status => l_return_status,
8644: x_msg_count => l_msg_count,
8637: csi_cz_int.unlock_item_instances(
8638: p_api_version => 1.0,
8639: p_init_msg_list => fnd_api.g_true,
8640: p_commit => fnd_api.g_false,
8641: p_validation_level => fnd_api.g_valid_level_full,
8642: p_config_tbl => l_config_tbl,
8643: x_return_status => l_return_status,
8644: x_msg_count => l_msg_count,
8645: x_msg_data => l_msg_data);
8643: x_return_status => l_return_status,
8644: x_msg_count => l_msg_count,
8645: x_msg_data => l_msg_data);
8646:
8647: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8648: RAISE fnd_api.g_exc_error;
8649: END IF;
8650: END LOOP;
8651: END IF;
8644: x_msg_count => l_msg_count,
8645: x_msg_data => l_msg_data);
8646:
8647: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8648: RAISE fnd_api.g_exc_error;
8649: END IF;
8650: END LOOP;
8651: END IF;
8652:
8665: px_pricing_attribs_tbl => l_pricing_attribs_tbl,
8666: x_return_status => l_return_status,
8667: x_return_message => l_return_message);
8668:
8669: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8670: RAISE fnd_api.g_exc_error;
8671: END IF;
8672:
8673: debug('Configurator fulfillment successful for order line id :'||p_order_line_id);
8666: x_return_status => l_return_status,
8667: x_return_message => l_return_message);
8668:
8669: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8670: RAISE fnd_api.g_exc_error;
8671: END IF;
8672:
8673: debug('Configurator fulfillment successful for order line id :'||p_order_line_id);
8674:
8672:
8673: debug('Configurator fulfillment successful for order line id :'||p_order_line_id);
8674:
8675: EXCEPTION
8676: WHEN fnd_api.g_exc_error THEN
8677: x_return_status := fnd_api.g_ret_sts_error;
8678: x_return_message := csi_t_gen_utility_pvt.dump_error_stack;
8679: rollback to cz_fulfillment;
8680: debug(x_return_message);
8673: debug('Configurator fulfillment successful for order line id :'||p_order_line_id);
8674:
8675: EXCEPTION
8676: WHEN fnd_api.g_exc_error THEN
8677: x_return_status := fnd_api.g_ret_sts_error;
8678: x_return_message := csi_t_gen_utility_pvt.dump_error_stack;
8679: rollback to cz_fulfillment;
8680: debug(x_return_message);
8681: WHEN others THEN
8681: WHEN others THEN
8682: fnd_message.set_name ('FND', 'FND_GENERIC_MESSAGE');
8683: fnd_message.set_token('MESSAGE', 'OTHERS Error :'||substr(sqlerrm, 1, 300));
8684: fnd_msg_pub.add;
8685: x_return_status := fnd_api.g_ret_sts_error;
8686: x_return_message := csi_t_gen_utility_pvt.dump_error_stack;
8687: rollback to cz_fulfillment;
8688: debug(x_return_message);
8689: END cz_fulfillment;
8717:
8718: l_src_tld_tbl csi_t_datastructures_grp.txn_line_detail_tbl;
8719: l_src_tld_total_qty number := 0;
8720:
8721: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
8722: l_msg_count number;
8723: l_msg_data varchar2(2000);
8724:
8725: l_cur_party_site_id number; --For bug 8816038
8726: l_inst_party_site_id number; --For bug 8816038
8727:
8728: BEGIN
8729:
8730: x_return_status := fnd_api.g_ret_sts_success;
8731:
8732: api_log('query_tld_and_update_ib');
8733:
8734: l_p_tl_rec.transaction_line_id := px_default_info_rec.transaction_line_id;
8742: l_tl_query_rec.source_transaction_table := 'OE_ORDER_LINES_ALL';
8743: l_tl_query_rec.source_transaction_id := p_order_line_rec.order_line_id;
8744:
8745: l_tld_query_rec.processing_status := 'IN_PROCESS';
8746: l_tld_query_rec.source_transaction_flag := fnd_api.g_miss_char;
8747:
8748: csi_t_txn_details_grp.get_transaction_details(
8749: p_api_version => 1,
8750: p_commit => fnd_api.g_false,
8746: l_tld_query_rec.source_transaction_flag := fnd_api.g_miss_char;
8747:
8748: csi_t_txn_details_grp.get_transaction_details(
8749: p_api_version => 1,
8750: p_commit => fnd_api.g_false,
8751: p_init_msg_list => fnd_api.g_true,
8752: p_validation_level => fnd_api.g_valid_level_full,
8753: p_txn_line_query_rec => l_tl_query_rec,
8754: p_txn_line_detail_query_rec => l_tld_query_rec,
8747:
8748: csi_t_txn_details_grp.get_transaction_details(
8749: p_api_version => 1,
8750: p_commit => fnd_api.g_false,
8751: p_init_msg_list => fnd_api.g_true,
8752: p_validation_level => fnd_api.g_valid_level_full,
8753: p_txn_line_query_rec => l_tl_query_rec,
8754: p_txn_line_detail_query_rec => l_tld_query_rec,
8755: x_txn_line_detail_tbl => l_p_tld_tbl,
8748: csi_t_txn_details_grp.get_transaction_details(
8749: p_api_version => 1,
8750: p_commit => fnd_api.g_false,
8751: p_init_msg_list => fnd_api.g_true,
8752: p_validation_level => fnd_api.g_valid_level_full,
8753: p_txn_line_query_rec => l_tl_query_rec,
8754: p_txn_line_detail_query_rec => l_tld_query_rec,
8755: x_txn_line_detail_tbl => l_p_tld_tbl,
8756: p_get_parties_flag => fnd_api.g_true,
8752: p_validation_level => fnd_api.g_valid_level_full,
8753: p_txn_line_query_rec => l_tl_query_rec,
8754: p_txn_line_detail_query_rec => l_tld_query_rec,
8755: x_txn_line_detail_tbl => l_p_tld_tbl,
8756: p_get_parties_flag => fnd_api.g_true,
8757: x_txn_party_detail_tbl => l_p_tpd_tbl,
8758: p_get_pty_accts_flag => fnd_api.g_true,
8759: x_txn_pty_acct_detail_tbl => l_p_tpa_tbl,
8760: p_get_ii_rltns_flag => fnd_api.g_true,
8754: p_txn_line_detail_query_rec => l_tld_query_rec,
8755: x_txn_line_detail_tbl => l_p_tld_tbl,
8756: p_get_parties_flag => fnd_api.g_true,
8757: x_txn_party_detail_tbl => l_p_tpd_tbl,
8758: p_get_pty_accts_flag => fnd_api.g_true,
8759: x_txn_pty_acct_detail_tbl => l_p_tpa_tbl,
8760: p_get_ii_rltns_flag => fnd_api.g_true,
8761: x_txn_ii_rltns_tbl => l_p_tiir_tbl,
8762: p_get_org_assgns_flag => fnd_api.g_true,
8756: p_get_parties_flag => fnd_api.g_true,
8757: x_txn_party_detail_tbl => l_p_tpd_tbl,
8758: p_get_pty_accts_flag => fnd_api.g_true,
8759: x_txn_pty_acct_detail_tbl => l_p_tpa_tbl,
8760: p_get_ii_rltns_flag => fnd_api.g_true,
8761: x_txn_ii_rltns_tbl => l_p_tiir_tbl,
8762: p_get_org_assgns_flag => fnd_api.g_true,
8763: x_txn_org_assgn_tbl => l_p_toa_tbl,
8764: p_get_ext_attrib_vals_flag => fnd_api.g_true,
8758: p_get_pty_accts_flag => fnd_api.g_true,
8759: x_txn_pty_acct_detail_tbl => l_p_tpa_tbl,
8760: p_get_ii_rltns_flag => fnd_api.g_true,
8761: x_txn_ii_rltns_tbl => l_p_tiir_tbl,
8762: p_get_org_assgns_flag => fnd_api.g_true,
8763: x_txn_org_assgn_tbl => l_p_toa_tbl,
8764: p_get_ext_attrib_vals_flag => fnd_api.g_true,
8765: x_txn_ext_attrib_vals_tbl => l_p_teav_tbl,
8766: p_get_csi_attribs_flag => fnd_api.g_false,
8760: p_get_ii_rltns_flag => fnd_api.g_true,
8761: x_txn_ii_rltns_tbl => l_p_tiir_tbl,
8762: p_get_org_assgns_flag => fnd_api.g_true,
8763: x_txn_org_assgn_tbl => l_p_toa_tbl,
8764: p_get_ext_attrib_vals_flag => fnd_api.g_true,
8765: x_txn_ext_attrib_vals_tbl => l_p_teav_tbl,
8766: p_get_csi_attribs_flag => fnd_api.g_false,
8767: x_csi_ext_attribs_tbl => l_p_ea_tbl,
8768: p_get_csi_iea_values_flag => fnd_api.g_false,
8762: p_get_org_assgns_flag => fnd_api.g_true,
8763: x_txn_org_assgn_tbl => l_p_toa_tbl,
8764: p_get_ext_attrib_vals_flag => fnd_api.g_true,
8765: x_txn_ext_attrib_vals_tbl => l_p_teav_tbl,
8766: p_get_csi_attribs_flag => fnd_api.g_false,
8767: x_csi_ext_attribs_tbl => l_p_ea_tbl,
8768: p_get_csi_iea_values_flag => fnd_api.g_false,
8769: x_csi_iea_values_tbl => l_p_eav_tbl,
8770: p_get_txn_systems_flag => fnd_api.g_true,
8764: p_get_ext_attrib_vals_flag => fnd_api.g_true,
8765: x_txn_ext_attrib_vals_tbl => l_p_teav_tbl,
8766: p_get_csi_attribs_flag => fnd_api.g_false,
8767: x_csi_ext_attribs_tbl => l_p_ea_tbl,
8768: p_get_csi_iea_values_flag => fnd_api.g_false,
8769: x_csi_iea_values_tbl => l_p_eav_tbl,
8770: p_get_txn_systems_flag => fnd_api.g_true,
8771: x_txn_systems_tbl => l_p_tsys_tbl,
8772: x_return_status => l_return_status,
8766: p_get_csi_attribs_flag => fnd_api.g_false,
8767: x_csi_ext_attribs_tbl => l_p_ea_tbl,
8768: p_get_csi_iea_values_flag => fnd_api.g_false,
8769: x_csi_iea_values_tbl => l_p_eav_tbl,
8770: p_get_txn_systems_flag => fnd_api.g_true,
8771: x_txn_systems_tbl => l_p_tsys_tbl,
8772: x_return_status => l_return_status,
8773: x_msg_count => l_msg_count,
8774: x_msg_data => l_msg_data);
8772: x_return_status => l_return_status,
8773: x_msg_count => l_msg_count,
8774: x_msg_data => l_msg_data);
8775:
8776: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8777: RAISE fnd_api.g_exc_error;
8778: END IF;
8779:
8780: IF l_p_tld_tbl.COUNT > 0 THEN
8773: x_msg_count => l_msg_count,
8774: x_msg_data => l_msg_data);
8775:
8776: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8777: RAISE fnd_api.g_exc_error;
8778: END IF;
8779:
8780: IF l_p_tld_tbl.COUNT > 0 THEN
8781:
8803: -- assign default current and default install location
8804: FOR l_ind IN l_p_tld_tbl.FIRST .. l_p_tld_tbl.LAST
8805: LOOP
8806: IF l_p_tld_tbl(l_ind).source_transaction_flag = 'Y' THEN
8807: IF nvl(l_p_tld_tbl(l_ind).location_type_code,fnd_api.g_miss_char) =
8808: fnd_api.g_miss_char
8809: OR
8810: nvl(l_p_tld_tbl(l_ind).location_id, fnd_api.g_miss_num) = fnd_api.g_miss_num
8811: THEN
8804: FOR l_ind IN l_p_tld_tbl.FIRST .. l_p_tld_tbl.LAST
8805: LOOP
8806: IF l_p_tld_tbl(l_ind).source_transaction_flag = 'Y' THEN
8807: IF nvl(l_p_tld_tbl(l_ind).location_type_code,fnd_api.g_miss_char) =
8808: fnd_api.g_miss_char
8809: OR
8810: nvl(l_p_tld_tbl(l_ind).location_id, fnd_api.g_miss_num) = fnd_api.g_miss_num
8811: THEN
8812: --Below Begin to End added for bug 8816038 --
8806: IF l_p_tld_tbl(l_ind).source_transaction_flag = 'Y' THEN
8807: IF nvl(l_p_tld_tbl(l_ind).location_type_code,fnd_api.g_miss_char) =
8808: fnd_api.g_miss_char
8809: OR
8810: nvl(l_p_tld_tbl(l_ind).location_id, fnd_api.g_miss_num) = fnd_api.g_miss_num
8811: THEN
8812: --Below Begin to End added for bug 8816038 --
8813: /* BEGIN
8814:
8829: WHEN no_data_found then
8830: fnd_message.set_name('CSI','CSI_INT_PTY_SITE_MISSING');
8831: fnd_message.set_token('LOCATION_ID', px_default_info_rec.current_party_site_id);
8832: fnd_msg_pub.add;
8833: raise fnd_api.g_exc_error;
8834: WHEN too_many_rows then
8835: debug('Many Party sites found');
8836: raise fnd_api.g_exc_error;
8837: END;*/
8832: fnd_msg_pub.add;
8833: raise fnd_api.g_exc_error;
8834: WHEN too_many_rows then
8835: debug('Many Party sites found');
8836: raise fnd_api.g_exc_error;
8837: END;*/
8838:
8839: END IF;
8840:
8837: END;*/
8838:
8839: END IF;
8840:
8841: IF nvl(l_p_tld_tbl(l_ind).install_location_type_code,fnd_api.g_miss_char) =
8842: fnd_api.g_miss_char
8843: OR
8844: nvl(l_p_tld_tbl(l_ind).install_location_id, fnd_api.g_miss_num) = fnd_api.g_miss_num
8845: THEN
8838:
8839: END IF;
8840:
8841: IF nvl(l_p_tld_tbl(l_ind).install_location_type_code,fnd_api.g_miss_char) =
8842: fnd_api.g_miss_char
8843: OR
8844: nvl(l_p_tld_tbl(l_ind).install_location_id, fnd_api.g_miss_num) = fnd_api.g_miss_num
8845: THEN
8846: /* --Below Begin to End added for bug 8816038 --
8840:
8841: IF nvl(l_p_tld_tbl(l_ind).install_location_type_code,fnd_api.g_miss_char) =
8842: fnd_api.g_miss_char
8843: OR
8844: nvl(l_p_tld_tbl(l_ind).install_location_id, fnd_api.g_miss_num) = fnd_api.g_miss_num
8845: THEN
8846: /* --Below Begin to End added for bug 8816038 --
8847:
8848: BEGIN
8864: WHEN no_data_found then
8865: fnd_message.set_name('CSI','CSI_INT_PTY_SITE_MISSING');
8866: fnd_message.set_token('LOCATION_ID', px_default_info_rec.install_party_site_id);
8867: fnd_msg_pub.add;
8868: raise fnd_api.g_exc_error;
8869: WHEN too_many_rows then
8870: debug('Many Party sites found');
8871: raise fnd_api.g_exc_error;
8872: END; */
8867: fnd_msg_pub.add;
8868: raise fnd_api.g_exc_error;
8869: WHEN too_many_rows then
8870: debug('Many Party sites found');
8871: raise fnd_api.g_exc_error;
8872: END; */
8873:
8874: END IF;
8875: END IF;
8880: p_line_id => p_order_line_rec.order_line_id,
8881: x_pricing_attb_tbl => l_p_pa_tbl,
8882: x_return_status => l_return_status);
8883:
8884: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8885: RAISE fnd_api.g_exc_error;
8886: END IF;
8887:
8888: IF csi_t_gen_utility_pvt.g_debug_level >= 25 THEN
8881: x_pricing_attb_tbl => l_p_pa_tbl,
8882: x_return_status => l_return_status);
8883:
8884: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8885: RAISE fnd_api.g_exc_error;
8886: END IF;
8887:
8888: IF csi_t_gen_utility_pvt.g_debug_level >= 25 THEN
8889: csi_t_gen_utility_pvt.dump_txn_tables(
8935: l_p_order_line_rec.trx_line_id := px_default_info_rec.transaction_line_id;
8936:
8937: csi_order_ship_pub.update_install_base(
8938: p_api_version => 1.0,
8939: p_commit => fnd_api.g_false,
8940: p_init_msg_list => fnd_api.g_true,
8941: p_validation_level => fnd_api.g_valid_level_full,
8942: p_txn_line_rec => l_p_tl_rec,
8943: p_txn_line_detail_tbl => l_p_tld_tbl,
8936:
8937: csi_order_ship_pub.update_install_base(
8938: p_api_version => 1.0,
8939: p_commit => fnd_api.g_false,
8940: p_init_msg_list => fnd_api.g_true,
8941: p_validation_level => fnd_api.g_valid_level_full,
8942: p_txn_line_rec => l_p_tl_rec,
8943: p_txn_line_detail_tbl => l_p_tld_tbl,
8944: p_txn_party_detail_tbl => l_p_tpd_tbl,
8937: csi_order_ship_pub.update_install_base(
8938: p_api_version => 1.0,
8939: p_commit => fnd_api.g_false,
8940: p_init_msg_list => fnd_api.g_true,
8941: p_validation_level => fnd_api.g_valid_level_full,
8942: p_txn_line_rec => l_p_tl_rec,
8943: p_txn_line_detail_tbl => l_p_tld_tbl,
8944: p_txn_party_detail_tbl => l_p_tpd_tbl,
8945: p_txn_pty_acct_dtl_tbl => l_p_tpa_tbl,
8956: x_return_status => l_return_status,
8957: x_msg_count => l_msg_count,
8958: x_msg_data => l_msg_data);
8959:
8960: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8961: RAISE fnd_api.g_exc_error;
8962: END IF;
8963:
8964: UPDATE csi_t_transaction_lines
8957: x_msg_count => l_msg_count,
8958: x_msg_data => l_msg_data);
8959:
8960: IF l_return_status <> fnd_api.g_ret_sts_success THEN
8961: RAISE fnd_api.g_exc_error;
8962: END IF;
8963:
8964: UPDATE csi_t_transaction_lines
8965: SET processing_status = 'PROCESSED'
8965: SET processing_status = 'PROCESSED'
8966: WHERE transaction_line_id = l_p_tl_rec.transaction_line_id;
8967:
8968: EXCEPTION
8969: WHEN fnd_api.g_exc_error THEN
8970: x_return_status := fnd_api.g_ret_sts_error;
8971: END query_tld_and_update_ib;
8972:
8973: -- Check if shipment transaction part of order is interfaced with IB or not
8966: WHERE transaction_line_id = l_p_tl_rec.transaction_line_id;
8967:
8968: EXCEPTION
8969: WHEN fnd_api.g_exc_error THEN
8970: x_return_status := fnd_api.g_ret_sts_error;
8971: END query_tld_and_update_ib;
8972:
8973: -- Check if shipment transaction part of order is interfaced with IB or not
8974: -- If Interfaced => Proceed with processing fulfilment line
9137: l_trackable_bom_comp_cnt NUMBER := 0;
9138:
9139: l_debug_level number;
9140: l_error_message varchar2(2000);
9141: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
9142: l_msg_data varchar2(2000);
9143: l_msg_count number;
9144:
9145: ---Added (Start) for m-to-m enhancements
9178: BEGIN
9179:
9180: savepoint order_fulfillment;
9181:
9182: x_return_status := fnd_api.g_ret_sts_success;
9183: l_error_rec := px_trx_error_rec;
9184:
9185: l_debug_level := csi_t_gen_utility_pvt.g_debug_level;
9186:
9224: p_transaction_type_id => l_txn_type_id,
9225: x_sub_type_id => l_txn_sub_type_id,
9226: x_return_status => l_return_status);
9227:
9228: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9229: raise fnd_api.g_exc_error;
9230: END IF;
9231:
9232: l_default_info_rec.sub_type_id := l_txn_sub_type_id;
9225: x_sub_type_id => l_txn_sub_type_id,
9226: x_return_status => l_return_status);
9227:
9228: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9229: raise fnd_api.g_exc_error;
9230: END IF;
9231:
9232: l_default_info_rec.sub_type_id := l_txn_sub_type_id;
9233:
9236: p_sub_type_id => l_txn_sub_type_id,
9237: x_sub_type_rec => l_sub_type_rec,
9238: x_return_status => l_return_status);
9239:
9240: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9241: RAISE fnd_api.g_exc_error;
9242: END IF;
9243:
9244: l_default_info_rec.src_change_owner := l_sub_type_rec.src_change_owner;
9237: x_sub_type_rec => l_sub_type_rec,
9238: x_return_status => l_return_status);
9239:
9240: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9241: RAISE fnd_api.g_exc_error;
9242: END IF;
9243:
9244: l_default_info_rec.src_change_owner := l_sub_type_rec.src_change_owner;
9245: l_default_info_rec.src_change_owner_code := l_sub_type_rec.src_change_owner_code;
9262: WHEN no_data_found THEN
9263: fnd_message.set_name('CSI','CSI_INT_OE_LINE_ID_INVALID');
9264: fnd_message.set_token('OE_LINE_ID', p_order_line_id);
9265: fnd_msg_pub.add;
9266: RAISE fnd_api.g_exc_error;
9267: END;
9268:
9269: IF l_order_line_rec.org_id is null THEN
9270: l_order_line_rec.org_id := l_order_header_rec.org_id;
9333: IF l_order_line_rec.fulfilled_quantity <= 0 THEN
9334: fnd_message.set_name('CSI', 'CSI_ORDER_LINE_NOT_FULFILLED');
9335: fnd_message.set_token('FULFILLED_QUANTITY', l_order_line_rec.fulfilled_quantity);
9336: fnd_msg_pub.add;
9337: RAISE fnd_api.g_exc_error;
9338: END IF;
9339: END IF;
9340:
9341: get_partner_order_info(
9344: x_current_site_use_id => l_current_site_use_id,
9345: x_install_site_use_id => l_install_site_use_id,
9346: x_return_status => l_return_status);
9347:
9348: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9349: RAISE fnd_api.g_exc_error;
9350: END IF;
9351:
9352:
9345: x_install_site_use_id => l_install_site_use_id,
9346: x_return_status => l_return_status);
9347:
9348: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9349: RAISE fnd_api.g_exc_error;
9350: END IF;
9351:
9352:
9353: IF nvl(l_current_site_use_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
9349: RAISE fnd_api.g_exc_error;
9350: END IF;
9351:
9352:
9353: IF nvl(l_current_site_use_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
9354: BEGIN
9355: SELECT HCAS.party_site_id
9356: INTO l_party_site_id
9357: FROM hz_cust_site_uses_all HCSU,
9364: fnd_message.set_name('CSI','CSI_TXN_SITE_USE_INVALID');
9365: fnd_message.set_token('SITE_USE_ID',l_current_site_use_id);
9366: fnd_message.set_token('SITE_USE_CODE','SITE_USE_ID');
9367: fnd_msg_pub.add;
9368: RAISE fnd_api.g_exc_error;
9369: END;
9370: END IF;
9371:
9372: IF nvl(l_install_site_use_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
9368: RAISE fnd_api.g_exc_error;
9369: END;
9370: END IF;
9371:
9372: IF nvl(l_install_site_use_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
9373: BEGIN
9374: SELECT HCAS.party_site_id
9375: INTO l_party_site_id
9376: FROM hz_cust_site_uses_all HCSU,
9383: fnd_message.set_name('CSI','CSI_TXN_SITE_USE_INVALID');
9384: fnd_message.set_token('SITE_USE_ID',l_install_site_use_id);
9385: fnd_message.set_token('SITE_USE_CODE','SITE_USE_ID');
9386: fnd_msg_pub.add;
9387: RAISE fnd_api.g_exc_error;
9388: END;
9389: END IF;
9390:
9391: -- IF l_order_line_rec.sold_to_org_id is not null THEN
9388: END;
9389: END IF;
9390:
9391: -- IF l_order_line_rec.sold_to_org_id is not null THEN
9392: IF nvl(l_end_customer_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
9393: SELECT party_id
9394: INTO l_owner_party_id
9395: FROM hz_cust_accounts
9396: WHERE cust_account_id = l_end_customer_id;
9481: -- other lines
9482: --Added additional If condition for Bug 13437384
9483: l_check_pending_ship_lines := FND_PROFILE.VALUE('CSI_CHECK_PENDING_SHIP_LINES');
9484: IF(NVL(l_check_pending_ship_lines, 'N') = 'Y') THEN
9485: IF NVL(l_order_line_rec.top_model_line_id, FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM THEN
9486:
9487: l_shipment_processed := check_shipment_lines(
9488: p_header_id => l_order_line_rec.header_id,
9489: p_top_model_line_id => l_order_line_rec.top_model_line_id);
9494: -- block fulfilment processing
9495: debug('Shipment Line Not Interfaced to IB. Blocking Fulfillment till Shipment successfully completes');
9496: fnd_message.set_name('CSI','CSI_PENDING_SHIPMENT_LINES');
9497: fnd_msg_pub.add;
9498: RAISE fnd_api.g_exc_error;
9499: ELSE
9500: -- Shipment line interfaced so proceed with fulfilment line processing
9501: debug('Shipment Lines, if any, are successfully processed. Proceed with Fulfillment processing');
9502: END IF; -- check_shipment_line
9499: ELSE
9500: -- Shipment line interfaced so proceed with fulfilment line processing
9501: debug('Shipment Lines, if any, are successfully processed. Proceed with Fulfillment processing');
9502: END IF; -- check_shipment_line
9503: END IF; -- NVL(l_order_line_rec.link_to_line_id, FND_API.G_MISS_NUM)
9504: END IF;
9505:
9506: get_item_type(
9507: p_item_type_code => l_order_line_rec.item_type_code,
9521: l_macd_processing := csi_interface_pkg.check_macd_processing(
9522: p_config_session_key => l_om_session_key,
9523: x_return_status => l_return_status);
9524:
9525: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9526: RAISE fnd_api.g_exc_error;
9527: END IF;
9528:
9529: IF l_macd_processing THEN
9522: p_config_session_key => l_om_session_key,
9523: x_return_status => l_return_status);
9524:
9525: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9526: RAISE fnd_api.g_exc_error;
9527: END IF;
9528:
9529: IF l_macd_processing THEN
9530: -- srramakr TSO with Equipment
9580: debug(' Order Line ID : '||l_ul_instance_rec.last_oe_order_line_id);
9581: --
9582: csi_item_instance_pub.update_item_instance(
9583: p_api_version => 1.0,
9584: p_commit => fnd_api.g_false,
9585: p_init_msg_list => fnd_api.g_true,
9586: p_validation_level => fnd_api.g_valid_level_full,
9587: p_instance_rec => l_ul_instance_rec,
9588: p_party_tbl => l_u_parties_tbl,
9581: --
9582: csi_item_instance_pub.update_item_instance(
9583: p_api_version => 1.0,
9584: p_commit => fnd_api.g_false,
9585: p_init_msg_list => fnd_api.g_true,
9586: p_validation_level => fnd_api.g_valid_level_full,
9587: p_instance_rec => l_ul_instance_rec,
9588: p_party_tbl => l_u_parties_tbl,
9589: p_account_tbl => l_u_pty_accts_tbl,
9582: csi_item_instance_pub.update_item_instance(
9583: p_api_version => 1.0,
9584: p_commit => fnd_api.g_false,
9585: p_init_msg_list => fnd_api.g_true,
9586: p_validation_level => fnd_api.g_valid_level_full,
9587: p_instance_rec => l_ul_instance_rec,
9588: p_party_tbl => l_u_parties_tbl,
9589: p_account_tbl => l_u_pty_accts_tbl,
9590: p_org_assignments_tbl => l_u_org_units_tbl,
9596: x_return_status => l_return_status,
9597: x_msg_count => l_msg_count,
9598: x_msg_data => l_msg_data);
9599: --
9600: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9601: RAISE fnd_api.g_exc_error;
9602: ELSE
9603: UPDATE csi_t_txn_line_details
9604: SET processing_status = 'PROCESSED'
9597: x_msg_count => l_msg_count,
9598: x_msg_data => l_msg_data);
9599: --
9600: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9601: RAISE fnd_api.g_exc_error;
9602: ELSE
9603: UPDATE csi_t_txn_line_details
9604: SET processing_status = 'PROCESSED'
9605: WHERE transaction_line_id = l_ul_txn_line_id;
9614: p_order_line_id => p_order_line_id,
9615: x_return_status => l_return_status,
9616: x_return_message => l_error_message);
9617:
9618: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9619: RAISE fnd_api.g_exc_error;
9620: END IF;
9621:
9622: RAISE skip_regular_process;
9615: x_return_status => l_return_status,
9616: x_return_message => l_error_message);
9617:
9618: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9619: RAISE fnd_api.g_exc_error;
9620: END IF;
9621:
9622: RAISE skip_regular_process;
9623:
9691: px_default_info_rec => l_default_info_rec,
9692: x_config_rec => l_config_rec,
9693: x_return_status => l_return_status);
9694:
9695: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9696: RAISE fnd_api.g_exc_error;
9697: END IF;
9698:
9699: --Added code for bug 10329599
9692: x_config_rec => l_config_rec,
9693: x_return_status => l_return_status);
9694:
9695: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9696: RAISE fnd_api.g_exc_error;
9697: END IF;
9698:
9699: --Added code for bug 10329599
9700: -- This code checks if the line corresponds to Phantom option item
9749: px_csi_txn_rec => l_csi_txn_rec,
9750: x_config_instances => l_config_instances,
9751: x_return_status => l_return_status);
9752:
9753: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9754: RAISE fnd_api.g_exc_error;
9755: END IF;
9756: END IF;
9757:
9750: x_config_instances => l_config_instances,
9751: x_return_status => l_return_status);
9752:
9753: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9754: RAISE fnd_api.g_exc_error;
9755: END IF;
9756: END IF;
9757:
9758: IF l_order_line_rec.item_type_code = 'OPTION' AND l_inv_transactable_flag = 'Y'
9768: px_default_info_rec => l_default_info_rec,
9769: x_wip_processing => l_wip_processing,
9770: x_return_status => l_return_status);
9771:
9772: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9773: RAISE fnd_api.g_exc_error;
9774: END IF;
9775:
9776: IF l_wip_processing THEN
9769: x_wip_processing => l_wip_processing,
9770: x_return_status => l_return_status);
9771:
9772: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9773: RAISE fnd_api.g_exc_error;
9774: END IF;
9775:
9776: IF l_wip_processing THEN
9777: RAISE skip_regular_process;
9790: px_config_instances => l_config_instances,
9791: x_reship_found => l_config_reship_found,
9792: x_return_status => l_return_status);
9793:
9794: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9795: RAISE fnd_api.g_exc_error;
9796: END IF;
9797: END IF;
9798:
9791: x_reship_found => l_config_reship_found,
9792: x_return_status => l_return_status);
9793:
9794: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9795: RAISE fnd_api.g_exc_error;
9796: END IF;
9797: END IF;
9798:
9799: IF l_config_reship_found THEN
9827: p_option_item_id => l_order_line_rec.inventory_item_id,
9828: x_option_instances => l_option_instances,
9829: x_return_status => l_return_status);
9830:
9831: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9832: RAISE fnd_api.g_exc_error;
9833: END IF;
9834:
9835: IF l_option_instances.COUNT > 0 THEN
9828: x_option_instances => l_option_instances,
9829: x_return_status => l_return_status);
9830:
9831: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9832: RAISE fnd_api.g_exc_error;
9833: END IF;
9834:
9835: IF l_option_instances.COUNT > 0 THEN
9836: FOR l_o_ind IN l_option_instances.FIRST .. l_option_instances.LAST
9841: p_order_line_id => p_order_line_id,
9842: px_csi_txn_rec => l_csi_txn_rec,
9843: x_return_status => l_return_status);
9844:
9845: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9846: RAISE fnd_api.g_exc_error;
9847: END IF;
9848: END LOOP;
9849: END IF;
9842: px_csi_txn_rec => l_csi_txn_rec,
9843: x_return_status => l_return_status);
9844:
9845: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9846: RAISE fnd_api.g_exc_error;
9847: END IF;
9848: END LOOP;
9849: END IF;
9850: END IF;
9936: p_om_vld_org_id => l_default_info_rec.om_vld_org_id,
9937: x_trackable_line_tbl => l_trk_child_tbl,
9938: x_return_status => l_return_status);*/
9939:
9940: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9941: RAISE fnd_api.g_exc_error;
9942: END IF;
9943:
9944: IF l_trk_child_tbl.count > 0 THEN
9937: x_trackable_line_tbl => l_trk_child_tbl,
9938: x_return_status => l_return_status);*/
9939:
9940: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9941: RAISE fnd_api.g_exc_error;
9942: END IF;
9943:
9944: IF l_trk_child_tbl.count > 0 THEN
9945:
9954: p_om_vld_org_id => l_default_info_rec.om_vld_org_id,
9955: x_parent_line_rec => l_trk_parent_rec,
9956: x_return_status => l_return_status);
9957:
9958: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9959: RAISE fnd_api.g_exc_error;
9960: END IF;
9961:
9962: IF nvl(l_trk_parent_rec.line_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
9955: x_parent_line_rec => l_trk_parent_rec,
9956: x_return_status => l_return_status);
9957:
9958: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9959: RAISE fnd_api.g_exc_error;
9960: END IF;
9961:
9962: IF nvl(l_trk_parent_rec.line_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
9963: l_ratio_split_flag := 'Y';
9958: IF l_return_status <> fnd_api.g_ret_sts_success THEN
9959: RAISE fnd_api.g_exc_error;
9960: END IF;
9961:
9962: IF nvl(l_trk_parent_rec.line_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
9963: l_ratio_split_flag := 'Y';
9964: l_split_flag := 'Y';
9965: --fix for bug5096435
9966: IF l_order_line_rec.model_remnant_flag = 'Y' THEN
10084: csi_t_utilities_pvt.cascade_child(
10085: p_data_string => l_model_hierarchy,
10086: x_return_status => l_return_status );
10087:
10088: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10089: RAISE fnd_api.g_exc_error;
10090: END IF;
10091:
10092: -- call cascade
10085: p_data_string => l_model_hierarchy,
10086: x_return_status => l_return_status );
10087:
10088: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10089: RAISE fnd_api.g_exc_error;
10090: END IF;
10091:
10092: -- call cascade
10093: l_found := TRUE;
10119: fnd_message.set_name('CSI', 'CSI_TXN_SRC_ALREADY_PROCESSED');
10120: fnd_message.set_token('SRC_TBL', l_src_txn_table);
10121: fnd_message.set_token('SRC_ID', p_order_line_id);
10122: fnd_msg_pub.add;
10123: RAISE fnd_api.g_exc_error;
10124: END IF;
10125:
10126: UPDATE csi_t_transaction_lines
10127: SET processing_status = 'IN_PROCESS'
10136: l_txn_line_detail_query_rec.source_transaction_flag := 'Y';
10137:
10138: csi_t_txn_details_grp.get_transaction_details(
10139: p_api_version => 1,
10140: p_commit => fnd_api.g_false,
10141: p_init_msg_list => fnd_api.g_true,
10142: p_validation_level => fnd_api.g_valid_level_full,
10143: p_txn_line_query_rec => l_txn_line_query_rec,
10144: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
10137:
10138: csi_t_txn_details_grp.get_transaction_details(
10139: p_api_version => 1,
10140: p_commit => fnd_api.g_false,
10141: p_init_msg_list => fnd_api.g_true,
10142: p_validation_level => fnd_api.g_valid_level_full,
10143: p_txn_line_query_rec => l_txn_line_query_rec,
10144: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
10145: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
10138: csi_t_txn_details_grp.get_transaction_details(
10139: p_api_version => 1,
10140: p_commit => fnd_api.g_false,
10141: p_init_msg_list => fnd_api.g_true,
10142: p_validation_level => fnd_api.g_valid_level_full,
10143: p_txn_line_query_rec => l_txn_line_query_rec,
10144: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
10145: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
10146: p_get_parties_flag => fnd_api.g_false,
10142: p_validation_level => fnd_api.g_valid_level_full,
10143: p_txn_line_query_rec => l_txn_line_query_rec,
10144: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
10145: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
10146: p_get_parties_flag => fnd_api.g_false,
10147: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
10148: p_get_pty_accts_flag => fnd_api.g_false,
10149: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
10150: p_get_ii_rltns_flag => fnd_api.g_true,
10144: p_txn_line_detail_query_rec => l_txn_line_detail_query_rec,
10145: x_txn_line_detail_tbl => l_g_line_dtl_tbl,
10146: p_get_parties_flag => fnd_api.g_false,
10147: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
10148: p_get_pty_accts_flag => fnd_api.g_false,
10149: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
10150: p_get_ii_rltns_flag => fnd_api.g_true,
10151: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
10152: p_get_org_assgns_flag => fnd_api.g_false,
10146: p_get_parties_flag => fnd_api.g_false,
10147: x_txn_party_detail_tbl => l_g_pty_dtl_tbl,
10148: p_get_pty_accts_flag => fnd_api.g_false,
10149: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
10150: p_get_ii_rltns_flag => fnd_api.g_true,
10151: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
10152: p_get_org_assgns_flag => fnd_api.g_false,
10153: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
10154: p_get_ext_attrib_vals_flag => fnd_api.g_false,
10148: p_get_pty_accts_flag => fnd_api.g_false,
10149: x_txn_pty_acct_detail_tbl => l_g_pty_acct_tbl,
10150: p_get_ii_rltns_flag => fnd_api.g_true,
10151: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
10152: p_get_org_assgns_flag => fnd_api.g_false,
10153: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
10154: p_get_ext_attrib_vals_flag => fnd_api.g_false,
10155: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
10156: p_get_csi_attribs_flag => fnd_api.g_false,
10150: p_get_ii_rltns_flag => fnd_api.g_true,
10151: x_txn_ii_rltns_tbl => l_g_ii_rltns_tbl,
10152: p_get_org_assgns_flag => fnd_api.g_false,
10153: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
10154: p_get_ext_attrib_vals_flag => fnd_api.g_false,
10155: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
10156: p_get_csi_attribs_flag => fnd_api.g_false,
10157: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
10158: p_get_csi_iea_values_flag => fnd_api.g_false,
10152: p_get_org_assgns_flag => fnd_api.g_false,
10153: x_txn_org_assgn_tbl => l_g_org_assgn_tbl,
10154: p_get_ext_attrib_vals_flag => fnd_api.g_false,
10155: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
10156: p_get_csi_attribs_flag => fnd_api.g_false,
10157: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
10158: p_get_csi_iea_values_flag => fnd_api.g_false,
10159: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
10160: p_get_txn_systems_flag => fnd_api.g_false,
10154: p_get_ext_attrib_vals_flag => fnd_api.g_false,
10155: x_txn_ext_attrib_vals_tbl => l_g_ext_attrib_tbl,
10156: p_get_csi_attribs_flag => fnd_api.g_false,
10157: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
10158: p_get_csi_iea_values_flag => fnd_api.g_false,
10159: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
10160: p_get_txn_systems_flag => fnd_api.g_false,
10161: x_txn_systems_tbl => l_g_txn_systems_tbl,
10162: x_return_status => l_return_status,
10156: p_get_csi_attribs_flag => fnd_api.g_false,
10157: x_csi_ext_attribs_tbl => l_g_csi_ea_tbl,
10158: p_get_csi_iea_values_flag => fnd_api.g_false,
10159: x_csi_iea_values_tbl => l_g_csi_eav_tbl,
10160: p_get_txn_systems_flag => fnd_api.g_false,
10161: x_txn_systems_tbl => l_g_txn_systems_tbl,
10162: x_return_status => l_return_status,
10163: x_msg_count => l_msg_count,
10164: x_msg_data => l_msg_data);
10162: x_return_status => l_return_status,
10163: x_msg_count => l_msg_count,
10164: x_msg_data => l_msg_data);
10165:
10166: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10167: raise fnd_api.g_exc_error;
10168: END IF;
10169:
10170: l_txn_line_rec.transaction_line_id := l_transaction_line_id;
10163: x_msg_count => l_msg_count,
10164: x_msg_data => l_msg_data);
10165:
10166: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10167: raise fnd_api.g_exc_error;
10168: END IF;
10169:
10170: l_txn_line_rec.transaction_line_id := l_transaction_line_id;
10171:
10193: p_line_dtl_tbl => l_g_line_dtl_tbl,
10194: px_csi_txn_rec => l_csi_txn_rec,
10195: x_return_status => l_return_status);
10196:
10197: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10198: RAISE fnd_api.g_exc_error;
10199: END IF;
10200:
10201: goto DEMO_FULFILL;
10194: px_csi_txn_rec => l_csi_txn_rec,
10195: x_return_status => l_return_status);
10196:
10197: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10198: RAISE fnd_api.g_exc_error;
10199: END IF;
10200:
10201: goto DEMO_FULFILL;
10202:
10211: x_tld_tbl => l_line_dtl_tbl,
10212: x_tiir_tbl => l_ii_rltns_tbl,
10213: x_return_status => l_return_status);
10214:
10215: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10216: RAISE fnd_api.g_exc_error;
10217: END IF;
10218:
10219: l_default_info_rec.transaction_line_id := l_txn_line_rec.transaction_line_id;
10212: x_tiir_tbl => l_ii_rltns_tbl,
10213: x_return_status => l_return_status);
10214:
10215: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10216: RAISE fnd_api.g_exc_error;
10217: END IF;
10218:
10219: l_default_info_rec.transaction_line_id := l_txn_line_rec.transaction_line_id;
10220:
10243: p_quantity_ratio => l_ratio_split_qty,
10244: px_line_dtl_tbl => l_line_dtl_tbl,
10245: x_return_status => l_return_status);
10246:
10247: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10248: raise fnd_api.g_exc_error;
10249: END IF;
10250:
10251: ELSE
10244: px_line_dtl_tbl => l_line_dtl_tbl,
10245: x_return_status => l_return_status);
10246:
10247: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10248: raise fnd_api.g_exc_error;
10249: END IF;
10250:
10251: ELSE
10252:
10254: p_line_dtl_tbl => l_line_dtl_tbl,
10255: p_ii_rltns_tbl => l_ii_rltns_tbl,
10256: x_return_status => l_return_status);
10257:
10258: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10259: raise fnd_api.g_exc_error;
10260: END IF;
10261:
10262: ---added (start) for m-to-m enhancements
10255: p_ii_rltns_tbl => l_ii_rltns_tbl,
10256: x_return_status => l_return_status);
10257:
10258: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10259: raise fnd_api.g_exc_error;
10260: END IF;
10261:
10262: ---added (start) for m-to-m enhancements
10263: csi_utl_pkg.build_txn_relations(
10264: l_line_dtl_tbl,
10265: l_temp_txn_ii_rltns_tbl,
10266: x_return_status);
10267:
10268: IF NOT(x_return_status = fnd_api.g_ret_sts_success) THEN
10269: RAISE fnd_api.g_exc_error;
10270: END IF;
10271:
10272: IF l_temp_txn_ii_rltns_tbl.count > 0 THEN
10265: l_temp_txn_ii_rltns_tbl,
10266: x_return_status);
10267:
10268: IF NOT(x_return_status = fnd_api.g_ret_sts_success) THEN
10269: RAISE fnd_api.g_exc_error;
10270: END IF;
10271:
10272: IF l_temp_txn_ii_rltns_tbl.count > 0 THEN
10273: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
10271:
10272: IF l_temp_txn_ii_rltns_tbl.count > 0 THEN
10273: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
10274: p_api_version => 1.0,
10275: p_commit => fnd_api.g_false,
10276: p_init_msg_list => fnd_api.g_true,
10277: p_validation_level => fnd_api.g_valid_level_full,
10278: px_txn_ii_rltns_tbl => l_temp_txn_ii_rltns_tbl,
10279: x_return_status => x_return_status,
10272: IF l_temp_txn_ii_rltns_tbl.count > 0 THEN
10273: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
10274: p_api_version => 1.0,
10275: p_commit => fnd_api.g_false,
10276: p_init_msg_list => fnd_api.g_true,
10277: p_validation_level => fnd_api.g_valid_level_full,
10278: px_txn_ii_rltns_tbl => l_temp_txn_ii_rltns_tbl,
10279: x_return_status => x_return_status,
10280: x_msg_count => l_msg_count,
10273: csi_t_txn_rltnshps_grp.create_txn_ii_rltns_dtls(
10274: p_api_version => 1.0,
10275: p_commit => fnd_api.g_false,
10276: p_init_msg_list => fnd_api.g_true,
10277: p_validation_level => fnd_api.g_valid_level_full,
10278: px_txn_ii_rltns_tbl => l_temp_txn_ii_rltns_tbl,
10279: x_return_status => x_return_status,
10280: x_msg_count => l_msg_count,
10281: x_msg_data => l_msg_data);
10279: x_return_status => x_return_status,
10280: x_msg_count => l_msg_count,
10281: x_msg_data => l_msg_data);
10282:
10283: IF NOT(x_return_status = fnd_api.g_ret_sts_success) THEN
10284: raise fnd_api.g_exc_error;
10285: END IF;
10286: END IF ; ---l_temp_txn_ii_rltns_tbl.count>0
10287: ---added (end) for m-to-m enhancements
10280: x_msg_count => l_msg_count,
10281: x_msg_data => l_msg_data);
10282:
10283: IF NOT(x_return_status = fnd_api.g_ret_sts_success) THEN
10284: raise fnd_api.g_exc_error;
10285: END IF;
10286: END IF ; ---l_temp_txn_ii_rltns_tbl.count>0
10287: ---added (end) for m-to-m enhancements
10288:
10303: create_csi_transaction(
10304: px_csi_txn_rec => l_csi_txn_rec,
10305: x_return_status => l_return_status);
10306:
10307: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10308: RAISE fnd_api.g_exc_error;
10309: END IF;
10310:
10311: debug(' ato_rebuild_flag : '||l_ato_rebuild_flag);
10304: px_csi_txn_rec => l_csi_txn_rec,
10305: x_return_status => l_return_status);
10306:
10307: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10308: RAISE fnd_api.g_exc_error;
10309: END IF;
10310:
10311: debug(' ato_rebuild_flag : '||l_ato_rebuild_flag);
10312:
10321: px_default_info_rec => l_default_info_rec,
10322: px_csi_txn_rec => l_csi_txn_rec,
10323: x_return_status => l_return_status);
10324:
10325: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10326: RAISE fnd_api.g_exc_error;
10327: END IF;
10328: ELSE
10329:
10322: px_csi_txn_rec => l_csi_txn_rec,
10323: x_return_status => l_return_status);
10324:
10325: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10326: RAISE fnd_api.g_exc_error;
10327: END IF;
10328: ELSE
10329:
10330: /* this routine checks for any relation within the order lines and builds
10339: px_default_info_rec => l_default_info_rec,
10340: px_csi_txn_rec => l_csi_txn_rec,
10341: x_return_status => l_return_status);
10342:
10343: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10344: RAISE fnd_api.g_exc_error;
10345: END IF;
10346:
10347: END IF;
10340: px_csi_txn_rec => l_csi_txn_rec,
10341: x_return_status => l_return_status);
10342:
10343: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10344: RAISE fnd_api.g_exc_error;
10345: END IF;
10346:
10347: END IF;
10348: END IF;
10349:
10350: debug('Model remnant flag...'||l_order_line_rec.model_remnant_flag);
10351:
10352:
10353: IF nvl(l_order_line_rec.link_to_line_id, fnd_api.g_miss_num) <> fnd_api.g_miss_num THEN
10354:
10355: IF l_ato_rebuild_flag = 'N' THEN
10356:
10357: build_parent_relation(
10364: px_default_info_rec => l_default_info_rec,
10365: px_csi_txn_rec => l_csi_txn_rec,
10366: x_return_status => l_return_status);
10367:
10368: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10369: RAISE fnd_api.g_exc_error;
10370: END IF;
10371:
10372: END IF;
10365: px_csi_txn_rec => l_csi_txn_rec,
10366: x_return_status => l_return_status);
10367:
10368: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10369: RAISE fnd_api.g_exc_error;
10370: END IF;
10371:
10372: END IF;
10373:
10398: px_csi_txn_rec => l_csi_txn_rec,
10399: px_error_rec => l_error_rec,
10400: x_return_status => l_return_status);
10401:
10402: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10403: RAISE fnd_api.g_exc_error;
10404: END IF;
10405:
10406: debug('order fulfillment integration successfull for order line_id : '||p_order_line_id);
10399: px_error_rec => l_error_rec,
10400: x_return_status => l_return_status);
10401:
10402: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10403: RAISE fnd_api.g_exc_error;
10404: END IF;
10405:
10406: debug('order fulfillment integration successfull for order line_id : '||p_order_line_id);
10407:
10406: debug('order fulfillment integration successfull for order line_id : '||p_order_line_id);
10407:
10408: EXCEPTION
10409: WHEN skip_regular_process THEN
10410: x_return_status := fnd_api.g_ret_sts_success;
10411: WHEN fnd_api.g_exc_error THEN
10412: rollback to order_fulfillment;
10413: x_return_status := fnd_api.g_ret_sts_error;
10414: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
10407:
10408: EXCEPTION
10409: WHEN skip_regular_process THEN
10410: x_return_status := fnd_api.g_ret_sts_success;
10411: WHEN fnd_api.g_exc_error THEN
10412: rollback to order_fulfillment;
10413: x_return_status := fnd_api.g_ret_sts_error;
10414: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
10415: l_error_rec.error_text := l_error_message;
10409: WHEN skip_regular_process THEN
10410: x_return_status := fnd_api.g_ret_sts_success;
10411: WHEN fnd_api.g_exc_error THEN
10412: rollback to order_fulfillment;
10413: x_return_status := fnd_api.g_ret_sts_error;
10414: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
10415: l_error_rec.error_text := l_error_message;
10416: debug('Error(E) :'||l_error_message);
10417: px_trx_error_rec := l_error_rec;
10432: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
10433: fnd_message.set_token('MESSAGE',substr(sqlerrm,1,540));
10434: fnd_msg_pub.add;
10435:
10436: x_return_status := fnd_api.g_ret_sts_error;
10437: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
10438: l_error_rec.error_text := l_error_message;
10439: debug('Error(O) :'||l_error_message);
10440: px_trx_error_rec := l_error_rec;
10483: l_c_tiir_tbl csi_t_datastructures_grp.txn_ii_rltns_tbl;
10484:
10485: l_continue boolean := TRUE;
10486:
10487: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
10488: l_msg_count number;
10489: l_msg_data varchar2(2000);
10490:
10491: l_install_party_site_id number;
10492:
10493: BEGIN
10494:
10495: /* Initialize API return status to success */
10496: x_return_status := fnd_api.g_ret_sts_success;
10497:
10498: api_log('construct_txn_dtls');
10499:
10500: /* assign values for the columns in Txn_line_rec */
10509: p_transaction_type_id => 51,
10510: x_sub_type_id => l_sub_type_id,
10511: x_return_status => l_return_status);
10512:
10513: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10514: raise fnd_api.g_exc_error;
10515: END IF;
10516:
10517: /*------------------------------------------------------*/
10510: x_sub_type_id => l_sub_type_id,
10511: x_return_status => l_return_status);
10512:
10513: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10514: raise fnd_api.g_exc_error;
10515: END IF;
10516:
10517: /*------------------------------------------------------*/
10518: /* Check if transaction_line_rec exists .If it does not */
10597:
10598: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
10599: fnd_message.set_token('MESSAGE','insert_row failed '||sqlerrm);
10600: fnd_msg_pub.add;
10601: raise fnd_api.g_exc_error;
10602: END;
10603: END ;
10604: IF l_continue THEN
10605: exit;
10622: WHEN no_data_found THEN
10623: fnd_message.set_name('CSI','CSI_INT_PTY_SITE_MISSING');
10624: fnd_message.set_token('LOCATION_ID', x_order_shipment_tbl(i).ib_current_loc_id);
10625: fnd_msg_pub.add;
10626: raise fnd_api.g_exc_error;
10627: WHEN too_many_rows THEN
10628: fnd_message.set_name('CSI','CSI_INT_MANY_PTY_SITE_FOUND');
10629: fnd_message.set_token('LOCATION_ID', x_order_shipment_tbl(i).ib_current_loc_id);
10630: fnd_msg_pub.add;
10627: WHEN too_many_rows THEN
10628: fnd_message.set_name('CSI','CSI_INT_MANY_PTY_SITE_FOUND');
10629: fnd_message.set_token('LOCATION_ID', x_order_shipment_tbl(i).ib_current_loc_id);
10630: fnd_msg_pub.add;
10631: raise fnd_api.g_exc_error;
10632: END;
10633:
10634: IF x_order_shipment_tbl(i).ib_install_loc is not null
10635: AND
10634: IF x_order_shipment_tbl(i).ib_install_loc is not null
10635: AND
10636: x_order_shipment_tbl(i).ib_install_loc_id is not null
10637: AND
10638: x_order_shipment_tbl(i).ib_install_loc_id <> fnd_api.g_miss_num
10639: THEN
10640: BEGIN
10641: SELECT party_site_id
10642: INTO l_install_party_site_id
10648: WHEN no_data_found THEN
10649: fnd_message.set_name('CSI','CSI_INT_PTY_SITE_MISSING');
10650: fnd_message.set_token('LOCATION_ID', x_order_shipment_tbl(i).ib_install_loc_id);
10651: fnd_msg_pub.add;
10652: raise fnd_api.g_exc_error;
10653: WHEN too_many_rows THEN
10654: fnd_message.set_name('CSI','CSI_INT_MANY_PTY_SITE_FOUND');
10655: fnd_message.set_token('LOCATION_ID', x_order_shipment_tbl(i).ib_install_loc_id);
10656: fnd_msg_pub.add;
10653: WHEN too_many_rows THEN
10654: fnd_message.set_name('CSI','CSI_INT_MANY_PTY_SITE_FOUND');
10655: fnd_message.set_token('LOCATION_ID', x_order_shipment_tbl(i).ib_install_loc_id);
10656: fnd_msg_pub.add;
10657: raise fnd_api.g_exc_error;
10658: END;
10659: END IF;
10660:
10661: -- IF p_trackable_parent AND x_order_shipment_tbl(i).shipped_quantity > 1 THEN
10679:
10680: /* assign values for the columns in Txn_line_details_tbl */
10681: IF ( x_order_shipment_tbl(i).instance_id is not null
10682: AND
10683: x_order_shipment_tbl(i).instance_id <> fnd_api.g_miss_num )
10684: THEN
10685: l_c_tld_tbl(i).instance_id := x_order_shipment_tbl(i).instance_id;
10686: l_c_tld_tbl(i).instance_exists_flag := 'Y';
10687:
10687:
10688: l_inst_party_id := csi_utl_pkg.get_instance_party_id(x_order_shipment_tbl(i).instance_id);
10689:
10690: IF l_inst_party_id = -1 THEN
10691: raise fnd_api.g_exc_error;
10692: END IF;
10693:
10694: END IF;
10695:
10697: l_c_tld_tbl(i).sub_type_id := l_sub_type_id ;
10698: l_c_tld_tbl(i).inventory_item_id := x_order_shipment_tbl(i).inventory_item_id ;
10699: l_c_tld_tbl(i).inv_organization_id := x_order_shipment_tbl(i).organization_id ;
10700: l_c_tld_tbl(i).inventory_revision := x_order_shipment_tbl(i).revision ;
10701: l_c_tld_tbl(i).item_condition_id := fnd_api.g_miss_num;
10702: l_c_tld_tbl(i).instance_type_code := fnd_api.g_miss_char;
10703: l_c_tld_tbl(i).quantity := x_order_shipment_tbl(i).shipped_quantity ;
10704: l_c_tld_tbl(i).unit_of_measure := x_order_shipment_tbl(i).transaction_uom ;
10705: l_c_tld_tbl(i).serial_number := x_order_shipment_tbl(i).serial_number;
10698: l_c_tld_tbl(i).inventory_item_id := x_order_shipment_tbl(i).inventory_item_id ;
10699: l_c_tld_tbl(i).inv_organization_id := x_order_shipment_tbl(i).organization_id ;
10700: l_c_tld_tbl(i).inventory_revision := x_order_shipment_tbl(i).revision ;
10701: l_c_tld_tbl(i).item_condition_id := fnd_api.g_miss_num;
10702: l_c_tld_tbl(i).instance_type_code := fnd_api.g_miss_char;
10703: l_c_tld_tbl(i).quantity := x_order_shipment_tbl(i).shipped_quantity ;
10704: l_c_tld_tbl(i).unit_of_measure := x_order_shipment_tbl(i).transaction_uom ;
10705: l_c_tld_tbl(i).serial_number := x_order_shipment_tbl(i).serial_number;
10706: l_c_tld_tbl(i).lot_number := x_order_shipment_tbl(i).lot_number;
10725:
10726: -- l_inst_party_id := csi_utl_pkg.get_instance_party_id(l_instance_id);
10727:
10728: -- IF l_inst_party_id = -1 THEN
10729: -- raise fnd_api.g_exc_error;
10730: -- END IF;
10731:
10732: /* assign values for the columns in txn_party_detail_tbl*/
10733: l_c_tpd_tbl(i).instance_party_id := l_inst_party_id;
10763: l_c_tpad_tbl(i).object_version_number := 1;
10764: l_c_tpad_tbl(i).txn_party_details_index := i;
10765:
10766: /*assign values for the columns in x_txn_org_assgn_tbl */
10767: IF nvl(x_order_shipment_tbl(i).sold_from_org_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num
10768: THEN
10769: l_c_toa_tbl(i).txn_operating_unit_id := fnd_api.g_miss_num;
10770: l_c_toa_tbl(i).txn_line_detail_id := fnd_api.g_miss_num;
10771: l_c_toa_tbl(i).instance_ou_id := fnd_api.g_miss_num;
10765:
10766: /*assign values for the columns in x_txn_org_assgn_tbl */
10767: IF nvl(x_order_shipment_tbl(i).sold_from_org_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num
10768: THEN
10769: l_c_toa_tbl(i).txn_operating_unit_id := fnd_api.g_miss_num;
10770: l_c_toa_tbl(i).txn_line_detail_id := fnd_api.g_miss_num;
10771: l_c_toa_tbl(i).instance_ou_id := fnd_api.g_miss_num;
10772: l_c_toa_tbl(i).operating_unit_id := x_order_shipment_tbl(i).sold_from_org_id;
10773: l_c_toa_tbl(i).relationship_type_code := 'SOLD_FROM';
10766: /*assign values for the columns in x_txn_org_assgn_tbl */
10767: IF nvl(x_order_shipment_tbl(i).sold_from_org_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num
10768: THEN
10769: l_c_toa_tbl(i).txn_operating_unit_id := fnd_api.g_miss_num;
10770: l_c_toa_tbl(i).txn_line_detail_id := fnd_api.g_miss_num;
10771: l_c_toa_tbl(i).instance_ou_id := fnd_api.g_miss_num;
10772: l_c_toa_tbl(i).operating_unit_id := x_order_shipment_tbl(i).sold_from_org_id;
10773: l_c_toa_tbl(i).relationship_type_code := 'SOLD_FROM';
10774: l_c_toa_tbl(i).preserve_detail_flag := 'Y';
10767: IF nvl(x_order_shipment_tbl(i).sold_from_org_id,fnd_api.g_miss_num) <> fnd_api.g_miss_num
10768: THEN
10769: l_c_toa_tbl(i).txn_operating_unit_id := fnd_api.g_miss_num;
10770: l_c_toa_tbl(i).txn_line_detail_id := fnd_api.g_miss_num;
10771: l_c_toa_tbl(i).instance_ou_id := fnd_api.g_miss_num;
10772: l_c_toa_tbl(i).operating_unit_id := x_order_shipment_tbl(i).sold_from_org_id;
10773: l_c_toa_tbl(i).relationship_type_code := 'SOLD_FROM';
10774: l_c_toa_tbl(i).preserve_detail_flag := 'Y';
10775: l_c_toa_tbl(i).txn_line_details_index := i;
10787:
10788: -- call api to create the transaction line details
10789: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
10790: p_api_version => 1.0 ,
10791: p_commit => fnd_api.g_false,
10792: p_init_msg_list => fnd_api.g_true,
10793: p_validation_level => fnd_api.g_valid_level_none,
10794: p_txn_line_dtl_index => l_index,
10795: p_txn_line_dtl_rec => l_c_tld_rec,
10788: -- call api to create the transaction line details
10789: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
10790: p_api_version => 1.0 ,
10791: p_commit => fnd_api.g_false,
10792: p_init_msg_list => fnd_api.g_true,
10793: p_validation_level => fnd_api.g_valid_level_none,
10794: p_txn_line_dtl_index => l_index,
10795: p_txn_line_dtl_rec => l_c_tld_rec,
10796: px_txn_party_dtl_tbl => l_c_tpd_tbl,
10789: csi_t_txn_line_dtls_pvt.create_txn_line_dtls(
10790: p_api_version => 1.0 ,
10791: p_commit => fnd_api.g_false,
10792: p_init_msg_list => fnd_api.g_true,
10793: p_validation_level => fnd_api.g_valid_level_none,
10794: p_txn_line_dtl_index => l_index,
10795: p_txn_line_dtl_rec => l_c_tld_rec,
10796: px_txn_party_dtl_tbl => l_c_tpd_tbl,
10797: px_txn_pty_acct_detail_tbl => l_c_tpad_tbl,
10801: x_return_status => l_return_status,
10802: x_msg_count => l_msg_count,
10803: x_msg_data => l_msg_data);
10804:
10805: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10806: raise fnd_api.g_exc_error;
10807: END IF;
10808:
10809: -- END LOOP;
10802: x_msg_count => l_msg_count,
10803: x_msg_data => l_msg_data);
10804:
10805: IF l_return_status <> fnd_api.g_ret_sts_success THEN
10806: raise fnd_api.g_exc_error;
10807: END IF;
10808:
10809: -- END LOOP;
10810:
10811: END LOOP; --end of processing all shipping table
10812: END IF; -- shipping table count > 0
10813:
10814: EXCEPTION
10815: WHEN fnd_api.g_exc_error THEN
10816: x_return_status := fnd_api.g_ret_sts_error;
10817: WHEN fnd_api.g_exc_unexpected_error THEN
10818: x_return_status := fnd_api.g_ret_sts_unexp_error;
10819: END construct_txn_dtls;
10812: END IF; -- shipping table count > 0
10813:
10814: EXCEPTION
10815: WHEN fnd_api.g_exc_error THEN
10816: x_return_status := fnd_api.g_ret_sts_error;
10817: WHEN fnd_api.g_exc_unexpected_error THEN
10818: x_return_status := fnd_api.g_ret_sts_unexp_error;
10819: END construct_txn_dtls;
10820:
10813:
10814: EXCEPTION
10815: WHEN fnd_api.g_exc_error THEN
10816: x_return_status := fnd_api.g_ret_sts_error;
10817: WHEN fnd_api.g_exc_unexpected_error THEN
10818: x_return_status := fnd_api.g_ret_sts_unexp_error;
10819: END construct_txn_dtls;
10820:
10821:
10814: EXCEPTION
10815: WHEN fnd_api.g_exc_error THEN
10816: x_return_status := fnd_api.g_ret_sts_error;
10817: WHEN fnd_api.g_exc_unexpected_error THEN
10818: x_return_status := fnd_api.g_ret_sts_unexp_error;
10819: END construct_txn_dtls;
10820:
10821:
10822: PROCEDURE logical_drop_ship(
10834: p_order_line_id number;
10835:
10836: l_debug_level number;
10837: l_error_message varchar2(2000);
10838: l_return_status varchar2(1) := fnd_api.g_ret_sts_success;
10839: l_msg_data varchar2(2000);
10840: l_msg_count number;
10841:
10842: skip_regular_process exception;
11012: l_partner_owner_acct_id NUMBER;
11013:
11014: BEGIN
11015:
11016: x_return_status := fnd_api.g_ret_sts_success;
11017: l_error_rec := px_trx_error_rec;
11018:
11019: l_debug_level := csi_t_gen_utility_pvt.g_debug_level;
11020:
11043: p_mtl_transaction_id => p_mtl_txn_id,
11044: x_order_line_rec => l_order_line_rec,
11045: x_return_status => l_return_status);
11046:
11047: IF l_return_status <> fnd_api.g_ret_sts_success THEN
11048: raise fnd_api.g_exc_error;
11049: END IF;
11050:
11051: dbms_application_info.set_client_info(l_order_line_rec.org_id);
11044: x_order_line_rec => l_order_line_rec,
11045: x_return_status => l_return_status);
11046:
11047: IF l_return_status <> fnd_api.g_ret_sts_success THEN
11048: raise fnd_api.g_exc_error;
11049: END IF;
11050:
11051: dbms_application_info.set_client_info(l_order_line_rec.org_id);
11052:
11117: THEN
11118: IF l_partner_rec.END_CUSTOMER_ID is null Then
11119: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
11120: fnd_msg_pub.add;
11121: raise fnd_api.g_exc_error;
11122: ELSE
11123: mmt_rec.ib_owner := l_partner_rec.ib_owner;
11124: mmt_rec.end_customer_id := l_partner_rec.end_customer_id;
11125: END IF;
11125: END IF;
11126: ELSIF l_partner_rec.IB_OWNER = 'INSTALL_BASE'
11127: THEN
11128: mmt_rec.ib_owner := l_partner_rec.ib_owner;
11129: mmt_rec.end_customer_id := fnd_api.g_miss_num;
11130: ELSE
11131: mmt_rec.end_customer_id := mmt_rec.sold_to_org_id;
11132: END IF;
11133:
11139: IF l_partner_rec.end_customer_site_use_id is null
11140: THEN
11141: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
11142: fnd_msg_pub.add;
11143: raise fnd_api.g_exc_error;
11144: ELSE
11145: mmt_rec.ib_install_loc_id := l_partner_rec.end_customer_site_use_id;
11146: END IF;
11147: ELSIF mmt_rec.ib_install_loc = 'SHIP_TO'
11149: IF mmt_rec.ship_to_org_id is null
11150: THEN
11151: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
11152: fnd_msg_pub.add;
11153: raise fnd_api.g_exc_error;
11154: ELSE
11155: mmt_rec.ib_install_loc_id := mmt_rec.ship_to_org_id;
11156: END IF;
11157: ELSIF mmt_rec.ib_install_loc = 'SOLD_TO'
11159: IF l_partner_rec.SOLD_TO_SITE_USE_ID is null -- 3412544 mmt_rec.sold_to_org_id is null
11160: THEN
11161: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
11162: fnd_msg_pub.add;
11163: raise fnd_api.g_exc_error;
11164: ELSE
11165: mmt_rec.ib_install_loc_id := l_partner_rec.SOLD_TO_SITE_USE_ID; -- 3412544 mmt_rec.sold_to_org_id;
11166: END IF;
11167: ELSIF mmt_rec.ib_install_loc = 'DELIVER_TO'
11169: IF mmt_rec.deliver_to_org_id is null
11170: THEN
11171: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
11172: fnd_msg_pub.add;
11173: raise fnd_api.g_exc_error;
11174: ELSE
11175: mmt_rec.ib_install_loc_id := mmt_rec.deliver_to_org_id;
11176: END IF;
11177: ELSIF mmt_rec.ib_install_loc = 'BILL_TO'
11179: IF mmt_rec.invoice_to_org_id is null
11180: THEN
11181: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
11182: fnd_msg_pub.add;
11183: raise fnd_api.g_exc_error;
11184: ELSE
11185: mmt_rec.ib_install_loc_id := mmt_rec.invoice_to_org_id;
11186: END IF;
11187: ELSIF mmt_rec.ib_install_loc = 'INSTALL_BASE'
11185: mmt_rec.ib_install_loc_id := mmt_rec.invoice_to_org_id;
11186: END IF;
11187: ELSIF mmt_rec.ib_install_loc = 'INSTALL_BASE'
11188: THEN
11189: mmt_rec.ib_install_loc_id := fnd_api.g_miss_num;
11190: END IF;
11191: ELSE
11192: mmt_rec.ib_install_loc_id := mmt_rec.ship_to_org_id;
11193: END IF;
11200: IF l_partner_rec.end_customer_site_use_id is null
11201: THEN
11202: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
11203: fnd_msg_pub.add;
11204: raise fnd_api.g_exc_error;
11205: ELSE
11206: mmt_rec.ib_current_loc_id := l_partner_rec.end_customer_site_use_id;
11207: END IF;
11208: ELSIF mmt_rec.ib_current_loc = 'SHIP_TO'
11210: IF mmt_rec.ship_to_org_id is null
11211: THEN
11212: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
11213: fnd_msg_pub.add;
11214: raise fnd_api.g_exc_error;
11215: ELSE
11216: mmt_rec.ib_current_loc_id := mmt_rec.ship_to_org_id;
11217: END IF;
11218: ELSIF mmt_rec.ib_current_loc = 'SOLD_TO'
11220: IF l_partner_rec.SOLD_TO_SITE_USE_ID is null -- 3412544 mmt_rec.sold_to_org_id is null
11221: THEN
11222: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
11223: fnd_msg_pub.add;
11224: raise fnd_api.g_exc_error;
11225: ELSE
11226: mmt_rec.ib_current_loc_id := l_partner_rec.SOLD_TO_SITE_USE_ID; -- 3412544 mmt_rec.sold_to_org_id;
11227: END IF;
11228: ELSIF mmt_rec.ib_current_loc = 'DELIVER_TO'
11230: IF mmt_rec.deliver_to_org_id is null
11231: THEN
11232: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
11233: fnd_msg_pub.add;
11234: raise fnd_api.g_exc_error;
11235: ELSE
11236: mmt_rec.ib_current_loc_id := mmt_rec.deliver_to_org_id;
11237: END IF;
11238: ELSIF mmt_rec.ib_current_loc = 'BILL_TO'
11240: IF mmt_rec.invoice_to_org_id is null
11241: THEN
11242: fnd_message.set_name('CSI','CSI_PARTNER_VAL_MISSING');
11243: fnd_msg_pub.add;
11244: raise fnd_api.g_exc_error;
11245: ELSE
11246: mmt_rec.ib_current_loc_id := mmt_rec.invoice_to_org_id;
11247: END IF;
11248: ELSIF mmt_rec.ib_current_loc = 'INSTALL_BASE'
11246: mmt_rec.ib_current_loc_id := mmt_rec.invoice_to_org_id;
11247: END IF;
11248: ELSIF mmt_rec.ib_current_loc = 'INSTALL_BASE'
11249: THEN
11250: mmt_rec.ib_current_loc_id := fnd_api.g_miss_num;
11251: END IF;
11252: ELSE
11253: mmt_rec.ib_current_loc_id := mmt_rec.ship_to_org_id;
11254: END IF;
11258: p_cust_acct_id => mmt_rec.end_customer_id, -- mmt_rec.sold_to_org_id,
11259: x_party_id => l_party_id,
11260: x_return_status => l_return_status);
11261:
11262: IF l_return_status <> fnd_api.g_ret_sts_success THEN
11263: raise fnd_api.g_exc_error;
11264: END IF;
11265:
11266: debug('Customer_id :'||mmt_rec.end_customer_id); -- mmt_rec.sold_to_org_id);
11259: x_party_id => l_party_id,
11260: x_return_status => l_return_status);
11261:
11262: IF l_return_status <> fnd_api.g_ret_sts_success THEN
11263: raise fnd_api.g_exc_error;
11264: END IF;
11265:
11266: debug('Customer_id :'||mmt_rec.end_customer_id); -- mmt_rec.sold_to_org_id);
11267: debug('Party_id :'||l_party_id);
11266: debug('Customer_id :'||mmt_rec.end_customer_id); -- mmt_rec.sold_to_org_id);
11267: debug('Party_id :'||l_party_id);
11268:
11269: IF l_party_id = -1 THEN
11270: raise fnd_api.g_exc_error;
11271: END IF;
11272:
11273: /* Convert the shipped qty to UOM in OM */
11274: inv_convert.inv_um_conversion (
11280: debug('UOM Conv Factor :'||l_uom_rate);
11281:
11282: IF l_uom_rate = -99999 THEN
11283: debug('inv_convert.inv_um_conversion failed ');
11284: raise fnd_api.g_exc_error;
11285: END IF;
11286:
11287: l_shipped_qty := (l_uom_rate * mmt_rec.shipped_quantity);
11288:
11360:
11361: l_inst_party_id := csi_utl_pkg.get_instance_party_id(l_exp_instance_id);
11362:
11363: IF l_inst_party_id = -1 THEN
11364: raise fnd_api.g_exc_error;
11365: END IF;
11366:
11367: p_party_tbl(1).instance_party_id := l_inst_party_id;
11368: p_party_tbl(1).instance_id := l_exp_instance_id;
11384: p_party_account_tbl(1).relationship_type_code := 'OWNER';
11385: p_party_account_tbl(1).bill_to_address := mmt_rec.invoice_to_org_id;
11386: p_party_account_tbl(1).ship_to_address := mmt_rec.ship_to_org_id;
11387:
11388: p_txn_rec.transaction_id := fnd_api.g_miss_num;
11389: p_txn_rec.transaction_date := sysdate;
11390: p_txn_rec.source_transaction_date := sysdate;
11391: p_txn_rec.transaction_type_id := l_txn_type_id;
11392:
11389: p_txn_rec.transaction_date := sysdate;
11390: p_txn_rec.source_transaction_date := sysdate;
11391: p_txn_rec.transaction_type_id := l_txn_type_id;
11392:
11393: l_trx_rec.transaction_id := fnd_api.g_miss_num;
11394:
11395: csi_t_gen_utility_pvt.dump_api_info(
11396: p_api_name => 'update_item_instance',
11397: p_pkg_name => 'csi_item_instance_pub');
11397: p_pkg_name => 'csi_item_instance_pub');
11398:
11399: csi_item_instance_pub.update_item_instance(
11400: p_api_version => 1.0,
11401: p_commit => fnd_api.g_false,
11402: p_init_msg_list => fnd_api.g_true,
11403: p_validation_level => fnd_api.g_valid_level_full,
11404: p_instance_rec => p_instance_rec,
11405: p_ext_attrib_values_tbl => p_ext_attrib_values_tbl,
11398:
11399: csi_item_instance_pub.update_item_instance(
11400: p_api_version => 1.0,
11401: p_commit => fnd_api.g_false,
11402: p_init_msg_list => fnd_api.g_true,
11403: p_validation_level => fnd_api.g_valid_level_full,
11404: p_instance_rec => p_instance_rec,
11405: p_ext_attrib_values_tbl => p_ext_attrib_values_tbl,
11406: p_party_tbl => p_party_tbl,
11399: csi_item_instance_pub.update_item_instance(
11400: p_api_version => 1.0,
11401: p_commit => fnd_api.g_false,
11402: p_init_msg_list => fnd_api.g_true,
11403: p_validation_level => fnd_api.g_valid_level_full,
11404: p_instance_rec => p_instance_rec,
11405: p_ext_attrib_values_tbl => p_ext_attrib_values_tbl,
11406: p_party_tbl => p_party_tbl,
11407: p_account_tbl => p_party_account_tbl,
11413: x_return_status => l_return_status,
11414: x_msg_count => x_msg_count,
11415: x_msg_data => x_msg_data );
11416:
11417: IF NOT(l_return_status = fnd_api.g_ret_sts_success) THEN
11418: debug('csi_item_instance_pub.expire_item_instance');
11419: raise fnd_api.g_exc_error;
11420: END IF;
11421:
11415: x_msg_data => x_msg_data );
11416:
11417: IF NOT(l_return_status = fnd_api.g_ret_sts_success) THEN
11418: debug('csi_item_instance_pub.expire_item_instance');
11419: raise fnd_api.g_exc_error;
11420: END IF;
11421:
11422: BEGIN
11423: SELECT object_version_number
11444: p_trackable_parent => p_trackable_parent,
11445: x_trx_line_id => x_trx_line_id,
11446: x_return_status => l_return_status );
11447:
11448: IF l_return_status <> fnd_api.g_ret_sts_success THEN
11449: raise fnd_api.g_exc_error;
11450: END IF;
11451:
11452: ELSE
11445: x_trx_line_id => x_trx_line_id,
11446: x_return_status => l_return_status );
11447:
11448: IF l_return_status <> fnd_api.g_ret_sts_success THEN
11449: raise fnd_api.g_exc_error;
11450: END IF;
11451:
11452: ELSE
11453:
11463: p_message_id => null,
11464: x_return_status => l_return_status,
11465: px_trx_error_rec => l_error_rec);
11466:
11467: IF l_return_status <> fnd_api.g_ret_sts_success THEN
11468: RAISE fnd_api.g_exc_error;
11469: END IF;
11470:
11471:
11464: x_return_status => l_return_status,
11465: px_trx_error_rec => l_error_rec);
11466:
11467: IF l_return_status <> fnd_api.g_ret_sts_success THEN
11468: RAISE fnd_api.g_exc_error;
11469: END IF;
11470:
11471:
11472:
11470:
11471:
11472:
11473: EXCEPTION
11474: WHEN fnd_api.g_exc_error THEN
11475: x_return_status := fnd_api.g_ret_sts_error;
11476: l_error_rec.source_id := p_mtl_txn_id; -- For Bug 4168922
11477: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
11478: l_error_rec.error_text := l_error_message;
11471:
11472:
11473: EXCEPTION
11474: WHEN fnd_api.g_exc_error THEN
11475: x_return_status := fnd_api.g_ret_sts_error;
11476: l_error_rec.source_id := p_mtl_txn_id; -- For Bug 4168922
11477: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
11478: l_error_rec.error_text := l_error_message;
11479: debug('Error(E) :'||l_error_message);
11483: fnd_message.set_name('FND','FND_GENERIC_MESSAGE');
11484: fnd_message.set_token('MESSAGE',substr(sqlerrm,1,540));
11485: fnd_msg_pub.add;
11486:
11487: x_return_status := fnd_api.g_ret_sts_error;
11488: l_error_rec.source_id := p_mtl_txn_id; -- For 4168922
11489: l_error_message := csi_t_gen_utility_pvt.dump_error_stack;
11490: l_error_rec.error_text := l_error_message;
11491: debug('Error(O) :'||l_error_message);
11499: x_return_status OUT NOCOPY varchar2,
11500: x_error_message OUT NOCOPY varchar2)
11501: IS
11502:
11503: l_return_status VARCHAR2(1) := fnd_api.g_ret_sts_success;
11504: l_message_id NUMBER;
11505: l_error_code NUMBER;
11506: l_error_message VARCHAR2(4000);
11507:
11506: l_error_message VARCHAR2(4000);
11507:
11508: BEGIN
11509:
11510: x_return_status := fnd_api.g_ret_sts_success;
11511:
11512: csi_ont_txn_pub.PostTransaction(
11513: p_order_line_id => p_order_line_id,
11514: x_message_id => l_message_id,
11515: x_error_code => l_error_code,
11516: x_return_status => l_return_status,
11517: x_error_message => l_error_message);
11518:
11519: IF l_return_status <> fnd_api.g_ret_sts_success THEN
11520: RAISE fnd_api.g_exc_error;
11521: END IF;
11522:
11523: EXCEPTION
11516: x_return_status => l_return_status,
11517: x_error_message => l_error_message);
11518:
11519: IF l_return_status <> fnd_api.g_ret_sts_success THEN
11520: RAISE fnd_api.g_exc_error;
11521: END IF;
11522:
11523: EXCEPTION
11524: WHEN fnd_api.g_exc_error THEN
11520: RAISE fnd_api.g_exc_error;
11521: END IF;
11522:
11523: EXCEPTION
11524: WHEN fnd_api.g_exc_error THEN
11525: x_return_status := fnd_api.g_ret_sts_error;
11526: END order_fulfillment;
11527:
11528: /* to be used in the fulfillment workflow for the ib interface */
11521: END IF;
11522:
11523: EXCEPTION
11524: WHEN fnd_api.g_exc_error THEN
11525: x_return_status := fnd_api.g_ret_sts_error;
11526: END order_fulfillment;
11527:
11528: /* to be used in the fulfillment workflow for the ib interface */
11529: PROCEDURE fulfill_wf(
11553: x_message_id => l_message_id,
11554: x_error_code => l_error_code,
11555: x_error_message => l_error_message);
11556:
11557: IF l_return_status <> Fnd_Api.G_RET_STS_SUCCESS THEN
11558: resultout := 'COMPLETE:N';
11559: RETURN;
11560: ELSE
11561: resultout := 'COMPLETE:Y';
11607: l_error_rec csi_datastructures_pub.transaction_error_rec;
11608:
11609: BEGIN
11610:
11611: x_return_status := FND_API.G_RET_STS_SUCCESS;
11612:
11613: csi_t_gen_utility_pvt.build_file_name(
11614: p_file_segment1 => 'csi',
11615: p_file_segment2 => to_char(sysdate, 'DDMMYY'),
11630: p_transaction_id => p_order_line_id,
11631: x_trx_return_status => l_return_status,
11632: x_trx_error_rec => l_error_rec);
11633:
11634: IF (l_return_status <> fnd_api.g_ret_sts_success) then
11635: csi_inv_trxs_pkg.log_csi_error(l_error_rec);
11636: END IF;
11637:
11638: ELSE
11649: x_error_message => l_error_message);
11650:
11651: IF (l_error_message is not null) THEN
11652: x_error_message := l_error_message;
11653: RAISE fnd_api.g_exc_error;
11654: END IF;
11655:
11656: END IF;
11657:
11655:
11656: END IF;
11657:
11658: EXCEPTION
11659: WHEN fnd_api.g_exc_error THEN
11660: x_return_status := fnd_api.g_ret_sts_error;
11661: WHEN others THEN
11662: x_return_status := fnd_api.g_ret_sts_unexp_error;
11663: x_error_message := substr(sqlerrm, 1, 255);
11656: END IF;
11657:
11658: EXCEPTION
11659: WHEN fnd_api.g_exc_error THEN
11660: x_return_status := fnd_api.g_ret_sts_error;
11661: WHEN others THEN
11662: x_return_status := fnd_api.g_ret_sts_unexp_error;
11663: x_error_message := substr(sqlerrm, 1, 255);
11664: END fulfill_old_line;
11658: EXCEPTION
11659: WHEN fnd_api.g_exc_error THEN
11660: x_return_status := fnd_api.g_ret_sts_error;
11661: WHEN others THEN
11662: x_return_status := fnd_api.g_ret_sts_unexp_error;
11663: x_error_message := substr(sqlerrm, 1, 255);
11664: END fulfill_old_line;
11665:
11666: --
11775: BEGIN
11776: l_line_count := 0;
11777: ASO_ORDER_FEEDBACK_PUB.GET_NOTICE (
11778: p_api_version => 1.0,
11779: p_init_msg_list => FND_API.G_TRUE,
11780: p_commit => FND_API.G_FALSE,
11781: x_return_status => l_return_status,
11782: x_msg_count => l_msg_count,
11783: x_msg_data => l_msg_data,
11776: l_line_count := 0;
11777: ASO_ORDER_FEEDBACK_PUB.GET_NOTICE (
11778: p_api_version => 1.0,
11779: p_init_msg_list => FND_API.G_TRUE,
11780: p_commit => FND_API.G_FALSE,
11781: x_return_status => l_return_status,
11782: x_msg_count => l_msg_count,
11783: x_msg_data => l_msg_data,
11784: p_app_short_name => 'CS',
11811: x_Lot_Serial_tbl => l_lot_serial_tbl,
11812: x_old_Lot_Serial_tbl => l_old_lot_serial_tbl,
11813: x_action_request_tbl => l_action_request_tbl);
11814: --
11815: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
11816: retcode := 2;
11817: fnd_file.put_line(fnd_file.log, 'Finished execution in failing to get queue message.');
11818: fnd_file.put_line(fnd_file.output, 'Process Old Order Lines Program finished with error. ');
11819: l_msg_index := 1;
11818: fnd_file.put_line(fnd_file.output, 'Process Old Order Lines Program finished with error. ');
11819: l_msg_index := 1;
11820: WHILE l_msg_count > 0
11821: LOOP
11822: l_msg_data := FND_MSG_PUB.GET( l_msg_index, FND_API.G_FALSE);
11823: fnd_file.PUT_LINE(fnd_file.log, 'message data = '||l_msg_data);
11824: l_msg_index := l_msg_index + 1;
11825: l_msg_count := l_msg_count - 1;
11826: END LOOP;
11827: ROLLBACK TO PROCESS_OLD_ORDER_LINES;
11828: RETURN;
11829: END IF;
11830: --
11831: EXIT WHEN l_no_more_messages = FND_API.G_TRUE;
11832: --
11833: l_line_count := l_line_tbl.count;
11834:
11835: IF l_line_count <= 0 THEN
11937: fulfill_old_line(
11938: p_order_line_id => l_line_tbl(l_count).line_id,
11939: x_return_status => l_return_status,
11940: x_error_message => l_error_message);
11941: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
11942: fnd_file.put_line(fnd_file.log,'Error while creating the Instance '
11943: ||'----'||l_error_message);
11944: fnd_file.put_line(fnd_file.log,'Please Use the Transaction Re-processing FORM to re-process this line..');
11945: Raise Process_Next;
11963: When ASO_HANDLE_NORMAL then
11964: fnd_file.put_line(fnd_file.log, 'adding message to exception queue...');
11965: ASO_ORDER_FEEDBACk_PUB.HANDLE_EXCEPTION(
11966: p_api_version => 1.0,
11967: p_init_msg_list => FND_API.G_FALSE,
11968: p_commit => FND_API.G_FALSE,
11969: x_return_status => l_return_status,
11970: x_msg_count => l_msg_count,
11971: x_msg_data => l_msg_data,
11964: fnd_file.put_line(fnd_file.log, 'adding message to exception queue...');
11965: ASO_ORDER_FEEDBACk_PUB.HANDLE_EXCEPTION(
11966: p_api_version => 1.0,
11967: p_init_msg_list => FND_API.G_FALSE,
11968: p_commit => FND_API.G_FALSE,
11969: x_return_status => l_return_status,
11970: x_msg_count => l_msg_count,
11971: x_msg_data => l_msg_data,
11972: p_app_short_name => 'CS',
12010: BEGIN
12011: l_line_count := 0;
12012: ASO_ORDER_FEEDBACK_PUB.GET_EXCEPTION (
12013: p_api_version => 1.0,
12014: p_init_msg_list => FND_API.G_TRUE,
12015: p_commit => FND_API.G_FALSE,
12016: x_return_status => l_return_status,
12017: x_msg_count => l_msg_count,
12018: x_msg_data => l_msg_data,
12011: l_line_count := 0;
12012: ASO_ORDER_FEEDBACK_PUB.GET_EXCEPTION (
12013: p_api_version => 1.0,
12014: p_init_msg_list => FND_API.G_TRUE,
12015: p_commit => FND_API.G_FALSE,
12016: x_return_status => l_return_status,
12017: x_msg_count => l_msg_count,
12018: x_msg_data => l_msg_data,
12019: p_app_short_name => 'CS',
12048: x_Lot_Serial_tbl => l_lot_serial_tbl,
12049: x_old_Lot_Serial_tbl => l_old_lot_serial_tbl,
12050: x_action_request_tbl => l_action_request_tbl);
12051: --
12052: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
12053: retcode := 2;
12054: fnd_file.put_line(fnd_file.log, 'Finished execution in failing to get Exception queue message.');
12055: fnd_file.put_line(fnd_file.output, 'Process Old Order Lines Program finished with error. ');
12056: l_msg_index := 1;
12055: fnd_file.put_line(fnd_file.output, 'Process Old Order Lines Program finished with error. ');
12056: l_msg_index := 1;
12057: WHILE l_msg_count > 0
12058: LOOP
12059: l_msg_data := FND_MSG_PUB.GET(l_msg_index, FND_API.G_FALSE);
12060: fnd_file.PUT_LINE(fnd_file.log, 'message data = '||l_msg_data);
12061: l_msg_index := l_msg_index + 1;
12062: l_msg_count := l_msg_count - 1;
12063: END LOOP;
12064: ROLLBACK TO PROCESS_OLD_ORDER_LINES;
12065: RETURN;
12066: END IF;
12067: --
12068: EXIT WHEN l_no_more_messages = FND_API.G_TRUE;
12069: --
12070: l_line_count := l_line_tbl.count;
12071:
12072: IF l_line_count <= 0 THEN
12170: fulfill_old_line(
12171: p_order_line_id => l_line_tbl(l_count).line_id,
12172: x_return_status => l_return_status,
12173: x_error_message => l_error_message);
12174: IF NOT(l_return_status = FND_API.G_RET_STS_SUCCESS) THEN
12175: fnd_file.put_line(fnd_file.log,'Error while creating the Instance '
12176: ||'----'||l_error_message);
12177: fnd_file.put_line(fnd_file.log,'Please Use the Transaction Re-processing FORM to re-process this line..');
12178: Raise Process_Next;
12196: When ASO_HANDLE_EXCEPTION then
12197: fnd_file.put_line(fnd_file.log, 'Adding message to exception queue again ...');
12198: ASO_ORDER_FEEDBACk_PUB.HANDLE_EXCEPTION (
12199: p_api_version => 1.0,
12200: p_init_msg_list => FND_API.G_FALSE,
12201: p_commit => FND_API.G_FALSE,
12202: x_return_status => l_return_status,
12203: x_msg_count => l_msg_count,
12204: x_msg_data => l_msg_data,
12197: fnd_file.put_line(fnd_file.log, 'Adding message to exception queue again ...');
12198: ASO_ORDER_FEEDBACk_PUB.HANDLE_EXCEPTION (
12199: p_api_version => 1.0,
12200: p_init_msg_list => FND_API.G_FALSE,
12201: p_commit => FND_API.G_FALSE,
12202: x_return_status => l_return_status,
12203: x_msg_count => l_msg_count,
12204: x_msg_data => l_msg_data,
12205: p_app_short_name => 'CS',