[Home] [Help]
58:
59: BEGIN
60: -- IF PG_DEBUG < 10 THEN
61: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
62: IEX_DEBUG_PUB.LogMessage ('********* start of Procedure =>IEX_CASE_CONTACTS_PVT.Create_case_contact ******** ');
63: END IF;
64: -- Standard Start of API savepoint
65: SAVEPOINT CREATE_CASE_CONTACT_PVT;
66:
73: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
74: END IF;
75: -- IF PG_DEBUG < 10 THEN
76: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
77: IEX_DEBUG_PUB.LogMessage('Create_case_contact: ' || 'After Compatibility Check');
78: END IF;
79:
80:
81: -- Initialize message list if p_init_msg_list is set to TRUE.
105: RAISE FND_API.G_EXC_ERROR;
106: END IF;
107: -- IF PG_DEBUG < 10 THEN
108: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
109: IEX_DEBUG_PUB.LogMessage('Create_case_contact: ' || 'After Global user Check');
110: END IF;
111:
112: --IF p_validation_level = FND_API.G_VALID_LEVEL_FULL THEN
113:
121: FETCH C2 INTO v_CAS_CONTACT_ID;
122: CLOSE C2;
123: -- IF PG_DEBUG < 10 THEN
124: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
125: IEX_DEBUG_PUB.LogMessage('Create_case_contact: ' || 'After CAS CONTACT ID Check and cas_contact_id is => '||v_cas_contact_id);
126: END IF;
127: --check for cas_id
128: IF (p_case_contact_rec.cas_id IS NULL) OR (p_case_contact_rec.cas_ID = FND_API.G_MISS_NUM) THEN
129: fnd_message.set_name('IEX', 'IEX_API_ALL_MISSING_PARAM');
133: RAISE FND_API.G_EXC_ERROR;
134: END IF;
135: -- IF PG_DEBUG < 10 THEN
136: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
137: IEX_DEBUG_PUB.LogMessage('Create_case_contact: ' || 'After CAS ID Check ');
138: END IF;
139: --check for contact_party_id
140: IF (p_case_contact_rec.contact_party_id IS NULL) OR (p_case_contact_rec.contact_party_id = FND_API.G_MISS_NUM) THEN
141: fnd_message.set_name('IEX', 'IEX_API_ALL_MISSING_PARAM');
145: RAISE FND_API.G_EXC_ERROR;
146: END IF;
147: -- IF PG_DEBUG < 10 THEN
148: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
149: IEX_DEBUG_PUB.LogMessage('Create_case_contact: ' || 'After CAS contact ID Check ');
150: END IF;
151: --Populate default address_id if it is not passed
152: IF (p_case_contact_rec.address_id IS NULL)
153: OR (p_case_contact_rec.address_id = FND_API.G_MISS_NUM) THEN
176:
177: --END IF;
178: -- IF PG_DEBUG < 10 THEN
179: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
180: IEX_DEBUG_PUB.LogMessage('Create_case_contact: ' || 'Before calling IEX_CASE_CONTACTS_PKG.Insert_Row');
181: END IF;
182: -- Invoke table handler(IEX_CASE_CONTACTS_PKG.Insert_Row)
183: IEX_CASE_CONTACTS_PKG.Insert_Row(
184: x_rowid =>v_rowid,
219:
220: x_CAS_CONTACT_ID := V_CAS_CONTACT_ID;
221: -- IF PG_DEBUG < 10 THEN
222: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
223: IEX_DEBUG_PUB.LogMessage('Create_case_contact: ' || 'After Calling IEX_CASE_CONTACTS_PKG.Insert_Row and cas Contact id => '
224: ||x_cas_contact_id);
225: END IF;
226: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
227: RAISE FND_API.G_EXC_ERROR;
245: p_data => x_msg_data
246: );
247: -- IF PG_DEBUG < 10 THEN
248: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
249: IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_CASE_CONTACTS_PVT.Create_case_contact ******** ');
250: END IF;
251: EXCEPTION
252: WHEN FND_API.G_EXC_ERROR THEN
253: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
303: l_object_version_number iex_case_contacts.object_version_number%TYPE:=p_case_contact_rec.object_version_number;
304: BEGIN
305: -- IF PG_DEBUG < 10 THEN
306: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
307: IEX_DEBUG_PUB.LogMessage ('********* start of Procedure =>IEX_CASE_CONTACTS_PVT.update_case_contact ******** ');
308: END IF;
309: -- Standard Start of API savepoint
310: SAVEPOINT UPDATE_case_contact_PVT;
311:
395: p_data => x_msg_data
396: );
397: -- IF PG_DEBUG < 10 THEN
398: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
399: IEX_DEBUG_PUB.LogMessage ('********* end of Procedure =>IEX_CASE_CONTACTS_PVT.update_case_contact ******** ');
400: END IF;
401: EXCEPTION
402: WHEN FND_API.G_EXC_ERROR THEN
403: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(
452:
453: BEGIN
454: -- IF PG_DEBUG < 10 THEN
455: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
456: IEX_DEBUG_PUB.LogMessage ('********* start of Procedure =>IEX_CASE_CONTACTS_PVT.delete_case_contact ******** ');
457: END IF;
458: -- Standard Start of API savepoint
459: SAVEPOINT DELETE_case_contact_PVT;
460:
502: p_data => x_msg_data
503: );
504: -- IF PG_DEBUG < 10 THEN
505: IF (FND_LOG.LEVEL_EVENT >= PG_DEBUG) THEN
506: IEX_DEBUG_PUB.LogMessage ('********* End of Procedure =>IEX_CASE_CONTACTS_PVT.delete_case_contact ******** ');
507: END IF;
508: EXCEPTION
509: WHEN FND_API.G_EXC_ERROR THEN
510: AS_UTILITY_PVT.HANDLE_EXCEPTIONS(