400: ELSE -- No Records were found and Neg Qtys Not Allowed
401: IF (l_debug > 0) THEN
402: csi_t_gen_utility_pvt.add('No Records were found in Install Base and Neg Qtys not allowed to error');
403: END IF;
404: fnd_message.set_name('CSI','CSI_NO_NEG_BAL_ALLOWED');
405: l_error_message := fnd_message.get;
406: RAISE fnd_api.g_exc_error;
407:
408: END IF; -- End of Source Record If
401: IF (l_debug > 0) THEN
402: csi_t_gen_utility_pvt.add('No Records were found in Install Base and Neg Qtys not allowed to error');
403: END IF;
404: fnd_message.set_name('CSI','CSI_NO_NEG_BAL_ALLOWED');
405: l_error_message := fnd_message.get;
406: RAISE fnd_api.g_exc_error;
407:
408: END IF; -- End of Source Record If
409:
479: -- Multiple Instances were found so throw error
480: IF (l_debug > 0) THEN
481: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
482: END IF;
483: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
484: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
485: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
486: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
487: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
480: IF (l_debug > 0) THEN
481: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
482: END IF;
483: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
484: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
485: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
486: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
487: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
488: l_error_message := fnd_message.get;
481: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
482: END IF;
483: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
484: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
485: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
486: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
487: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
488: l_error_message := fnd_message.get;
489: RAISE fnd_api.g_exc_error;
482: END IF;
483: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
484: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
485: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
486: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
487: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
488: l_error_message := fnd_message.get;
489: RAISE fnd_api.g_exc_error;
490:
483: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
484: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
485: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
486: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
487: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
488: l_error_message := fnd_message.get;
489: RAISE fnd_api.g_exc_error;
490:
491: END IF; -- End of Source Record IF
484: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
485: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
486: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
487: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
488: l_error_message := fnd_message.get;
489: RAISE fnd_api.g_exc_error;
490:
491: END IF; -- End of Source Record IF
492:
687: -- Multiple Instances were found so throw error
688: IF (l_debug > 0) THEN
689: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
690: END IF;
691: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
692: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
693: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
694: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
695: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
688: IF (l_debug > 0) THEN
689: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
690: END IF;
691: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
692: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
693: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
694: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
695: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
696: l_error_message := fnd_message.get;
689: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
690: END IF;
691: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
692: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
693: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
694: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
695: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
696: l_error_message := fnd_message.get;
697: RAISE fnd_api.g_exc_error;
690: END IF;
691: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
692: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
693: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
694: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
695: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
696: l_error_message := fnd_message.get;
697: RAISE fnd_api.g_exc_error;
698: END IF; -- End of Destination Record If
691: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
692: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
693: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
694: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
695: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
696: l_error_message := fnd_message.get;
697: RAISE fnd_api.g_exc_error;
698: END IF; -- End of Destination Record If
699:
692: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
693: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
694: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
695: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
696: l_error_message := fnd_message.get;
697: RAISE fnd_api.g_exc_error;
698: END IF; -- End of Destination Record If
699:
700: ELSIF l_mtl_item_tbl(j).serial_number is NOT NULL THEN
777: ELSIF l_src_instance_header_tbl.count = 0 THEN -- Serialized Item
778: IF (l_debug > 0) THEN
779: csi_t_gen_utility_pvt.add('No Records were found in Install Base');
780: END IF;
781: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
782: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
783: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
784: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
785: l_error_message := fnd_message.get;
778: IF (l_debug > 0) THEN
779: csi_t_gen_utility_pvt.add('No Records were found in Install Base');
780: END IF;
781: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
782: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
783: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
784: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
785: l_error_message := fnd_message.get;
786: RAISE fnd_api.g_exc_error;
779: csi_t_gen_utility_pvt.add('No Records were found in Install Base');
780: END IF;
781: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
782: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
783: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
784: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
785: l_error_message := fnd_message.get;
786: RAISE fnd_api.g_exc_error;
787:
780: END IF;
781: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
782: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
783: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
784: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
785: l_error_message := fnd_message.get;
786: RAISE fnd_api.g_exc_error;
787:
788: ELSIF l_src_instance_header_tbl.count > 1 THEN -- Serialized Item
781: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
782: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
783: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
784: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
785: l_error_message := fnd_message.get;
786: RAISE fnd_api.g_exc_error;
787:
788: ELSIF l_src_instance_header_tbl.count > 1 THEN -- Serialized Item
789:
790: -- Multiple Instances were found so throw error
791: IF (l_debug > 0) THEN
792: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-56');
793: END IF;
794: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
795: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
796: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
797: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
798: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
791: IF (l_debug > 0) THEN
792: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-56');
793: END IF;
794: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
795: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
796: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
797: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
798: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
799: l_error_message := fnd_message.get;
792: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-56');
793: END IF;
794: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
795: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
796: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
797: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
798: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
799: l_error_message := fnd_message.get;
800: RAISE fnd_api.g_exc_error;
793: END IF;
794: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
795: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
796: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
797: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
798: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
799: l_error_message := fnd_message.get;
800: RAISE fnd_api.g_exc_error;
801:
794: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
795: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
796: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
797: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
798: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
799: l_error_message := fnd_message.get;
800: RAISE fnd_api.g_exc_error;
801:
802: END IF; -- End of Serial Number If
795: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
796: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
797: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
798: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
799: l_error_message := fnd_message.get;
800: RAISE fnd_api.g_exc_error;
801:
802: END IF; -- End of Serial Number If
803: END IF; -- End of Serial Number count IF
840: WHEN others THEN
841: IF (l_debug > 0) THEN
842: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
843: END IF;
844: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
845: fnd_message.set_token('API_NAME',l_api_name);
846: fnd_message.set_token('SQL_ERROR',SQLERRM);
847: x_return_status := l_fnd_unexpected;
848:
841: IF (l_debug > 0) THEN
842: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
843: END IF;
844: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
845: fnd_message.set_token('API_NAME',l_api_name);
846: fnd_message.set_token('SQL_ERROR',SQLERRM);
847: x_return_status := l_fnd_unexpected;
848:
849: IF l_mtl_item_tbl.count > 0 THEN
842: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
843: END IF;
844: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
845: fnd_message.set_token('API_NAME',l_api_name);
846: fnd_message.set_token('SQL_ERROR',SQLERRM);
847: x_return_status := l_fnd_unexpected;
848:
849: IF l_mtl_item_tbl.count > 0 THEN
850: x_trx_error_rec.serial_number := l_mtl_item_tbl(j).serial_number;
858: x_trx_error_rec.comms_nl_trackable_flag := l_mtl_item_tbl(j).comms_nl_trackable_flag;
859: x_trx_error_rec.transaction_error_date := l_sysdate ;
860: END IF;
861:
862: x_trx_error_rec.error_text := fnd_message.get;
863: x_trx_error_rec.transaction_id := NULL;
864: x_trx_error_rec.source_type := 'CSIISUHZ';
865: x_trx_error_rec.source_id := p_transaction_id;
866: x_trx_error_rec.processed_flag := csi_inv_trxs_pkg.g_txn_error;
1290: IF (l_debug > 0) THEN
1291: csi_t_gen_utility_pvt.add('Serialized Item with Status other then Out Of Service, In Inventory, Installed, or In Process already exists in Install Base');
1292: csi_t_gen_utility_pvt.add('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1293: END IF;
1294: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1295: fnd_message.set_token('STATUS',l_status);
1296: l_error_message := fnd_message.get;
1297: l_return_status := l_fnd_error;
1298: RAISE fnd_api.g_exc_error;
1291: csi_t_gen_utility_pvt.add('Serialized Item with Status other then Out Of Service, In Inventory, Installed, or In Process already exists in Install Base');
1292: csi_t_gen_utility_pvt.add('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1293: END IF;
1294: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1295: fnd_message.set_token('STATUS',l_status);
1296: l_error_message := fnd_message.get;
1297: l_return_status := l_fnd_error;
1298: RAISE fnd_api.g_exc_error;
1299: END IF;
1292: csi_t_gen_utility_pvt.add('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1293: END IF;
1294: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1295: fnd_message.set_token('STATUS',l_status);
1296: l_error_message := fnd_message.get;
1297: l_return_status := l_fnd_error;
1298: RAISE fnd_api.g_exc_error;
1299: END IF;
1300:
1371: -- Multiple Instances were found so throw error
1372: IF (l_debug > 0) THEN
1373: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
1374: END IF;
1375: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1376: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1377: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1378: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1379: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1372: IF (l_debug > 0) THEN
1373: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
1374: END IF;
1375: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1376: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1377: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1378: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1379: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1380: l_error_message := fnd_message.get;
1373: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
1374: END IF;
1375: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1376: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1377: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1378: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1379: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1380: l_error_message := fnd_message.get;
1381: RAISE fnd_api.g_exc_error;
1374: END IF;
1375: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1376: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1377: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1378: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1379: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1380: l_error_message := fnd_message.get;
1381: RAISE fnd_api.g_exc_error;
1382: END IF; -- Serialized Source IF
1375: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1376: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1377: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1378: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1379: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1380: l_error_message := fnd_message.get;
1381: RAISE fnd_api.g_exc_error;
1382: END IF; -- Serialized Source IF
1383:
1376: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1377: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1378: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1379: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1380: l_error_message := fnd_message.get;
1381: RAISE fnd_api.g_exc_error;
1382: END IF; -- Serialized Source IF
1383:
1384: ELSIF l_mtl_item_tbl(j).serial_number IS NULL THEN -- Non Serialized
1898: -- Multiple Instances were found so throw error
1899: IF (l_debug > 0) THEN
1900: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
1901: END IF;
1902: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1903: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1904: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1905: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1906: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1899: IF (l_debug > 0) THEN
1900: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
1901: END IF;
1902: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1903: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1904: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1905: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1906: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1907: l_error_message := fnd_message.get;
1900: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
1901: END IF;
1902: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1903: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1904: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1905: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1906: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1907: l_error_message := fnd_message.get;
1908: RAISE fnd_api.g_exc_error;
1901: END IF;
1902: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1903: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1904: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1905: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1906: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1907: l_error_message := fnd_message.get;
1908: RAISE fnd_api.g_exc_error;
1909:
1902: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1903: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1904: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1905: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1906: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1907: l_error_message := fnd_message.get;
1908: RAISE fnd_api.g_exc_error;
1909:
1910: END IF; -- End of Destination Record If
1903: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1904: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1905: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1906: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1907: l_error_message := fnd_message.get;
1908: RAISE fnd_api.g_exc_error;
1909:
1910: END IF; -- End of Destination Record If
1911: /***
1913: -- Multiple Instances were found so throw error
1914: IF (l_debug > 0) THEN
1915: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
1916: END IF;
1917: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1918: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1919: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1920: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1921: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1914: IF (l_debug > 0) THEN
1915: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
1916: END IF;
1917: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1918: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1919: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1920: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1921: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1922: l_error_message := fnd_message.get;
1915: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
1916: END IF;
1917: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1918: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1919: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1920: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1921: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1922: l_error_message := fnd_message.get;
1923: RAISE fnd_api.g_exc_error;
1916: END IF;
1917: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1918: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1919: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1920: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1921: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1922: l_error_message := fnd_message.get;
1923: RAISE fnd_api.g_exc_error;
1924: ***/
1917: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1918: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1919: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1920: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1921: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1922: l_error_message := fnd_message.get;
1923: RAISE fnd_api.g_exc_error;
1924: ***/
1925: ELSIF l_src_instance_header_tbl.count = 0 THEN -- No IB Records found
1918: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1919: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1920: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1921: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1922: l_error_message := fnd_message.get;
1923: RAISE fnd_api.g_exc_error;
1924: ***/
1925: ELSIF l_src_instance_header_tbl.count = 0 THEN -- No IB Records found
1926:
2113: -- Multiple Instances were found so throw error
2114: IF (l_debug > 0) THEN
2115: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
2116: END IF;
2117: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2118: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2119: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2120: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2121: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2114: IF (l_debug > 0) THEN
2115: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
2116: END IF;
2117: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2118: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2119: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2120: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2121: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2122: l_error_message := fnd_message.get;
2115: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
2116: END IF;
2117: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2118: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2119: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2120: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2121: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2122: l_error_message := fnd_message.get;
2123: RAISE fnd_api.g_exc_error;
2116: END IF;
2117: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2118: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2119: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2120: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2121: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2122: l_error_message := fnd_message.get;
2123: RAISE fnd_api.g_exc_error;
2124:
2117: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2118: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2119: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2120: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2121: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2122: l_error_message := fnd_message.get;
2123: RAISE fnd_api.g_exc_error;
2124:
2125: END IF; -- End of Destination Record If for checking for In Inventory Records because the Project/Source Instance was not there.
2118: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2119: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2120: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2121: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2122: l_error_message := fnd_message.get;
2123: RAISE fnd_api.g_exc_error;
2124:
2125: END IF; -- End of Destination Record If for checking for In Inventory Records because the Project/Source Instance was not there.
2126: END IF; -- End of No Records Found If
2164: WHEN others THEN
2165: IF (l_debug > 0) THEN
2166: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
2167: END IF;
2168: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2169: fnd_message.set_token('API_NAME',l_api_name);
2170: fnd_message.set_token('SQL_ERROR',SQLERRM);
2171: x_return_status := l_fnd_unexpected;
2172:
2165: IF (l_debug > 0) THEN
2166: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
2167: END IF;
2168: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2169: fnd_message.set_token('API_NAME',l_api_name);
2170: fnd_message.set_token('SQL_ERROR',SQLERRM);
2171: x_return_status := l_fnd_unexpected;
2172:
2173: IF l_mtl_item_tbl.count > 0 THEN
2166: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
2167: END IF;
2168: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2169: fnd_message.set_token('API_NAME',l_api_name);
2170: fnd_message.set_token('SQL_ERROR',SQLERRM);
2171: x_return_status := l_fnd_unexpected;
2172:
2173: IF l_mtl_item_tbl.count > 0 THEN
2174: x_trx_error_rec.serial_number := l_mtl_item_tbl(j).serial_number;
2182: x_trx_error_rec.comms_nl_trackable_flag := l_mtl_item_tbl(j).comms_nl_trackable_flag;
2183: x_trx_error_rec.transaction_error_date := l_sysdate ;
2184: END IF;
2185:
2186: x_trx_error_rec.error_text := fnd_message.get;
2187: x_trx_error_rec.transaction_id := NULL;
2188: x_trx_error_rec.source_type := 'CSIMSRHZ';
2189: x_trx_error_rec.source_id := p_transaction_id;
2190: x_trx_error_rec.processed_flag := csi_inv_trxs_pkg.g_txn_error;
2585: ELSE -- No Records were found and Neg Qtys Not Allowed
2586: IF (l_debug > 0) THEN
2587: csi_t_gen_utility_pvt.add('No Records were found in Install Base andNeg Qtys not allowed to error');
2588: END IF;
2589: fnd_message.set_name('CSI','CSI_NO_NEG_BAL_ALLOWED');
2590: l_error_message := fnd_message.get;
2591: RAISE fnd_api.g_exc_error;
2592:
2593: END IF; -- Neg Qty IF
2586: IF (l_debug > 0) THEN
2587: csi_t_gen_utility_pvt.add('No Records were found in Install Base andNeg Qtys not allowed to error');
2588: END IF;
2589: fnd_message.set_name('CSI','CSI_NO_NEG_BAL_ALLOWED');
2590: l_error_message := fnd_message.get;
2591: RAISE fnd_api.g_exc_error;
2592:
2593: END IF; -- Neg Qty IF
2594:
2662: -- Multiple Instances were found so throw error
2663: IF (l_debug > 0) THEN
2664: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
2665: END IF;
2666: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2667: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2668: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2669: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2670: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2663: IF (l_debug > 0) THEN
2664: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
2665: END IF;
2666: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2667: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2668: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2669: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2670: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2671: l_error_message := fnd_message.get;
2664: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
2665: END IF;
2666: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2667: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2668: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2669: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2670: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2671: l_error_message := fnd_message.get;
2672: RAISE fnd_api.g_exc_error;
2665: END IF;
2666: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2667: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2668: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2669: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2670: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2671: l_error_message := fnd_message.get;
2672: RAISE fnd_api.g_exc_error;
2673:
2666: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2667: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2668: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2669: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2670: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2671: l_error_message := fnd_message.get;
2672: RAISE fnd_api.g_exc_error;
2673:
2674: END IF; -- End of Source Record If
2667: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2668: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2669: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2670: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2671: l_error_message := fnd_message.get;
2672: RAISE fnd_api.g_exc_error;
2673:
2674: END IF; -- End of Source Record If
2675:
2874: -- Multiple Instances were found so throw error
2875: IF (l_debug > 0) THEN
2876: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-90');
2877: END IF;
2878: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2879: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2880: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2881: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2882: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2875: IF (l_debug > 0) THEN
2876: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-90');
2877: END IF;
2878: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2879: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2880: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2881: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2882: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2883: l_error_message := fnd_message.get;
2876: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-90');
2877: END IF;
2878: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2879: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2880: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2881: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2882: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2883: l_error_message := fnd_message.get;
2884: RAISE fnd_api.g_exc_error;
2877: END IF;
2878: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2879: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2880: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2881: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2882: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2883: l_error_message := fnd_message.get;
2884: RAISE fnd_api.g_exc_error;
2885:
2878: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2879: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2880: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2881: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2882: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2883: l_error_message := fnd_message.get;
2884: RAISE fnd_api.g_exc_error;
2885:
2886: END IF; -- End of Destination Record If
2879: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2880: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2881: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2882: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2883: l_error_message := fnd_message.get;
2884: RAISE fnd_api.g_exc_error;
2885:
2886: END IF; -- End of Destination Record If
2887:
2959: ELSIF l_src_instance_header_tbl.count = 0 THEN
2960: IF (l_debug > 0) THEN
2961: csi_t_gen_utility_pvt.add('No Records were found in Install Base');
2962: END IF;
2963: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2964: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2965: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2966: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2967: l_error_message := fnd_message.get;
2960: IF (l_debug > 0) THEN
2961: csi_t_gen_utility_pvt.add('No Records were found in Install Base');
2962: END IF;
2963: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2964: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2965: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2966: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2967: l_error_message := fnd_message.get;
2968: RAISE fnd_api.g_exc_error;
2961: csi_t_gen_utility_pvt.add('No Records were found in Install Base');
2962: END IF;
2963: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2964: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2965: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2966: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2967: l_error_message := fnd_message.get;
2968: RAISE fnd_api.g_exc_error;
2969:
2962: END IF;
2963: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2964: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2965: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2966: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2967: l_error_message := fnd_message.get;
2968: RAISE fnd_api.g_exc_error;
2969:
2970: ELSIF l_src_instance_header_tbl.count > 1 THEN
2963: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2964: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2965: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2966: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2967: l_error_message := fnd_message.get;
2968: RAISE fnd_api.g_exc_error;
2969:
2970: ELSIF l_src_instance_header_tbl.count > 1 THEN
2971: -- Multiple Instances were found so throw error
2971: -- Multiple Instances were found so throw error
2972: IF (l_debug > 0) THEN
2973: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-65');
2974: END IF;
2975: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2976: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2977: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2978: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2979: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2972: IF (l_debug > 0) THEN
2973: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-65');
2974: END IF;
2975: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2976: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2977: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2978: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2979: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2980: l_error_message := fnd_message.get;
2973: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-65');
2974: END IF;
2975: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2976: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2977: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2978: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2979: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2980: l_error_message := fnd_message.get;
2981: RAISE fnd_api.g_exc_error;
2974: END IF;
2975: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2976: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2977: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2978: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2979: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2980: l_error_message := fnd_message.get;
2981: RAISE fnd_api.g_exc_error;
2982:
2975: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2976: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2977: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2978: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2979: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2980: l_error_message := fnd_message.get;
2981: RAISE fnd_api.g_exc_error;
2982:
2983: END IF; -- End of Source Record IF for Serialized
2976: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2977: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2978: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2979: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2980: l_error_message := fnd_message.get;
2981: RAISE fnd_api.g_exc_error;
2982:
2983: END IF; -- End of Source Record IF for Serialized
2984: END IF; -- End of Source Record If
3021: WHEN others THEN
3022: IF (l_debug > 0) THEN
3023: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
3024: END IF;
3025: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3026: fnd_message.set_token('API_NAME',l_api_name);
3027: fnd_message.set_token('SQL_ERROR',SQLERRM);
3028: x_return_status := l_fnd_unexpected;
3029:
3022: IF (l_debug > 0) THEN
3023: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
3024: END IF;
3025: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3026: fnd_message.set_token('API_NAME',l_api_name);
3027: fnd_message.set_token('SQL_ERROR',SQLERRM);
3028: x_return_status := l_fnd_unexpected;
3029:
3030: IF l_mtl_item_tbl.count > 0 THEN
3023: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
3024: END IF;
3025: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3026: fnd_message.set_token('API_NAME',l_api_name);
3027: fnd_message.set_token('SQL_ERROR',SQLERRM);
3028: x_return_status := l_fnd_unexpected;
3029:
3030: IF l_mtl_item_tbl.count > 0 THEN
3031: x_trx_error_rec.serial_number := l_mtl_item_tbl(j).serial_number;
3039: x_trx_error_rec.comms_nl_trackable_flag := l_mtl_item_tbl(j).comms_nl_trackable_flag;
3040: x_trx_error_rec.transaction_error_date := l_sysdate ;
3041: END IF;
3042:
3043: x_trx_error_rec.error_text := fnd_message.get;
3044: x_trx_error_rec.transaction_id := NULL;
3045: x_trx_error_rec.source_type := 'CSIMSIHZ';
3046: x_trx_error_rec.source_id := p_transaction_id;
3047: x_trx_error_rec.processed_flag := csi_inv_trxs_pkg.g_txn_error;