533: if (px_max_mass_ext_retire_id = 0) then
534:
535: if (g_log_level_rec.statement_level) then
536: fa_debug_pkg.add('FACXTREMB.pls',
537: 'FND_FILE init: BOOK ',
538: P_BOOK_TYPE_CODE, p_log_level_rec => g_log_level_rec);
539: End if;
540:
541: FND_FILE.put(FND_FILE.output,'');
537: 'FND_FILE init: BOOK ',
538: P_BOOK_TYPE_CODE, p_log_level_rec => g_log_level_rec);
539: End if;
540:
541: FND_FILE.put(FND_FILE.output,'');
542: FND_FILE.new_line(FND_FILE.output,1);
543:
544: -- dump out the headings
545: fnd_message.set_name('OFA', 'FA_POST_MASSRET_REPORT_COLUMN');
538: P_BOOK_TYPE_CODE, p_log_level_rec => g_log_level_rec);
539: End if;
540:
541: FND_FILE.put(FND_FILE.output,'');
542: FND_FILE.new_line(FND_FILE.output,1);
543:
544: -- dump out the headings
545: fnd_message.set_name('OFA', 'FA_POST_MASSRET_REPORT_COLUMN');
546: l_string := fnd_message.get;
544: -- dump out the headings
545: fnd_message.set_name('OFA', 'FA_POST_MASSRET_REPORT_COLUMN');
546: l_string := fnd_message.get;
547:
548: FND_FILE.put(FND_FILE.output,l_string);
549: FND_FILE.new_line(FND_FILE.output,1);
550:
551: fnd_message.set_name('OFA', 'FA_POST_MASSRET_REPORT_LINE');
552: l_string := fnd_message.get;
545: fnd_message.set_name('OFA', 'FA_POST_MASSRET_REPORT_COLUMN');
546: l_string := fnd_message.get;
547:
548: FND_FILE.put(FND_FILE.output,l_string);
549: FND_FILE.new_line(FND_FILE.output,1);
550:
551: fnd_message.set_name('OFA', 'FA_POST_MASSRET_REPORT_LINE');
552: l_string := fnd_message.get;
553: FND_FILE.put(FND_FILE.output,l_string);
549: FND_FILE.new_line(FND_FILE.output,1);
550:
551: fnd_message.set_name('OFA', 'FA_POST_MASSRET_REPORT_LINE');
552: l_string := fnd_message.get;
553: FND_FILE.put(FND_FILE.output,l_string);
554: FND_FILE.new_line(FND_FILE.output,1);
555:
556: end if;
557: if (g_log_level_rec.statement_level) then
550:
551: fnd_message.set_name('OFA', 'FA_POST_MASSRET_REPORT_LINE');
552: l_string := fnd_message.get;
553: FND_FILE.put(FND_FILE.output,l_string);
554: FND_FILE.new_line(FND_FILE.output,1);
555:
556: end if;
557: if (g_log_level_rec.statement_level) then
558: fa_debug_pkg.add('FACXTREMB.pls',
1656: l_mesg;
1657:
1658:
1659:
1660: FND_FILE.put(FND_FILE.output,l_string);
1661: FND_FILE.new_line(FND_FILE.output,1);
1662:
1663: else
1664: G_failure_count := G_failure_count + 1;
1657:
1658:
1659:
1660: FND_FILE.put(FND_FILE.output,l_string);
1661: FND_FILE.new_line(FND_FILE.output,1);
1662:
1663: else
1664: G_failure_count := G_failure_count + 1;
1665:
1692: l_mass_external_retire_id := rpad(to_char(p_mass_external_retire_id), 18);
1693:
1694: l_string := l_mass_external_retire_id||' '||l_asset_number||' '||l_mesg;
1695:
1696: FND_FILE.put(FND_FILE.output,l_string);
1697: FND_FILE.new_line(FND_FILE.output,1);
1698:
1699: -- Asset number now printed in beginning of main loop
1700: -- 1/ Print asset_number to logfile
1693:
1694: l_string := l_mass_external_retire_id||' '||l_asset_number||' '||l_mesg;
1695:
1696: FND_FILE.put(FND_FILE.output,l_string);
1697: FND_FILE.new_line(FND_FILE.output,1);
1698:
1699: -- Asset number now printed in beginning of main loop
1700: -- 1/ Print asset_number to logfile
1701: -- if l_asset_number is not null then