APPS.FA_CUA_HR_RETIREMENTS_PKG dependencies on FND_MESSAGE

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

1747: -- call retire package
1748: null;
1749: else
1750: v_error_flag:= 'Y';
1751: fnd_message.set_name ('OFA','FA_RET_UNITS_TOO_BIG');
1752: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);
1753: raise error_found;
1754: end if;
1755:

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

1748: null;
1749: else
1750: v_error_flag:= 'Y';
1751: fnd_message.set_name ('OFA','FA_RET_UNITS_TOO_BIG');
1752: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);
1753: raise error_found;
1754: end if;
1755:
1756: FA_RETIREMENT_PUB.do_retirement(

Line 1783: v_encoded_message:= fnd_message.get_encoded;

1779: end if;
1780:
1781: EXCEPTION
1782: WHEN ERROR_FOUND THEN
1783: v_encoded_message:= fnd_message.get_encoded;
1784: fnd_message.parse_encoded( v_encoded_message
1785: , v_app_short_name
1786: , v_message_name );
1787:

Line 1784: fnd_message.parse_encoded( v_encoded_message

1780:
1781: EXCEPTION
1782: WHEN ERROR_FOUND THEN
1783: v_encoded_message:= fnd_message.get_encoded;
1784: fnd_message.parse_encoded( v_encoded_message
1785: , v_app_short_name
1786: , v_message_name );
1787:
1788: if ( v_app_short_name IS NOT NULL) AND

Line 1790: fnd_message.set_encoded(v_encoded_message);

1786: , v_message_name );
1787:
1788: if ( v_app_short_name IS NOT NULL) AND
1789: (substrb(v_app_short_name, 1, 3) IN ('CUA', 'OFA' ) ) then
1790: fnd_message.set_encoded(v_encoded_message);
1791: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);
1792: else
1793: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(sqlerrm,1,240);
1794: end if;

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

1787:
1788: if ( v_app_short_name IS NOT NULL) AND
1789: (substrb(v_app_short_name, 1, 3) IN ('CUA', 'OFA' ) ) then
1790: fnd_message.set_encoded(v_encoded_message);
1791: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);
1792: else
1793: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(sqlerrm,1,240);
1794: end if;
1795:

Line 1803: v_encoded_message:= fnd_message.get_encoded;

1799: v_encoded_message:= NULL;
1800: v_app_short_name:= NULL;
1801: v_message_name:= NULL;
1802:
1803: v_encoded_message:= fnd_message.get_encoded;
1804: fnd_message.parse_encoded( v_encoded_message
1805: , v_app_short_name
1806: , v_message_name );
1807:

Line 1804: fnd_message.parse_encoded( v_encoded_message

1800: v_app_short_name:= NULL;
1801: v_message_name:= NULL;
1802:
1803: v_encoded_message:= fnd_message.get_encoded;
1804: fnd_message.parse_encoded( v_encoded_message
1805: , v_app_short_name
1806: , v_message_name );
1807:
1808: if ( v_app_short_name IS NOT NULL) AND

Line 1810: fnd_message.set_encoded(v_encoded_message);

1806: , v_message_name );
1807:
1808: if ( v_app_short_name IS NOT NULL) AND
1809: (substrb(v_app_short_name, 1, 3) IN ('CUA', 'OFA' ) ) then
1810: fnd_message.set_encoded(v_encoded_message);
1811: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);
1812: else
1813: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(sqlerrm,1,240);
1814: end if;

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

1807:
1808: if ( v_app_short_name IS NOT NULL) AND
1809: (substrb(v_app_short_name, 1, 3) IN ('CUA', 'OFA' ) ) then
1810: fnd_message.set_encoded(v_encoded_message);
1811: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(fnd_message.get, 1, 240);
1812: else
1813: v_error_tab(hrd_rec.asset_id).rejection_reason := substrb(sqlerrm,1,240);
1814: end if;
1815: