DBA Data[Home] [Help]

APPS.CSI_INV_TRANSFER_PKG dependencies on FND_API

Line 22: l_commit VARCHAR2(1) := FND_API.G_FALSE;

18:
19: l_mtl_item_tbl CSI_INV_TRXS_PKG.MTL_ITEM_TBL_TYPE;
20: l_api_name VARCHAR2(100) := 'CSI_INV_TRANSFER_PKG.SUBINV_TRANSFER';
21: l_api_version NUMBER := 1.0;
22: l_commit VARCHAR2(1) := FND_API.G_FALSE;
23: l_init_msg_list VARCHAR2(1) := FND_API.G_TRUE;
24: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
25: l_active_instance_only VARCHAR2(10) := FND_API.G_TRUE;
26: l_inactive_instance_only VARCHAR2(10) := FND_API.G_FALSE;

Line 23: l_init_msg_list VARCHAR2(1) := FND_API.G_TRUE;

19: l_mtl_item_tbl CSI_INV_TRXS_PKG.MTL_ITEM_TBL_TYPE;
20: l_api_name VARCHAR2(100) := 'CSI_INV_TRANSFER_PKG.SUBINV_TRANSFER';
21: l_api_version NUMBER := 1.0;
22: l_commit VARCHAR2(1) := FND_API.G_FALSE;
23: l_init_msg_list VARCHAR2(1) := FND_API.G_TRUE;
24: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
25: l_active_instance_only VARCHAR2(10) := FND_API.G_TRUE;
26: l_inactive_instance_only VARCHAR2(10) := FND_API.G_FALSE;
27: l_resolve_id_columns VARCHAR2(10) := FND_API.G_FALSE;

Line 24: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;

20: l_api_name VARCHAR2(100) := 'CSI_INV_TRANSFER_PKG.SUBINV_TRANSFER';
21: l_api_version NUMBER := 1.0;
22: l_commit VARCHAR2(1) := FND_API.G_FALSE;
23: l_init_msg_list VARCHAR2(1) := FND_API.G_TRUE;
24: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
25: l_active_instance_only VARCHAR2(10) := FND_API.G_TRUE;
26: l_inactive_instance_only VARCHAR2(10) := FND_API.G_FALSE;
27: l_resolve_id_columns VARCHAR2(10) := FND_API.G_FALSE;
28: l_transaction_id NUMBER := NULL;

Line 25: l_active_instance_only VARCHAR2(10) := FND_API.G_TRUE;

21: l_api_version NUMBER := 1.0;
22: l_commit VARCHAR2(1) := FND_API.G_FALSE;
23: l_init_msg_list VARCHAR2(1) := FND_API.G_TRUE;
24: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
25: l_active_instance_only VARCHAR2(10) := FND_API.G_TRUE;
26: l_inactive_instance_only VARCHAR2(10) := FND_API.G_FALSE;
27: l_resolve_id_columns VARCHAR2(10) := FND_API.G_FALSE;
28: l_transaction_id NUMBER := NULL;
29: l_object_version_number NUMBER := 1;

Line 26: l_inactive_instance_only VARCHAR2(10) := FND_API.G_FALSE;

22: l_commit VARCHAR2(1) := FND_API.G_FALSE;
23: l_init_msg_list VARCHAR2(1) := FND_API.G_TRUE;
24: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
25: l_active_instance_only VARCHAR2(10) := FND_API.G_TRUE;
26: l_inactive_instance_only VARCHAR2(10) := FND_API.G_FALSE;
27: l_resolve_id_columns VARCHAR2(10) := FND_API.G_FALSE;
28: l_transaction_id NUMBER := NULL;
29: l_object_version_number NUMBER := 1;
30: l_sysdate DATE := SYSDATE;

Line 27: l_resolve_id_columns VARCHAR2(10) := FND_API.G_FALSE;

23: l_init_msg_list VARCHAR2(1) := FND_API.G_TRUE;
24: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
25: l_active_instance_only VARCHAR2(10) := FND_API.G_TRUE;
26: l_inactive_instance_only VARCHAR2(10) := FND_API.G_FALSE;
27: l_resolve_id_columns VARCHAR2(10) := FND_API.G_FALSE;
28: l_transaction_id NUMBER := NULL;
29: l_object_version_number NUMBER := 1;
30: l_sysdate DATE := SYSDATE;
31: l_master_organization_id NUMBER;

Line 59: l_fnd_success VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

55: l_account_tbl CSI_DATASTRUCTURES_PUB.PARTY_ACCOUNT_TBL;
56: l_pricing_attrib_tbl CSI_DATASTRUCTURES_PUB.PRICING_ATTRIBS_TBL;
57: l_org_assignments_tbl CSI_DATASTRUCTURES_PUB.ORGANIZATION_UNITS_TBL;
58: l_asset_assignment_tbl CSI_DATASTRUCTURES_PUB.INSTANCE_ASSET_TBL;
59: l_fnd_success VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
60: l_fnd_warning VARCHAR2(1) := 'W';
61: l_fnd_error VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
62: l_fnd_unexpected VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
63: l_in_inventory VARCHAR2(25) := CSI_INV_TRXS_PKG.G_IN_INVENTORY;

Line 61: l_fnd_error VARCHAR2(1) := FND_API.G_RET_STS_ERROR;

57: l_org_assignments_tbl CSI_DATASTRUCTURES_PUB.ORGANIZATION_UNITS_TBL;
58: l_asset_assignment_tbl CSI_DATASTRUCTURES_PUB.INSTANCE_ASSET_TBL;
59: l_fnd_success VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
60: l_fnd_warning VARCHAR2(1) := 'W';
61: l_fnd_error VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
62: l_fnd_unexpected VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
63: l_in_inventory VARCHAR2(25) := CSI_INV_TRXS_PKG.G_IN_INVENTORY;
64: l_in_process VARCHAR2(25) := CSI_INV_TRXS_PKG.G_IN_PROCESS;
65: l_out_of_service VARCHAR2(25) := CSI_INV_TRXS_PKG.G_OUT_OF_SERVICE;

Line 62: l_fnd_unexpected VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;

58: l_asset_assignment_tbl CSI_DATASTRUCTURES_PUB.INSTANCE_ASSET_TBL;
59: l_fnd_success VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
60: l_fnd_warning VARCHAR2(1) := 'W';
61: l_fnd_error VARCHAR2(1) := FND_API.G_RET_STS_ERROR;
62: l_fnd_unexpected VARCHAR2(1) := FND_API.G_RET_STS_UNEXP_ERROR;
63: l_in_inventory VARCHAR2(25) := CSI_INV_TRXS_PKG.G_IN_INVENTORY;
64: l_in_process VARCHAR2(25) := CSI_INV_TRXS_PKG.G_IN_PROCESS;
65: l_out_of_service VARCHAR2(25) := CSI_INV_TRXS_PKG.G_OUT_OF_SERVICE;
66: l_in_service VARCHAR2(25) := CSI_INV_TRXS_PKG.G_IN_SERVICE;

Line 167: RAISE fnd_api.g_exc_error;

163: debug('Inventory Records Found: '||l_tbl_count);
164:
165: IF NOT l_return_status = l_fnd_success THEN
166: debug('You have encountered an error in CSI_INV_TRXS_PKG.get_transaction_recs, Transaction ID: '||r_mtl.transfer_transaction_id);
167: RAISE fnd_api.g_exc_error;
168: END IF;
169:
170: -- Get the Master Organization ID
171: csi_inv_trxs_pkg.get_master_organization(l_mtl_item_tbl(i).organization_id,

Line 180: RAISE fnd_api.g_exc_error;

176: debug('Master Org is: '||l_master_organization_id);
177:
178: IF NOT l_return_status = l_fnd_success THEN
179: debug('You have encountered an error in csi_inv_trxs_pkg.get_master_organization, Organization ID: '||l_mtl_item_tbl(i).organization_id);
180: RAISE fnd_api.g_exc_error;
181: END IF;
182:
183: -- Call get_fnd_employee_id and get the employee id
184: l_employee_id := csi_inv_trxs_pkg.get_fnd_employee_id(l_mtl_item_tbl(i).last_updated_by);

Line 255: l_instance_status := FND_API.G_FALSE;

251: l_neg_code := csi_inv_trxs_pkg.get_neg_inv_code(
252: l_mtl_item_tbl(i).organization_id);
253:
254: IF l_neg_code = 1 AND l_mtl_item_tbl(i).serial_number is NULL THEN
255: l_instance_status := FND_API.G_FALSE;
256:
257: ELSE
258: l_instance_status := FND_API.G_TRUE;
259: END IF;

Line 258: l_instance_status := FND_API.G_TRUE;

254: IF l_neg_code = 1 AND l_mtl_item_tbl(i).serial_number is NULL THEN
255: l_instance_status := FND_API.G_FALSE;
256:
257: ELSE
258: l_instance_status := FND_API.G_TRUE;
259: END IF;
260:
261:
262: debug('Negative Code is - 1 = Yes, 2 = No: '||l_neg_code);

Line 301: RAISE fnd_api.g_exc_error;

297:
298: IF NOT l_return_status = l_fnd_success THEN
299: debug('Redeploy Flag: '||l_redeploy_flag);
300: debug('You have encountered an error in csi_inv_trxs_pkg.get_redeploy_flag: '||l_error_message);
301: RAISE fnd_api.g_exc_error;
302: END IF;
303:
304: debug('Redeploy Flag: '||l_redeploy_flag);
305: debug('Trans Status Code: '||l_txn_rec.transaction_status_code);

Line 347: RAISE fnd_api.g_exc_error;

343: debug('CSI Transaction Created: '||l_txn_rec.transaction_id);
344:
345: IF NOT l_return_status = l_fnd_success THEN
346: debug('You have encountered an error in csi_inv_trxs_pkg.create_csi_txn: '||p_transaction_id);
347: RAISE fnd_api.g_exc_error;
348: END IF;
349: -- Now loop through the PL/SQL Table.
350: j := 1;
351:

Line 446: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);

442: IF NOT l_return_status = l_fnd_success then
443: debug('You encountered an error in the csi_item_instance_pub.get_item_instance API '||l_msg_data);
444: l_msg_index := 1;
445: WHILE l_msg_count > 0 loop
446: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);
447: l_msg_index := l_msg_index + 1;
448: l_msg_count := l_msg_count - 1;
449: END LOOP;
450: RAISE fnd_api.g_exc_error;

Line 450: RAISE fnd_api.g_exc_error;

446: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);
447: l_msg_index := l_msg_index + 1;
448: l_msg_count := l_msg_count - 1;
449: END LOOP;
450: RAISE fnd_api.g_exc_error;
451: END IF;
452:
453: --IF l_mtl_item_tbl(j).serial_number is NULL THEN
454: IF l_mtl_item_tbl(j).serial_number_control_code in (1,6) THEN

Line 517: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);

513: IF NOT l_return_status in (l_fnd_success,l_fnd_warning) then
514: debug('You encountered an error in the csi_item_instance_pub.create_item_instance API '||l_msg_data);
515: l_msg_index := 1;
516: WHILE l_msg_count > 0 loop
517: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);
518: l_msg_index := l_msg_index + 1;
519: l_msg_count := l_msg_count - 1;
520: END LOOP;
521: RAISE fnd_api.g_exc_error;

Line 521: RAISE fnd_api.g_exc_error;

517: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);
518: l_msg_index := l_msg_index + 1;
519: l_msg_count := l_msg_count - 1;
520: END LOOP;
521: RAISE fnd_api.g_exc_error;
522: END IF;
523:
524: ELSE -- No Records were found and Neg Qtys Not Allowed
525: debug('No Records were found in Install Base and Neg Qtys not allowed to error');

Line 528: RAISE fnd_api.g_exc_error;

524: ELSE -- No Records were found and Neg Qtys Not Allowed
525: debug('No Records were found in Install Base and Neg Qtys not allowed to error');
526: fnd_message.set_name('CSI','CSI_NO_NEG_BAL_ALLOWED');
527: l_error_message := fnd_message.get;
528: RAISE fnd_api.g_exc_error;
529:
530: END IF; -- Neg Qty If
531:
532: ELSIF l_src_instance_header_tbl.count = 1 THEN

Line 587: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);

583: IF NOT l_return_status in (l_fnd_success,l_fnd_warning) then
584: debug('You encountered an error in the csi_item_instance_pub.update_item_instance API '||l_msg_data);
585: l_msg_index := 1;
586: WHILE l_msg_count > 0 loop
587: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);
588: l_msg_index := l_msg_index + 1;
589: l_msg_count := l_msg_count - 1;
590: END LOOP;
591: RAISE fnd_api.g_exc_error;

Line 591: RAISE fnd_api.g_exc_error;

587: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);
588: l_msg_index := l_msg_index + 1;
589: l_msg_count := l_msg_count - 1;
590: END LOOP;
591: RAISE fnd_api.g_exc_error;
592: END IF;
593:
594: ELSIF l_src_instance_header_tbl.count > 1 THEN
595: -- Multiple Instances were found so throw error

Line 603: RAISE fnd_api.g_exc_error;

599: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
600: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
601: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
602: l_error_message := fnd_message.get;
603: RAISE fnd_api.g_exc_error;
604:
605: END IF; -- End of Source Record If
606:
607: -- Now query for the destination records

Line 690: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);

686: IF NOT l_return_status = l_fnd_success then
687: debug('You encountered an error in the csi_item_instance_pub.get_item_instance API '||l_msg_data);
688: l_msg_index := 1;
689: WHILE l_msg_count > 0 loop
690: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);
691: l_msg_index := l_msg_index + 1;
692: l_msg_count := l_msg_count - 1;
693: END LOOP;
694: RAISE fnd_api.g_exc_error;

Line 694: RAISE fnd_api.g_exc_error;

690: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);
691: l_msg_index := l_msg_index + 1;
692: l_msg_count := l_msg_count - 1;
693: END LOOP;
694: RAISE fnd_api.g_exc_error;
695: END IF;
696:
697: IF l_dest_instance_header_tbl.count = 0 THEN -- Installed Base Destination Records are not found
698:

Line 763: l_error_message := fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);

759: IF NOT l_return_status in (l_fnd_success,l_fnd_warning) then
760: debug('You encountered an error in the csi_item_instance_pub.create_item_instance API '||l_msg_data);
761: l_msg_index := 1;
762: WHILE l_msg_count > 0 loop
763: l_error_message := fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);
764: l_msg_index := l_msg_index + 1;
765: l_msg_count := l_msg_count - 1;
766: END LOOP;
767: RAISE fnd_api.g_exc_error;

Line 767: RAISE fnd_api.g_exc_error;

763: l_error_message := fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);
764: l_msg_index := l_msg_index + 1;
765: l_msg_count := l_msg_count - 1;
766: END LOOP;
767: RAISE fnd_api.g_exc_error;
768: END IF;
769:
770: ELSIF l_dest_instance_header_tbl.count = 1 THEN
771:

Line 852: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);

848: IF NOT l_return_status in (l_fnd_success,l_fnd_warning) then
849: debug('You encountered an error in the csi_item_instance_pub.update_item_instance API '||l_msg_data);
850: l_msg_index := 1;
851: WHILE l_msg_count > 0 loop
852: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);
853: l_msg_index := l_msg_index + 1;
854: l_msg_count := l_msg_count - 1;
855: END LOOP;
856: RAISE fnd_api.g_exc_error;

Line 856: RAISE fnd_api.g_exc_error;

852: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);
853: l_msg_index := l_msg_index + 1;
854: l_msg_count := l_msg_count - 1;
855: END LOOP;
856: RAISE fnd_api.g_exc_error;
857: END IF;
858:
859: ELSIF l_dest_instance_header_tbl.count > 1 THEN
860: -- Multiple Instances were found so throw error

Line 868: RAISE fnd_api.g_exc_error;

864: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
865: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
866: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
867: l_error_message := fnd_message.get;
868: RAISE fnd_api.g_exc_error;
869:
870: END IF; -- End of Destination Record If
871:
872: --ELSIF l_mtl_item_tbl(j).serial_number is NOT NULL THEN

Line 929: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);

925: IF NOT l_return_status in (l_fnd_success,l_fnd_warning) then
926: debug('You encountered an error in the csi_item_instance_pub.update_item_instance API '||l_msg_data);
927: l_msg_index := 1;
928: WHILE l_msg_count > 0 loop
929: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);
930: l_msg_index := l_msg_index + 1;
931: l_msg_count := l_msg_count - 1;
932: END LOOP;
933: RAISE fnd_api.g_exc_error;

Line 933: RAISE fnd_api.g_exc_error;

929: l_error_message := l_error_message || fnd_msg_pub.get(l_msg_index,FND_API.G_FALSE);
930: l_msg_index := l_msg_index + 1;
931: l_msg_count := l_msg_count - 1;
932: END LOOP;
933: RAISE fnd_api.g_exc_error;
934: END IF;
935:
936: ELSIF l_src_instance_header_tbl.count = 0 THEN
937: debug('No Records were found in Install Base');

Line 943: RAISE fnd_api.g_exc_error;

939: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
940: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
941: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
942: l_error_message := fnd_message.get;
943: RAISE fnd_api.g_exc_error;
944:
945: ELSIF l_src_instance_header_tbl.count > 1 THEN
946: -- Multiple Instances were found so throw error
947: debug('Multiple Instances were Found in Install Base-40');

Line 954: RAISE fnd_api.g_exc_error;

950: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
951: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
952: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
953: l_error_message := fnd_message.get;
954: RAISE fnd_api.g_exc_error;
955: END IF; -- End of Source Record IF for Serialized
956:
957: END IF; -- End of Serial Number If
958: END LOOP; -- End of For Loop

Line 964: WHEN fnd_api.g_exc_error THEN

960: debug('End time: '||to_char(sysdate,'DD-MON-YYYY HH24:MI:SS'));
961: debug('*****End of csi_inv_transfer_pkg.subinv_transfer Transaction*****');
962:
963: EXCEPTION
964: WHEN fnd_api.g_exc_error THEN
965: debug('You have encountered a "fnd_api.g_exc_error" exception');
966: x_return_status := l_fnd_error;
967:
968: IF l_mtl_item_tbl.count > 0 THEN

Line 965: debug('You have encountered a "fnd_api.g_exc_error" exception');

961: debug('*****End of csi_inv_transfer_pkg.subinv_transfer Transaction*****');
962:
963: EXCEPTION
964: WHEN fnd_api.g_exc_error THEN
965: debug('You have encountered a "fnd_api.g_exc_error" exception');
966: x_return_status := l_fnd_error;
967:
968: IF l_mtl_item_tbl.count > 0 THEN
969: x_trx_error_rec.serial_number := l_mtl_item_tbl(j).serial_number;