APPS.FV_ASSIGN_REASON_CODES_PKG dependencies on FV_ASSIGN_REASON_CODES

Line 1: PACKAGE BODY fv_assign_reason_codes_pkg AS

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 ******/

Line 10: g_module_name varchar2(100) := 'fv.plsql.fv_assign_reason_codes_pkg.';

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);

Line 54: FROM fv_assign_reason_codes farc

50: ap_invoices api,
51: fv_terms_types fvt
52: WHERE( air.original_invoice_id NOT IN
53: (SELECT farc.invoice_id
54: FROM fv_assign_reason_codes farc
55: WHERE farc.set_of_books_id = x_set_of_books_id
56: AND org_id = x_org_id
57: AND farc.checkrun_name is not null -- Bug 5037297
58: AND entry_source = 'INTEREST')

Line 62: FROM fv_assign_reason_codes farc

58: AND entry_source = 'INTEREST')
59: OR
60: (air.original_invoice_id IN
61: (SELECT farc.invoice_id
62: FROM fv_assign_reason_codes farc
63: WHERE farc.set_of_books_id = x_set_of_books_id
64: AND org_id = x_org_id
65: AND entry_source = 'INTEREST'
66: AND air.checkrun_name <> farc.checkrun_name)))

Line 84: UPDATE fv_assign_reason_codes

80: x_org_id := org_id_tab(i);
81:
82: FOR reason_code_rec IN reason_codes_cur LOOP
83:
84: UPDATE fv_assign_reason_codes
85: SET checkrun_name = reason_code_rec.checkrun_name,
86: entry_mode = 'SYSTEM',
87: last_update_date = SYSDATE,
88: last_updated_by = FND_GLOBAL.USER_ID,

Line 98: INSERT INTO fv_assign_reason_codes

94:
95: IF (SQL%ROWCOUNT = 0) THEN
96:
97:
98: INSERT INTO fv_assign_reason_codes
99: (invoice_id,
100: org_id,
101: set_of_books_id,
102: entry_mode,

Line 138: err_message := 'FV_ASSIGN_REASON_CODES_PKG.Interest_Reason_Codes '||

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

Line 152: -- fv_assign_reason_codes with an entry_source of 'EBD'

148: /**********************************************************************/
149: PROCEDURE get_quick_payments IS
150:
151: -- Select all quick payments which are not on
152: -- fv_assign_reason_codes with an entry_source of 'EBD'
153: -- NOTE: there may be ones of type 'INTEREST' automatically
154: -- loaded, this picks up the 'EBD' side.
155:
156: CURSOR c_quick_payments IS

Line 195: from fv_assign_reason_codes fvr

191: LOOP
192:
193: select count (*)
194: into v_count
195: from fv_assign_reason_codes fvr
196: where fvr.invoice_id = v_quick_payments.invoice_id
197: and org_id = x_org_id
198: and fvr.entry_source = 'EBD'
199: and fvr.set_of_books_id = x_set_of_books_id;

Line 203: UPDATE fv_assign_reason_codes

199: and fvr.set_of_books_id = x_set_of_books_id;
200:
201: If v_count > 0 then
202:
203: UPDATE fv_assign_reason_codes
204: SET Checkrun_name = v_quick_payments.checkrun_name,
205: Entry_mode = 'SYSTEM',
206: Last_Update_Date = SYSDATE,
207: Last_Updated_By = FND_GLOBAL.USER_ID,

Line 216: INSERT into fv_assign_reason_codes

212: and entry_source = 'EBD';
213:
214: elsif v_count = 0 then
215:
216: INSERT into fv_assign_reason_codes
217: (invoice_id, entry_source, set_of_books_id,
218: /*-- Version 1.1 RCW.--------*/
219: org_id,
220: /*-- end 1.1 RCW -----------*/

Line 250: err_message := 'FV_ASSIGN_REASON_CODES_PKG.GET_QUICK_PAYMENTS '||sqlerrm;

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');

Line 261: END fv_assign_reason_codes_pkg;

257:
258: END get_quick_payments;
259:
260:
261: END fv_assign_reason_codes_pkg;