816:
817: -- first dump the message to the output file
818: -- set/translate/retrieve the mesg from fnd
819:
820: fnd_message.set_name('OFA', p_message);
821:
822: if (p_message = 'FA_SHARED_INSERT_DEBUG') then
823: fnd_message.set_token('TABLE', 'retirement batch');
824: elsif p_token1 is not null then
819:
820: fnd_message.set_name('OFA', p_message);
821:
822: if (p_message = 'FA_SHARED_INSERT_DEBUG') then
823: fnd_message.set_token('TABLE', 'retirement batch');
824: elsif p_token1 is not null then
825: fnd_message.set_token('UNITS', p_token1);
826: fnd_message.set_token('TOTALUNITS', p_token2);
827: end if;
821:
822: if (p_message = 'FA_SHARED_INSERT_DEBUG') then
823: fnd_message.set_token('TABLE', 'retirement batch');
824: elsif p_token1 is not null then
825: fnd_message.set_token('UNITS', p_token1);
826: fnd_message.set_token('TOTALUNITS', p_token2);
827: end if;
828:
829: l_mesg := substrb(fnd_message.get, 1, 100);
822: if (p_message = 'FA_SHARED_INSERT_DEBUG') then
823: fnd_message.set_token('TABLE', 'retirement batch');
824: elsif p_token1 is not null then
825: fnd_message.set_token('UNITS', p_token1);
826: fnd_message.set_token('TOTALUNITS', p_token2);
827: end if;
828:
829: l_mesg := substrb(fnd_message.get, 1, 100);
830:
825: fnd_message.set_token('UNITS', p_token1);
826: fnd_message.set_token('TOTALUNITS', p_token2);
827: end if;
828:
829: l_mesg := substrb(fnd_message.get, 1, 100);
830:
831: l_string := rpad(p_asset_number, 15) || ' ' || l_mesg;
832:
833: FND_FILE.put(FND_FILE.output,l_string);
3510:
3511: FND_FILE.put(FND_FILE.output,'');
3512: FND_FILE.new_line(FND_FILE.output,1);
3513:
3514: fnd_message.set_name('OFA', 'FAMRET');
3515: l_string := fnd_message.get;
3516:
3517: FND_FILE.put(FND_FILE.output,l_string);
3518: FND_FILE.put(FND_FILE.output,'');
3511: FND_FILE.put(FND_FILE.output,'');
3512: FND_FILE.new_line(FND_FILE.output,1);
3513:
3514: fnd_message.set_name('OFA', 'FAMRET');
3515: l_string := fnd_message.get;
3516:
3517: FND_FILE.put(FND_FILE.output,l_string);
3518: FND_FILE.put(FND_FILE.output,'');
3519: FND_FILE.new_line(FND_FILE.output,1);
3520: FND_FILE.put(FND_FILE.output,'');
3521: FND_FILE.new_line(FND_FILE.output,1);
3522:
3523: -- dump out the headings
3524: fnd_message.set_name('OFA', 'FA_MASSRET_REPORT_COLUMN');
3525: l_string := fnd_message.get;
3526:
3527: FND_FILE.put(FND_FILE.output,l_string);
3528: FND_FILE.new_line(FND_FILE.output,1);
3521: FND_FILE.new_line(FND_FILE.output,1);
3522:
3523: -- dump out the headings
3524: fnd_message.set_name('OFA', 'FA_MASSRET_REPORT_COLUMN');
3525: l_string := fnd_message.get;
3526:
3527: FND_FILE.put(FND_FILE.output,l_string);
3528: FND_FILE.new_line(FND_FILE.output,1);
3529:
3526:
3527: FND_FILE.put(FND_FILE.output,l_string);
3528: FND_FILE.new_line(FND_FILE.output,1);
3529:
3530: fnd_message.set_name('OFA', 'FA_MASSRET_REPORT_LINE');
3531: l_string := fnd_message.get;
3532:
3533: FND_FILE.put(FND_FILE.output,l_string);
3534: FND_FILE.new_line(FND_FILE.output,1);
3527: FND_FILE.put(FND_FILE.output,l_string);
3528: FND_FILE.new_line(FND_FILE.output,1);
3529:
3530: fnd_message.set_name('OFA', 'FA_MASSRET_REPORT_LINE');
3531: l_string := fnd_message.get;
3532:
3533: FND_FILE.put(FND_FILE.output,l_string);
3534: FND_FILE.new_line(FND_FILE.output,1);
3535: end if;
3628:
3629:
3630: -- dump out the headings
3631: if g_mode = 'BATCH' then
3632: fnd_message.set_name('OFA', 'FA_MASSRET_INFO');
3633: fnd_message.set_token('ID', g_mass_retirement_id, FALSE);
3634: l_msg_data := substrb(fnd_message.get, 1, 100);
3635:
3636: FND_FILE.put(FND_FILE.output,l_msg_data);
3629:
3630: -- dump out the headings
3631: if g_mode = 'BATCH' then
3632: fnd_message.set_name('OFA', 'FA_MASSRET_INFO');
3633: fnd_message.set_token('ID', g_mass_retirement_id, FALSE);
3634: l_msg_data := substrb(fnd_message.get, 1, 100);
3635:
3636: FND_FILE.put(FND_FILE.output,l_msg_data);
3637: FND_FILE.new_line(FND_FILE.output,1);
3630: -- dump out the headings
3631: if g_mode = 'BATCH' then
3632: fnd_message.set_name('OFA', 'FA_MASSRET_INFO');
3633: fnd_message.set_token('ID', g_mass_retirement_id, FALSE);
3634: l_msg_data := substrb(fnd_message.get, 1, 100);
3635:
3636: FND_FILE.put(FND_FILE.output,l_msg_data);
3637: FND_FILE.new_line(FND_FILE.output,1);
3638:
3636: FND_FILE.put(FND_FILE.output,l_msg_data);
3637: FND_FILE.new_line(FND_FILE.output,1);
3638:
3639:
3640: fnd_message.set_name('OFA', 'FA_MASSRET_REPORT_COLUMN');
3641: l_string := fnd_message.get;
3642:
3643: FND_FILE.put(FND_FILE.output,l_string);
3644: FND_FILE.new_line(FND_FILE.output,1);
3637: FND_FILE.new_line(FND_FILE.output,1);
3638:
3639:
3640: fnd_message.set_name('OFA', 'FA_MASSRET_REPORT_COLUMN');
3641: l_string := fnd_message.get;
3642:
3643: FND_FILE.put(FND_FILE.output,l_string);
3644: FND_FILE.new_line(FND_FILE.output,1);
3645:
3642:
3643: FND_FILE.put(FND_FILE.output,l_string);
3644: FND_FILE.new_line(FND_FILE.output,1);
3645:
3646: fnd_message.set_name('OFA', 'FA_MASSRET_REPORT_LINE');
3647: l_string := fnd_message.get;
3648:
3649: FND_FILE.put(FND_FILE.output,l_string);
3650: FND_FILE.new_line(FND_FILE.output,1);
3643: FND_FILE.put(FND_FILE.output,l_string);
3644: FND_FILE.new_line(FND_FILE.output,1);
3645:
3646: fnd_message.set_name('OFA', 'FA_MASSRET_REPORT_LINE');
3647: l_string := fnd_message.get;
3648:
3649: FND_FILE.put(FND_FILE.output,l_string);
3650: FND_FILE.new_line(FND_FILE.output,1);
3651: end if;
4333:
4334: -- dump to execution report
4335: FND_FILE.new_line(FND_FILE.output,1);
4336:
4337: fnd_message.set_name('OFA', 'FA_SHARED_NUMBER_SUCCESS');
4338: fnd_message.set_token('NUMBER', to_char(l_total_count_retired), FALSE);
4339: l_msg_data := substrb(fnd_message.get, 1, 100);
4340:
4341: FND_FILE.put(FND_FILE.output,l_msg_data);
4334: -- dump to execution report
4335: FND_FILE.new_line(FND_FILE.output,1);
4336:
4337: fnd_message.set_name('OFA', 'FA_SHARED_NUMBER_SUCCESS');
4338: fnd_message.set_token('NUMBER', to_char(l_total_count_retired), FALSE);
4339: l_msg_data := substrb(fnd_message.get, 1, 100);
4340:
4341: FND_FILE.put(FND_FILE.output,l_msg_data);
4342: FND_FILE.new_line(FND_FILE.output,1);
4335: FND_FILE.new_line(FND_FILE.output,1);
4336:
4337: fnd_message.set_name('OFA', 'FA_SHARED_NUMBER_SUCCESS');
4338: fnd_message.set_token('NUMBER', to_char(l_total_count_retired), FALSE);
4339: l_msg_data := substrb(fnd_message.get, 1, 100);
4340:
4341: FND_FILE.put(FND_FILE.output,l_msg_data);
4342: FND_FILE.new_line(FND_FILE.output,1);
4343:
4341: FND_FILE.put(FND_FILE.output,l_msg_data);
4342: FND_FILE.new_line(FND_FILE.output,1);
4343:
4344:
4345: fnd_message.set_name('OFA', 'FA_SHARED_NUMBER_FAIL');
4346: fnd_message.set_token('NUMBER', to_char(l_failure_count), FALSE);
4347: l_msg_data := substrb(fnd_message.get, 1, 100);
4348:
4349: FND_FILE.put(FND_FILE.output,l_msg_data);
4342: FND_FILE.new_line(FND_FILE.output,1);
4343:
4344:
4345: fnd_message.set_name('OFA', 'FA_SHARED_NUMBER_FAIL');
4346: fnd_message.set_token('NUMBER', to_char(l_failure_count), FALSE);
4347: l_msg_data := substrb(fnd_message.get, 1, 100);
4348:
4349: FND_FILE.put(FND_FILE.output,l_msg_data);
4350: FND_FILE.new_line(FND_FILE.output,1);
4343:
4344:
4345: fnd_message.set_name('OFA', 'FA_SHARED_NUMBER_FAIL');
4346: fnd_message.set_token('NUMBER', to_char(l_failure_count), FALSE);
4347: l_msg_data := substrb(fnd_message.get, 1, 100);
4348:
4349: FND_FILE.put(FND_FILE.output,l_msg_data);
4350: FND_FILE.new_line(FND_FILE.output,1);
4351: