498: end if;
499:
500:
501: -- call the book controls cache
502: if not fa_cache_pkg.fazcbc(X_book => l_book_type_code, p_log_level_rec => g_log_level_rec) then
503: raise masschg_err;
504: end if;
505:
506: l_batch_size := nvl(fa_cache_pkg.fa_batch_size, 200);
502: if not fa_cache_pkg.fazcbc(X_book => l_book_type_code, p_log_level_rec => g_log_level_rec) then
503: raise masschg_err;
504: end if;
505:
506: l_batch_size := nvl(fa_cache_pkg.fa_batch_size, 200);
507:
508: -- load the period struct for current period info
509: if not FA_UTIL_PVT.get_period_rec
510: (p_book => l_book_type_code,
514: end if;
515:
516: if (l_from_method_code is not null) then
517: -- call the method cache for rate source rule
518: if not fa_cache_pkg.fazccmt
519: (X_method => l_from_method_code,
520: X_life => l_from_life_in_months
521: , p_log_level_rec => g_log_level_rec) then
522: raise masschg_err;
522: raise masschg_err;
523: end if;
524: end if;
525:
526: l_from_rsr := fa_cache_pkg.fazccmt_record.rate_source_rule;
527:
528: if (l_to_method_code is not null) then
529: if not fa_cache_pkg.fazccmt
530: (X_method => l_to_method_code,
525:
526: l_from_rsr := fa_cache_pkg.fazccmt_record.rate_source_rule;
527:
528: if (l_to_method_code is not null) then
529: if not fa_cache_pkg.fazccmt
530: (X_method => l_to_method_code,
531: X_life => l_to_life_in_months
532: , p_log_level_rec => g_log_level_rec) then
533: raise masschg_err;
533: raise masschg_err;
534: end if;
535: end if;
536:
537: l_to_rsr := fa_cache_pkg.fazccmt_record.rate_source_rule;
538:
539: if (l_from_rsr = 'PRODUCTION' and
540: l_to_rsr = 'PRODUCTION' and
541: nvl(l_from_convention, 'NULL') = nvl(l_to_convention, 'NULL') and
541: nvl(l_from_convention, 'NULL') = nvl(l_to_convention, 'NULL') and
542: l_from_method_code = l_to_method_code and
543: nvl(l_from_production_capacity, -1) = nvl(l_to_production_capacity, -1) and
544: nvl(l_from_uom, 'NULL') <> nvl(l_to_uom, 'NULL') and
545: fa_cache_pkg.fazcbc_record.book_class = 'CORPORATE') then
546:
547: l_uom_change := TRUE;
548: else
549: l_uom_change := FALSE;
549: l_uom_change := FALSE;
550: end if;
551:
552: -- initial book control validation
553: if (fa_cache_pkg.fazcbc_record.allow_mass_changes <> 'YES') then
554: fa_srvr_msg.add_message
555: (calling_fn => l_calling_fn,
556: name => 'FA_MASSCHG_WRONG_STATUS', p_log_level_rec => g_log_level_rec);
557: raise masschg_err;
554: fa_srvr_msg.add_message
555: (calling_fn => l_calling_fn,
556: name => 'FA_MASSCHG_WRONG_STATUS', p_log_level_rec => g_log_level_rec);
557: raise masschg_err;
558: elsif (fa_cache_pkg.fazcbc_record.date_ineffective is not null) then
559: fa_srvr_msg.add_message
560: (calling_fn => l_calling_fn,
561: name => 'FA_MASSCHG_WRONG_STATUS', p_log_level_rec => g_log_level_rec);
562: raise masschg_err;
695: l_mesg_name := 'FA_MASSCHG_ASSET_DEPRED';
696: raise adj_err;
697: end if;
698:
699: if (fa_cache_pkg.fazcbc_record.book_class = 'CORPORATE') then
700:
701: select count(*)
702: into l_count
703: from fa_book_controls bc,
723: l_mesg_name := 'FA_MASSCHG_ASSET_DEPRED';
724: raise adj_err;
725: end if;
726:
727: if (fa_cache_pkg.fazcbc_record.book_class = 'TAX') then
728: -- first check isn't need (asset in corp book)
729:
730: select count(*)
731: into l_count