1: PACKAGE BODY OKL_OVERRIDE_TAX_BASIS_PVT AS
2: /* $Header: OKLROTBB.pls 120.0 2005/08/26 19:58:14 sechawla noship $ */
3:
4: -- Start of comments
5: --
37: BEGIN
38:
39: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
40: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
41: 'OKL_OVERRIDE_TAX_BASIS_PVT.override_tax_basis',
42: 'Begin(+)');
43: END IF;
44:
45: -- Check API version, initialize message list and create savepoint
105: OKL_API.end_activity (x_msg_count, x_msg_data);
106:
107: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
108: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
109: 'OKL_OVERRIDE_TAX_BASIS_PVT.override_tax_basis',
110: 'End(-)');
111: END IF;
112:
113: EXCEPTION
125: p_api_type => '_PVT');
126:
127: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
128: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
129: 'OKL_OVERRIDE_TAX_BASIS_PVT.override_tax_basis',
130: 'EXP - G_EXCEPTION_ERROR');
131: END IF;
132:
133: WHEN G_EXCEPTION_UNEXPECTED_ERROR THEN
145: p_api_type => '_PVT');
146:
147: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
148: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
149: 'OKL_OVERRIDE_TAX_BASIS_PVT.override_tax_basis',
150: 'EXP - G_EXCEPTION_UNEXPECTED_ERROR');
151: END IF;
152:
153: WHEN OTHERS THEN
165: p_api_type => '_PVT');
166:
167: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
168: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
169: 'OKL_OVERRIDE_TAX_BASIS_PVT.override_tax_basis',
170: 'EXP - OTHERS');
171: END IF;
172: END override_tax_basis;
173:
195: i NUMBER := 0;
196: BEGIN
197: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
198: FND_LOG.STRING(FND_LOG.LEVEL_PROCEDURE,
199: 'OKL_OVERRIDE_TAX_BASIS_PVT.override_tax_basis',
200: 'Begin(+)');
201: END IF;
202: OKL_API.init_msg_list(p_init_msg_list);
203: -- Check API version, initialize message list and create savepoint
263: '_PVT'
264: );
265: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
266: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT,
267: 'OKL_OVERRIDE_TAX_BASIS_PVT.override_tax_basis',
268: 'EXP - OTHERS');
269: END IF;
270: END override_tax_basis;
271:
268: 'EXP - OTHERS');
269: END IF;
270: END override_tax_basis;
271:
272: END OKL_OVERRIDE_TAX_BASIS_PVT;