1: PACKAGE BODY FND_JAF_LOG_EVENT_PKG AS
2: /* $Header: FNDLJAFB.pls 120.0.12020000.9 2012/10/04 13:15:20 dbowles noship $ */
3:
4: FUNCTION getCurrentTimeInMillis
5: RETURN NUMBER
23: EXCEPTION
24: WHEN OTHERS THEN
25: l_err_code := SQLCODE;
26: l_err_mesg := SQLERRM;
27: fnd_message.SET_NAME('FND', 'EXCEPTION in Function FND_JAF_LOG_EVENT_PKG.getCurrentTimeInMillis: SQLCODE=' || l_err_code || ' , SQLERRM=' || l_err_mesg);
28: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
29: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.FND_JAF_LOG_EVENT_PKG.getCurrentTimeInMillis', true);
30: end if;
31: END getCurrentTimeInMillis;
25: l_err_code := SQLCODE;
26: l_err_mesg := SQLERRM;
27: fnd_message.SET_NAME('FND', 'EXCEPTION in Function FND_JAF_LOG_EVENT_PKG.getCurrentTimeInMillis: SQLCODE=' || l_err_code || ' , SQLERRM=' || l_err_mesg);
28: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
29: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.FND_JAF_LOG_EVENT_PKG.getCurrentTimeInMillis', true);
30: end if;
31: END getCurrentTimeInMillis;
32:
33:
93: WHEN OTHERS THEN
94: l_err_code := SQLCODE;
95: l_err_mesg := SQLERRM;
96: ROLLBACK;
97: fnd_message.SET_NAME('FND', 'EXCEPTION in Procedure FND_JAF_LOG_EVENT_PKG.logEventToDB: SQLCODE=' || l_err_code || ' , SQLERRM=' || l_err_mesg);
98: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
99: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.FND_JAF_LOG_EVENT_PKG.logEventToDB', true);
100: end if;
101: END logEventToDB;
95: l_err_mesg := SQLERRM;
96: ROLLBACK;
97: fnd_message.SET_NAME('FND', 'EXCEPTION in Procedure FND_JAF_LOG_EVENT_PKG.logEventToDB: SQLCODE=' || l_err_code || ' , SQLERRM=' || l_err_mesg);
98: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
99: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.FND_JAF_LOG_EVENT_PKG.logEventToDB', true);
100: end if;
101: END logEventToDB;
102: END FND_JAF_LOG_EVENT_PKG;
98: if (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) then
99: fnd_log.message(FND_LOG.LEVEL_ERROR, 'fnd.plsql.FND_JAF_LOG_EVENT_PKG.logEventToDB', true);
100: end if;
101: END logEventToDB;
102: END FND_JAF_LOG_EVENT_PKG;