[Home] [Help]
1: PACKAGE BODY fv_assign_reason_codes_pkg AS
2: -- $Header: FVXPPRCB.pls 120.8.12000000.3 2007/08/16 15:33:50 sasukuma ship $
3:
4: /*******************************************************************/
5: /***** Variable Declaration For All Processes ******/
6: /*******************************************************************/
7: x_set_of_books_id number :=NULL;
8: --l_debug VARCHAR2(1) := NVL(FND_PROFILE.VALUE('FV_DEBUG_FLAG'),'N');
9: -- x_set_of_books_id number := to_number(fnd_profile.value('GL_SET_OF_BKS_ID'));
10: g_module_name varchar2(100) := 'fv.plsql.fv_assign_reason_codes_pkg.';
11: l_set_of_books_name gl_ledgers.name%TYPE :=NULL;
12:
13: x_org_id number :=mo_global.get_current_org_id;
14: -- mo_utils.get_ledger_info(x_org_id ,x_set_of_books_id ,l_set_of_books_name);
134: END IF;
135: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
136: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name||'.final_exception','ERROR = '||l_errbuf);
137: END IF;
138: err_message := 'FV_ASSIGN_REASON_CODES_PKG.Interest_Reason_Codes '||
139: sqlerrm;
140: fnd_message.set_name('FV','FV_RC_QUICK_PAY');
141: fnd_message.set_token('MSG',err_message);
142: IF(FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
246: END IF;
247: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
248: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name||'.final_exception','ERROR = '||l_errbuf);
249: END IF;
250: err_message := 'FV_ASSIGN_REASON_CODES_PKG.GET_QUICK_PAYMENTS '||sqlerrm;
251: fnd_message.set_name('FV','FV_RC_QUICK_PAY');
252: fnd_message.set_token('MSG',err_message);
253: IF(FND_LOG.LEVEL_UNEXPECTED >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
254: FV_UTILITY.MESSAGE(FND_LOG.LEVEL_UNEXPECTED,l_module_name||'.final_exception');
257:
258: END get_quick_payments;
259:
260:
261: END fv_assign_reason_codes_pkg;