1: PACKAGE BODY ZX_TDS_MRC_PROCESSING_PKG AS
2: /* $Header: zxdimrcprocspkgb.pls 120.7 2006/07/27 17:34:22 hongliu ship $ */
3:
4: g_current_runtime_level NUMBER;
5: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
19: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
20:
21: IF (g_level_statement >= g_current_runtime_level ) THEN
22: FND_LOG.STRING(g_level_statement,
23: 'ZX.PLSQL.ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines.BEGIN',
24: 'ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines(+)');
25: END IF;
26:
27: x_return_status := FND_API.G_RET_STS_SUCCESS;
20:
21: IF (g_level_statement >= g_current_runtime_level ) THEN
22: FND_LOG.STRING(g_level_statement,
23: 'ZX.PLSQL.ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines.BEGIN',
24: 'ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines(+)');
25: END IF;
26:
27: x_return_status := FND_API.G_RET_STS_SUCCESS;
28:
623: -- AND taxlngt.mrc_tax_line_flag <> 'Y';
624:
625: IF (g_level_statement >= g_current_runtime_level ) THEN
626: FND_LOG.STRING(g_level_statement,
627: 'ZX.PLSQL.ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines.END',
628: 'ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines(-)');
629: END IF;
630:
631: EXCEPTION
624:
625: IF (g_level_statement >= g_current_runtime_level ) THEN
626: FND_LOG.STRING(g_level_statement,
627: 'ZX.PLSQL.ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines.END',
628: 'ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines(-)');
629: END IF;
630:
631: EXCEPTION
632: WHEN OTHERS THEN
633: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
634:
635: IF (g_level_unexpected >= g_current_runtime_level ) THEN
636: FND_LOG.STRING(g_level_unexpected,
637: 'ZX.PLSQL.ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines',
638: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
639: FND_LOG.STRING(g_level_unexpected,
640: 'ZX.PLSQL.ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines.END',
641: 'ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines(-)');
636: FND_LOG.STRING(g_level_unexpected,
637: 'ZX.PLSQL.ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines',
638: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
639: FND_LOG.STRING(g_level_unexpected,
640: 'ZX.PLSQL.ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines.END',
641: 'ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines(-)');
642: END IF;
643:
644: END create_mrc_det_tax_lines;
637: 'ZX.PLSQL.ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines',
638: sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
639: FND_LOG.STRING(g_level_unexpected,
640: 'ZX.PLSQL.ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines.END',
641: 'ZX_TDS_MRC_PROCESSING_PKG.create_mrc_det_tax_lines(-)');
642: END IF;
643:
644: END create_mrc_det_tax_lines;
645:
643:
644: END create_mrc_det_tax_lines;
645:
646:
647: END ZX_TDS_MRC_PROCESSING_PKG;