528: FND_FILE.put(FND_FILE.output,'');
529: FND_FILE.new_line(FND_FILE.output,1);
530:
531: -- dump out the headings
532: fnd_message.set_name('OFA', 'FA_POST_MASSRET_REPORT_COLUMN');
533: l_string := fnd_message.get;
534:
535: FND_FILE.put(FND_FILE.output,l_string);
536: FND_FILE.new_line(FND_FILE.output,1);
529: FND_FILE.new_line(FND_FILE.output,1);
530:
531: -- dump out the headings
532: fnd_message.set_name('OFA', 'FA_POST_MASSRET_REPORT_COLUMN');
533: l_string := fnd_message.get;
534:
535: FND_FILE.put(FND_FILE.output,l_string);
536: FND_FILE.new_line(FND_FILE.output,1);
537:
534:
535: FND_FILE.put(FND_FILE.output,l_string);
536: FND_FILE.new_line(FND_FILE.output,1);
537:
538: fnd_message.set_name('OFA', 'FA_POST_MASSRET_REPORT_LINE');
539: l_string := fnd_message.get;
540: FND_FILE.put(FND_FILE.output,l_string);
541: FND_FILE.new_line(FND_FILE.output,1);
542:
535: FND_FILE.put(FND_FILE.output,l_string);
536: FND_FILE.new_line(FND_FILE.output,1);
537:
538: fnd_message.set_name('OFA', 'FA_POST_MASSRET_REPORT_LINE');
539: l_string := fnd_message.get;
540: FND_FILE.put(FND_FILE.output,l_string);
541: FND_FILE.new_line(FND_FILE.output,1);
542:
543: end if;
1591: -- first dump the message to the output file
1592: -- set/translate/retrieve the mesg from fnd
1593:
1594:
1595: FND_MESSAGE.SET_NAME(p_app_short_name, p_message);
1596: l_mesg := substrb(FND_MESSAGE.GET,1,100);
1597: l_asset_number := rpad(p_asset_number, 15);
1598: l_mass_external_retire_id := rpad(to_char(p_mass_external_retire_id), 18);
1599:
1592: -- set/translate/retrieve the mesg from fnd
1593:
1594:
1595: FND_MESSAGE.SET_NAME(p_app_short_name, p_message);
1596: l_mesg := substrb(FND_MESSAGE.GET,1,100);
1597: l_asset_number := rpad(p_asset_number, 15);
1598: l_mass_external_retire_id := rpad(to_char(p_mass_external_retire_id), 18);
1599:
1600: l_string := l_mass_external_retire_id || ' ' || l_asset_number || ' ' ||
1617: -- ex. x_app_name = CUA
1618: -- x_app_error = The message name.
1619: IF ( p_app_short_name is not null and
1620: p_message is not null) then
1621: FND_MESSAGE.SET_NAME(p_app_short_name, p_message);
1622: if p_token is not null then
1623: fnd_message.set_token(p_token, p_value);
1624: end if;
1625: l_mesg := substrb(FND_MESSAGE.GET,1,100);
1619: IF ( p_app_short_name is not null and
1620: p_message is not null) then
1621: FND_MESSAGE.SET_NAME(p_app_short_name, p_message);
1622: if p_token is not null then
1623: fnd_message.set_token(p_token, p_value);
1624: end if;
1625: l_mesg := substrb(FND_MESSAGE.GET,1,100);
1626: ELSIF p_db_error is not null then
1627: l_mesg := substrb(SQLERRM(p_db_error),1,100);
1621: FND_MESSAGE.SET_NAME(p_app_short_name, p_message);
1622: if p_token is not null then
1623: fnd_message.set_token(p_token, p_value);
1624: end if;
1625: l_mesg := substrb(FND_MESSAGE.GET,1,100);
1626: ELSIF p_db_error is not null then
1627: l_mesg := substrb(SQLERRM(p_db_error),1,100);
1628: ELSE
1629: l_mesg := substrb(p_app_short_name,1,100);