1: PACKAGE BODY FA_MC_UPG_SELECT_PKG AS
2: /* $Header: faxmcusb.pls 120.4 2009/03/27 09:43:29 bridgway ship $ */
3:
4: g_print_debug boolean := fa_cache_pkg.fa_print_debug;
5:
85: l_fixed_rate,
86: X_total_assets);
87:
88: fa_srvr_msg.add_message(
89: calling_fn => 'fa_mc_upg_select_pkg.main_select',
90: name => 'FA_SHARED_NUMBER_PROCESSED',
91: token1 => 'NUMBER',
92: value1 => to_char(X_total_assets));
93:
91: token1 => 'NUMBER',
92: value1 => to_char(X_total_assets));
93:
94: fa_srvr_msg.add_message(
95: calling_fn => 'fa_mc_upg_select_pkg.main_select',
96: name => 'FA_SHARED_END_SUCCESS',
97: token1 => 'PROGRAM',
98: value1 => 'FAMRCUPG1');
99:
117: EXCEPTION
118: WHEN OTHERS THEN
119:
120: fa_srvr_msg.add_message(
121: calling_fn => 'fa_mc_upg_select_pkg.main_select',
122: name => 'FA_SHARED_END_WITH_ERROR',
123: token1 => 'PROGRAM',
124: value1 => 'FAMRCUPG1');
125:
139: retcode := 2;
140:
141: END main_select;
142:
143: END FA_MC_UPG_SELECT_PKG;