388: ELSE -- No Records were found and Neg Qtys Not Allowed
389: IF (l_debug > 0) THEN
390: csi_t_gen_utility_pvt.add('No Records were found in Install Base andNeg Qtys not allowed to error');
391: END IF;
392: fnd_message.set_name('CSI','CSI_NO_NEG_BAL_ALLOWED');
393: l_error_message := fnd_message.get;
394: RAISE fnd_api.g_exc_error;
395:
396: END IF; -- Neg Qty If
389: IF (l_debug > 0) THEN
390: csi_t_gen_utility_pvt.add('No Records were found in Install Base andNeg Qtys not allowed to error');
391: END IF;
392: fnd_message.set_name('CSI','CSI_NO_NEG_BAL_ALLOWED');
393: l_error_message := fnd_message.get;
394: RAISE fnd_api.g_exc_error;
395:
396: END IF; -- Neg Qty If
397:
468: -- Multiple Instances were found so throw error
469: IF (l_debug > 0) THEN
470: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
471: END IF;
472: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
473: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
474: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
475: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
476: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
469: IF (l_debug > 0) THEN
470: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
471: END IF;
472: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
473: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
474: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
475: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
476: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
477: RAISE fnd_api.g_exc_error;
470: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
471: END IF;
472: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
473: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
474: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
475: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
476: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
477: RAISE fnd_api.g_exc_error;
478:
471: END IF;
472: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
473: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
474: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
475: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
476: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
477: RAISE fnd_api.g_exc_error;
478:
479: END IF; -- End of Source Record IF
472: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
473: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
474: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
475: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
476: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
477: RAISE fnd_api.g_exc_error;
478:
479: END IF; -- End of Source Record IF
480:
670: -- Multiple Instances were found so throw error
671: IF (l_debug > 0) THEN
672: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
673: END IF;
674: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
675: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
676: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
677: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
678: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
671: IF (l_debug > 0) THEN
672: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
673: END IF;
674: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
675: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
676: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
677: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
678: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
679: RAISE fnd_api.g_exc_error;
672: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
673: END IF;
674: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
675: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
676: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
677: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
678: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
679: RAISE fnd_api.g_exc_error;
680:
673: END IF;
674: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
675: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
676: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
677: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
678: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
679: RAISE fnd_api.g_exc_error;
680:
681: END IF; -- End of Destination Non Serial IF
674: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
675: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
676: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
677: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
678: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
679: RAISE fnd_api.g_exc_error;
680:
681: END IF; -- End of Destination Non Serial IF
682:
756: ELSIF l_src_instance_header_tbl.count = 0 THEN
757: IF (l_debug > 0) THEN
758: csi_t_gen_utility_pvt.add('No Records were found in Install Base');
759: END IF;
760: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
761: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
762: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
763: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
764: l_error_message := fnd_message.get;
757: IF (l_debug > 0) THEN
758: csi_t_gen_utility_pvt.add('No Records were found in Install Base');
759: END IF;
760: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
761: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
762: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
763: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
764: l_error_message := fnd_message.get;
765: RAISE fnd_api.g_exc_error;
758: csi_t_gen_utility_pvt.add('No Records were found in Install Base');
759: END IF;
760: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
761: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
762: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
763: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
764: l_error_message := fnd_message.get;
765: RAISE fnd_api.g_exc_error;
766:
759: END IF;
760: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
761: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
762: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
763: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
764: l_error_message := fnd_message.get;
765: RAISE fnd_api.g_exc_error;
766:
767: ELSIF l_src_instance_header_tbl.count > 1 THEN
760: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
761: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
762: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
763: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
764: l_error_message := fnd_message.get;
765: RAISE fnd_api.g_exc_error;
766:
767: ELSIF l_src_instance_header_tbl.count > 1 THEN
768: -- Multiple Instances were found so throw error
768: -- Multiple Instances were found so throw error
769: IF (l_debug > 0) THEN
770: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-40');
771: END IF;
772: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
773: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
774: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
775: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
776: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
769: IF (l_debug > 0) THEN
770: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-40');
771: END IF;
772: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
773: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
774: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
775: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
776: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
777: RAISE fnd_api.g_exc_error;
770: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-40');
771: END IF;
772: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
773: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
774: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
775: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
776: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
777: RAISE fnd_api.g_exc_error;
778: END IF; -- End of Source Record IF for Serialized
771: END IF;
772: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
773: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
774: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
775: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
776: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
777: RAISE fnd_api.g_exc_error;
778: END IF; -- End of Source Record IF for Serialized
779:
772: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
773: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
774: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
775: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
776: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
777: RAISE fnd_api.g_exc_error;
778: END IF; -- End of Source Record IF for Serialized
779:
780: END IF; -- End of Serial Number If
816: WHEN others THEN
817: IF (l_debug > 0) THEN
818: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
819: END IF;
820: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
821: fnd_message.set_token('API_NAME',l_api_name);
822: fnd_message.set_token('SQL_ERROR',SQLERRM);
823: x_return_status := l_fnd_unexpected;
824:
817: IF (l_debug > 0) THEN
818: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
819: END IF;
820: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
821: fnd_message.set_token('API_NAME',l_api_name);
822: fnd_message.set_token('SQL_ERROR',SQLERRM);
823: x_return_status := l_fnd_unexpected;
824:
825: IF l_mtl_item_tbl.count > 0 THEN
818: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
819: END IF;
820: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
821: fnd_message.set_token('API_NAME',l_api_name);
822: fnd_message.set_token('SQL_ERROR',SQLERRM);
823: x_return_status := l_fnd_unexpected;
824:
825: IF l_mtl_item_tbl.count > 0 THEN
826: x_trx_error_rec.serial_number := l_mtl_item_tbl(j).serial_number;
834: x_trx_error_rec.comms_nl_trackable_flag := l_mtl_item_tbl(j).comms_nl_trackable_flag;
835: x_trx_error_rec.transaction_error_date := l_sysdate ;
836: END IF;
837:
838: x_trx_error_rec.error_text := fnd_message.get;
839: x_trx_error_rec.transaction_id := NULL;
840: x_trx_error_rec.source_type := 'CSIISUPT';
841: x_trx_error_rec.source_id := p_transaction_id;
842: x_trx_error_rec.processed_flag := csi_inv_trxs_pkg.g_txn_error;
1215: IF (l_debug > 0) THEN
1216: 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');
1217: csi_t_gen_utility_pvt.add('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1218: END IF;
1219: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1220: fnd_message.set_token('STATUS',l_status);
1221: l_error_message := fnd_message.get;
1222: l_return_status := l_fnd_error;
1223: RAISE fnd_api.g_exc_error;
1216: 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');
1217: csi_t_gen_utility_pvt.add('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1218: END IF;
1219: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1220: fnd_message.set_token('STATUS',l_status);
1221: l_error_message := fnd_message.get;
1222: l_return_status := l_fnd_error;
1223: RAISE fnd_api.g_exc_error;
1224: END IF;
1217: csi_t_gen_utility_pvt.add('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1218: END IF;
1219: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1220: fnd_message.set_token('STATUS',l_status);
1221: l_error_message := fnd_message.get;
1222: l_return_status := l_fnd_error;
1223: RAISE fnd_api.g_exc_error;
1224: END IF;
1225:
1296: -- Bug 4378656 - If the instance is not there then we still need to create one that is In Inventory.
1297: -- IF (l_debug > 0) THEN
1298: -- csi_t_gen_utility_pvt.add('No Records were found in Install Base');
1299: -- END IF;
1300: -- fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
1301: -- fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
1302: -- fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
1303: -- fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
1304: -- l_error_message := fnd_message.get;
1297: -- IF (l_debug > 0) THEN
1298: -- csi_t_gen_utility_pvt.add('No Records were found in Install Base');
1299: -- END IF;
1300: -- fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
1301: -- fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
1302: -- fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
1303: -- fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
1304: -- l_error_message := fnd_message.get;
1305: -- RAISE fnd_api.g_exc_error;
1298: -- csi_t_gen_utility_pvt.add('No Records were found in Install Base');
1299: -- END IF;
1300: -- fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
1301: -- fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
1302: -- fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
1303: -- fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
1304: -- l_error_message := fnd_message.get;
1305: -- RAISE fnd_api.g_exc_error;
1306:
1299: -- END IF;
1300: -- fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
1301: -- fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
1302: -- fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
1303: -- fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
1304: -- l_error_message := fnd_message.get;
1305: -- RAISE fnd_api.g_exc_error;
1306:
1307: ELSIF l_src_instance_header_tbl.count > 1 THEN
1300: -- fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
1301: -- fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
1302: -- fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
1303: -- fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
1304: -- l_error_message := fnd_message.get;
1305: -- RAISE fnd_api.g_exc_error;
1306:
1307: ELSIF l_src_instance_header_tbl.count > 1 THEN
1308: -- Multiple Instances were found so throw error
1308: -- Multiple Instances were found so throw error
1309: IF (l_debug > 0) THEN
1310: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-55');
1311: END IF;
1312: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1313: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1314: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1315: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1316: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1309: IF (l_debug > 0) THEN
1310: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-55');
1311: END IF;
1312: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1313: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1314: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1315: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1316: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1317: RAISE fnd_api.g_exc_error;
1310: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-55');
1311: END IF;
1312: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1313: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1314: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1315: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1316: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1317: RAISE fnd_api.g_exc_error;
1318: END IF; -- No Records Found
1311: END IF;
1312: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1313: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1314: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1315: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1316: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1317: RAISE fnd_api.g_exc_error;
1318: END IF; -- No Records Found
1319:
1312: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1313: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1314: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1315: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1316: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1317: RAISE fnd_api.g_exc_error;
1318: END IF; -- No Records Found
1319:
1320: ELSIF l_mtl_item_tbl(j).serial_number IS NULL THEN -- Non Serialized
1618: -- Multiple Instances were found so throw error
1619: IF (l_debug > 0) THEN
1620: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-50');
1621: END IF;
1622: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1623: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1624: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1625: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1626: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1619: IF (l_debug > 0) THEN
1620: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-50');
1621: END IF;
1622: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1623: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1624: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1625: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1626: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1627: RAISE fnd_api.g_exc_error;
1620: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-50');
1621: END IF;
1622: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1623: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1624: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1625: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1626: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1627: RAISE fnd_api.g_exc_error;
1628:
1621: END IF;
1622: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1623: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1624: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1625: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1626: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1627: RAISE fnd_api.g_exc_error;
1628:
1629: END IF; -- End of Destination Record If
1622: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1623: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1624: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1625: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1626: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1627: RAISE fnd_api.g_exc_error;
1628:
1629: END IF; -- End of Destination Record If
1630:
1826: -- Multiple Instances were found so throw error
1827: IF (l_debug > 0) THEN
1828: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base so error-90');
1829: END IF;
1830: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1831: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1832: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1833: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1834: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1827: IF (l_debug > 0) THEN
1828: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base so error-90');
1829: END IF;
1830: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1831: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1832: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1833: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1834: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1835: RAISE fnd_api.g_exc_error;
1828: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base so error-90');
1829: END IF;
1830: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1831: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1832: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1833: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1834: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1835: RAISE fnd_api.g_exc_error;
1836:
1829: END IF;
1830: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1831: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1832: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1833: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1834: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1835: RAISE fnd_api.g_exc_error;
1836:
1837: END IF; -- End of Destination Record If for checking for In Inventory Records because the Project/Source Instance was not there.
1830: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1831: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1832: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1833: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1834: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1835: RAISE fnd_api.g_exc_error;
1836:
1837: END IF; -- End of Destination Record If for checking for In Inventory Records because the Project/Source Instance was not there.
1838:
1839: -- Bug 4378656 - If the instance is not there then we still need to create one that is In Inventory.
1840: -- IF (l_debug > 0) THEN
1841: -- csi_t_gen_utility_pvt.add('No Records were found in Install Base');
1842: -- END IF;
1843: -- fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
1844: -- fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
1845: -- fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
1846: -- fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
1847: -- l_error_message := fnd_message.get;
1840: -- IF (l_debug > 0) THEN
1841: -- csi_t_gen_utility_pvt.add('No Records were found in Install Base');
1842: -- END IF;
1843: -- fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
1844: -- fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
1845: -- fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
1846: -- fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
1847: -- l_error_message := fnd_message.get;
1848: -- RAISE fnd_api.g_exc_error;
1841: -- csi_t_gen_utility_pvt.add('No Records were found in Install Base');
1842: -- END IF;
1843: -- fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
1844: -- fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
1845: -- fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
1846: -- fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
1847: -- l_error_message := fnd_message.get;
1848: -- RAISE fnd_api.g_exc_error;
1849:
1842: -- END IF;
1843: -- fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
1844: -- fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
1845: -- fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
1846: -- fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
1847: -- l_error_message := fnd_message.get;
1848: -- RAISE fnd_api.g_exc_error;
1849:
1850: ELSIF l_src_instance_header_tbl.count > 1 THEN
1843: -- fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
1844: -- fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
1845: -- fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
1846: -- fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
1847: -- l_error_message := fnd_message.get;
1848: -- RAISE fnd_api.g_exc_error;
1849:
1850: ELSIF l_src_instance_header_tbl.count > 1 THEN
1851: -- Multiple Instances were found so throw error
1851: -- Multiple Instances were found so throw error
1852: IF (l_debug > 0) THEN
1853: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-75');
1854: END IF;
1855: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1856: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1857: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1858: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1859: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1852: IF (l_debug > 0) THEN
1853: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-75');
1854: END IF;
1855: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1856: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1857: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1858: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1859: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1860: RAISE fnd_api.g_exc_error;
1853: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-75');
1854: END IF;
1855: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1856: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1857: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1858: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1859: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1860: RAISE fnd_api.g_exc_error;
1861:
1854: END IF;
1855: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1856: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1857: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1858: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1859: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1860: RAISE fnd_api.g_exc_error;
1861:
1862: END IF; -- End of No Records Found If
1855: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1856: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1857: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1858: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1859: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1860: RAISE fnd_api.g_exc_error;
1861:
1862: END IF; -- End of No Records Found If
1863: END IF; -- End of Serial Number If
1899: WHEN others THEN
1900: IF (l_debug > 0) THEN
1901: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
1902: END IF;
1903: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
1904: fnd_message.set_token('API_NAME',l_api_name);
1905: fnd_message.set_token('SQL_ERROR',SQLERRM);
1906: x_return_status := l_fnd_unexpected;
1907:
1900: IF (l_debug > 0) THEN
1901: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
1902: END IF;
1903: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
1904: fnd_message.set_token('API_NAME',l_api_name);
1905: fnd_message.set_token('SQL_ERROR',SQLERRM);
1906: x_return_status := l_fnd_unexpected;
1907:
1908: IF l_mtl_item_tbl.count > 0 THEN
1901: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
1902: END IF;
1903: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
1904: fnd_message.set_token('API_NAME',l_api_name);
1905: fnd_message.set_token('SQL_ERROR',SQLERRM);
1906: x_return_status := l_fnd_unexpected;
1907:
1908: IF l_mtl_item_tbl.count > 0 THEN
1909: x_trx_error_rec.serial_number := l_mtl_item_tbl(j).serial_number;
1917: x_trx_error_rec.comms_nl_trackable_flag := l_mtl_item_tbl(j).comms_nl_trackable_flag;
1918: x_trx_error_rec.transaction_error_date := l_sysdate ;
1919: END IF;
1920:
1921: x_trx_error_rec.error_text := fnd_message.get;
1922: x_trx_error_rec.transaction_id := NULL;
1923: x_trx_error_rec.source_type := 'CSIMSRPT';
1924: x_trx_error_rec.source_id := p_transaction_id;
1925: x_trx_error_rec.processed_flag := csi_inv_trxs_pkg.g_txn_error;
2313: ELSE -- No Records were found and Neg Qtys Not Allowed
2314: IF (l_debug > 0) THEN
2315: csi_t_gen_utility_pvt.add('No Records were found in Install Base andNeg Qtys not allowed to error');
2316: END IF;
2317: fnd_message.set_name('CSI','CSI_NO_NEG_BAL_ALLOWED');
2318: l_error_message := fnd_message.get;
2319: RAISE fnd_api.g_exc_error;
2320:
2321: END IF; -- Neg Qty If
2314: IF (l_debug > 0) THEN
2315: csi_t_gen_utility_pvt.add('No Records were found in Install Base andNeg Qtys not allowed to error');
2316: END IF;
2317: fnd_message.set_name('CSI','CSI_NO_NEG_BAL_ALLOWED');
2318: l_error_message := fnd_message.get;
2319: RAISE fnd_api.g_exc_error;
2320:
2321: END IF; -- Neg Qty If
2322:
2393: -- Multiple Instances were found so throw error
2394: IF (l_debug > 0) THEN
2395: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
2396: END IF;
2397: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2398: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2399: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2400: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2401: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2394: IF (l_debug > 0) THEN
2395: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
2396: END IF;
2397: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2398: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2399: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2400: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2401: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2402: RAISE fnd_api.g_exc_error;
2395: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-30');
2396: END IF;
2397: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2398: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2399: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2400: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2401: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2402: RAISE fnd_api.g_exc_error;
2403:
2396: END IF;
2397: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2398: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2399: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2400: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2401: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2402: RAISE fnd_api.g_exc_error;
2403:
2404: END IF; -- End of Source Record If
2397: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2398: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2399: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2400: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2401: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2402: RAISE fnd_api.g_exc_error;
2403:
2404: END IF; -- End of Source Record If
2405:
2600: -- Multiple Instances were found so throw error
2601: IF (l_debug > 0) THEN
2602: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-60');
2603: END IF;
2604: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2605: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2606: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2607: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2608: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2601: IF (l_debug > 0) THEN
2602: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-60');
2603: END IF;
2604: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2605: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2606: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2607: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2608: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2609: RAISE fnd_api.g_exc_error;
2602: csi_t_gen_utility_pvt.add('Multiple Instances were Found in Install Base-60');
2603: END IF;
2604: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2605: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2606: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2607: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2608: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2609: RAISE fnd_api.g_exc_error;
2610:
2603: END IF;
2604: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2605: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2606: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2607: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2608: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2609: RAISE fnd_api.g_exc_error;
2610:
2611: END IF; -- End of Destination Record If
2604: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2605: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2606: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2607: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2608: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2609: RAISE fnd_api.g_exc_error;
2610:
2611: END IF; -- End of Destination Record If
2612:
2681: ELSIF l_src_instance_header_tbl.count = 0 THEN
2682: IF (l_debug > 0) THEN
2683: csi_t_gen_utility_pvt.add('No Records were found in Install Base');
2684: END IF;
2685: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2686: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2687: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2688: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2689: l_error_message := fnd_message.get;
2682: IF (l_debug > 0) THEN
2683: csi_t_gen_utility_pvt.add('No Records were found in Install Base');
2684: END IF;
2685: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2686: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2687: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2688: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2689: l_error_message := fnd_message.get;
2690: RAISE fnd_api.g_exc_error;
2683: csi_t_gen_utility_pvt.add('No Records were found in Install Base');
2684: END IF;
2685: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2686: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2687: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2688: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2689: l_error_message := fnd_message.get;
2690: RAISE fnd_api.g_exc_error;
2691:
2684: END IF;
2685: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2686: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2687: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2688: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2689: l_error_message := fnd_message.get;
2690: RAISE fnd_api.g_exc_error;
2691:
2692: ELSIF l_src_instance_header_tbl.count > 1 THEN
2685: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2686: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2687: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2688: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2689: l_error_message := fnd_message.get;
2690: RAISE fnd_api.g_exc_error;
2691:
2692: ELSIF l_src_instance_header_tbl.count > 1 THEN
2693: -- Multiple Instances were found so throw error
2693: -- Multiple Instances were found so throw error
2694: IF (l_debug > 0) THEN
2695: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-65');
2696: END IF;
2697: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2698: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2699: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2700: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2701: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2694: IF (l_debug > 0) THEN
2695: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-65');
2696: END IF;
2697: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2698: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2699: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2700: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2701: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2702: RAISE fnd_api.g_exc_error;
2695: csi_t_gen_utility_pvt.add('Multiple Instances were Found in InstallBase-65');
2696: END IF;
2697: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2698: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2699: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2700: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2701: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2702: RAISE fnd_api.g_exc_error;
2703: END IF; -- End of Source Record IF for Serialized
2696: END IF;
2697: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2698: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2699: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2700: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2701: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2702: RAISE fnd_api.g_exc_error;
2703: END IF; -- End of Source Record IF for Serialized
2704: END IF; -- End of Serial Number If
2697: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2698: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2699: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2700: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2701: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2702: RAISE fnd_api.g_exc_error;
2703: END IF; -- End of Source Record IF for Serialized
2704: END IF; -- End of Serial Number If
2705: END LOOP; -- End of For Loop
2740: WHEN others THEN
2741: IF (l_debug > 0) THEN
2742: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
2743: END IF;
2744: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2745: fnd_message.set_token('API_NAME',l_api_name);
2746: fnd_message.set_token('SQL_ERROR',SQLERRM);
2747: x_return_status := l_fnd_unexpected;
2748:
2741: IF (l_debug > 0) THEN
2742: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
2743: END IF;
2744: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2745: fnd_message.set_token('API_NAME',l_api_name);
2746: fnd_message.set_token('SQL_ERROR',SQLERRM);
2747: x_return_status := l_fnd_unexpected;
2748:
2749: IF l_mtl_item_tbl.count > 0 THEN
2742: csi_t_gen_utility_pvt.add('You have encountered a "others" exception');
2743: END IF;
2744: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2745: fnd_message.set_token('API_NAME',l_api_name);
2746: fnd_message.set_token('SQL_ERROR',SQLERRM);
2747: x_return_status := l_fnd_unexpected;
2748:
2749: IF l_mtl_item_tbl.count > 0 THEN
2750: x_trx_error_rec.serial_number := l_mtl_item_tbl(j).serial_number;
2758: x_trx_error_rec.comms_nl_trackable_flag := l_mtl_item_tbl(j).comms_nl_trackable_flag;
2759: x_trx_error_rec.transaction_error_date := l_sysdate ;
2760: END IF;
2761:
2762: x_trx_error_rec.error_text := fnd_message.get;
2763: x_trx_error_rec.transaction_id := NULL;
2764: x_trx_error_rec.source_type := 'CSIMSIPT';
2765: x_trx_error_rec.source_id := p_transaction_id;
2766: x_trx_error_rec.processed_flag := csi_inv_trxs_pkg.g_txn_error;