34: FND_LOG.STRING(g_level_procedure,
35: 'ZX.PLSQL.ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly_ar.BEGIN',
36: 'ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly_ar(+)');
37: END IF;
38: x_return_status := FND_API.G_RET_STS_SUCCESS;
39:
40: SELECT NVL(multi_org_flag, 'N') INTO l_multi_org_flag FROM FND_PRODUCT_GROUPS;
41: -- for single org environment, get value of org_id from profile
42: IF l_multi_org_flag = 'N' THEN
1780: 'ZX_ON_FLY_TRX_UPGRADE_AR_PKG.upgrade_trx_on_fly_ar(+)');
1781: END IF;
1782: EXCEPTION
1783: WHEN OTHERS THEN
1784: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1785: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1786: FND_LOG.STRING(g_level_unexpected,
1787: 'ZX.PLSQL.ZX_ON_FLY_TRX_UPGRADE_AR_PKG.upgrade_trx_on_fly_ar',
1788: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1819: 'ZX.PLSQL.ZX_ON_FLY_TRX_UPGRADE_AR_PKG.upgrade_trx_on_fly_blk_ar.BEGIN',
1820: 'ZX_ON_FLY_TRX_UPGRADE_AR_PKG.upgrade_trx_on_fly_blk_ar(+)');
1821: END IF;
1822:
1823: x_return_status := FND_API.G_RET_STS_SUCCESS;
1824: SELECT NVL(multi_org_flag, 'N') INTO l_multi_org_flag FROM FND_PRODUCT_GROUPS;
1825: -- for single org environment, get value of org_id from profile
1826: IF l_multi_org_flag = 'N' THEN
1827: FND_PROFILE.GET('ORG_ID',l_org_id);
3548: END IF;
3549:
3550: EXCEPTION
3551: WHEN OTHERS THEN
3552: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3553: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3554: FND_LOG.STRING(g_level_unexpected,
3555: 'ZX.PLSQL.ZX_ON_FLY_TRX_UPGRADE_AR_PKG.upgrade_trx_on_fly_blk_ar',
3556: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));