APPS.FA_CUA_HR_RETIREMENTS_PKG dependencies on FND_MESSAGE

Line 1758: fnd_message.set_name ('OFA','FA_RET_UNITS_TOO_BIG');

1754: -- call retire package
1755: null;
1756: else
1757: v_error_flag:= 'Y';
1758: fnd_message.set_name ('OFA','FA_RET_UNITS_TOO_BIG');
1759: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);
1760: raise error_found;
1761: end if;
1762:

Line 1759: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);

1755: null;
1756: else
1757: v_error_flag:= 'Y';
1758: fnd_message.set_name ('OFA','FA_RET_UNITS_TOO_BIG');
1759: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);
1760: raise error_found;
1761: end if;
1762:
1763: FA_RETIREMENT_PUB.do_retirement(

Line 1789: v_encoded_message:= fnd_message.get_encoded;

1785: end if;
1786:
1787: EXCEPTION
1788: WHEN ERROR_FOUND THEN
1789: v_encoded_message:= fnd_message.get_encoded;
1790: fnd_message.parse_encoded( v_encoded_message
1791: , v_app_short_name
1792: , v_message_name );
1793:

Line 1790: fnd_message.parse_encoded( v_encoded_message

1786:
1787: EXCEPTION
1788: WHEN ERROR_FOUND THEN
1789: v_encoded_message:= fnd_message.get_encoded;
1790: fnd_message.parse_encoded( v_encoded_message
1791: , v_app_short_name
1792: , v_message_name );
1793:
1794: if ( v_app_short_name IS NOT NULL) AND

Line 1796: fnd_message.set_encoded(v_encoded_message);

1792: , v_message_name );
1793:
1794: if ( v_app_short_name IS NOT NULL) AND
1795: (substrb(v_app_short_name, 1, 3) IN ('CUA', 'OFA' ) ) then
1796: fnd_message.set_encoded(v_encoded_message);
1797: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);
1798: else
1799: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(sqlerrm,1,240);
1800: end if;

Line 1797: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);

1793:
1794: if ( v_app_short_name IS NOT NULL) AND
1795: (substrb(v_app_short_name, 1, 3) IN ('CUA', 'OFA' ) ) then
1796: fnd_message.set_encoded(v_encoded_message);
1797: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);
1798: else
1799: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(sqlerrm,1,240);
1800: end if;
1801:

Line 1809: v_encoded_message:= fnd_message.get_encoded;

1805: v_encoded_message:= NULL;
1806: v_app_short_name:= NULL;
1807: v_message_name:= NULL;
1808:
1809: v_encoded_message:= fnd_message.get_encoded;
1810: fnd_message.parse_encoded( v_encoded_message
1811: , v_app_short_name
1812: , v_message_name );
1813:

Line 1810: fnd_message.parse_encoded( v_encoded_message

1806: v_app_short_name:= NULL;
1807: v_message_name:= NULL;
1808:
1809: v_encoded_message:= fnd_message.get_encoded;
1810: fnd_message.parse_encoded( v_encoded_message
1811: , v_app_short_name
1812: , v_message_name );
1813:
1814: if ( v_app_short_name IS NOT NULL) AND

Line 1816: fnd_message.set_encoded(v_encoded_message);

1812: , v_message_name );
1813:
1814: if ( v_app_short_name IS NOT NULL) AND
1815: (substrb(v_app_short_name, 1, 3) IN ('CUA', 'OFA' ) ) then
1816: fnd_message.set_encoded(v_encoded_message);
1817: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);
1818: else
1819: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(sqlerrm,1,240);
1820: end if;

Line 1817: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);

1813:
1814: if ( v_app_short_name IS NOT NULL) AND
1815: (substrb(v_app_short_name, 1, 3) IN ('CUA', 'OFA' ) ) then
1816: fnd_message.set_encoded(v_encoded_message);
1817: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);
1818: else
1819: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(sqlerrm,1,240);
1820: end if;
1821: