DBA Data[Home] [Help]

APPS.IEX_CASE_CONTACTS_PKG dependencies on IEX_CASE_CONTACTS

Line 1: PACKAGE BODY IEX_CASE_CONTACTS_PKG as

1: PACKAGE BODY IEX_CASE_CONTACTS_PKG as
2: /* $Header: iextconb.pls 120.0 2004/01/24 03:21:26 appldev noship $ */
3: -- Start of Comments
4: -- Package name : IEX_CASE_CONTACTS_PKG
5: -- Purpose :

Line 4: -- Package name : IEX_CASE_CONTACTS_PKG

1: PACKAGE BODY IEX_CASE_CONTACTS_PKG as
2: /* $Header: iextconb.pls 120.0 2004/01/24 03:21:26 appldev noship $ */
3: -- Start of Comments
4: -- Package name : IEX_CASE_CONTACTS_PKG
5: -- Purpose :
6: -- History :
7: -- NOTE :
8: -- End of Comments

Line 11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'IEX_CASE_CONTACTS_PKG';

7: -- NOTE :
8: -- End of Comments
9:
10:
11: G_PKG_NAME CONSTANT VARCHAR2(30):= 'IEX_CASE_CONTACTS_PKG';
12: G_FILE_NAME CONSTANT VARCHAR2(12) := 'iextconb.pls';
13:
14: --PG_DEBUG NUMBER(2) := TO_NUMBER(NVL(FND_PROFILE.value('IEX_DEBUG_LEVEL'), '20'));
15: PG_DEBUG NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

Line 54: cursor C is select ROWID from IEX_CASE_CONTACTS

50: p_LAST_UPDATE_LOGIN IN NUMBER,
51: P_PRIMARY_FLAG IN VARCHAR2 )
52:
53: IS
54: cursor C is select ROWID from IEX_CASE_CONTACTS
55: where cas_contact_id = p_cas_contact_id ;
56:
57: BEGIN
58: -- IF PG_DEBUG < 10 THEN

Line 60: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_CASE_CONTACTS_PKG.INSERT_ROW ******** ');

56:
57: BEGIN
58: -- IF PG_DEBUG < 10 THEN
59: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
60: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_CASE_CONTACTS_PKG.INSERT_ROW ******** ');
61: END IF;
62: INSERT INTO IEX_CASE_CONTACTS(
63: CAS_CONTACT_ID,
64: CAS_ID,

Line 62: INSERT INTO IEX_CASE_CONTACTS(

58: -- IF PG_DEBUG < 10 THEN
59: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
60: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_CASE_CONTACTS_PKG.INSERT_ROW ******** ');
61: END IF;
62: INSERT INTO IEX_CASE_CONTACTS(
63: CAS_CONTACT_ID,
64: CAS_ID,
65: CONTACT_PARTY_ID,
66: OBJECT_VERSION_NUMBER,

Line 143: IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_CASE_CONTACTS_PKG.INSERT_ROW ******** ');

139: end if;
140: close c;
141: -- IF PG_DEBUG < 10 THEN
142: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
143: IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_CASE_CONTACTS_PKG.INSERT_ROW ******** ');
144: END IF;
145:
146: End Insert_Row;
147:

Line 185: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_CASE_CONTACTS_PKG.UPDATE_ROW ******** ');

181: IS
182: BEGIN
183: -- IF PG_DEBUG < 10 THEN
184: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
185: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_CASE_CONTACTS_PKG.UPDATE_ROW ******** ');
186: END IF;
187: Update IEX_CASE_CONTACTS
188: SET
189: CAS_ID = decode( p_CAS_ID, FND_API.G_MISS_NUM, CAS_ID, p_CAS_ID),

Line 187: Update IEX_CASE_CONTACTS

183: -- IF PG_DEBUG < 10 THEN
184: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
185: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_CASE_CONTACTS_PKG.UPDATE_ROW ******** ');
186: END IF;
187: Update IEX_CASE_CONTACTS
188: SET
189: CAS_ID = decode( p_CAS_ID, FND_API.G_MISS_NUM, CAS_ID, p_CAS_ID),
190: CONTACT_PARTY_ID = decode( p_CONTACT_PARTY_ID, FND_API.G_MISS_NUM, CONTACT_PARTY_ID, p_CONTACT_PARTY_ID),
191: OBJECT_VERSION_NUMBER = decode( p_OBJECT_VERSION_NUMBER, FND_API.G_MISS_NUM, OBJECT_VERSION_NUMBER, p_OBJECT_VERSION_NUMBER),

Line 226: IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_CASE_CONTACTS_PKG.UPDATE_ROW ******** ');

222: RAISE NO_DATA_FOUND;
223: End If;
224: -- IF PG_DEBUG < 10 THEN
225: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
226: IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_CASE_CONTACTS_PKG.UPDATE_ROW ******** ');
227: END IF;
228: END Update_Row;
229:
230: PROCEDURE Delete_Row(

Line 234: DELETE FROM IEX_CASE_CONTACTS

230: PROCEDURE Delete_Row(
231: p_CAS_CONTACT_ID IN NUMBER)
232: IS
233: BEGIN
234: DELETE FROM IEX_CASE_CONTACTS
235: WHERE CAS_CONTACT_ID = p_CAS_CONTACT_ID;
236: If (SQL%NOTFOUND) then
237: RAISE NO_DATA_FOUND;
238: End If;

Line 246: from IEX_CASE_CONTACTS

242: p_cas_contact_id in NUMBER,
243: p_OBJECT_VERSION_NUMBER in NUMBER
244: ) is
245: cursor c is select OBJECT_VERSION_NUMBER
246: from IEX_CASE_CONTACTS
247: where cas_contact_id = p_cas_contact_id
248: and OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER
249: for update of cas_contact_id nowait;
250: recinfo c%rowtype;

Line 256: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_CASE_CONTACTS_PKG.LOCK_ROW ******** ');

252:
253: begin
254: -- IF PG_DEBUG < 10 THEN
255: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
256: IEX_DEBUG_PUB.LogMessage ('********* Start of Procedure =>IEX_CASE_CONTACTS_PKG.LOCK_ROW ******** ');
257: END IF;
258: open c;
259: fetch c into recinfo;
260: if (c%notfound) then

Line 276: IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_CASE_CONTACTS_PKG.LOCK_ROW ******** ');

272: app_exception.raise_exception;
273: end if;
274: --IF PG_DEBUG < 10 THEN
275: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
276: IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_CASE_CONTACTS_PKG.LOCK_ROW ******** ');
277: END IF;
278: end LOCK_ROW;
279:
280: /*PROCEDURE Lock_Row(

Line 316: FROM IEX_CASE_CONTACTS

312:
313: IS
314: CURSOR C IS
315: SELECT *
316: FROM IEX_CASE_CONTACTS
317: WHERE CAS_CONTACT_ID = p_CAS_CONTACT_ID
318: FOR UPDATE of CAS_CONTACT_ID NOWAIT;
319: Recinfo C%ROWTYPE;
320: BEGIN

Line 431: End IEX_CASE_CONTACTS_PKG;

427: End If;
428: END Lock_Row;
429: */
430:
431: End IEX_CASE_CONTACTS_PKG;