DBA Data[Home] [Help]

APPS.CSM_SR_EVENT_PKG dependencies on CSM_SR_EVENT_PKG

Line 1: PACKAGE BODY CSM_SR_EVENT_PKG AS

1: PACKAGE BODY CSM_SR_EVENT_PKG AS
2: /* $Header: csmesrb.pls 120.12.12020000.2 2013/04/09 10:59:41 saradhak ship $ */
3:
4: -- MODIFICATION HISTORY
5: -- Person Date Comments

Line 67: AND package_name = 'CSM_SR_EVENT_PKG'

63: IS
64: SELECT 1
65: FROM jtm_con_request_data
66: WHERE product_code = 'CSM'
67: AND package_name = 'CSM_SR_EVENT_PKG'
68: AND procedure_name = 'PURGE_INCIDENTS_CONC'
69: FOR UPDATE OF last_run_date NOWAIT;
70:
71: TYPE l_incident_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;

Line 94: CSM_UTIL_PKG.LOG(TO_CHAR(l_incident_tbl.COUNT) || ' records sent for purge', 'CSM_SR_EVENT_PKG.PURGE_INCIDENTS_CONC',FND_LOG.LEVEL_EVENT);

90:
91: FETCH l_purge_incidents_csr BULK COLLECT INTO l_incident_tbl,l_userid_tbl,l_cnt_tbl LIMIT 50;
92: EXIT WHEN l_incident_tbl.COUNT = 0;
93:
94: CSM_UTIL_PKG.LOG(TO_CHAR(l_incident_tbl.COUNT) || ' records sent for purge', 'CSM_SR_EVENT_PKG.PURGE_INCIDENTS_CONC',FND_LOG.LEVEL_EVENT);
95:
96: FOR I IN 1..l_incident_tbl.count
97: LOOP
98: l_incident_id:=l_incident_tbl(I);

Line 101: csm_sr_event_pkg.sr_del_init(p_incident_id=>l_incident_id);

97: LOOP
98: l_incident_id:=l_incident_tbl(I);
99: FOR j IN 1..l_cnt_tbl.COUNT
100: LOOP
101: csm_sr_event_pkg.sr_del_init(p_incident_id=>l_incident_id);
102: END LOOP;
103: END LOOP;
104: -- commit after every 50 records
105: COMMIT;

Line 123: p_message := 'CSM_SR_EVENT_PKG.PURGE_INCIDENTS_CONC Executed successfully';

119:
120: COMMIT;
121:
122: p_status := 'SUCCESS';
123: p_message := 'CSM_SR_EVENT_PKG.PURGE_INCIDENTS_CONC Executed successfully';
124:
125: EXCEPTION
126: --log the error
127: WHEN OTHERS THEN

Line 134: p_message := 'Error in CSM_SR_EVENT_PKG.PURGE_INCIDENTS_CONC: ' || l_error_msg;

130: ROLLBACK;
131: l_error_msg := ' Exception in Purge_incidents_conc for incident_id:'
132: || to_char(l_incident_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
133: p_status := 'ERROR';
134: p_message := 'Error in CSM_SR_EVENT_PKG.PURGE_INCIDENTS_CONC: ' || l_error_msg;
135: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.PURGE_INCIDENTS_CONC',FND_LOG.LEVEL_EVENT);
136: -- x_return_status := FND_API.G_RET_STS_ERROR ;
137: -- RAISE;
138: END PURGE_INCIDENTS_CONC;

Line 135: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.PURGE_INCIDENTS_CONC',FND_LOG.LEVEL_EVENT);

131: l_error_msg := ' Exception in Purge_incidents_conc for incident_id:'
132: || to_char(l_incident_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
133: p_status := 'ERROR';
134: p_message := 'Error in CSM_SR_EVENT_PKG.PURGE_INCIDENTS_CONC: ' || l_error_msg;
135: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.PURGE_INCIDENTS_CONC',FND_LOG.LEVEL_EVENT);
136: -- x_return_status := FND_API.G_RET_STS_ERROR ;
137: -- RAISE;
138: END PURGE_INCIDENTS_CONC;
139:

Line 160: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.IS_SR_TASK for task_id: ' || p_task_id,

156: AND tsk.SCHEDULED_END_DATE IS NOT NULL
157: ;
158:
159: BEGIN
160: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.IS_SR_TASK for task_id: ' || p_task_id,
161: 'CSM_SR_EVENT_PKG.IS_SR_TASK',FND_LOG.LEVEL_PROCEDURE);
162:
163: l_source_object_type_code := NULL;
164:

Line 161: 'CSM_SR_EVENT_PKG.IS_SR_TASK',FND_LOG.LEVEL_PROCEDURE);

157: ;
158:
159: BEGIN
160: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.IS_SR_TASK for task_id: ' || p_task_id,
161: 'CSM_SR_EVENT_PKG.IS_SR_TASK',FND_LOG.LEVEL_PROCEDURE);
162:
163: l_source_object_type_code := NULL;
164:
165: OPEN l_jtf_tasks_csr(p_task_id);

Line 170: 'CSM_SR_EVENT_PKG.IS_SR_TASK',FND_LOG.LEVEL_EXCEPTION);

166: FETCH l_jtf_tasks_csr INTO l_source_object_type_code;
167: IF l_jtf_tasks_csr%NOTFOUND THEN
168: CLOSE l_jtf_tasks_csr;
169: CSM_UTIL_PKG.LOG('Not a mobile Task Type for task_id: ' || p_task_id,
170: 'CSM_SR_EVENT_PKG.IS_SR_TASK',FND_LOG.LEVEL_EXCEPTION);
171: RETURN FALSE;
172: END IF;
173: CLOSE l_jtf_tasks_csr;
174:

Line 176: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.IS_SR_TASK for task_id: ' || p_task_id,

172: END IF;
173: CLOSE l_jtf_tasks_csr;
174:
175: IF (l_source_object_type_code IN ('SR', 'TASK') OR l_source_object_type_code IS NULL) THEN
176: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.IS_SR_TASK for task_id: ' || p_task_id,
177: 'CSM_SR_EVENT_PKG.IS_SR_TASK', FND_LOG.LEVEL_PROCEDURE);
178: RETURN TRUE;
179: ELSE
180: CSM_UTIL_PKG.LOG('Not a mobile Task Type for task_id: ' || p_task_id,

Line 177: 'CSM_SR_EVENT_PKG.IS_SR_TASK', FND_LOG.LEVEL_PROCEDURE);

173: CLOSE l_jtf_tasks_csr;
174:
175: IF (l_source_object_type_code IN ('SR', 'TASK') OR l_source_object_type_code IS NULL) THEN
176: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.IS_SR_TASK for task_id: ' || p_task_id,
177: 'CSM_SR_EVENT_PKG.IS_SR_TASK', FND_LOG.LEVEL_PROCEDURE);
178: RETURN TRUE;
179: ELSE
180: CSM_UTIL_PKG.LOG('Not a mobile Task Type for task_id: ' || p_task_id,
181: 'CSM_SR_EVENT_PKG.IS_SR_TASK',FND_LOG.LEVEL_EXCEPTION);

