30: ,p_module IN VARCHAR2
31: ,p_message IN VARCHAR2
32: ) IS
33: BEGIN
34: IF (p_log_level >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
35: fnd_log.string(log_level => p_log_level
36: ,module => G_DEBUG_LOG_HEAD||p_module
37: ,message => p_message
38: );
31: ,p_message IN VARCHAR2
32: ) IS
33: BEGIN
34: IF (p_log_level >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
35: fnd_log.string(log_level => p_log_level
36: ,module => G_DEBUG_LOG_HEAD||p_module
37: ,message => p_message
38: );
39: END IF;
62: G_SYSDATE := NVL(G_SYSDATE,SYSDATE);
63: --
64: -- debug parameter constants
65: --
66: G_DEBUG_LEVEL_UNEXPECTED := FND_LOG.LEVEL_UNEXPECTED;
67: G_DEBUG_LEVEL_ERROR := FND_LOG.LEVEL_ERROR;
68: G_DEBUG_LEVEL_EXCEPTION := FND_LOG.LEVEL_EXCEPTION;
69: G_DEBUG_LEVEL_EVENT := FND_LOG.LEVEL_EVENT;
70: G_DEBUG_LEVEL_PROCEDURE := FND_LOG.LEVEL_PROCEDURE;
63: --
64: -- debug parameter constants
65: --
66: G_DEBUG_LEVEL_UNEXPECTED := FND_LOG.LEVEL_UNEXPECTED;
67: G_DEBUG_LEVEL_ERROR := FND_LOG.LEVEL_ERROR;
68: G_DEBUG_LEVEL_EXCEPTION := FND_LOG.LEVEL_EXCEPTION;
69: G_DEBUG_LEVEL_EVENT := FND_LOG.LEVEL_EVENT;
70: G_DEBUG_LEVEL_PROCEDURE := FND_LOG.LEVEL_PROCEDURE;
71: G_DEBUG_LEVEL_STATEMENT := FND_LOG.LEVEL_STATEMENT;
64: -- debug parameter constants
65: --
66: G_DEBUG_LEVEL_UNEXPECTED := FND_LOG.LEVEL_UNEXPECTED;
67: G_DEBUG_LEVEL_ERROR := FND_LOG.LEVEL_ERROR;
68: G_DEBUG_LEVEL_EXCEPTION := FND_LOG.LEVEL_EXCEPTION;
69: G_DEBUG_LEVEL_EVENT := FND_LOG.LEVEL_EVENT;
70: G_DEBUG_LEVEL_PROCEDURE := FND_LOG.LEVEL_PROCEDURE;
71: G_DEBUG_LEVEL_STATEMENT := FND_LOG.LEVEL_STATEMENT;
72: G_DEBUG_LOG_HEAD := 'fnd.plsql.'||G_PKG_NAME||'.';
65: --
66: G_DEBUG_LEVEL_UNEXPECTED := FND_LOG.LEVEL_UNEXPECTED;
67: G_DEBUG_LEVEL_ERROR := FND_LOG.LEVEL_ERROR;
68: G_DEBUG_LEVEL_EXCEPTION := FND_LOG.LEVEL_EXCEPTION;
69: G_DEBUG_LEVEL_EVENT := FND_LOG.LEVEL_EVENT;
70: G_DEBUG_LEVEL_PROCEDURE := FND_LOG.LEVEL_PROCEDURE;
71: G_DEBUG_LEVEL_STATEMENT := FND_LOG.LEVEL_STATEMENT;
72: G_DEBUG_LOG_HEAD := 'fnd.plsql.'||G_PKG_NAME||'.';
73:
66: G_DEBUG_LEVEL_UNEXPECTED := FND_LOG.LEVEL_UNEXPECTED;
67: G_DEBUG_LEVEL_ERROR := FND_LOG.LEVEL_ERROR;
68: G_DEBUG_LEVEL_EXCEPTION := FND_LOG.LEVEL_EXCEPTION;
69: G_DEBUG_LEVEL_EVENT := FND_LOG.LEVEL_EVENT;
70: G_DEBUG_LEVEL_PROCEDURE := FND_LOG.LEVEL_PROCEDURE;
71: G_DEBUG_LEVEL_STATEMENT := FND_LOG.LEVEL_STATEMENT;
72: G_DEBUG_LOG_HEAD := 'fnd.plsql.'||G_PKG_NAME||'.';
73:
74: EXCEPTION
67: G_DEBUG_LEVEL_ERROR := FND_LOG.LEVEL_ERROR;
68: G_DEBUG_LEVEL_EXCEPTION := FND_LOG.LEVEL_EXCEPTION;
69: G_DEBUG_LEVEL_EVENT := FND_LOG.LEVEL_EVENT;
70: G_DEBUG_LEVEL_PROCEDURE := FND_LOG.LEVEL_PROCEDURE;
71: G_DEBUG_LEVEL_STATEMENT := FND_LOG.LEVEL_STATEMENT;
72: G_DEBUG_LOG_HEAD := 'fnd.plsql.'||G_PKG_NAME||'.';
73:
74: EXCEPTION
75: WHEN OTHERS THEN