1: PACKAGE BODY ZX_GET_TAX_PARAM_DRIVER_PKG AS
2: /* $Header: zxifgetparampkgb.pls 120.38 2006/06/26 22:50:03 lxzhang ship $ */
3:
4:
5: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
2: /* $Header: zxifgetparampkgb.pls 120.38 2006/06/26 22:50:03 lxzhang ship $ */
3:
4:
5: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
3:
4:
5: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
4:
5: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'ZX.PLSQL.ZX_GET_TAX_PARAM_DRIVER_PKG.';
5: G_CURRENT_RUNTIME_LEVEL CONSTANT NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'ZX.PLSQL.ZX_GET_TAX_PARAM_DRIVER_PKG.';
13:
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'ZX.PLSQL.ZX_GET_TAX_PARAM_DRIVER_PKG.';
13:
14:
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
10: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
11: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
12: G_MODULE_NAME CONSTANT VARCHAR2(80) := 'ZX.PLSQL.ZX_GET_TAX_PARAM_DRIVER_PKG.';
13:
14:
15:
24:
25: BEGIN
26:
27: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
28: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||'GET_DRIVER_VALUE.BEGIN','ZX_GET_TAX_PARAM_DRIVER_PKG: GET_DRIVER_VALUE()+');
29: END IF;
30:
31: x_return_status := FND_API.G_RET_STS_SUCCESS;
32:
403:
404: END IF;
405:
406: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
407: FND_LOG.STRING(
408: G_LEVEL_STATEMENT,
409: G_MODULE_NAME||'GET_DRIVER_VALUE.END',
410: 'ZX_GET_TAX_PARAM_DRIVER_PKG: GET_DRIVER_VALUE()-'||
411: ', p_tax_param_code:'||p_tax_param_code||' x_tax_param_value:'||to_char(x_tax_param_value)
415: EXCEPTION
416: WHEN OTHERS THEN
417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
418: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
419: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||'GET_DRIVER_VALUE',SQLERRM);
420: END IF;
421:
422: END get_driver_value;
423:
432:
433: BEGIN
434:
435: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
436: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||'GET_DRIVER_VALUE.BEGIN','ZX_GET_TAX_PARAM_DRIVER_PKG: GET_DRIVER_VALUE()+');
437: END IF;
438:
439: x_return_status := FND_API.G_RET_STS_SUCCESS;
440:
499:
500: END IF;
501:
502: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
503: FND_LOG.STRING(
504: G_LEVEL_STATEMENT,
505: G_MODULE_NAME||'GET_DRIVER_VALUE.END',
506: 'ZX_GET_TAX_PARAM_DRIVER_PKG: GET_DRIVER_VALUE()-'||
507: 'p_tax_param_code:'||p_tax_param_code||' x_tax_param_value:'||to_char(x_tax_param_value));
511:
512: WHEN OTHERS THEN
513: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
514: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
515: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||'GET_DRIVER_VALUE',SQLERRM);
516: END IF;
517:
518: END get_driver_value;
519:
528:
529: BEGIN
530:
531: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
532: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||'GET_DRIVER_VALUE.BEGIN','ZX_GET_TAX_PARAM_DRIVER_PKG: GET_DRIVER_VALUE()+');
533: END IF;
534:
535: x_return_status := FND_API.G_RET_STS_SUCCESS;
536:
931:
932: END IF;
933:
934: IF ( G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
935: FND_LOG.STRING(
936: G_LEVEL_STATEMENT,
937: G_MODULE_NAME||'GET_DRIVER_VALUE.END',
938: 'ZX_GET_TAX_PARAM_DRIVER_PKG: GET_DRIVER_VALUE()-'||
939: 'p_tax_param_code:'||p_tax_param_code||' x_tax_param_value:'||to_char(x_tax_param_value));
942: EXCEPTION
943: WHEN OTHERS THEN
944: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
945: IF ( G_LEVEL_UNEXPECTED >= G_CURRENT_RUNTIME_LEVEL) THEN
946: FND_LOG.STRING(G_LEVEL_UNEXPECTED,G_MODULE_NAME||'GET_DRIVER_VALUE',SQLERRM);
947: END IF;
948: END get_driver_value;
949:
950: END ZX_GET_TAX_PARAM_DRIVER_PKG;