Line 181: 'CSM_SR_EVENT_PKG.IS_SR_TASK',FND_LOG.LEVEL_EXCEPTION);

177: 'CSM_SR_EVENT_PKG.IS_SR_TASK', FND_LOG.LEVEL_PROCEDURE);
178: RETURN TRUE;
179: ELSE
180: CSM_UTIL_PKG.LOG('Not a mobile Task Type for task_id: ' || p_task_id,
181: 'CSM_SR_EVENT_PKG.IS_SR_TASK',FND_LOG.LEVEL_EXCEPTION);
182: RETURN FALSE;
183: END IF;
184:
185: EXCEPTION

Line 191: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.IS_SR_TASK',FND_LOG.LEVEL_EXCEPTION);

187: l_sqlerrno := to_char(SQLCODE);
188: l_sqlerrmsg := substr(SQLERRM, 1,2000);
189: l_error_msg := ' Exception in IS_SR_TASK for task_id:' || to_char(p_task_id)
190: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
191: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.IS_SR_TASK',FND_LOG.LEVEL_EXCEPTION);
192: RETURN FALSE;
193: END IS_SR_TASK;
194:
195: FUNCTION IS_TASK_STATUS_DOWNLOADABLE(p_task_id IN NUMBER)

Line 217: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE for task_id: ' || p_task_id,

213: OR jts.completed_flag = 'Y'
214: ));
215:
216: BEGIN
217: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE for task_id: ' || p_task_id,
218: 'CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_PROCEDURE);
219:
220: OPEN l_jtf_task_status_csr(p_task_id);
221: FETCH l_jtf_task_status_csr INTO l_dummy;

Line 218: 'CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_PROCEDURE);

214: ));
215:
216: BEGIN
217: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE for task_id: ' || p_task_id,
218: 'CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_PROCEDURE);
219:
220: OPEN l_jtf_task_status_csr(p_task_id);
221: FETCH l_jtf_task_status_csr INTO l_dummy;
222: IF l_jtf_task_status_csr%NOTFOUND THEN

Line 225: 'CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_EXCEPTION);

221: FETCH l_jtf_task_status_csr INTO l_dummy;
222: IF l_jtf_task_status_csr%NOTFOUND THEN
223: CLOSE l_jtf_task_status_csr;
224: CSM_UTIL_PKG.LOG('Task Status not downloadable for task_id: ' || p_task_id,
225: 'CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_EXCEPTION);
226: RETURN FALSE;
227: END IF;
228: CLOSE l_jtf_task_status_csr;
229:

Line 230: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE for task_id: ' || p_task_id,

226: RETURN FALSE;
227: END IF;
228: CLOSE l_jtf_task_status_csr;
229:
230: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE for task_id: ' || p_task_id,
231: 'CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_PROCEDURE);
232:
233: RETURN TRUE;
234: EXCEPTION

Line 231: 'CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_PROCEDURE);

227: END IF;
228: CLOSE l_jtf_task_status_csr;
229:
230: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE for task_id: ' || p_task_id,
231: 'CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_PROCEDURE);
232:
233: RETURN TRUE;
234: EXCEPTION
235: WHEN OTHERS THEN

Line 240: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_EXCEPTION);

236: l_sqlerrno := to_char(SQLCODE);
237: l_sqlerrmsg := substr(SQLERRM, 1,2000);
238: l_error_msg := ' Exception in IS_TASK_STATUS_DOWNLOADABLE for task_id:' || to_char(p_task_id)
239: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
240: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.IS_TASK_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_EXCEPTION);
241: RETURN FALSE;
242: END IS_TASK_STATUS_DOWNLOADABLE;
243:
244: FUNCTION IS_ASSGN_STATUS_DOWNLOADABLE(p_task_assignment_id IN NUMBER)

Line 268: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE for task_assignment_id: ' || p_task_assignment_id,

264: OR jts.completed_flag = 'Y'
265: ));
266:
267: BEGIN
268: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE for task_assignment_id: ' || p_task_assignment_id,
269: 'CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_PROCEDURE);
270:
271: OPEN l_jtf_task_assg_status_csr(p_task_assignment_id);
272: FETCH l_jtf_task_assg_status_csr INTO l_dummy;

Line 269: 'CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_PROCEDURE);

265: ));
266:
267: BEGIN
268: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE for task_assignment_id: ' || p_task_assignment_id,
269: 'CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_PROCEDURE);
270:
271: OPEN l_jtf_task_assg_status_csr(p_task_assignment_id);
272: FETCH l_jtf_task_assg_status_csr INTO l_dummy;
273: IF l_jtf_task_assg_status_csr%NOTFOUND THEN

Line 276: 'CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_EXCEPTION);

272: FETCH l_jtf_task_assg_status_csr INTO l_dummy;
273: IF l_jtf_task_assg_status_csr%NOTFOUND THEN
274: CLOSE l_jtf_task_assg_status_csr;
275: CSM_UTIL_PKG.LOG('Task Assignment Status not downloadable for task_assignment_id: ' || p_task_assignment_id,
276: 'CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_EXCEPTION);
277: RETURN FALSE;
278: END IF;
279: CLOSE l_jtf_task_assg_status_csr;
280:

Line 281: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE for task_assignment_id: ' || p_task_assignment_id,

277: RETURN FALSE;
278: END IF;
279: CLOSE l_jtf_task_assg_status_csr;
280:
281: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE for task_assignment_id: ' || p_task_assignment_id,
282: 'CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_PROCEDURE);
283:
284: RETURN TRUE;
285: EXCEPTION

Line 282: 'CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_PROCEDURE);

278: END IF;
279: CLOSE l_jtf_task_assg_status_csr;
280:
281: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE for task_assignment_id: ' || p_task_assignment_id,
282: 'CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_PROCEDURE);
283:
284: RETURN TRUE;
285: EXCEPTION
286: WHEN OTHERS THEN

Line 291: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_EXCEPTION);

287: l_sqlerrno := to_char(SQLCODE);
288: l_sqlerrmsg := substr(SQLERRM, 1,2000);
289: l_error_msg := ' Exception in IS_ASSGN_STATUS_DOWNLOADABLE for task_assignment_id:' || to_char(p_task_assignment_id)
290: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
291: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.IS_ASSGN_STATUS_DOWNLOADABLE',FND_LOG.LEVEL_EXCEPTION);
292: RETURN FALSE;
293: END IS_ASSGN_STATUS_DOWNLOADABLE;
294:
295: PROCEDURE SPAWN_SR_CONTACTS_INS(p_incident_id IN NUMBER, p_sr_contact_point_id IN NUMBER,

Line 326: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.SPAWN_SR_CONTACTS_INS for incident_id: ' || p_incident_id,

322: AND SYSDATE BETWEEN jtrs.start_date_active AND nvl(jtrs.end_date_active, SYSDATE)
323: ;
324:
325: BEGIN
326: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.SPAWN_SR_CONTACTS_INS for incident_id: ' || p_incident_id,
327: 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACTS_INS',FND_LOG.LEVEL_PROCEDURE);
328:
329: FOR r_srcontpts_rec IN l_srcontpts_csr(p_incident_id, p_sr_contact_point_id) LOOP
330: IF r_srcontpts_rec.contact_type = 'EMPLOYEE' THEN

Line 327: 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACTS_INS',FND_LOG.LEVEL_PROCEDURE);

323: ;
324:
325: BEGIN
326: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.SPAWN_SR_CONTACTS_INS for incident_id: ' || p_incident_id,
327: 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACTS_INS',FND_LOG.LEVEL_PROCEDURE);
328:
329: FOR r_srcontpts_rec IN l_srcontpts_csr(p_incident_id, p_sr_contact_point_id) LOOP
330: IF r_srcontpts_rec.contact_type = 'EMPLOYEE' THEN
331: OPEN l_emp_resource_csr(r_srcontpts_rec.party_id);

Line 353: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.SPAWN_SR_CONTACTS_INS for task_assignment_id: ' || p_incident_id,

349: csm_sr_contact_event_pkg.sr_cntact_mdirty_i(p_sr_contact_point_id=>r_srcontpts_rec.sr_contact_point_id,
350: p_user_id=>p_user_id);
351: END LOOP;
352:
353: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.SPAWN_SR_CONTACTS_INS for task_assignment_id: ' || p_incident_id,
354: 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACTS_INS',FND_LOG.LEVEL_PROCEDURE);
355: EXCEPTION
356: WHEN OTHERS THEN
357: l_sqlerrno := to_char(SQLCODE);

Line 354: 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACTS_INS',FND_LOG.LEVEL_PROCEDURE);

350: p_user_id=>p_user_id);
351: END LOOP;
352:
353: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.SPAWN_SR_CONTACTS_INS for task_assignment_id: ' || p_incident_id,
354: 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACTS_INS',FND_LOG.LEVEL_PROCEDURE);
355: EXCEPTION
356: WHEN OTHERS THEN
357: l_sqlerrno := to_char(SQLCODE);
358: l_sqlerrmsg := substr(SQLERRM, 1,2000);

Line 361: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACTS_INS',FND_LOG.LEVEL_EXCEPTION);

357: l_sqlerrno := to_char(SQLCODE);
358: l_sqlerrmsg := substr(SQLERRM, 1,2000);
359: l_error_msg := ' Exception in SPAWN_SR_CONTACTS_INS for incident_id:' || to_char(p_incident_id)
360: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
361: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACTS_INS',FND_LOG.LEVEL_EXCEPTION);
362: RAISE;
363: END SPAWN_SR_CONTACTS_INS;
364:
365: PROCEDURE SR_ITEM_INS_INIT(p_incident_id IN NUMBER, p_instance_id IN NUMBER, p_party_site_id IN NUMBER,

Line 376: ' and instance_id: ' || p_instance_id,'CSM_SR_EVENT_PKG.SR_ITEM_INS_INIT',FND_LOG.LEVEL_PROCEDURE);

372: l_return_status VARCHAR2(2000);
373:
374: BEGIN
375: CSM_UTIL_PKG.LOG('Entering SR_ITEM_INS_INIT for incident_id: ' || p_incident_id ||
376: ' and instance_id: ' || p_instance_id,'CSM_SR_EVENT_PKG.SR_ITEM_INS_INIT',FND_LOG.LEVEL_PROCEDURE);
377:
378:
379: -- initialize count of IB items at location to 0;
380: csm_sr_event_pkg.g_ib_count := 0;

Line 380: csm_sr_event_pkg.g_ib_count := 0;

376: ' and instance_id: ' || p_instance_id,'CSM_SR_EVENT_PKG.SR_ITEM_INS_INIT',FND_LOG.LEVEL_PROCEDURE);
377:
378:
379: -- initialize count of IB items at location to 0;
380: csm_sr_event_pkg.g_ib_count := 0;
381:
382: -- item instances fork
383: csm_sr_event_pkg.spawn_item_instances_ins(p_instance_id=>p_instance_id,p_organization_id=>p_organization_id,
384: p_user_id=>p_user_id);

Line 383: csm_sr_event_pkg.spawn_item_instances_ins(p_instance_id=>p_instance_id,p_organization_id=>p_organization_id,

379: -- initialize count of IB items at location to 0;
380: csm_sr_event_pkg.g_ib_count := 0;
381:
382: -- item instances fork
383: csm_sr_event_pkg.spawn_item_instances_ins(p_instance_id=>p_instance_id,p_organization_id=>p_organization_id,
384: p_user_id=>p_user_id);
385:
386: IF NOT CSM_UTIL_PKG.IS_HTML5_USER(p_user_id ) THEN
387: -- get IB at location

Line 405: ' and instance_id: ' || p_instance_id,'CSM_SR_EVENT_PKG.SR_ITEM_INS_INIT',FND_LOG.LEVEL_PROCEDURE);

401:
402: END IF;
403:
404: CSM_UTIL_PKG.LOG('Leaving SR_ITEM_INS_INIT for incident_id: ' || p_incident_id ||
405: ' and instance_id: ' || p_instance_id,'CSM_SR_EVENT_PKG.SR_ITEM_INS_INIT',FND_LOG.LEVEL_PROCEDURE);
406: EXCEPTION
407: WHEN OTHERS THEN
408: l_sqlerrno := to_char(SQLCODE);
409: l_sqlerrmsg := substr(SQLERRM, 1,2000);

Line 412: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SR_ITEM_INS_INIT',FND_LOG.LEVEL_EXCEPTION);

408: l_sqlerrno := to_char(SQLCODE);
409: l_sqlerrmsg := substr(SQLERRM, 1,2000);
410: l_error_msg := ' Exception in SR_ITEM_INS_INIT for incident_id: ' || p_incident_id || ' and instance_id:'
411: || to_char(p_instance_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
412: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SR_ITEM_INS_INIT',FND_LOG.LEVEL_EXCEPTION);
413: RAISE;
414: END SR_ITEM_INS_INIT;
415:
416: PROCEDURE SPAWN_ITEM_INSTANCES_INS (p_instance_id IN NUMBER, p_organization_id IN NUMBER, p_user_id IN NUMBER)

Line 484: 'CSM_SR_EVENT_PKG.SPAWN_ITEM_INSTANCES_INS',FND_LOG.LEVEL_PROCEDURE);

480: l_htm5_user BOOLEAN:=CSM_UTIL_PKG.IS_HTML5_USER(p_user_id );
481:
482: BEGIN
483: CSM_UTIL_PKG.LOG('Entering SPAWN_ITEM_INSTANCES_INS for instance_id: ' || p_instance_id,
484: 'CSM_SR_EVENT_PKG.SPAWN_ITEM_INSTANCES_INS',FND_LOG.LEVEL_PROCEDURE);
485:
486: l_transaction_date := SYSDATE;
487: l_null_relationship_id := TO_NUMBER(NULL);
488:

Line 527: 'CSM_SR_EVENT_PKG.SPAWN_ITEM_INSTANCES_INS',FND_LOG.LEVEL_PROCEDURE);

523: END LOOP;
524: END IF;
525:
526: CSM_UTIL_PKG.LOG('Leaving SPAWN_ITEM_INSTANCES_INS for instance_id: ' || p_instance_id,
527: 'CSM_SR_EVENT_PKG.SPAWN_ITEM_INSTANCES_INS',FND_LOG.LEVEL_PROCEDURE);
528: EXCEPTION
529: WHEN OTHERS THEN
530: l_sqlerrno := to_char(SQLCODE);
531: l_sqlerrmsg := substr(SQLERRM, 1,2000);

Line 534: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SPAWN_ITEM_INSTANCES_INS',FND_LOG.LEVEL_EXCEPTION);

530: l_sqlerrno := to_char(SQLCODE);
531: l_sqlerrmsg := substr(SQLERRM, 1,2000);
532: l_error_msg := l_error_msg || '- Exception in SPAWN_ITEM_INSTANCES_INS for instance_id:'
533: || to_char(p_instance_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
534: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SPAWN_ITEM_INSTANCES_INS',FND_LOG.LEVEL_EXCEPTION);
535: RAISE;
536: END SPAWN_ITEM_INSTANCES_INS;
537:
538: PROCEDURE INCIDENTS_ACC_I(p_incident_id IN NUMBER, p_user_id IN NUMBER)

Line 547: 'CSM_SR_EVENT_PKG.INCIDENTS_ACC_I',FND_LOG.LEVEL_PROCEDURE);

543: l_return_status VARCHAR2(2000);
544:
545: BEGIN
546: CSM_UTIL_PKG.LOG('Entering INCIDENTS_ACC_I for incident_id: ' || p_incident_id,
547: 'CSM_SR_EVENT_PKG.INCIDENTS_ACC_I',FND_LOG.LEVEL_PROCEDURE);
548:
549: CSM_ACC_PKG.Insert_Acc
550: ( P_PUBLICATION_ITEM_NAMES => g_incidents_pubi_name
551: ,P_ACC_TABLE_NAME => g_incidents_acc_table_name

Line 559: 'CSM_SR_EVENT_PKG.INCIDENTS_ACC_I',FND_LOG.LEVEL_PROCEDURE);

555: ,P_USER_ID => p_user_id
556: );
557:
558: CSM_UTIL_PKG.LOG('Leaving INCIDENTS_ACC_I for incident_id: ' || p_incident_id,
559: 'CSM_SR_EVENT_PKG.INCIDENTS_ACC_I',FND_LOG.LEVEL_PROCEDURE);
560: EXCEPTION
561: WHEN OTHERS THEN
562: l_sqlerrno := to_char(SQLCODE);
563: l_sqlerrmsg := substr(SQLERRM, 1,2000);

Line 566: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.INCIDENTS_ACC_I',FND_LOG.LEVEL_EXCEPTION);

