35: FND_LOG.STRING(g_level_procedure,
36: 'ZX.PLSQL.ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly_ar.BEGIN',
37: 'ZX_ON_FLY_TRX_UPGRADE_PKG.upgrade_trx_on_fly_ar(+)');
38: END IF;
39: x_return_status := FND_API.G_RET_STS_SUCCESS;
40:
41: SELECT NVL(multi_org_flag, 'N') INTO l_multi_org_flag FROM FND_PRODUCT_GROUPS;
42: -- for single org environment, get value of org_id from profile
43: IF l_multi_org_flag = 'N' THEN
1861: 'ZX_ON_FLY_TRX_UPGRADE_AR_PKG.upgrade_trx_on_fly_ar(-)');
1862: END IF;
1863: EXCEPTION
1864: WHEN OTHERS THEN
1865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1866: IF (g_level_unexpected >= g_current_runtime_level ) THEN
1867: FND_LOG.STRING(g_level_unexpected,
1868: 'ZX.PLSQL.ZX_ON_FLY_TRX_UPGRADE_AR_PKG.upgrade_trx_on_fly_ar',
1869: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
1900: 'ZX.PLSQL.ZX_ON_FLY_TRX_UPGRADE_AR_PKG.upgrade_trx_on_fly_blk_ar.BEGIN',
1901: 'ZX_ON_FLY_TRX_UPGRADE_AR_PKG.upgrade_trx_on_fly_blk_ar(+)');
1902: END IF;
1903:
1904: x_return_status := FND_API.G_RET_STS_SUCCESS;
1905: SELECT NVL(multi_org_flag, 'N') INTO l_multi_org_flag FROM FND_PRODUCT_GROUPS;
1906: -- for single org environment, get value of org_id from profile
1907: IF l_multi_org_flag = 'N' THEN
1908: FND_PROFILE.GET('ORG_ID',l_org_id);
3685: END IF;
3686:
3687: EXCEPTION
3688: WHEN OTHERS THEN
3689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3690: IF (g_level_unexpected >= g_current_runtime_level ) THEN
3691: FND_LOG.STRING(g_level_unexpected,
3692: 'ZX.PLSQL.ZX_ON_FLY_TRX_UPGRADE_AR_PKG.upgrade_trx_on_fly_blk_ar',
3693: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));