APPS.JTF_EXCEPTIONS_PKG dependencies on JTF_EXCEPTIONS

Line 1: PACKAGE BODY JTF_EXCEPTIONS_PKG AS

1: PACKAGE BODY JTF_EXCEPTIONS_PKG AS
2: /* $Header: jtfvtveb.pls 115.3 2000/02/29 18:26:26 pkm ship $ */
3:
4:
5: PROCEDURE Insert_Row(

Line 21: CURSOR C IS SELECT rowid FROM JTF_EXCEPTIONS

17: x_LEAD_ID IN NUMBER,
18: x_OPPORTUNITY_ID IN NUMBER,
19: x_ORG_ID IN NUMBER
20: ) IS
21: CURSOR C IS SELECT rowid FROM JTF_EXCEPTIONS
22: WHERE EXCEPTIONS_ID = x_EXCEPTIONS_ID;
23: CURSOR C2 IS SELECT JTF_EXCEPTIONS_s.nextval FROM sys.dual;
24: BEGIN
25: If (x_EXCEPTIONS_ID IS NULL) then

Line 23: CURSOR C2 IS SELECT JTF_EXCEPTIONS_s.nextval FROM sys.dual;

19: x_ORG_ID IN NUMBER
20: ) IS
21: CURSOR C IS SELECT rowid FROM JTF_EXCEPTIONS
22: WHERE EXCEPTIONS_ID = x_EXCEPTIONS_ID;
23: CURSOR C2 IS SELECT JTF_EXCEPTIONS_s.nextval FROM sys.dual;
24: BEGIN
25: If (x_EXCEPTIONS_ID IS NULL) then
26: OPEN C2;
27: FETCH C2 INTO x_EXCEPTIONS_ID;

Line 30: INSERT INTO JTF_EXCEPTIONS(

26: OPEN C2;
27: FETCH C2 INTO x_EXCEPTIONS_ID;
28: CLOSE C2;
29: End If;
30: INSERT INTO JTF_EXCEPTIONS(
31: EXCEPTIONS_ID,
32: LAST_UPDATE_DATE,
33: LAST_UPDATED_BY,
34: CREATION_DATE,

Line 71: DELETE FROM JTF_EXCEPTIONS

67:
68: PROCEDURE Delete_Row( x_EXCEPTIONS_ID IN NUMBER
69: ) IS
70: BEGIN
71: DELETE FROM JTF_EXCEPTIONS
72: WHERE EXCEPTIONS_ID = x_EXCEPTIONS_ID;
73: If (SQL%NOTFOUND) then
74: RAISE NO_DATA_FOUND;
75: End If;

Line 97: Update JTF_EXCEPTIONS

93: x_OPPORTUNITY_ID IN NUMBER,
94: x_ORG_ID IN NUMBER
95: ) IS
96: BEGIN
97: Update JTF_EXCEPTIONS
98: SET
99: EXCEPTIONS_ID = decode( x_EXCEPTIONS_ID, FND_API.G_MISS_NUM,EXCEPTIONS_ID,x_EXCEPTIONS_ID),
100: LAST_UPDATE_DATE = decode( x_LAST_UPDATE_DATE, FND_API.G_MISS_DATE,LAST_UPDATE_DATE,x_LAST_UPDATE_DATE),
101: LAST_UPDATED_BY = decode( x_LAST_UPDATED_BY, FND_API.G_MISS_NUM,LAST_UPDATED_BY,x_LAST_UPDATED_BY),

Line 139: FROM JTF_EXCEPTIONS

135: x_ORG_ID IN NUMBER
136: ) IS
137: CURSOR C IS
138: SELECT *
139: FROM JTF_EXCEPTIONS
140: WHERE rowid = x_Rowid
141: FOR UPDATE of EXCEPTIONS_ID NOWAIT;
142: Recinfo C%ROWTYPE;
143: BEGIN

Line 200: END JTF_EXCEPTIONS_PKG;

196: APP_EXCEPTION.RAISE_EXCEPTION;
197: End If;
198: END Lock_Row;
199:
200: END JTF_EXCEPTIONS_PKG;