562: l_sqlerrno := to_char(SQLCODE);
563: l_sqlerrmsg := substr(SQLERRM, 1,2000);
564: l_error_msg := ' Exception in INCIDENTS_ACC_I for incident_id:'
565: || to_char(p_incident_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
566: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.INCIDENTS_ACC_I',FND_LOG.LEVEL_EXCEPTION);
567: RAISE;
568: END INCIDENTS_ACC_I;
569:
570: PROCEDURE SPAWN_SR_CONTACT_DEL(p_incident_id IN NUMBER, p_sr_contact_point_id IN NUMBER,

Line 601: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.SPAWN_SR_CONTACT_DEL for incident_id: ' || p_incident_id,

597: AND SYSDATE BETWEEN jtrs.start_date_active AND nvl(jtrs.end_date_active, SYSDATE)
598: ;
599:
600: BEGIN
601: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.SPAWN_SR_CONTACT_DEL for incident_id: ' || p_incident_id,
602: 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACT_DEL',FND_LOG.LEVEL_PROCEDURE);
603:
604: FOR r_srcontpts_rec IN l_srcontpts_csr(p_incident_id, p_sr_contact_point_id) LOOP
605: IF r_srcontpts_rec.contact_type = 'EMPLOYEE' THEN

Line 602: 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACT_DEL',FND_LOG.LEVEL_PROCEDURE);

598: ;
599:
600: BEGIN
601: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.SPAWN_SR_CONTACT_DEL for incident_id: ' || p_incident_id,
602: 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACT_DEL',FND_LOG.LEVEL_PROCEDURE);
603:
604: FOR r_srcontpts_rec IN l_srcontpts_csr(p_incident_id, p_sr_contact_point_id) LOOP
605: IF r_srcontpts_rec.contact_type = 'EMPLOYEE' THEN
606: OPEN l_emp_resource_csr(r_srcontpts_rec.party_id);

Line 629: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.SPAWN_SR_CONTACT_DEL for incident_id: ' || p_incident_id,

625: csm_sr_contact_event_pkg.sr_cntact_mdirty_d(p_sr_contact_point_id=>r_srcontpts_rec.sr_contact_point_id,
626: p_user_id=>p_user_id);
627: END LOOP;
628:
629: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.SPAWN_SR_CONTACT_DEL for incident_id: ' || p_incident_id,
630: 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACT_DEL',FND_LOG.LEVEL_PROCEDURE);
631: EXCEPTION
632: WHEN OTHERS THEN
633: l_sqlerrno := to_char(SQLCODE);

Line 630: 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACT_DEL',FND_LOG.LEVEL_PROCEDURE);

626: p_user_id=>p_user_id);
627: END LOOP;
628:
629: CSM_UTIL_PKG.LOG('Leaving CSM_SR_EVENT_PKG.SPAWN_SR_CONTACT_DEL for incident_id: ' || p_incident_id,
630: 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACT_DEL',FND_LOG.LEVEL_PROCEDURE);
631: EXCEPTION
632: WHEN OTHERS THEN
633: l_sqlerrno := to_char(SQLCODE);
634: l_sqlerrmsg := substr(SQLERRM, 1,2000);

Line 637: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACT_DEL',FND_LOG.LEVEL_EXCEPTION);

633: l_sqlerrno := to_char(SQLCODE);
634: l_sqlerrmsg := substr(SQLERRM, 1,2000);
635: l_error_msg := ' Exception in SPAWN_SR_CONTACT_DEL for incident_id:' || to_char(p_incident_id)
636: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
637: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SPAWN_SR_CONTACT_DEL',FND_LOG.LEVEL_EXCEPTION);
638: RAISE;
639: END SPAWN_SR_CONTACT_DEL;
640:
641: PROCEDURE SR_ITEM_DEL_INIT(p_incident_id IN NUMBER, p_instance_id IN NUMBER, p_party_site_id IN NUMBER,

Line 652: ' and instance_id: ' || p_instance_id,'CSM_SR_EVENT_PKG.SR_ITEM_DEL_INIT',FND_LOG.LEVEL_PROCEDURE);

648: l_return_status VARCHAR2(2000);
649:
650: BEGIN
651: CSM_UTIL_PKG.LOG('Entering SR_ITEM_DEL_INIT for incident_id: ' || p_incident_id ||
652: ' and instance_id: ' || p_instance_id,'CSM_SR_EVENT_PKG.SR_ITEM_DEL_INIT',FND_LOG.LEVEL_PROCEDURE);
653:
654: -- spawn item instances del
655: csm_sr_event_pkg.spawn_item_instances_del(p_instance_id=>p_instance_id,p_organization_id=>p_organization_id,
656: p_user_id=>p_user_id);

Line 655: csm_sr_event_pkg.spawn_item_instances_del(p_instance_id=>p_instance_id,p_organization_id=>p_organization_id,

651: CSM_UTIL_PKG.LOG('Entering SR_ITEM_DEL_INIT for incident_id: ' || p_incident_id ||
652: ' and instance_id: ' || p_instance_id,'CSM_SR_EVENT_PKG.SR_ITEM_DEL_INIT',FND_LOG.LEVEL_PROCEDURE);
653:
654: -- spawn item instances del
655: csm_sr_event_pkg.spawn_item_instances_del(p_instance_id=>p_instance_id,p_organization_id=>p_organization_id,
656: p_user_id=>p_user_id);
657:
658: IF NOT CSM_UTIL_PKG.IS_HTML5_USER(p_user_id ) THEN
659:

Line 677: ' and instance_id: ' || p_instance_id,'CSM_SR_EVENT_PKG.SR_ITEM_DEL_INIT',FND_LOG.LEVEL_PROCEDURE);

673: x_return_status=>l_return_status);
674:
675: END IF;
676: CSM_UTIL_PKG.LOG('Leaving SR_ITEM_DEL_INIT for incident_id: ' || p_incident_id ||
677: ' and instance_id: ' || p_instance_id,'CSM_SR_EVENT_PKG.SR_ITEM_DEL_INIT',FND_LOG.LEVEL_PROCEDURE);
678: EXCEPTION
679: WHEN OTHERS THEN
680: l_sqlerrno := to_char(SQLCODE);
681: l_sqlerrmsg := substr(SQLERRM, 1,2000);

Line 684: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SR_ITEM_DEL_INIT',FND_LOG.LEVEL_EXCEPTION);

680: l_sqlerrno := to_char(SQLCODE);
681: l_sqlerrmsg := substr(SQLERRM, 1,2000);
682: l_error_msg := ' Exception in SR_ITEM_DEL_INIT for incident_id: ' || p_incident_id || ' and instance_id:'
683: || to_char(p_instance_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
684: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SR_ITEM_DEL_INIT',FND_LOG.LEVEL_EXCEPTION);
685: RAISE;
686: END SR_ITEM_DEL_INIT;
687:
688: PROCEDURE SPAWN_ITEM_INSTANCES_DEL (p_instance_id IN NUMBER, p_organization_id IN NUMBER,p_user_id IN NUMBER)

Line 753: 'CSM_SR_EVENT_PKG.SPAWN_ITEM_INSTANCES_DEL',FND_LOG.LEVEL_PROCEDURE);

749:
750: l_htm5_user BOOLEAN:= CSM_UTIL_PKG.IS_HTML5_USER(p_user_id );
751: BEGIN
752: CSM_UTIL_PKG.LOG('Entering SPAWN_ITEM_INSTANCES_DEL for instance_id: ' || p_instance_id,
753: 'CSM_SR_EVENT_PKG.SPAWN_ITEM_INSTANCES_DEL',FND_LOG.LEVEL_PROCEDURE);
754:
755: l_transaction_date := SYSDATE;
756: l_null_relationship_id := TO_NUMBER(NULL);
757:

Line 793: 'CSM_SR_EVENT_PKG.SPAWN_ITEM_INSTANCES_DEL',FND_LOG.LEVEL_PROCEDURE);

789: END LOOP;
790: END IF;
791:
792: CSM_UTIL_PKG.LOG('Leaving SPAWN_ITEM_INSTANCES_DEL for instance_id: ' || p_instance_id,
793: 'CSM_SR_EVENT_PKG.SPAWN_ITEM_INSTANCES_DEL',FND_LOG.LEVEL_PROCEDURE);
794: EXCEPTION
795: WHEN OTHERS THEN
796: l_sqlerrno := to_char(SQLCODE);
797: l_sqlerrmsg := substr(SQLERRM, 1,2000);

Line 800: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SPAWN_ITEM_INSTANCES_DEL',FND_LOG.LEVEL_EXCEPTION);

796: l_sqlerrno := to_char(SQLCODE);
797: l_sqlerrmsg := substr(SQLERRM, 1,2000);
798: l_error_msg := l_error_msg || '- Exception in SPAWN_ITEM_INSTANCES_DEL for instance_id:'
799: || to_char(p_instance_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
800: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SPAWN_ITEM_INSTANCES_DEL',FND_LOG.LEVEL_EXCEPTION);
801: RAISE;
802: END SPAWN_ITEM_INSTANCES_DEL;
803:
804: PROCEDURE INCIDENTS_ACC_D(p_incident_id IN NUMBER, p_user_id IN NUMBER)

Line 813: 'CSM_SR_EVENT_PKG.INCIDENTS_ACC_D',FND_LOG.LEVEL_PROCEDURE);

809: l_return_status VARCHAR2(2000);
810:
811: BEGIN
812: CSM_UTIL_PKG.LOG('Entering INCIDENTS_ACC_D for incident_id: ' || p_incident_id,
813: 'CSM_SR_EVENT_PKG.INCIDENTS_ACC_D',FND_LOG.LEVEL_PROCEDURE);
814:
815: CSM_ACC_PKG.Delete_Acc
816: ( P_PUBLICATION_ITEM_NAMES => g_incidents_pubi_name
817: ,P_ACC_TABLE_NAME => g_incidents_acc_table_name

Line 824: 'CSM_SR_EVENT_PKG.INCIDENTS_ACC_D',FND_LOG.LEVEL_PROCEDURE);

820: ,P_USER_ID => p_user_id
821: );
822:
823: CSM_UTIL_PKG.LOG('Leaving INCIDENTS_ACC_D for incident_id: ' || p_incident_id,
824: 'CSM_SR_EVENT_PKG.INCIDENTS_ACC_D',FND_LOG.LEVEL_PROCEDURE);
825: EXCEPTION
826: WHEN OTHERS THEN
827: l_sqlerrno := to_char(SQLCODE);
828: l_sqlerrmsg := substr(SQLERRM, 1,2000);

