726: debug('Serialized Item with In Inventory, Out of Service, Installed, In Process or In Service exists however the ownership_override_at_txn flag is set to N');
727: debug('The current owner party is not the Internal Party so we will NOT bring this back into inventory');
728: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
729:
730: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
731: fnd_message.set_token('STATUS',l_status);
732: l_error_message := fnd_message.get;
733: l_return_status := l_fnd_error;
734: RAISE fnd_api.g_exc_error;
727: debug('The current owner party is not the Internal Party so we will NOT bring this back into inventory');
728: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
729:
730: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
731: fnd_message.set_token('STATUS',l_status);
732: l_error_message := fnd_message.get;
733: l_return_status := l_fnd_error;
734: RAISE fnd_api.g_exc_error;
735: ELSE
728: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
729:
730: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
731: fnd_message.set_token('STATUS',l_status);
732: l_error_message := fnd_message.get;
733: l_return_status := l_fnd_error;
734: RAISE fnd_api.g_exc_error;
735: ELSE
736: l_party_tbl.delete;
787: ELSE
788: l_status := 'In Inventory, Out of Service, Out of Enterprise, In Relationship, Installed, In Service or In Process';
789: debug('Serialized Item with Out of Enterprise or In Relationship exists however the ownership_override_at_txn flag is set to N so we will NOT bring this back into inventory');
790: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
791: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
792: fnd_message.set_token('STATUS',l_status);
793: l_error_message := fnd_message.get;
794: l_return_status := l_fnd_error;
795: RAISE fnd_api.g_exc_error;
788: l_status := 'In Inventory, Out of Service, Out of Enterprise, In Relationship, Installed, In Service or In Process';
789: debug('Serialized Item with Out of Enterprise or In Relationship exists however the ownership_override_at_txn flag is set to N so we will NOT bring this back into inventory');
790: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
791: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
792: fnd_message.set_token('STATUS',l_status);
793: l_error_message := fnd_message.get;
794: l_return_status := l_fnd_error;
795: RAISE fnd_api.g_exc_error;
796: END IF;
789: debug('Serialized Item with Out of Enterprise or In Relationship exists however the ownership_override_at_txn flag is set to N so we will NOT bring this back into inventory');
790: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
791: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
792: fnd_message.set_token('STATUS',l_status);
793: l_error_message := fnd_message.get;
794: l_return_status := l_fnd_error;
795: RAISE fnd_api.g_exc_error;
796: END IF;
797: ELSE
797: ELSE
798: l_status := 'In Inventory, Out of Service, Installed, In Service or In Process';
799: debug('Serialized Item with Status other then Out Of Service, In Inventory, Installed, or In Process already exists in Install Base');
800: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
801: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
802: fnd_message.set_token('STATUS',l_status);
803: l_error_message := fnd_message.get;
804: l_return_status := l_fnd_error;
805: RAISE fnd_api.g_exc_error;
798: l_status := 'In Inventory, Out of Service, Installed, In Service or In Process';
799: debug('Serialized Item with Status other then Out Of Service, In Inventory, Installed, or In Process already exists in Install Base');
800: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
801: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
802: fnd_message.set_token('STATUS',l_status);
803: l_error_message := fnd_message.get;
804: l_return_status := l_fnd_error;
805: RAISE fnd_api.g_exc_error;
806: END IF;
799: debug('Serialized Item with Status other then Out Of Service, In Inventory, Installed, or In Process already exists in Install Base');
800: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
801: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
802: fnd_message.set_token('STATUS',l_status);
803: l_error_message := fnd_message.get;
804: l_return_status := l_fnd_error;
805: RAISE fnd_api.g_exc_error;
806: END IF;
807: ELSE -- No API Records so create a new serialized record
1048:
1049: ELSIF l_src_instance_header_tbl.count > 1 THEN
1050: -- Multiple Instances were found so throw error
1051: debug('Multiple Instances were Found in Install Base Base-20');
1052: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1053: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1054: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1055: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1056: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1049: ELSIF l_src_instance_header_tbl.count > 1 THEN
1050: -- Multiple Instances were found so throw error
1051: debug('Multiple Instances were Found in Install Base Base-20');
1052: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1053: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1054: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1055: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1056: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1057: l_error_message := fnd_message.get;
1050: -- Multiple Instances were found so throw error
1051: debug('Multiple Instances were Found in Install Base Base-20');
1052: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1053: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1054: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1055: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1056: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1057: l_error_message := fnd_message.get;
1058: RAISE fnd_api.g_exc_error;
1051: debug('Multiple Instances were Found in Install Base Base-20');
1052: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1053: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1054: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1055: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1056: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1057: l_error_message := fnd_message.get;
1058: RAISE fnd_api.g_exc_error;
1059:
1052: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
1053: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1054: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1055: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1056: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1057: l_error_message := fnd_message.get;
1058: RAISE fnd_api.g_exc_error;
1059:
1060: END IF; -- End of Source Record If
1053: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
1054: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
1055: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
1056: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
1057: l_error_message := fnd_message.get;
1058: RAISE fnd_api.g_exc_error;
1059:
1060: END IF; -- End of Source Record If
1061: END IF; -- End of Serialized Item If
1094: WHEN others THEN
1095: l_sql_error := SQLERRM;
1096: debug('You have encountered a "others" exception');
1097: debug('SQL Error: '||l_sql_error);
1098: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
1099: fnd_message.set_token('API_NAME',l_api_name);
1100: fnd_message.set_token('SQL_ERROR',SQLERRM);
1101: x_return_status := l_fnd_unexpected;
1102:
1095: l_sql_error := SQLERRM;
1096: debug('You have encountered a "others" exception');
1097: debug('SQL Error: '||l_sql_error);
1098: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
1099: fnd_message.set_token('API_NAME',l_api_name);
1100: fnd_message.set_token('SQL_ERROR',SQLERRM);
1101: x_return_status := l_fnd_unexpected;
1102:
1103: IF l_mtl_item_tbl.count > 0 THEN
1096: debug('You have encountered a "others" exception');
1097: debug('SQL Error: '||l_sql_error);
1098: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
1099: fnd_message.set_token('API_NAME',l_api_name);
1100: fnd_message.set_token('SQL_ERROR',SQLERRM);
1101: x_return_status := l_fnd_unexpected;
1102:
1103: IF l_mtl_item_tbl.count > 0 THEN
1104: x_trx_error_rec.serial_number := l_mtl_item_tbl(j).serial_number;
1112: x_trx_error_rec.comms_nl_trackable_flag := l_mtl_item_tbl(j).comms_nl_trackable_flag;
1113: x_trx_error_rec.transaction_error_date := l_sysdate ;
1114: END IF;
1115:
1116: x_trx_error_rec.error_text := fnd_message.get;
1117: x_trx_error_rec.transaction_id := NULL;
1118: x_trx_error_rec.source_type := 'CSIMSRCV';
1119: x_trx_error_rec.source_id := p_transaction_id;
1120: x_trx_error_rec.processed_flag := csi_inv_trxs_pkg.g_txn_error;
1762: l_status := 'In Inventory, Out of Service, Installed, In Process or In Service ';
1763: debug('Serialized Item with In Inventory, Out of Service, Installed, In Process or In Service exists however the ownership_override_at_txn flag is set to N');
1764: debug('The current owner party is not the Internal Party so we will NOT bring this back into inventory');
1765: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1766: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1767: fnd_message.set_token('STATUS',l_status);
1768: l_error_message := fnd_message.get;
1769: l_return_status := l_fnd_error;
1770: RAISE fnd_api.g_exc_error;
1763: debug('Serialized Item with In Inventory, Out of Service, Installed, In Process or In Service exists however the ownership_override_at_txn flag is set to N');
1764: debug('The current owner party is not the Internal Party so we will NOT bring this back into inventory');
1765: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1766: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1767: fnd_message.set_token('STATUS',l_status);
1768: l_error_message := fnd_message.get;
1769: l_return_status := l_fnd_error;
1770: RAISE fnd_api.g_exc_error;
1771: ELSE
1764: debug('The current owner party is not the Internal Party so we will NOT bring this back into inventory');
1765: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1766: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1767: fnd_message.set_token('STATUS',l_status);
1768: l_error_message := fnd_message.get;
1769: l_return_status := l_fnd_error;
1770: RAISE fnd_api.g_exc_error;
1771: ELSE
1772: l_party_tbl.delete;
1827: ELSE
1828: l_status := 'In Inventory, Out of Service, Out of Enterprise, In Relationship, Installed, In Service or In Process';
1829: debug('Serialized Item with Out of Enterprise or In Relationship exists however the ownership_override_at_txn flag is set to N so we will NOT bring this back into inventory');
1830: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1831: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1832: fnd_message.set_token('STATUS',l_status);
1833: l_error_message := fnd_message.get;
1834: l_return_status := l_fnd_error;
1835: RAISE fnd_api.g_exc_error;
1828: l_status := 'In Inventory, Out of Service, Out of Enterprise, In Relationship, Installed, In Service or In Process';
1829: debug('Serialized Item with Out of Enterprise or In Relationship exists however the ownership_override_at_txn flag is set to N so we will NOT bring this back into inventory');
1830: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1831: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1832: fnd_message.set_token('STATUS',l_status);
1833: l_error_message := fnd_message.get;
1834: l_return_status := l_fnd_error;
1835: RAISE fnd_api.g_exc_error;
1836: END IF;
1829: debug('Serialized Item with Out of Enterprise or In Relationship exists however the ownership_override_at_txn flag is set to N so we will NOT bring this back into inventory');
1830: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1831: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1832: fnd_message.set_token('STATUS',l_status);
1833: l_error_message := fnd_message.get;
1834: l_return_status := l_fnd_error;
1835: RAISE fnd_api.g_exc_error;
1836: END IF;
1837: ELSE
1837: ELSE
1838: l_status := 'In Inventory, Out of Service, Installed, In Service or In Process';
1839: debug('Serialized Item with Status other then Out Of Service, In Inventory, Installed, or In Process already exists in Install Base');
1840: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1841: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1842: fnd_message.set_token('STATUS',l_status);
1843: l_error_message := fnd_message.get;
1844: l_return_status := l_fnd_error;
1845: RAISE fnd_api.g_exc_error;
1838: l_status := 'In Inventory, Out of Service, Installed, In Service or In Process';
1839: debug('Serialized Item with Status other then Out Of Service, In Inventory, Installed, or In Process already exists in Install Base');
1840: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1841: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1842: fnd_message.set_token('STATUS',l_status);
1843: l_error_message := fnd_message.get;
1844: l_return_status := l_fnd_error;
1845: RAISE fnd_api.g_exc_error;
1846: END IF; -- Usage IF
1839: debug('Serialized Item with Status other then Out Of Service, In Inventory, Installed, or In Process already exists in Install Base');
1840: debug('Instance Usage Code is: '||l_src_instance_header_tbl(i).instance_usage_code);
1841: fnd_message.set_name('CSI','CSI_SERIALIZED_ITEM_EXISTS');
1842: fnd_message.set_token('STATUS',l_status);
1843: l_error_message := fnd_message.get;
1844: l_return_status := l_fnd_error;
1845: RAISE fnd_api.g_exc_error;
1846: END IF; -- Usage IF
1847:
2034: ELSIF l_src_instance_header_tbl.count > 1 THEN -- Records Found
2035: -- Multiple Instances were found so throw error
2036: debug('Multiple Instances were Found in Install Base
2037: Base-21');
2038: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2039: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2040: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2041: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2042: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2035: -- Multiple Instances were found so throw error
2036: debug('Multiple Instances were Found in Install Base
2037: Base-21');
2038: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2039: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2040: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2041: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2042: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2043: l_error_message := fnd_message.get;
2036: debug('Multiple Instances were Found in Install Base
2037: Base-21');
2038: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2039: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2040: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2041: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2042: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2043: l_error_message := fnd_message.get;
2044: RAISE fnd_api.g_exc_error;
2037: Base-21');
2038: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2039: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2040: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2041: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2042: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2043: l_error_message := fnd_message.get;
2044: RAISE fnd_api.g_exc_error;
2045: END IF; -- End of Source Record If
2038: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2039: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2040: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2041: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2042: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2043: l_error_message := fnd_message.get;
2044: RAISE fnd_api.g_exc_error;
2045: END IF; -- End of Source Record If
2046: END IF; -- End of Serial Number if
2039: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2040: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2041: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2042: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2043: l_error_message := fnd_message.get;
2044: RAISE fnd_api.g_exc_error;
2045: END IF; -- End of Source Record If
2046: END IF; -- End of Serial Number if
2047: END LOOP; -- End of For Loop
2079: WHEN others THEN
2080: l_sql_error := SQLERRM;
2081: debug('You have encountered a "others" exception');
2082: debug('SQL Error: '||l_sql_error);
2083: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2084: fnd_message.set_token('API_NAME',l_api_name);
2085: fnd_message.set_token('SQL_ERROR',SQLERRM);
2086: x_return_status := l_fnd_unexpected;
2087:
2080: l_sql_error := SQLERRM;
2081: debug('You have encountered a "others" exception');
2082: debug('SQL Error: '||l_sql_error);
2083: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2084: fnd_message.set_token('API_NAME',l_api_name);
2085: fnd_message.set_token('SQL_ERROR',SQLERRM);
2086: x_return_status := l_fnd_unexpected;
2087:
2088: IF l_mtl_item_tbl.count > 0 THEN
2081: debug('You have encountered a "others" exception');
2082: debug('SQL Error: '||l_sql_error);
2083: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2084: fnd_message.set_token('API_NAME',l_api_name);
2085: fnd_message.set_token('SQL_ERROR',SQLERRM);
2086: x_return_status := l_fnd_unexpected;
2087:
2088: IF l_mtl_item_tbl.count > 0 THEN
2089: x_trx_error_rec.serial_number := l_mtl_item_tbl(j).serial_number;
2097: x_trx_error_rec.comms_nl_trackable_flag := l_mtl_item_tbl(j).comms_nl_trackable_flag;
2098: x_trx_error_rec.transaction_error_date := l_sysdate ;
2099: END IF;
2100:
2101: x_trx_error_rec.error_text := fnd_message.get;
2102: x_trx_error_rec.transaction_id := NULL;
2103: x_trx_error_rec.source_type := 'CSIPOINV';
2104: x_trx_error_rec.source_id := p_transaction_id;
2105: x_trx_error_rec.processed_flag := csi_inv_trxs_pkg.g_txn_error;
2558: END IF;
2559:
2560: ELSE -- No Records were found and Neg Qtys Not Allowed
2561: debug('No Records were found in Install Base and Neg Qtys not allowed to error');
2562: fnd_message.set_name('CSI','CSI_NO_NEG_BAL_ALLOWED');
2563: l_error_message := fnd_message.get;
2564: RAISE fnd_api.g_exc_error;
2565:
2566: END IF; -- Neg Qty IF
2559:
2560: ELSE -- No Records were found and Neg Qtys Not Allowed
2561: debug('No Records were found in Install Base and Neg Qtys not allowed to error');
2562: fnd_message.set_name('CSI','CSI_NO_NEG_BAL_ALLOWED');
2563: l_error_message := fnd_message.get;
2564: RAISE fnd_api.g_exc_error;
2565:
2566: END IF; -- Neg Qty IF
2567:
2701: END IF;
2702: ELSIF l_src_instance_header_tbl.count > 1 THEN
2703: -- Multiple Instances were found so throw error
2704: debug('Multiple Instances were Found in Install Base-30');
2705: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2706: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2707: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2708: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2709: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2702: ELSIF l_src_instance_header_tbl.count > 1 THEN
2703: -- Multiple Instances were found so throw error
2704: debug('Multiple Instances were Found in Install Base-30');
2705: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2706: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2707: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2708: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2709: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2710: l_error_message := fnd_message.get;
2703: -- Multiple Instances were found so throw error
2704: debug('Multiple Instances were Found in Install Base-30');
2705: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2706: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2707: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2708: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2709: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2710: l_error_message := fnd_message.get;
2711: RAISE fnd_api.g_exc_error;
2704: debug('Multiple Instances were Found in Install Base-30');
2705: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2706: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2707: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2708: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2709: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2710: l_error_message := fnd_message.get;
2711: RAISE fnd_api.g_exc_error;
2712:
2705: fnd_message.set_name('CSI','CSI_TXN_MULT_INST_FOUND');
2706: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2707: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2708: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2709: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2710: l_error_message := fnd_message.get;
2711: RAISE fnd_api.g_exc_error;
2712:
2713: ELSIF l_src_instance_header_tbl.count = 0 THEN
2706: fnd_message.set_token('INV_ITEM_ID',l_mtl_item_tbl(j).inventory_item_id);
2707: fnd_message.set_token('SUBINV',l_mtl_item_tbl(j).subinventory_code);
2708: fnd_message.set_token('INV_ORG_ID',l_mtl_item_tbl(j).organization_id);
2709: fnd_message.set_token('LOCATOR',l_mtl_item_tbl(j).locator_id);
2710: l_error_message := fnd_message.get;
2711: RAISE fnd_api.g_exc_error;
2712:
2713: ELSIF l_src_instance_header_tbl.count = 0 THEN
2714: debug('No Records were found in Install Base');
2711: RAISE fnd_api.g_exc_error;
2712:
2713: ELSIF l_src_instance_header_tbl.count = 0 THEN
2714: debug('No Records were found in Install Base');
2715: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2716: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2717: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2718: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2719: l_error_message := fnd_message.get;
2712:
2713: ELSIF l_src_instance_header_tbl.count = 0 THEN
2714: debug('No Records were found in Install Base');
2715: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2716: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2717: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2718: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2719: l_error_message := fnd_message.get;
2720: RAISE fnd_api.g_exc_error;
2713: ELSIF l_src_instance_header_tbl.count = 0 THEN
2714: debug('No Records were found in Install Base');
2715: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2716: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2717: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2718: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2719: l_error_message := fnd_message.get;
2720: RAISE fnd_api.g_exc_error;
2721: END IF; -- End of Source Record IF
2714: debug('No Records were found in Install Base');
2715: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2716: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2717: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2718: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2719: l_error_message := fnd_message.get;
2720: RAISE fnd_api.g_exc_error;
2721: END IF; -- End of Source Record IF
2722: END IF; -- End of Serial IF
2715: fnd_message.set_name('CSI','CSI_IB_RECORD_NOTFOUND');
2716: fnd_message.set_token('ITEM',l_mtl_item_tbl(j).inventory_item_id);
2717: fnd_message.set_token('SUBINVENTORY',l_mtl_item_tbl(j).subinventory_code);
2718: fnd_message.set_token('ORG_ID',l_mtl_item_tbl(j).organization_id);
2719: l_error_message := fnd_message.get;
2720: RAISE fnd_api.g_exc_error;
2721: END IF; -- End of Source Record IF
2722: END IF; -- End of Serial IF
2723: END LOOP; -- End of For Loop
2755: WHEN others THEN
2756: l_sql_error := SQLERRM;
2757: debug('You have encountered a "others" exception');
2758: debug('SQL Error: '||l_sql_error);
2759: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2760: fnd_message.set_token('API_NAME',l_api_name);
2761: fnd_message.set_token('SQL_ERROR',SQLERRM);
2762: x_return_status := l_fnd_unexpected;
2763:
2756: l_sql_error := SQLERRM;
2757: debug('You have encountered a "others" exception');
2758: debug('SQL Error: '||l_sql_error);
2759: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2760: fnd_message.set_token('API_NAME',l_api_name);
2761: fnd_message.set_token('SQL_ERROR',SQLERRM);
2762: x_return_status := l_fnd_unexpected;
2763:
2764: IF l_mtl_item_tbl.count > 0 THEN
2757: debug('You have encountered a "others" exception');
2758: debug('SQL Error: '||l_sql_error);
2759: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2760: fnd_message.set_token('API_NAME',l_api_name);
2761: fnd_message.set_token('SQL_ERROR',SQLERRM);
2762: x_return_status := l_fnd_unexpected;
2763:
2764: IF l_mtl_item_tbl.count > 0 THEN
2765: x_trx_error_rec.serial_number := l_mtl_item_tbl(j).serial_number;
2773: x_trx_error_rec.comms_nl_trackable_flag := l_mtl_item_tbl(j).comms_nl_trackable_flag;
2774: x_trx_error_rec.transaction_error_date := l_sysdate ;
2775: END IF;
2776:
2777: x_trx_error_rec.error_text := fnd_message.get;
2778: x_trx_error_rec.transaction_id := NULL;
2779: x_trx_error_rec.source_type := 'CSIMSISU';
2780: x_trx_error_rec.source_id := p_transaction_id;
2781: x_trx_error_rec.processed_flag := csi_inv_trxs_pkg.g_txn_error;
2856: WHEN others THEN
2857: l_sql_error := SQLERRM;
2858: debug('You have encountered a "others" exception');
2859: debug('SQL Error: '||l_sql_error);
2860: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2861: fnd_message.set_token('API_NAME',l_api_name);
2862: fnd_message.set_token('SQL_ERROR',SQLERRM);
2863: x_return_status := l_fnd_unexpected;
2864: l_trx_error_rec.error_text := fnd_message.get;
2857: l_sql_error := SQLERRM;
2858: debug('You have encountered a "others" exception');
2859: debug('SQL Error: '||l_sql_error);
2860: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2861: fnd_message.set_token('API_NAME',l_api_name);
2862: fnd_message.set_token('SQL_ERROR',SQLERRM);
2863: x_return_status := l_fnd_unexpected;
2864: l_trx_error_rec.error_text := fnd_message.get;
2865: l_trx_error_rec.transaction_id := NULL;
2858: debug('You have encountered a "others" exception');
2859: debug('SQL Error: '||l_sql_error);
2860: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2861: fnd_message.set_token('API_NAME',l_api_name);
2862: fnd_message.set_token('SQL_ERROR',SQLERRM);
2863: x_return_status := l_fnd_unexpected;
2864: l_trx_error_rec.error_text := fnd_message.get;
2865: l_trx_error_rec.transaction_id := NULL;
2866: l_trx_error_rec.source_type := 'CSICYCNT';
2860: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2861: fnd_message.set_token('API_NAME',l_api_name);
2862: fnd_message.set_token('SQL_ERROR',SQLERRM);
2863: x_return_status := l_fnd_unexpected;
2864: l_trx_error_rec.error_text := fnd_message.get;
2865: l_trx_error_rec.transaction_id := NULL;
2866: l_trx_error_rec.source_type := 'CSICYCNT';
2867: l_trx_error_rec.source_id := p_transaction_id;
2868: l_trx_error_rec.processed_flag := csi_inv_trxs_pkg.g_txn_error;
2943: WHEN others THEN
2944: l_sql_error := SQLERRM;
2945: debug('You have encountered a "others" exception');
2946: debug('SQL Error: '||l_sql_error);
2947: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2948: fnd_message.set_token('API_NAME',l_api_name);
2949: fnd_message.set_token('SQL_ERROR',SQLERRM);
2950: x_return_status := l_fnd_unexpected;
2951: l_trx_error_rec.error_text := fnd_message.get;
2944: l_sql_error := SQLERRM;
2945: debug('You have encountered a "others" exception');
2946: debug('SQL Error: '||l_sql_error);
2947: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2948: fnd_message.set_token('API_NAME',l_api_name);
2949: fnd_message.set_token('SQL_ERROR',SQLERRM);
2950: x_return_status := l_fnd_unexpected;
2951: l_trx_error_rec.error_text := fnd_message.get;
2952: l_trx_error_rec.transaction_id := NULL;
2945: debug('You have encountered a "others" exception');
2946: debug('SQL Error: '||l_sql_error);
2947: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2948: fnd_message.set_token('API_NAME',l_api_name);
2949: fnd_message.set_token('SQL_ERROR',SQLERRM);
2950: x_return_status := l_fnd_unexpected;
2951: l_trx_error_rec.error_text := fnd_message.get;
2952: l_trx_error_rec.transaction_id := NULL;
2953: l_trx_error_rec.source_type := 'CSIPHYIN';
2947: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
2948: fnd_message.set_token('API_NAME',l_api_name);
2949: fnd_message.set_token('SQL_ERROR',SQLERRM);
2950: x_return_status := l_fnd_unexpected;
2951: l_trx_error_rec.error_text := fnd_message.get;
2952: l_trx_error_rec.transaction_id := NULL;
2953: l_trx_error_rec.source_type := 'CSIPHYIN';
2954: l_trx_error_rec.source_id := p_transaction_id;
2955: l_trx_error_rec.processed_flag := csi_inv_trxs_pkg.g_txn_error;
3161: END IF;
3162:
3163: EXCEPTION
3164: WHEN NO_DATA_FOUND THEN
3165: fnd_message.set_name('CSI','CSI_NO_INVENTORY_RECORDS');
3166: fnd_message.set_token('MTL_TRANSACTION_ID',p_transaction_id);
3167: x_error_message := fnd_message.get;
3168: x_return_status := l_fnd_error;
3169:
3162:
3163: EXCEPTION
3164: WHEN NO_DATA_FOUND THEN
3165: fnd_message.set_name('CSI','CSI_NO_INVENTORY_RECORDS');
3166: fnd_message.set_token('MTL_TRANSACTION_ID',p_transaction_id);
3167: x_error_message := fnd_message.get;
3168: x_return_status := l_fnd_error;
3169:
3170: WHEN others THEN
3163: EXCEPTION
3164: WHEN NO_DATA_FOUND THEN
3165: fnd_message.set_name('CSI','CSI_NO_INVENTORY_RECORDS');
3166: fnd_message.set_token('MTL_TRANSACTION_ID',p_transaction_id);
3167: x_error_message := fnd_message.get;
3168: x_return_status := l_fnd_error;
3169:
3170: WHEN others THEN
3171: l_sql_error := SQLERRM;
3170: WHEN others THEN
3171: l_sql_error := SQLERRM;
3172: debug('You have encountered a "others" exception');
3173: debug('SQL Error: '||l_sql_error);
3174: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3175: fnd_message.set_token('API_NAME',l_api_name);
3176: fnd_message.set_token('SQL_ERROR',SQLERRM);
3177: x_error_message := fnd_message.get;
3178: x_return_status := l_fnd_unexpected;
3171: l_sql_error := SQLERRM;
3172: debug('You have encountered a "others" exception');
3173: debug('SQL Error: '||l_sql_error);
3174: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3175: fnd_message.set_token('API_NAME',l_api_name);
3176: fnd_message.set_token('SQL_ERROR',SQLERRM);
3177: x_error_message := fnd_message.get;
3178: x_return_status := l_fnd_unexpected;
3179: END get_transaction_recs;
3172: debug('You have encountered a "others" exception');
3173: debug('SQL Error: '||l_sql_error);
3174: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3175: fnd_message.set_token('API_NAME',l_api_name);
3176: fnd_message.set_token('SQL_ERROR',SQLERRM);
3177: x_error_message := fnd_message.get;
3178: x_return_status := l_fnd_unexpected;
3179: END get_transaction_recs;
3180:
3173: debug('SQL Error: '||l_sql_error);
3174: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3175: fnd_message.set_token('API_NAME',l_api_name);
3176: fnd_message.set_token('SQL_ERROR',SQLERRM);
3177: x_error_message := fnd_message.get;
3178: x_return_status := l_fnd_unexpected;
3179: END get_transaction_recs;
3180:
3181: PROCEDURE decode_message (p_msg_header IN XNP_MESSAGE.MSG_HEADER_REC_TYPE,
3197: END IF;
3198:
3199: EXCEPTION
3200: WHEN fnd_api.g_exc_error THEN
3201: fnd_message.set_name('CSI','CSI_DECODE_MGS_ERROR');
3202: fnd_message.set_token('MESSAGE_ID',p_msg_header.message_id);
3203: fnd_message.set_token('MESSAGE_CODE',p_msg_header.message_code);
3204: x_error_message := fnd_message.get;
3205: x_return_status := l_fnd_unexpected;
3198:
3199: EXCEPTION
3200: WHEN fnd_api.g_exc_error THEN
3201: fnd_message.set_name('CSI','CSI_DECODE_MGS_ERROR');
3202: fnd_message.set_token('MESSAGE_ID',p_msg_header.message_id);
3203: fnd_message.set_token('MESSAGE_CODE',p_msg_header.message_code);
3204: x_error_message := fnd_message.get;
3205: x_return_status := l_fnd_unexpected;
3206:
3199: EXCEPTION
3200: WHEN fnd_api.g_exc_error THEN
3201: fnd_message.set_name('CSI','CSI_DECODE_MGS_ERROR');
3202: fnd_message.set_token('MESSAGE_ID',p_msg_header.message_id);
3203: fnd_message.set_token('MESSAGE_CODE',p_msg_header.message_code);
3204: x_error_message := fnd_message.get;
3205: x_return_status := l_fnd_unexpected;
3206:
3207: WHEN others THEN
3200: WHEN fnd_api.g_exc_error THEN
3201: fnd_message.set_name('CSI','CSI_DECODE_MGS_ERROR');
3202: fnd_message.set_token('MESSAGE_ID',p_msg_header.message_id);
3203: fnd_message.set_token('MESSAGE_CODE',p_msg_header.message_code);
3204: x_error_message := fnd_message.get;
3205: x_return_status := l_fnd_unexpected;
3206:
3207: WHEN others THEN
3208: l_sql_error := SQLERRM;
3207: WHEN others THEN
3208: l_sql_error := SQLERRM;
3209: debug('You have encountered a "others" exception');
3210: debug('SQL Error: '||l_sql_error);
3211: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3212: fnd_message.set_token('API_NAME',l_api_name);
3213: fnd_message.set_token('SQL_ERROR',SQLERRM);
3214: x_error_message := fnd_message.get;
3215: x_return_status := l_fnd_unexpected;
3208: l_sql_error := SQLERRM;
3209: debug('You have encountered a "others" exception');
3210: debug('SQL Error: '||l_sql_error);
3211: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3212: fnd_message.set_token('API_NAME',l_api_name);
3213: fnd_message.set_token('SQL_ERROR',SQLERRM);
3214: x_error_message := fnd_message.get;
3215: x_return_status := l_fnd_unexpected;
3216: END decode_message;
3209: debug('You have encountered a "others" exception');
3210: debug('SQL Error: '||l_sql_error);
3211: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3212: fnd_message.set_token('API_NAME',l_api_name);
3213: fnd_message.set_token('SQL_ERROR',SQLERRM);
3214: x_error_message := fnd_message.get;
3215: x_return_status := l_fnd_unexpected;
3216: END decode_message;
3217:
3210: debug('SQL Error: '||l_sql_error);
3211: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3212: fnd_message.set_token('API_NAME',l_api_name);
3213: fnd_message.set_token('SQL_ERROR',SQLERRM);
3214: x_error_message := fnd_message.get;
3215: x_return_status := l_fnd_unexpected;
3216: END decode_message;
3217:
3218: PROCEDURE get_asset_creation_code(
3245: END IF;
3246: CLOSE Asset_CC_Cur;
3247: EXCEPTION
3248: WHEN OTHERS THEN
3249: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3250: fnd_message.set_token('API_NAME', l_api_name);
3251: fnd_message.set_token('SQL_ERROR', sqlerrm);
3252: l_err_text := fnd_message.get;
3253: raise;
3246: CLOSE Asset_CC_Cur;
3247: EXCEPTION
3248: WHEN OTHERS THEN
3249: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3250: fnd_message.set_token('API_NAME', l_api_name);
3251: fnd_message.set_token('SQL_ERROR', sqlerrm);
3252: l_err_text := fnd_message.get;
3253: raise;
3254: END get_asset_creation_code;
3247: EXCEPTION
3248: WHEN OTHERS THEN
3249: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3250: fnd_message.set_token('API_NAME', l_api_name);
3251: fnd_message.set_token('SQL_ERROR', sqlerrm);
3252: l_err_text := fnd_message.get;
3253: raise;
3254: END get_asset_creation_code;
3255:
3248: WHEN OTHERS THEN
3249: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3250: fnd_message.set_token('API_NAME', l_api_name);
3251: fnd_message.set_token('SQL_ERROR', sqlerrm);
3252: l_err_text := fnd_message.get;
3253: raise;
3254: END get_asset_creation_code;
3255:
3256: PROCEDURE Check_item_Trackable(
3285: p_nl_trackable_flag := 'FALSE';
3286: END IF;
3287: EXCEPTION
3288: WHEN OTHERS THEN
3289: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3290: fnd_message.set_token('API_NAME', l_api_name);
3291: fnd_message.set_token('SQL_ERROR', sqlerrm);
3292: l_err_text := fnd_message.get;
3293: END check_item_trackable;
3286: END IF;
3287: EXCEPTION
3288: WHEN OTHERS THEN
3289: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3290: fnd_message.set_token('API_NAME', l_api_name);
3291: fnd_message.set_token('SQL_ERROR', sqlerrm);
3292: l_err_text := fnd_message.get;
3293: END check_item_trackable;
3294:
3287: EXCEPTION
3288: WHEN OTHERS THEN
3289: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3290: fnd_message.set_token('API_NAME', l_api_name);
3291: fnd_message.set_token('SQL_ERROR', sqlerrm);
3292: l_err_text := fnd_message.get;
3293: END check_item_trackable;
3294:
3295: PROCEDURE check_depreciable(
3288: WHEN OTHERS THEN
3289: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3290: fnd_message.set_token('API_NAME', l_api_name);
3291: fnd_message.set_token('SQL_ERROR', sqlerrm);
3292: l_err_text := fnd_message.get;
3293: END check_item_trackable;
3294:
3295: PROCEDURE check_depreciable(
3296: p_inventory_item_id IN NUMBER,
3314: p_depreciable := 'Y';
3315: END IF;
3316: EXCEPTION
3317: WHEN OTHERS THEN
3318: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3319: fnd_message.set_token('API_NAME', l_api_name);
3320: fnd_message.set_token('SQL_ERROR', sqlerrm);
3321: l_err_text := fnd_message.get;
3322: raise;
3315: END IF;
3316: EXCEPTION
3317: WHEN OTHERS THEN
3318: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3319: fnd_message.set_token('API_NAME', l_api_name);
3320: fnd_message.set_token('SQL_ERROR', sqlerrm);
3321: l_err_text := fnd_message.get;
3322: raise;
3323: END check_depreciable;
3316: EXCEPTION
3317: WHEN OTHERS THEN
3318: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3319: fnd_message.set_token('API_NAME', l_api_name);
3320: fnd_message.set_token('SQL_ERROR', sqlerrm);
3321: l_err_text := fnd_message.get;
3322: raise;
3323: END check_depreciable;
3324:
3317: WHEN OTHERS THEN
3318: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3319: fnd_message.set_token('API_NAME', l_api_name);
3320: fnd_message.set_token('SQL_ERROR', sqlerrm);
3321: l_err_text := fnd_message.get;
3322: raise;
3323: END check_depreciable;
3324:
3325: FUNCTION is_csi_installed RETURN VARCHAR2
3411: END IF;
3412:
3413: EXCEPTION
3414: WHEN e_procedure_error THEN
3415: fnd_message.set_name('CSI','CSI_MSTR_ORG_NOTFOUND');
3416: fnd_message.set_token('ORGANIZATION_ID',p_organization_id);
3417: fnd_message.set_token('ORGANIZATION_CODE',l_org_code);
3418: x_error_message := fnd_message.get;
3419: x_return_status := l_fnd_error;
3412:
3413: EXCEPTION
3414: WHEN e_procedure_error THEN
3415: fnd_message.set_name('CSI','CSI_MSTR_ORG_NOTFOUND');
3416: fnd_message.set_token('ORGANIZATION_ID',p_organization_id);
3417: fnd_message.set_token('ORGANIZATION_CODE',l_org_code);
3418: x_error_message := fnd_message.get;
3419: x_return_status := l_fnd_error;
3420:
3413: EXCEPTION
3414: WHEN e_procedure_error THEN
3415: fnd_message.set_name('CSI','CSI_MSTR_ORG_NOTFOUND');
3416: fnd_message.set_token('ORGANIZATION_ID',p_organization_id);
3417: fnd_message.set_token('ORGANIZATION_CODE',l_org_code);
3418: x_error_message := fnd_message.get;
3419: x_return_status := l_fnd_error;
3420:
3421: WHEN others THEN
3414: WHEN e_procedure_error THEN
3415: fnd_message.set_name('CSI','CSI_MSTR_ORG_NOTFOUND');
3416: fnd_message.set_token('ORGANIZATION_ID',p_organization_id);
3417: fnd_message.set_token('ORGANIZATION_CODE',l_org_code);
3418: x_error_message := fnd_message.get;
3419: x_return_status := l_fnd_error;
3420:
3421: WHEN others THEN
3422: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3418: x_error_message := fnd_message.get;
3419: x_return_status := l_fnd_error;
3420:
3421: WHEN others THEN
3422: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3423: fnd_message.set_token('SQL_ERROR',SQLERRM);
3424: x_error_message := fnd_message.get;
3425: x_return_status := l_fnd_unexpected;
3426: END get_master_organization;
3419: x_return_status := l_fnd_error;
3420:
3421: WHEN others THEN
3422: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3423: fnd_message.set_token('SQL_ERROR',SQLERRM);
3424: x_error_message := fnd_message.get;
3425: x_return_status := l_fnd_unexpected;
3426: END get_master_organization;
3427:
3420:
3421: WHEN others THEN
3422: fnd_message.set_name('CSI','CSI_UNEXP_SQL_ERROR');
3423: fnd_message.set_token('SQL_ERROR',SQLERRM);
3424: x_error_message := fnd_message.get;
3425: x_return_status := l_fnd_unexpected;
3426: END get_master_organization;
3427:
3428: PROCEDURE build_error_string (