72:
73: EXCEPTION
74:
75: WHEN OTHERS THEN
76: FND_MESSAGE.SET_NAME('EAM','EAM_UPDATE_GENEALOGY_FAIL');
77: FND_MESSAGE.RAISE_ERROR;
78: APP_EXCEPTION.RAISE_EXCEPTION;
79:
80: END;
73: EXCEPTION
74:
75: WHEN OTHERS THEN
76: FND_MESSAGE.SET_NAME('EAM','EAM_UPDATE_GENEALOGY_FAIL');
77: FND_MESSAGE.RAISE_ERROR;
78: APP_EXCEPTION.RAISE_EXCEPTION;
79:
80: END;
81:
501: l_msg_count := fnd_msg_pub.count_msg;
502: if(l_msg_count>0) then
503: get_all_mesg(mesg=>l_message_text);
504: end if;
505: fnd_message.set_name('EAM','EAM_ERROR_CREATE_WO');
506:
507: fnd_message.set_token(token => 'MESG',
508: value => l_message_text,
509: translate => FALSE);
503: get_all_mesg(mesg=>l_message_text);
504: end if;
505: fnd_message.set_name('EAM','EAM_ERROR_CREATE_WO');
506:
507: fnd_message.set_token(token => 'MESG',
508: value => l_message_text,
509: translate => FALSE);
510: APP_EXCEPTION.RAISE_EXCEPTION;
511: end;
528: l_msg_count := fnd_msg_pub.count_msg;
529: if(l_msg_count>0) then
530: get_all_mesg(mesg=>l_message_text);
531: end if;
532: fnd_message.set_name('EAM','EAM_ERROR_CREATE_WO');
533:
534: fnd_message.set_token(token => 'MESG',
535: value => l_message_text,
536: translate => FALSE);
530: get_all_mesg(mesg=>l_message_text);
531: end if;
532: fnd_message.set_name('EAM','EAM_ERROR_CREATE_WO');
533:
534: fnd_message.set_token(token => 'MESG',
535: value => l_message_text,
536: translate => FALSE);
537: APP_EXCEPTION.RAISE_EXCEPTION;
538: end if;
1508: l_message_text :=' ';
1509: if(l_msg_count>0) then
1510: get_all_mesg(mesg=>l_message_text);
1511: end if;
1512: fnd_message.set_name('EAM','EAM_ERROR_UPDATE_WO');
1513:
1514: fnd_message.set_token(token => 'MESG',
1515: value => l_message_text,
1516: translate => FALSE);
1510: get_all_mesg(mesg=>l_message_text);
1511: end if;
1512: fnd_message.set_name('EAM','EAM_ERROR_UPDATE_WO');
1513:
1514: fnd_message.set_token(token => 'MESG',
1515: value => l_message_text,
1516: translate => FALSE);
1517:
1518:
1534: l_message_text :=' ';
1535: if(l_msg_count>0) then
1536: get_all_mesg(mesg=>l_message_text);
1537: end if;
1538: fnd_message.set_name('EAM','EAM_ERROR_UPDATE_WO');
1539:
1540: fnd_message.set_token(token => 'MESG',
1541: value => l_message_text,
1542: translate => FALSE);
1536: get_all_mesg(mesg=>l_message_text);
1537: end if;
1538: fnd_message.set_name('EAM','EAM_ERROR_UPDATE_WO');
1539:
1540: fnd_message.set_token(token => 'MESG',
1541: value => l_message_text,
1542: translate => FALSE);
1543:
1544:
1770: OPEN C_WDJ;
1771: FETCH C_WDJ INTO Recinfo1;
1772: if (C_WDJ%NOTFOUND) then
1773: CLOSE C_WDJ;
1774: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
1775: APP_EXCEPTION.Raise_Exception;
1776: end if;
1777: CLOSE C_WDJ;
1778:
1890: nvl(X_activity_source, 'XXXX'))
1891: then
1892: null;
1893: else
1894: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
1895: APP_EXCEPTION.Raise_Exception;
1896: null;
1897: end if;
1898: else
1895: APP_EXCEPTION.Raise_Exception;
1896: null;
1897: end if;
1898: else
1899: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
1900: APP_EXCEPTION.Raise_Exception;
1901: null;
1902: end if;
1903:
1906: OPEN C_WE;
1907: FETCH C_WE INTO Recinfo2;
1908: if (C_WE%NOTFOUND) then
1909: CLOSE C_WE;
1910: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
1911: APP_EXCEPTION.Raise_Exception;
1912: end if;
1913: CLOSE C_WE;
1914: if (Recinfo2.wip_entity_id = X_Wip_Entity_Id)
1921: nvl(X_Primary_Item_Id, 0))
1922: then
1923: return;
1924: else
1925: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
1926: APP_EXCEPTION.Raise_Exception;
1927: end if;
1928:
1929: -- eam_work_order_details
1930: OPEN C_EWOD;
1931: FETCH C_EWOD INTO Recinfo3;
1932: IF (C_EWOD%NOTFOUND) THEN
1933: CLOSE C_EWOD;
1934: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
1935: APP_EXCEPTION.Raise_Exception;
1936: END IF;
1937: CLOSE C_EWOD;
1938: IF (Recinfo3.wip_entity_id = X_Wip_Entity_Id)
1945: AND (NVL(Recinfo3.material_shortage_check_date,sysdate) = NVL(X_material_shortage_check_date,sysdate))
1946: THEN
1947: return;
1948: ELSE
1949: FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
1950: APP_EXCEPTION.Raise_Exception;
1951: END IF;
1952: END Lock_Row;
1953: