119:
120: EXCEPTION WHEN OTHERS THEN
121: -- Party type information could not be retrived.
122: x_return_status := FND_API.G_RET_STS_ERROR;
123: FND_MESSAGE.SET_NAME('ZX', 'ZX_TCM_NO_PARTY_TYPE_INFO');
124:
125: -- Logging Infra: Statement level
126: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
127: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: '||SQLCODE||': '||SQLERRM);
261: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
262: END IF;
263:
264: x_return_status := FND_API.G_RET_STS_ERROR;
265: FND_MESSAGE.SET_NAME('AR', 'HZ_GEO_NO_LOC_REC');
266: FND_MESSAGE.SET_TOKEN('LOC_ID', p_location_id);
267: FND_MESSAGE.SET_TOKEN('TABLE_NAME', p_location_table_name);
268: RAISE FND_API.G_EXC_ERROR;
269: END;
262: END IF;
263:
264: x_return_status := FND_API.G_RET_STS_ERROR;
265: FND_MESSAGE.SET_NAME('AR', 'HZ_GEO_NO_LOC_REC');
266: FND_MESSAGE.SET_TOKEN('LOC_ID', p_location_id);
267: FND_MESSAGE.SET_TOKEN('TABLE_NAME', p_location_table_name);
268: RAISE FND_API.G_EXC_ERROR;
269: END;
270: END;
263:
264: x_return_status := FND_API.G_RET_STS_ERROR;
265: FND_MESSAGE.SET_NAME('AR', 'HZ_GEO_NO_LOC_REC');
266: FND_MESSAGE.SET_TOKEN('LOC_ID', p_location_id);
267: FND_MESSAGE.SET_TOKEN('TABLE_NAME', p_location_table_name);
268: RAISE FND_API.G_EXC_ERROR;
269: END;
270: END;
271:
308: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
309: END IF;
310:
311: x_return_status := FND_API.G_RET_STS_ERROR;
312: FND_MESSAGE.SET_NAME('AR', 'HZ_GEO_NO_LOC_REC');
313: FND_MESSAGE.SET_TOKEN('LOC_ID', p_location_id);
314: FND_MESSAGE.SET_TOKEN('TABLE_NAME', p_location_table_name);
315: RAISE FND_API.G_EXC_ERROR;
316: END;
309: END IF;
310:
311: x_return_status := FND_API.G_RET_STS_ERROR;
312: FND_MESSAGE.SET_NAME('AR', 'HZ_GEO_NO_LOC_REC');
313: FND_MESSAGE.SET_TOKEN('LOC_ID', p_location_id);
314: FND_MESSAGE.SET_TOKEN('TABLE_NAME', p_location_table_name);
315: RAISE FND_API.G_EXC_ERROR;
316: END;
317: END;
310:
311: x_return_status := FND_API.G_RET_STS_ERROR;
312: FND_MESSAGE.SET_NAME('AR', 'HZ_GEO_NO_LOC_REC');
313: FND_MESSAGE.SET_TOKEN('LOC_ID', p_location_id);
314: FND_MESSAGE.SET_TOKEN('TABLE_NAME', p_location_table_name);
315: RAISE FND_API.G_EXC_ERROR;
316: END;
317: END;
318: END IF;
750: END IF;
751:
752: IF l_count_geo = 0 THEN
753: x_return_status := FND_API.G_RET_STS_ERROR;
754: FND_MESSAGE.SET_NAME('ZX', 'ZX_GEO_NO_GEO_NAME_REF');
755: --FND_MESSAGE.SET_TOKEN('LOCATION_TYPE', p_location_type);
756: RAISE FND_API.G_EXC_ERROR;
757: END IF;
758: END IF;
751:
752: IF l_count_geo = 0 THEN
753: x_return_status := FND_API.G_RET_STS_ERROR;
754: FND_MESSAGE.SET_NAME('ZX', 'ZX_GEO_NO_GEO_NAME_REF');
755: --FND_MESSAGE.SET_TOKEN('LOCATION_TYPE', p_location_type);
756: RAISE FND_API.G_EXC_ERROR;
757: END IF;
758: END IF;
759:
908: END IF;
909:
910: WHEN OTHERS THEN
911: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
912: FND_MESSAGE.Set_Name ('ZX','ZX_GENERIC_MESSAGE');
913: FND_MESSAGE.Set_Token('GENERIC_TEXT', SQLERRM);
914:
915: IF C_GEOGRAPHY_TYPES%ISOPEN THEN
916: close C_GEOGRAPHY_TYPES;
909:
910: WHEN OTHERS THEN
911: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
912: FND_MESSAGE.Set_Name ('ZX','ZX_GENERIC_MESSAGE');
913: FND_MESSAGE.Set_Token('GENERIC_TEXT', SQLERRM);
914:
915: IF C_GEOGRAPHY_TYPES%ISOPEN THEN
916: close C_GEOGRAPHY_TYPES;
917: END IF;
1430:
1431:
1432: WHEN OTHERS THEN
1433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1434: FND_MESSAGE.Set_Name ('ZX','ZX_GENERIC_MESSAGE');
1435: FND_MESSAGE.Set_Token('GENERIC_TEXT', SQLERRM);
1436:
1437: -- Logging Infra: Statement level
1438: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1431:
1432: WHEN OTHERS THEN
1433: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1434: FND_MESSAGE.Set_Name ('ZX','ZX_GENERIC_MESSAGE');
1435: FND_MESSAGE.Set_Token('GENERIC_TEXT', SQLERRM);
1436:
1437: -- Logging Infra: Statement level
1438: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1439: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, 'E: EXC: OTHERS: '||SQLCODE||': '||SQLERRM);
1499: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1500: END IF;
1501:
1502: --x_return_status := FND_API.G_RET_STS_ERROR;
1503: FND_MESSAGE.SET_NAME('AR', 'HZ_GEO_TYPE_INVALID');
1504: RAISE FND_API.G_EXC_ERROR;
1505: END IF;
1506: -- ---------------------
1507: */
1605: l_log_msg);
1606: END IF;
1607:
1608: x_return_status := FND_API.G_RET_STS_ERROR;
1609: FND_MESSAGE.SET_NAME('AR', 'HZ_GEO_INVALID_COUNTRY');
1610: FND_MESSAGE.SET_TOKEN('LOC_ID', p_location_id);
1611: FND_MESSAGE.SET_TOKEN('TABLE_NAME', x_location_table_name);
1612: RAISE FND_API.G_EXC_ERROR;
1613: END;
1606: END IF;
1607:
1608: x_return_status := FND_API.G_RET_STS_ERROR;
1609: FND_MESSAGE.SET_NAME('AR', 'HZ_GEO_INVALID_COUNTRY');
1610: FND_MESSAGE.SET_TOKEN('LOC_ID', p_location_id);
1611: FND_MESSAGE.SET_TOKEN('TABLE_NAME', x_location_table_name);
1612: RAISE FND_API.G_EXC_ERROR;
1613: END;
1614: ELSE
1607:
1608: x_return_status := FND_API.G_RET_STS_ERROR;
1609: FND_MESSAGE.SET_NAME('AR', 'HZ_GEO_INVALID_COUNTRY');
1610: FND_MESSAGE.SET_TOKEN('LOC_ID', p_location_id);
1611: FND_MESSAGE.SET_TOKEN('TABLE_NAME', x_location_table_name);
1612: RAISE FND_API.G_EXC_ERROR;
1613: END;
1614: ELSE
1615:
1645: END IF;
1646:
1647: WHEN OTHERS THEN
1648: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1649: FND_MESSAGE.Set_Name ('ZX','ZX_GENERIC_MESSAGE');
1650: FND_MESSAGE.Set_Token('GENERIC_TEXT', SQLERRM);
1651:
1652: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1653: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name,
1646:
1647: WHEN OTHERS THEN
1648: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1649: FND_MESSAGE.Set_Name ('ZX','ZX_GENERIC_MESSAGE');
1650: FND_MESSAGE.Set_Token('GENERIC_TEXT', SQLERRM);
1651:
1652: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
1653: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name,
1654: 'E: EXC: OTHERS: '|| SQLCODE||': '||SQLERRM);