Line 831: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.INCIDENTS_ACC_D',FND_LOG.LEVEL_EXCEPTION);

827: l_sqlerrno := to_char(SQLCODE);
828: l_sqlerrmsg := substr(SQLERRM, 1,2000);
829: l_error_msg := ' Exception in INCIDENTS_ACC_D for incident_id:'
830: || to_char(p_incident_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
831: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.INCIDENTS_ACC_D',FND_LOG.LEVEL_EXCEPTION);
832: RAISE;
833: END INCIDENTS_ACC_D;
834:
835: --12.1XB6

Line 948: CSM_UTIL_PKG.LOG('Entering SR_INS_INIT for incident_id: ' || p_incident_id ,'CSM_SR_EVENT_PKG.SR_INS_INIT',FND_LOG.LEVEL_PROCEDURE);

944:
945: l_assignee_user_id NUMBER;
946:
947: BEGIN
948: CSM_UTIL_PKG.LOG('Entering SR_INS_INIT for incident_id: ' || p_incident_id ,'CSM_SR_EVENT_PKG.SR_INS_INIT',FND_LOG.LEVEL_PROCEDURE);
949:
950: OPEN l_sr_csr(p_incident_id);
951: FETCH l_sr_csr INTO l_sr_rec;
952: IF l_sr_csr%NOTFOUND THEN

Line 962: ,'CSM_SR_EVENT_PKG.SR_INS_INIT',FND_LOG.LEVEL_PROCEDURE);

958: IF ( NOT CSM_UTIL_PKG.is_mfs_group(l_sr_rec.owner_group_id)) THEN
959: IF ( NOT CSM_UTIL_PKG.is_palm_user(l_sr_rec.created_by)) THEN
960: CSM_UTIL_PKG.LOG('Leaving SR_INS_INIT because the Owner group of SR is not a mobile resource group
961: and also this SR , incident_id: ' || p_incident_id ||' is not created by a mobile user'
962: ,'CSM_SR_EVENT_PKG.SR_INS_INIT',FND_LOG.LEVEL_PROCEDURE);
963: RETURN;
964: ELSE
965: l_owner_id := CSM_UTIL_PKG.get_owner(l_sr_rec.created_by);
966: END IF;

Line 972: CSM_UTIL_PKG.LOG('Leaving SR_INS_INIT as this SR is owned/created by HTML5 user','CSM_SR_EVENT_PKG.SR_INS_INIT',FND_LOG.LEVEL_PROCEDURE);

968: l_owner_id := CSM_UTIL_PKG.get_group_owner(l_sr_rec.owner_group_id);
969: END IF;
970:
971: IF CSM_UTIL_PKG.IS_HTML5_USER(l_owner_id) THEN --no download for owners/created by in htm5
972: CSM_UTIL_PKG.LOG('Leaving SR_INS_INIT as this SR is owned/created by HTML5 user','CSM_SR_EVENT_PKG.SR_INS_INIT',FND_LOG.LEVEL_PROCEDURE);
973: RETURN;
974: END IF;
975:
976: -- not necessary as all DISPATCH Sr's need an install site id

Line 995: csm_sr_event_pkg.spawn_sr_contacts_ins(p_incident_id=>p_incident_id,

991: p_error_msg=>l_error_msg,
992: x_return_status=>l_return_status);
993:
994: -- get SR contacts
995: csm_sr_event_pkg.spawn_sr_contacts_ins(p_incident_id=>p_incident_id,
996: p_user_id=>l_owner_id,
997: p_flowtype=>NULL);
998: IF l_sr_rec.incident_location_type = 'HZ_LOCATION' THEN --R12 Assest
999: --insert location for the sr

