57: l_request_id_tab t_num_tab;
58:
59: BEGIN
60: --log for debug
61: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
62: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
63: ,g_package_name||l_procedure_name||'.begin'
64: ,'Enter procedure');
65: END IF; --( l_proc_level >= l_dbg_level )
58:
59: BEGIN
60: --log for debug
61: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
62: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
63: ,g_package_name||l_procedure_name||'.begin'
64: ,'Enter procedure');
65: END IF; --( l_proc_level >= l_dbg_level )
66:
114: EXCEPTION
115:
116: WHEN OTHERS THEN
117:
118: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
119: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
120: ,g_package_name||l_procedure_name||':'
121: ,SQLERRM);
122: END IF;
115:
116: WHEN OTHERS THEN
117:
118: IF( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
119: FND_LOG.STRING(FND_LOG.LEVEL_STATEMENT
120: ,g_package_name||l_procedure_name||':'
121: ,SQLERRM);
122: END IF;
123: