66: PROCEDURE put_encoding(code IN VARCHAR2) IS
67: l_encoding varchar2(30);
68: BEGIN
69:
70: l_encoding := fnd_profile.value('ICX_CLIENT_IANA_ENCODING');
71: fnd_file.put_line(fnd_file.output, '');
72: fnd_file.new_line(fnd_file.output,1);
73:
74: EXCEPTION
201: if g_print_debug then
202: fa_debug_pkg.add(l_calling_fn, 'milestone', '1.1');
203: end if;
204:
205: fnd_profile.get('GL_SET_OF_BKS_ID',l_orig_set_of_books_id);
206:
207: -- set the given set of books id for MRC_V
208: fnd_client_info.set_currency_context (to_char(p_set_of_books_id));
209:
519: put_endtag('IMPAIRMENT_REPORT');
520:
521: -- set back to original environment when the procedure is finished
522: fnd_client_info.set_currency_context (l_orig_currency_context);
523: fnd_profile.put('GL_SET_OF_BKS_ID', l_orig_set_of_books_id);
524:
525: EXCEPTION
526:
527: WHEN OTHERS then
541: (calling_fn => l_calling_fn);
542:
543: -- set back to original environment when the procedure is finished
544: fnd_client_info.set_currency_context (l_orig_currency_context);
545: fnd_profile.put('GL_SET_OF_BKS_ID', l_orig_set_of_books_id);
546:
547: APP_EXCEPTION.RAISE_EXCEPTION;
548:
549: END asset_impairment_report;
594: FA_DEBUG_PKG.Initialize;
595:
596: -- save the orignal set of books id
597: l_orig_currency_context := substrb(userenv('CLIENT_INFO'),45,10);
598: fnd_profile.get('GL_SET_OF_BKS_ID',l_orig_set_of_books_id);
599:
600: -- set the given set of books id for MRC_V
601: fnd_client_info.set_currency_context (to_char(p_set_of_books_id));
602:
790: put_endtag('LIST_ASSETS_REPORT');
791:
792: -- set back to original environment when the procedure is finished
793: fnd_client_info.set_currency_context (l_orig_currency_context);
794: fnd_profile.put('GL_SET_OF_BKS_ID', l_orig_set_of_books_id);
795:
796: EXCEPTION
797:
798: WHEN OTHERS then
812: (calling_fn => l_calling_fn);
813:
814: -- set back to original environment when the procedure is finished
815: fnd_client_info.set_currency_context (l_orig_currency_context);
816: fnd_profile.put('GL_SET_OF_BKS_ID', l_orig_set_of_books_id);
817:
818: APP_EXCEPTION.RAISE_EXCEPTION;
819:
820: END list_assets_by_cash_gen;