Line 1032: csm_sr_event_pkg.sr_item_ins_init(p_incident_id=>l_sr_rec.incident_id,

1028: END IF;
1029:
1030: IF l_sr_rec.customer_product_id IS NOT NULL THEN
1031: -- spawn SR item instance insert
1032: csm_sr_event_pkg.sr_item_ins_init(p_incident_id=>l_sr_rec.incident_id,
1033: p_instance_id=>l_sr_rec.customer_product_id,
1034: p_party_site_id=>l_sr_rec.incident_location_id,
1035: p_party_id=>l_sr_rec.party_id,
1036: p_location_id=>l_sr_rec.location_id,

Line 1053: csm_sr_event_pkg.incidents_acc_i(p_incident_id=>l_sr_rec.incident_id,

1049: END IF;
1050: END IF;
1051:
1052: -- insert into incidents acc
1053: csm_sr_event_pkg.incidents_acc_i(p_incident_id=>l_sr_rec.incident_id,
1054: p_user_id=>l_owner_id);
1055:
1056: -- get SR contracts
1057: csm_contract_event_pkg.sr_contract_acc_i(p_incident_id=>l_sr_rec.incident_id,

Line 1103: CSM_UTIL_PKG.LOG('Leaving SR_INS_INIT for incident_id: ' || p_incident_id ,'CSM_SR_EVENT_PKG.SR_INS_INIT',FND_LOG.LEVEL_PROCEDURE);

1099: end loop;
1100:
1101: END LOOP;
1102:
1103: CSM_UTIL_PKG.LOG('Leaving SR_INS_INIT for incident_id: ' || p_incident_id ,'CSM_SR_EVENT_PKG.SR_INS_INIT',FND_LOG.LEVEL_PROCEDURE);
1104: EXCEPTION
1105: WHEN OTHERS THEN
1106: l_sqlerrno := to_char(SQLCODE);
1107: l_sqlerrmsg := substr(SQLERRM, 1,2000);

Line 1110: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SR_INS_INIT',FND_LOG.LEVEL_EXCEPTION);

1106: l_sqlerrno := to_char(SQLCODE);
1107: l_sqlerrmsg := substr(SQLERRM, 1,2000);
1108: l_error_msg := ' Exception in SR_INS_INIT for incident_id:'
1109: || to_char(p_incident_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
1110: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SR_INS_INIT',FND_LOG.LEVEL_EXCEPTION);
1111: RAISE;
1112: END SR_INS_INIT;
1113:
1114: --12.1

Line 1187: CSM_UTIL_PKG.LOG('Entering SR_DEL_INIT for incident_id: ' || p_incident_id ,'CSM_SR_EVENT_PKG.SR_DEL_INIT',FND_LOG.LEVEL_PROCEDURE);

1183:
1184: l_assignee_user_id NUMBER;
1185:
1186: BEGIN
1187: CSM_UTIL_PKG.LOG('Entering SR_DEL_INIT for incident_id: ' || p_incident_id ,'CSM_SR_EVENT_PKG.SR_DEL_INIT',FND_LOG.LEVEL_PROCEDURE);
1188:
1189: OPEN l_sr_csr(p_incident_id,p_user_id);
1190: FETCH l_sr_csr INTO l_sr_rec;
1191: IF l_sr_csr%NOTFOUND THEN

Line 1203: ,'CSM_SR_EVENT_PKG.SR_DEL_INIT',FND_LOG.LEVEL_PROCEDURE);

1199: IF ( NOT CSM_UTIL_PKG.is_mfs_group(l_sr_rec.owner_group_id)) THEN
1200: IF ( NOT CSM_UTIL_PKG.is_palm_user(l_sr_rec.created_by)) THEN
1201: CSM_UTIL_PKG.LOG('Leaving SR_DEL_INIT since the Owner group of SR is not a mobile resource group
1202: and also this SR , incident_id: ' || p_incident_id ||' is not created by a mobile user'
1203: ,'CSM_SR_EVENT_PKG.SR_DEL_INIT',FND_LOG.LEVEL_PROCEDURE);
1204: RETURN;
1205: ELSE
1206: l_owner_id := CSM_UTIL_PKG.get_owner(l_sr_rec.created_by);
1207: END IF;

Line 1218: csm_sr_event_pkg.incidents_acc_d(p_incident_id=>l_sr_rec.incident_id,

1214: -- get Service Inv Validation org
1215: l_organization_id := csm_profile_pkg.get_organization_id(l_owner_id);
1216:
1217: -- delete from incidents acc
1218: csm_sr_event_pkg.incidents_acc_d(p_incident_id=>l_sr_rec.incident_id,
1219: p_user_id=>l_owner_id);
1220:
1221: -- delete SR notes
1222: csm_notes_event_pkg.notes_make_dirty_d_grp(p_sourceobjectcode=>'SR',

Line 1229: csm_sr_event_pkg.spawn_sr_contact_del(p_incident_id=>l_sr_rec.incident_id,

1225: p_error_msg=>l_error_msg,
1226: x_return_status=>l_return_status);
1227:
1228: -- delete SR contacts
1229: csm_sr_event_pkg.spawn_sr_contact_del(p_incident_id=>l_sr_rec.incident_id,
1230: p_user_id=>l_owner_id,
1231: p_flowtype=>NULL);
1232: IF l_sr_rec.incident_location_type = 'HZ_LOCATION' THEN --R12 Assest
1233: --insert location for the sr

Line 1277: csm_sr_event_pkg.sr_item_del_init(p_incident_id=>l_sr_rec.incident_id,

1273: END IF;
1274:
1275: IF l_sr_rec.customer_product_id IS NOT NULL THEN
1276: -- spawn SR item instance delete
1277: csm_sr_event_pkg.sr_item_del_init(p_incident_id=>l_sr_rec.incident_id,
1278: p_instance_id=>l_sr_rec.customer_product_id,
1279: p_party_site_id=>l_sr_rec.incident_location_id,
1280: p_party_id=>l_sr_rec.party_id,
1281: p_location_id=>l_sr_rec.location_id,

Line 1331: CSM_UTIL_PKG.LOG('Leaving SR_DEL_INIT for incident_id: ' || p_incident_id ,'CSM_SR_EVENT_PKG.SR_DEL_INIT',FND_LOG.LEVEL_PROCEDURE);

1327: end loop;
1328:
1329: END LOOP;
1330:
1331: CSM_UTIL_PKG.LOG('Leaving SR_DEL_INIT for incident_id: ' || p_incident_id ,'CSM_SR_EVENT_PKG.SR_DEL_INIT',FND_LOG.LEVEL_PROCEDURE);
1332: EXCEPTION
1333: WHEN OTHERS THEN
1334: l_sqlerrno := to_char(SQLCODE);
1335: l_sqlerrmsg := substr(SQLERRM, 1,2000);

Line 1338: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SR_DEL_INIT',FND_LOG.LEVEL_EXCEPTION);

1334: l_sqlerrno := to_char(SQLCODE);
1335: l_sqlerrmsg := substr(SQLERRM, 1,2000);
1336: l_error_msg := ' Exception in SR_DEL_INIT for incident_id:'
1337: || to_char(p_incident_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
1338: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SR_DEL_INIT',FND_LOG.LEVEL_EXCEPTION);
1339: RAISE;
1340: END SR_DEL_INIT;
1341:
1342: --12.1

Line 1401: CSM_UTIL_PKG.LOG('Entering SR_UPD_INIT for incident_id: ' || p_incident_id ,'CSM_SR_EVENT_PKG.SR_UPD_INIT',FND_LOG.LEVEL_PROCEDURE);

1397: WHERE acc.incident_id = p_incident_id;
1398:
1399:
1400: BEGIN
1401: CSM_UTIL_PKG.LOG('Entering SR_UPD_INIT for incident_id: ' || p_incident_id ,'CSM_SR_EVENT_PKG.SR_UPD_INIT',FND_LOG.LEVEL_PROCEDURE);
1402:
1403: OPEN l_sr_csr(p_incident_id);
1404: FETCH l_sr_csr INTO l_sr_rec;
1405: IF l_sr_csr%NOTFOUND THEN

Line 1482: csm_sr_event_pkg.sr_item_del_init(p_incident_id=>l_sr_rec.incident_id,

1478:
1479: IF p_is_sr_instance_updated = 'Y' THEN
1480: IF p_old_instance_id IS NOT NULL THEN
1481: -- spawn SR item instance delete
1482: csm_sr_event_pkg.sr_item_del_init(p_incident_id=>l_sr_rec.incident_id,
1483: p_instance_id=>p_old_instance_id,
1484: p_party_site_id=>p_old_incident_location_id,
1485: p_party_id=>p_old_party_id,
1486: p_location_id=>p_old_location_id,

Line 1494: csm_sr_event_pkg.sr_item_ins_init(p_incident_id=>l_sr_rec.incident_id,

1490: END IF;
1491:
1492: IF l_sr_rec.customer_product_id IS NOT NULL THEN
1493: -- spawn SR item instance insert
1494: csm_sr_event_pkg.sr_item_ins_init(p_incident_id=>l_sr_rec.incident_id,
1495: p_instance_id=>l_sr_rec.customer_product_id,
1496: p_party_site_id=>l_sr_rec.incident_location_id,
1497: p_party_id=>l_sr_rec.party_id,
1498: p_location_id=>l_sr_rec.location_id,

Line 1542: CSM_UTIL_PKG.LOG('Leaving SR_UPD_INIT for incident_id: ' || p_incident_id ,'CSM_SR_EVENT_PKG.SR_UPD_INIT',FND_LOG.LEVEL_PROCEDURE);

1538: );
1539:
1540: END LOOP;
1541:
1542: CSM_UTIL_PKG.LOG('Leaving SR_UPD_INIT for incident_id: ' || p_incident_id ,'CSM_SR_EVENT_PKG.SR_UPD_INIT',FND_LOG.LEVEL_PROCEDURE);
1543: EXCEPTION
1544: WHEN OTHERS THEN
1545: l_sqlerrno := to_char(SQLCODE);
1546: l_sqlerrmsg := substr(SQLERRM, 1,2000);

Line 1549: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SR_UPD_INIT',FND_LOG.LEVEL_EXCEPTION);

1545: l_sqlerrno := to_char(SQLCODE);
1546: l_sqlerrmsg := substr(SQLERRM, 1,2000);
1547: l_error_msg := ' Exception in SR_UPD_INIT for incident_id:'
1548: || to_char(p_incident_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
1549: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.SR_UPD_INIT',FND_LOG.LEVEL_EXCEPTION);
1550: RAISE;
1551: END SR_UPD_INIT;
1552:
1553: --Function to find whether the SR associated with Task assignment id is open before purging.

Line 1574: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.IS_SR_OPEN for task_id: ' || p_task_id,

1570: AND tsk.task_id = c_task_id
1571: AND tsk.source_object_id = inc.incident_id;
1572:
1573: BEGIN
1574: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.IS_SR_OPEN for task_id: ' || p_task_id,
1575: 'CSM_SR_EVENT_PKG.IS_SR_OPEN',FND_LOG.LEVEL_PROCEDURE);
1576:
1577: l_incident_id := NULL;
1578:

Line 1575: 'CSM_SR_EVENT_PKG.IS_SR_OPEN',FND_LOG.LEVEL_PROCEDURE);

1571: AND tsk.source_object_id = inc.incident_id;
1572:
1573: BEGIN
1574: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.IS_SR_OPEN for task_id: ' || p_task_id,
1575: 'CSM_SR_EVENT_PKG.IS_SR_OPEN',FND_LOG.LEVEL_PROCEDURE);
1576:
1577: l_incident_id := NULL;
1578:
1579: OPEN l_is_sr_open_csr(p_task_id);

Line 1585: 'CSM_SR_EVENT_PKG.IS_SR_OPEN',FND_LOG.LEVEL_EXCEPTION);

1581: IF l_is_sr_open_csr%NOTFOUND THEN
1582:
1583: CLOSE l_is_sr_open_csr;
1584: CSM_UTIL_PKG.LOG('The SR is open for task_id : ' || p_task_id,
1585: 'CSM_SR_EVENT_PKG.IS_SR_OPEN',FND_LOG.LEVEL_EXCEPTION);
1586: RETURN TRUE;
1587: END IF;
1588: CLOSE l_is_sr_open_csr;
1589:

Line 1591: 'CSM_SR_EVENT_PKG.IS_SR_OPEN',FND_LOG.LEVEL_EXCEPTION);

1587: END IF;
1588: CLOSE l_is_sr_open_csr;
1589:
1590: CSM_UTIL_PKG.LOG('The SR is Closed for task_id : ' || p_task_id,
1591: 'CSM_SR_EVENT_PKG.IS_SR_OPEN',FND_LOG.LEVEL_EXCEPTION);
1592:
1593: RETURN FALSE;
1594:
1595: EXCEPTION

Line 1601: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.IS_SR_OPEN',FND_LOG.LEVEL_EXCEPTION);

1597: l_sqlerrno := to_char(SQLCODE);
1598: l_sqlerrmsg := substr(SQLERRM, 1,2000);
1599: l_error_msg := ' Exception in IS_SR_OPEN for task_id:' || to_char(p_task_id)
1600: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
1601: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.IS_SR_OPEN',FND_LOG.LEVEL_EXCEPTION);
1602: RAISE;
1603: END IS_SR_OPEN;
1604:
1605:

Line 1670: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE ',

1666: l_INSTANCE_ID NUMBER;
1667: l_INCIDENT_NUM VARCHAR2(64);
1668:
1669: BEGIN
1670: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE ',
1671: 'CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE',FND_LOG.LEVEL_PROCEDURE);
1672:
1673: IF (funcmode <> 'RUN')
1674: THEN

Line 1671: 'CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE',FND_LOG.LEVEL_PROCEDURE);

1667: l_INCIDENT_NUM VARCHAR2(64);
1668:
1669: BEGIN
1670: CSM_UTIL_PKG.LOG('Entering CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE ',
1671: 'CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE',FND_LOG.LEVEL_PROCEDURE);
1672:
1673: IF (funcmode <> 'RUN')
1674: THEN
1675: RETURN;

Line 1689: 'CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE',FND_LOG.LEVEL_PROCEDURE);

1685: CLOSE c_get_sr_id;
1686:
1687: IF l_INCIDENT_ID IS NULL THEN
1688: CSM_UTIL_PKG.LOG('The Given SR number is Invalid : ' || l_INCIDENT_NUM,
1689: 'CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE',FND_LOG.LEVEL_PROCEDURE);
1690: RETURN;
1691: END IF;
1692:
1693:

Line 1726: 'CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE',FND_LOG.LEVEL_EXCEPTION);

1722: IF l_error_status = FND_API.G_RET_STS_SUCCESS THEN
1723: COMMIT;
1724: RESULT := 'COMPLETE:Y';
1725: CSM_UTIL_PKG.LOG('Proforma Invoice Generated sucessfully for Incident Number : ' || l_INCIDENT_NUM,
1726: 'CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE',FND_LOG.LEVEL_EXCEPTION);
1727:
1728: ELSE
1729: CSM_UTIL_PKG.LOG('ERROR IN CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE' || l_error_msg, 'CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE',FND_LOG.LEVEL_EXCEPTION);
1730: ROLLBACK;

Line 1729: CSM_UTIL_PKG.LOG('ERROR IN CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE' || l_error_msg, 'CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE',FND_LOG.LEVEL_EXCEPTION);

1725: CSM_UTIL_PKG.LOG('Proforma Invoice Generated sucessfully for Incident Number : ' || l_INCIDENT_NUM,
1726: 'CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE',FND_LOG.LEVEL_EXCEPTION);
1727:
1728: ELSE
1729: CSM_UTIL_PKG.LOG('ERROR IN CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE' || l_error_msg, 'CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE',FND_LOG.LEVEL_EXCEPTION);
1730: ROLLBACK;
1731: RESULT := 'COMPLETE:N';
1732: END IF;
1733:

Line 1740: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE',FND_LOG.LEVEL_EXCEPTION);

1736: l_sqlerrno := to_char(SQLCODE);
1737: l_sqlerrmsg := substr(SQLERRM, 1,2000);
1738: l_error_msg := ' Exception in GET_PROFORMA_INVOICE for Incident Number:' || to_char(l_INCIDENT_NUM)
1739: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
1740: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_SR_EVENT_PKG.GET_PROFORMA_INVOICE',FND_LOG.LEVEL_EXCEPTION);
1741: ROLLBACK;
1742: RESULT := 'COMPLETE:N';
1743: END GET_PROFORMA_INVOICE;
1744:

Line 1745: END CSM_SR_EVENT_PKG;

1741: ROLLBACK;
1742: RESULT := 'COMPLETE:N';
1743: END GET_PROFORMA_INVOICE;
1744:
1745: END CSM_SR_EVENT_PKG;