183: select amortize_flag into h_check from fa_book_controls
184: where book_type_code = X_book;
185:
186: if h_check = 'NO' then
187: fnd_message.set_name('OFA','FA_BOOK_AMORTIZED_NOT_ALLOW');
188: h_mesg_str := fnd_message.get;
189: fa_rx_conc_mesg_pkg.log(h_mesg_str);
190:
191: retcode := 2;
184: where book_type_code = X_book;
185:
186: if h_check = 'NO' then
187: fnd_message.set_name('OFA','FA_BOOK_AMORTIZED_NOT_ALLOW');
188: h_mesg_str := fnd_message.get;
189: fa_rx_conc_mesg_pkg.log(h_mesg_str);
190:
191: retcode := 2;
192: return FALSE;
315: if (ret = FALSE) then
316: retcode := 2;
317:
318: fa_whatif_deprn_pkg.g_deprn.delete;
319: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NORMAL_MODE');
320: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
321: h_mesg_str := fnd_message.get;
322: fa_rx_conc_mesg_pkg.log(h_mesg_str);
323: return (FALSE);
316: retcode := 2;
317:
318: fa_whatif_deprn_pkg.g_deprn.delete;
319: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NORMAL_MODE');
320: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
321: h_mesg_str := fnd_message.get;
322: fa_rx_conc_mesg_pkg.log(h_mesg_str);
323: return (FALSE);
324: end if;
317:
318: fa_whatif_deprn_pkg.g_deprn.delete;
319: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NORMAL_MODE');
320: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
321: h_mesg_str := fnd_message.get;
322: fa_rx_conc_mesg_pkg.log(h_mesg_str);
323: return (FALSE);
324: end if;
325:
377: if (ret = FALSE) then
378: retcode := 2;
379:
380: fa_whatif_deprn_pkg.g_deprn.delete;
381: fnd_message.set_name('OFA','FA_WHATIF_ASSET_ADJ_MODE');
382: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
383: h_mesg_str := fnd_message.get;
384: fa_rx_conc_mesg_pkg.log(h_mesg_str);
385: return (FALSE);
378: retcode := 2;
379:
380: fa_whatif_deprn_pkg.g_deprn.delete;
381: fnd_message.set_name('OFA','FA_WHATIF_ASSET_ADJ_MODE');
382: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
383: h_mesg_str := fnd_message.get;
384: fa_rx_conc_mesg_pkg.log(h_mesg_str);
385: return (FALSE);
386: end if;
379:
380: fa_whatif_deprn_pkg.g_deprn.delete;
381: fnd_message.set_name('OFA','FA_WHATIF_ASSET_ADJ_MODE');
382: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
383: h_mesg_str := fnd_message.get;
384: fa_rx_conc_mesg_pkg.log(h_mesg_str);
385: return (FALSE);
386: end if;
387: end if; -- (X_prorate_conv is not null) or
412: if (ret = FALSE) then
413: retcode := 2;
414:
415: fa_whatif_deprn_pkg.g_deprn.delete;
416: fnd_message.set_name('OFA','FA_WHATIF_ASSET_COMMIT');
417: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
418: h_mesg_str := fnd_message.get;
419: fa_rx_conc_mesg_pkg.log(h_mesg_str);
420: return (FALSE);
413: retcode := 2;
414:
415: fa_whatif_deprn_pkg.g_deprn.delete;
416: fnd_message.set_name('OFA','FA_WHATIF_ASSET_COMMIT');
417: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
418: h_mesg_str := fnd_message.get;
419: fa_rx_conc_mesg_pkg.log(h_mesg_str);
420: return (FALSE);
421: end if;
414:
415: fa_whatif_deprn_pkg.g_deprn.delete;
416: fnd_message.set_name('OFA','FA_WHATIF_ASSET_COMMIT');
417: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
418: h_mesg_str := fnd_message.get;
419: fa_rx_conc_mesg_pkg.log(h_mesg_str);
420: return (FALSE);
421: end if;
422:
470: if (ret = FALSE) then
471: retcode := 2;
472:
473: fa_whatif_deprn_pkg.g_deprn.delete;
474: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NORMAL_MODE');
475: h_mesg_str := fnd_message.get;
476: fa_rx_conc_mesg_pkg.log(h_mesg_str);
477: return (FALSE);
478: end if;
471: retcode := 2;
472:
473: fa_whatif_deprn_pkg.g_deprn.delete;
474: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NORMAL_MODE');
475: h_mesg_str := fnd_message.get;
476: fa_rx_conc_mesg_pkg.log(h_mesg_str);
477: return (FALSE);
478: end if;
479:
550: fa_Rx_conc_mesg_pkg.log(SQLERRM);
551: end if;
552:
553: fa_whatif_deprn_pkg.g_deprn.delete;
554: fnd_message.set_name('OFA',h_mesg_name);
555: if h_mesg_name like 'FA_WHATIF_ASSET%' then
556: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
557: end if;
558: h_mesg_str := fnd_message.get;
552:
553: fa_whatif_deprn_pkg.g_deprn.delete;
554: fnd_message.set_name('OFA',h_mesg_name);
555: if h_mesg_name like 'FA_WHATIF_ASSET%' then
556: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
557: end if;
558: h_mesg_str := fnd_message.get;
559: fa_rx_conc_mesg_pkg.log(h_mesg_str);
560:
554: fnd_message.set_name('OFA',h_mesg_name);
555: if h_mesg_name like 'FA_WHATIF_ASSET%' then
556: fnd_message.set_token('ASSET_ID',X_assets(h_count),FALSE);
557: end if;
558: h_mesg_str := fnd_message.get;
559: fa_rx_conc_mesg_pkg.log(h_mesg_str);
560:
561: retcode := 2;
562: return FALSE;
664:
665: if (c_check_amortized%FOUND) then
666: close c_check_amortized;
667: h_check := 1;
668: fnd_message.set_name('OFA','FA_WHATIF_ASSET_EXP_AMT');
669: fnd_message.set_token('ASSET_NUM',h_asset_number,FALSE);
670: h_mesg_str := fnd_message.get;
671: fa_rx_conc_mesg_pkg.log(h_mesg_str);
672: else
665: if (c_check_amortized%FOUND) then
666: close c_check_amortized;
667: h_check := 1;
668: fnd_message.set_name('OFA','FA_WHATIF_ASSET_EXP_AMT');
669: fnd_message.set_token('ASSET_NUM',h_asset_number,FALSE);
670: h_mesg_str := fnd_message.get;
671: fa_rx_conc_mesg_pkg.log(h_mesg_str);
672: else
673: close c_check_amortized;
666: close c_check_amortized;
667: h_check := 1;
668: fnd_message.set_name('OFA','FA_WHATIF_ASSET_EXP_AMT');
669: fnd_message.set_token('ASSET_NUM',h_asset_number,FALSE);
670: h_mesg_str := fnd_message.get;
671: fa_rx_conc_mesg_pkg.log(h_mesg_str);
672: else
673: close c_check_amortized;
674: h_check := 0;
694: and deprn_source_code = 'D'
695: and deprn_amount <> 0 ); -- bugfix 2223451 commented deprn_amount > 0;
696:
697: if h_check > 0 then
698: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NO_DEPRN_YET');
699: fnd_message.set_token('ASSET_NUM',h_asset_number,FALSE);
700: h_mesg_str := fnd_message.get;
701: fa_rx_conc_mesg_pkg.log(h_mesg_str);
702: end if;
695: and deprn_amount <> 0 ); -- bugfix 2223451 commented deprn_amount > 0;
696:
697: if h_check > 0 then
698: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NO_DEPRN_YET');
699: fnd_message.set_token('ASSET_NUM',h_asset_number,FALSE);
700: h_mesg_str := fnd_message.get;
701: fa_rx_conc_mesg_pkg.log(h_mesg_str);
702: end if;
703: end if;
696:
697: if h_check > 0 then
698: fnd_message.set_name('OFA','FA_WHATIF_ASSET_NO_DEPRN_YET');
699: fnd_message.set_token('ASSET_NUM',h_asset_number,FALSE);
700: h_mesg_str := fnd_message.get;
701: fa_rx_conc_mesg_pkg.log(h_mesg_str);
702: end if;
703: end if;
704:
738:
739: if SQLCODE <> 0 then
740: fa_Rx_conc_mesg_pkg.log(SQLERRM);
741: end if;
742: fnd_message.set_name('OFA',h_mesg_name);
743: if h_mesg_name like 'FA_WHATIF_ASSET%' then
744: fnd_message.set_token('ASSET_ID',h_asset_id,FALSE);
745: end if;
746: h_mesg_str := fnd_message.get;
740: fa_Rx_conc_mesg_pkg.log(SQLERRM);
741: end if;
742: fnd_message.set_name('OFA',h_mesg_name);
743: if h_mesg_name like 'FA_WHATIF_ASSET%' then
744: fnd_message.set_token('ASSET_ID',h_asset_id,FALSE);
745: end if;
746: h_mesg_str := fnd_message.get;
747: fa_rx_conc_mesg_pkg.log(h_mesg_str);
748:
742: fnd_message.set_name('OFA',h_mesg_name);
743: if h_mesg_name like 'FA_WHATIF_ASSET%' then
744: fnd_message.set_token('ASSET_ID',h_asset_id,FALSE);
745: end if;
746: h_mesg_str := fnd_message.get;
747: fa_rx_conc_mesg_pkg.log(h_mesg_str);
748:
749: retcode := 2;
750: return FALSE;