230: select amortize_flag into h_check from fa_book_controls
231: where book_type_code = X_book;
232:
233: if h_check = 'NO' then
234: fnd_message.set_name('OFA','FA_BOOK_AMORTIZED_NOT_ALLOW');
235: h_mesg_str := fnd_message.get;
236: fa_rx_conc_mesg_pkg.log(h_mesg_str);
237:
238: x_return_status := 2;
231: where book_type_code = X_book;
232:
233: if h_check = 'NO' then
234: fnd_message.set_name('OFA','FA_BOOK_AMORTIZED_NOT_ALLOW');
235: h_mesg_str := fnd_message.get;
236: fa_rx_conc_mesg_pkg.log(h_mesg_str);
237:
238: x_return_status := 2;
239: return FALSE;
381: if (ret = FALSE) then
382: x_return_status := 2;
383:
384: fa_whatif_deprn_pkg.g_deprn.delete;
385: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NORMAL_MODE');
386: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
387: h_mesg_str := fnd_message.get;
388: fa_rx_conc_mesg_pkg.log(h_mesg_str);
389: return (FALSE);
382: x_return_status := 2;
383:
384: fa_whatif_deprn_pkg.g_deprn.delete;
385: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NORMAL_MODE');
386: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
387: h_mesg_str := fnd_message.get;
388: fa_rx_conc_mesg_pkg.log(h_mesg_str);
389: return (FALSE);
390: end if;
383:
384: fa_whatif_deprn_pkg.g_deprn.delete;
385: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NORMAL_MODE');
386: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
387: h_mesg_str := fnd_message.get;
388: fa_rx_conc_mesg_pkg.log(h_mesg_str);
389: return (FALSE);
390: end if;
391:
442: if (ret = FALSE) then
443: x_return_status := 2;
444:
445: fa_whatif_deprn_pkg.g_deprn.delete;
446: fnd_message.set_name('OFA','FA_WHATIF_ASSET_ADJ_MODE');
447: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
448: h_mesg_str := fnd_message.get;
449: fa_rx_conc_mesg_pkg.log(h_mesg_str);
450: return (FALSE);
443: x_return_status := 2;
444:
445: fa_whatif_deprn_pkg.g_deprn.delete;
446: fnd_message.set_name('OFA','FA_WHATIF_ASSET_ADJ_MODE');
447: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
448: h_mesg_str := fnd_message.get;
449: fa_rx_conc_mesg_pkg.log(h_mesg_str);
450: return (FALSE);
451: end if;
444:
445: fa_whatif_deprn_pkg.g_deprn.delete;
446: fnd_message.set_name('OFA','FA_WHATIF_ASSET_ADJ_MODE');
447: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
448: h_mesg_str := fnd_message.get;
449: fa_rx_conc_mesg_pkg.log(h_mesg_str);
450: return (FALSE);
451: end if;
452: end if; -- (X_prorate_conv is not null) or
476: if (ret = FALSE) then
477: x_return_status := 2;
478:
479: fa_whatif_deprn_pkg.g_deprn.delete;
480: fnd_message.set_name('OFA','FA_WHATIF_ASSET_COMMIT');
481: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
482: h_mesg_str := fnd_message.get;
483: fa_rx_conc_mesg_pkg.log(h_mesg_str);
484: return (FALSE);
477: x_return_status := 2;
478:
479: fa_whatif_deprn_pkg.g_deprn.delete;
480: fnd_message.set_name('OFA','FA_WHATIF_ASSET_COMMIT');
481: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
482: h_mesg_str := fnd_message.get;
483: fa_rx_conc_mesg_pkg.log(h_mesg_str);
484: return (FALSE);
485: end if;
478:
479: fa_whatif_deprn_pkg.g_deprn.delete;
480: fnd_message.set_name('OFA','FA_WHATIF_ASSET_COMMIT');
481: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
482: h_mesg_str := fnd_message.get;
483: fa_rx_conc_mesg_pkg.log(h_mesg_str);
484: return (FALSE);
485: end if;
486:
581: if (ret = FALSE) then
582: x_return_status := 2;
583:
584: fa_whatif_deprn_pkg.g_deprn.delete;
585: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NORMAL_MODE');
586: h_mesg_str := fnd_message.get;
587: fa_rx_conc_mesg_pkg.log(h_mesg_str);
588: return (FALSE);
589: end if;
582: x_return_status := 2;
583:
584: fa_whatif_deprn_pkg.g_deprn.delete;
585: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NORMAL_MODE');
586: h_mesg_str := fnd_message.get;
587: fa_rx_conc_mesg_pkg.log(h_mesg_str);
588: return (FALSE);
589: end if;
590:
661: fa_Rx_conc_mesg_pkg.log(SQLERRM);
662: end if;
663:
664: fa_whatif_deprn_pkg.g_deprn.delete;
665: fnd_message.set_name('OFA',h_mesg_name);
666: if h_mesg_name like 'FA_WHATIF_ASSET%' then
667: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
668: end if;
669: h_mesg_str := fnd_message.get;
663:
664: fa_whatif_deprn_pkg.g_deprn.delete;
665: fnd_message.set_name('OFA',h_mesg_name);
666: if h_mesg_name like 'FA_WHATIF_ASSET%' then
667: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
668: end if;
669: h_mesg_str := fnd_message.get;
670: fa_rx_conc_mesg_pkg.log(h_mesg_str);
671:
665: fnd_message.set_name('OFA',h_mesg_name);
666: if h_mesg_name like 'FA_WHATIF_ASSET%' then
667: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
668: end if;
669: h_mesg_str := fnd_message.get;
670: fa_rx_conc_mesg_pkg.log(h_mesg_str);
671:
672: x_return_status := 2;
673: return FALSE;
780:
781: if (c_check_amortized%FOUND) then
782: close c_check_amortized;
783: h_check := 1;
784: fnd_message.set_name('OFA','FA_WHATIF_ASSET_EXP_AMT');
785: fnd_message.set_token('ASSET_NUM',h_asset_number,FALSE);
786: h_mesg_str := fnd_message.get;
787: fa_rx_conc_mesg_pkg.log(h_mesg_str);
788: else
781: if (c_check_amortized%FOUND) then
782: close c_check_amortized;
783: h_check := 1;
784: fnd_message.set_name('OFA','FA_WHATIF_ASSET_EXP_AMT');
785: fnd_message.set_token('ASSET_NUM',h_asset_number,FALSE);
786: h_mesg_str := fnd_message.get;
787: fa_rx_conc_mesg_pkg.log(h_mesg_str);
788: else
789: close c_check_amortized;
782: close c_check_amortized;
783: h_check := 1;
784: fnd_message.set_name('OFA','FA_WHATIF_ASSET_EXP_AMT');
785: fnd_message.set_token('ASSET_NUM',h_asset_number,FALSE);
786: h_mesg_str := fnd_message.get;
787: fa_rx_conc_mesg_pkg.log(h_mesg_str);
788: else
789: close c_check_amortized;
790: h_check := 0;
810: and deprn_source_code = 'D'
811: and deprn_amount <> 0 ); -- bugfix 2223451 commented deprn_amount > 0;
812:
813: if h_check > 0 then
814: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NO_DEPRN_YET');
815: fnd_message.set_token('ASSET_NUM',h_asset_number,FALSE);
816: h_mesg_str := fnd_message.get;
817: fa_rx_conc_mesg_pkg.log(h_mesg_str);
818: end if;
811: and deprn_amount <> 0 ); -- bugfix 2223451 commented deprn_amount > 0;
812:
813: if h_check > 0 then
814: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NO_DEPRN_YET');
815: fnd_message.set_token('ASSET_NUM',h_asset_number,FALSE);
816: h_mesg_str := fnd_message.get;
817: fa_rx_conc_mesg_pkg.log(h_mesg_str);
818: end if;
819: end if;
812:
813: if h_check > 0 then
814: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NO_DEPRN_YET');
815: fnd_message.set_token('ASSET_NUM',h_asset_number,FALSE);
816: h_mesg_str := fnd_message.get;
817: fa_rx_conc_mesg_pkg.log(h_mesg_str);
818: end if;
819: end if;
820:
854:
855: if SQLCODE <> 0 then
856: fa_Rx_conc_mesg_pkg.log(SQLERRM);
857: end if;
858: fnd_message.set_name('OFA',h_mesg_name);
859: if h_mesg_name like 'FA_WHATIF_ASSET%' then
860: fnd_message.set_token('ASSET_ID',h_asset_id,FALSE);
861: end if;
862: h_mesg_str := fnd_message.get;
856: fa_Rx_conc_mesg_pkg.log(SQLERRM);
857: end if;
858: fnd_message.set_name('OFA',h_mesg_name);
859: if h_mesg_name like 'FA_WHATIF_ASSET%' then
860: fnd_message.set_token('ASSET_ID',h_asset_id,FALSE);
861: end if;
862: h_mesg_str := fnd_message.get;
863: fa_rx_conc_mesg_pkg.log(h_mesg_str);
864:
858: fnd_message.set_name('OFA',h_mesg_name);
859: if h_mesg_name like 'FA_WHATIF_ASSET%' then
860: fnd_message.set_token('ASSET_ID',h_asset_id,FALSE);
861: end if;
862: h_mesg_str := fnd_message.get;
863: fa_rx_conc_mesg_pkg.log(h_mesg_str);
864:
865: x_return_status := 2;
866: return FALSE;