159: WHERE application_id = l_appl_id;
160:
161: l_last_org_id NUMBER;
162: l_debug_flag VARCHAR2(1);
163: l_security_profile_id FND_PROFILE_OPTION_VALUES.PROFILE_OPTION_VALUE%TYPE := NULL;
164:
165: l_chart_of_accounts_id gl_sets_of_books.chart_of_accounts_id%type;
166: l_functional_currency gl_sets_of_books.currency_code%type;
167: l_base_precision fnd_currencies.precision%type;
333: 'ZX_PRODUCT_INTEGRATION_PKG: initialize (+)');
334: END IF;
335:
336: x_return_status := FND_API.G_RET_STS_SUCCESS;
337: -- l_debug_flag := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
338:
339: -- IF L_DEBUG_FLAG <> PG_DEBUG THEN
340: -- FND_LOG.STRING(g_level_statement,'ZX.PLSQL.ZX_PRODUCT_INTEGRATION_PKG','Calling initialize ....');
341: -- PG_DEBUG := l_debug_flag;
438:
439: --
440: -- Get the profile values and call set_org_access API
441: --
442: fnd_profile.get('XLA_MO_SECURITY_PROFILE_LEVEL', l_security_profile_id);
443: IF (g_level_procedure >= g_current_runtime_level) THEN
444: FND_LOG.STRING(g_level_procedure,
445: 'ZX.PLSQL.ZX_PRODUCT_INTEGRATION_PKG.initialize()',
446: 'MO: Operating Unit=>'||p_event_class_rec.internal_organization_id||
6070: 'ZX.PLSQL.ZX_PRODUCT_INTEGRATION_PKG.tax_curr_round.BEGIN',
6071: 'ZX_PRODUCT_INTEGRATION_PKG.tax_curr_round(+)');
6072: END IF;
6073:
6074: PG_DEBUG := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
6075:
6076: IF (g_level_statement >= g_current_runtime_level) THEN
6077: FND_LOG.STRING(g_level_statement,'ZX.PLSQL.ZX_PRODUCT_INTEGRATION_PKG', 'ZX_PRODUCT_INTEGRATION_PKG.tax_curr_round( ' || p_amount || ' )+' );
6078: END IF;
7370:
7371: -- package constructor
7372: BEGIN
7373: --Initialize the debug variable pg_debug
7374: pg_debug := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
7375: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
7376: IF (g_level_procedure >= g_current_runtime_level ) THEN
7377: FND_LOG.STRING(g_level_procedure,
7378: 'ZX.PLSQL.ZX_PRODUCT_INTEGRATION_PKG.constructor',