APPS.ENG_ENGINEERING_CHANGES_PKG dependencies on ENG_ENGINEERING_CHANGES

Line 1: PACKAGE BODY ENG_ENGINEERING_CHANGES_PKG as

1: PACKAGE BODY ENG_ENGINEERING_CHANGES_PKG as
2: /* $Header: engpecob.pls 115.3 2003/02/07 09:05:26 rbehal ship $ */
3:
4:
5: PROCEDURE Check_Unique( X_Rowid VARCHAR2,

Line 11: (select 1 from ENG_ENGINEERING_CHANGES

7: X_Organization_Id NUMBER ) IS
8: dummy NUMBER;
9: BEGIN
10: select 1 into dummy from dual where not exists
11: (select 1 from ENG_ENGINEERING_CHANGES
12: where CHANGE_NOTICE = X_Change_Notice
13: and ORGANIZATION_ID = X_Organization_Id
14: and ((X_Rowid IS NULL) OR (ROWID <> X_Rowid))
15: );

Line 28: delete from ENG_ENGINEERING_CHANGES

24: PROCEDURE Delete_Row( X_Rowid VARCHAR2,
25: X_Change_Notice VARCHAR2,
26: X_Organization_Id NUMBER )IS
27: BEGIN
28: delete from ENG_ENGINEERING_CHANGES
29: where rowid = X_Rowid;
30: if (SQL%NOTFOUND) then
31: raise NO_DATA_FOUND;
32: elsif (SQL%FOUND) then

Line 49: END ENG_ENGINEERING_CHANGES_PKG ;

45:
46:
47:
48:
49: END ENG_ENGINEERING_CHANGES_PKG ;