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 254: l_instance_status := FND_API.G_FALSE;

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

Line 257: l_instance_status := FND_API.G_TRUE;

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

Line 300: RAISE fnd_api.g_exc_error;

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

Line 346: RAISE fnd_api.g_exc_error;

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

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

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

Line 449: RAISE fnd_api.g_exc_error;

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

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

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

Line 520: RAISE fnd_api.g_exc_error;

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

Line 527: RAISE fnd_api.g_exc_error;

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

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

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

Line 590: RAISE fnd_api.g_exc_error;

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

Line 602: RAISE fnd_api.g_exc_error;

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

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

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

Line 693: RAISE fnd_api.g_exc_error;

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

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

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

Line 766: RAISE fnd_api.g_exc_error;

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

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

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

Line 855: RAISE fnd_api.g_exc_error;

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

Line 867: RAISE fnd_api.g_exc_error;

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

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

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

Line 932: RAISE fnd_api.g_exc_error;

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

Line 942: RAISE fnd_api.g_exc_error;

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

Line 953: RAISE fnd_api.g_exc_error;

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

Line 963: WHEN fnd_api.g_exc_error THEN

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

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

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