1: PACKAGE BODY FV_BA_UPG_PKG AS
2: /* $Header: FVBAUPGB.pls 115.4 2003/12/17 21:19:44 ksriniva noship $ */
3: g_module_name VARCHAR2(200) := 'fv.plsql.FV_BA_UPG_PKG.';
4:
5:
1: PACKAGE BODY FV_BA_UPG_PKG AS
2: /* $Header: FVBAUPGB.pls 115.4 2003/12/17 21:19:44 ksriniva noship $ */
3: g_module_name VARCHAR2(200) := 'fv.plsql.FV_BA_UPG_PKG.';
4:
5:
6: PROCEDURE ap_acct_in_use IS
7:
10:
11: BEGIN
12:
13: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
14: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'fv_ba_upg_pkg.ap_acct_in_use()+');
15: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,'updating ce_upg_bank_accts_gt for fv_ar_batches');
16: END IF;
17:
18: update ce_upg_bank_accts_gt ce
41: RAISE;
42:
43: END ap_acct_in_use;
44:
45: END fv_ba_upg_pkg;