2: /* $Header: zxrxcalextpb.pls 120.5.12010000.2 2008/12/03 18:38:34 bibeura ship $ */
3:
4: --5336803
5: g_current_runtime_level NUMBER ;
6: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
7: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
8: g_level_event CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10:
3:
4: --5336803
5: g_current_runtime_level NUMBER ;
6: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
7: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
8: g_level_event CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10:
11: PROCEDURE POPULATE_TAX(
4: --5336803
5: g_current_runtime_level NUMBER ;
6: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
7: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
8: g_level_event CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10:
11: PROCEDURE POPULATE_TAX(
12: errbuf out NOCOPY varchar2,
5: g_current_runtime_level NUMBER ;
6: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
7: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
8: g_level_event CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
9: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10:
11: PROCEDURE POPULATE_TAX(
12: errbuf out NOCOPY varchar2,
13: retcode out NOCOPY varchar2,
166: --
167: -- Assign parameters doing any necessary mappings
168: -- e.g. date/number conversion
169:
170: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
171: IF (g_level_procedure >= g_current_runtime_level ) THEN
172: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax.BEGIN',
173: 'ZX_C_TAX_EXTRACT:populate_tax(+)');
174: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax',
168: -- e.g. date/number conversion
169:
170: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
171: IF (g_level_procedure >= g_current_runtime_level ) THEN
172: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax.BEGIN',
173: 'ZX_C_TAX_EXTRACT:populate_tax(+)');
174: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax',
175: 'argument2 --> '||argument2);
176: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax',
170: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
171: IF (g_level_procedure >= g_current_runtime_level ) THEN
172: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax.BEGIN',
173: 'ZX_C_TAX_EXTRACT:populate_tax(+)');
174: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax',
175: 'argument2 --> '||argument2);
176: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax',
177: 'argument3 --> '||argument3);
178: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax',
172: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax.BEGIN',
173: 'ZX_C_TAX_EXTRACT:populate_tax(+)');
174: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax',
175: 'argument2 --> '||argument2);
176: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax',
177: 'argument3 --> '||argument3);
178: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax',
179: 'argument4 --> '||argument4);
180: END IF;
174: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax',
175: 'argument2 --> '||argument2);
176: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax',
177: 'argument3 --> '||argument3);
178: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax',
179: 'argument4 --> '||argument4);
180: END IF;
181:
182: v_request_id := fnd_global.conc_request_id;
247:
248: -- Run the Tax Extract
249:
250: IF (g_level_statement >= g_current_runtime_level ) THEN
251: FND_LOG.STRING(g_level_statement, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax',
252: 'Before Call to ZX_EXTRACT_PKG.POPULATE_TAX_DATA ');
253: END IF;
254:
255: ZX_EXTRACT_PKG.POPULATE_TAX_DATA
321: fa_rx_util_pkg.disable_debug;
322: end if;
323:
324: IF (g_level_procedure >= g_current_runtime_level ) THEN
325: FND_LOG.STRING(g_level_procedure, 'ZX.TRL.ZX_C_TAX_EXTRACT.populate_tax.BEGIN',
326: 'ZX_C_TAX_EXTRACT:populate_tax(-)');
327: END IF;
328:
329: END POPULATE_TAX;