32: l_responsibilities_rec l_responsibilities_csr%ROWTYPE;
33:
34: BEGIN
35: CSM_UTIL_PKG.LOG('Entering IS_OMFS_PALM_RESPONSIBILITY for user_id: ' || p_user_id || ' and responsibility_id: '
36: || p_responsibility_id , 'CSM_USER_EVENT_PKG.IS_OMFS_PALM_RESPONSIBILITY',FND_LOG.LEVEL_PROCEDURE);
37:
38: OPEN l_responsibilities_csr (p_responsibility_id,p_user_id);
39: FETCH l_responsibilities_csr INTO l_responsibilities_rec;
40:
44: END IF;
45: CLOSE l_responsibilities_csr;
46:
47: CSM_UTIL_PKG.LOG('Leaving IS_OMFS_PALM_RESPONSIBILITY for user_id: ' || p_user_id || ' and responsibility_id: '
48: || p_responsibility_id , 'CSM_USER_EVENT_PKG.IS_OMFS_PALM_RESPONSIBILITY',FND_LOG.LEVEL_PROCEDURE);
49:
50: RETURN TRUE;
51: EXCEPTION
52: WHEN OTHERS THEN
53: l_sqlerrno := to_char(SQLCODE);
54: l_sqlerrmsg := substr(SQLERRM, 1,2000);
55: l_error_msg := ' Exception in IS_OMFS_PALM_RESPONSIBILITY for for user_id: ' || p_user_id || ' and responsibility_id: '
56: || p_responsibility_id || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
57: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_USER_EVENT_PKG.IS_OMFS_PALM_RESPONSIBILITY',FND_LOG.LEVEL_EXCEPTION);
58: RETURN FALSE;
59: END IS_OMFS_PALM_RESPONSIBILITY;
60:
61: PROCEDURE disable_user_pub_synch(p_user_id IN NUMBER)
66: l_return_status VARCHAR2(2000);
67:
68: BEGIN
69: CSM_UTIL_PKG.LOG('Entering disable_user_pub_synch for user_id:' || p_user_id,
70: 'CSM_USER_EVENT_PKG.disable_user_pub_synch',FND_LOG.LEVEL_PROCEDURE);
71:
72: asg_helper.disable_user_pub_synch(p_user_id, 'SERVICEP');
73:
74: CSM_UTIL_PKG.LOG('Leaving disable_user_pub_synch for user_id:' || p_user_id,
71:
72: asg_helper.disable_user_pub_synch(p_user_id, 'SERVICEP');
73:
74: CSM_UTIL_PKG.LOG('Leaving disable_user_pub_synch for user_id:' || p_user_id,
75: 'CSM_USER_EVENT_PKG.disable_user_pub_synch',FND_LOG.LEVEL_PROCEDURE);
76: EXCEPTION
77: WHEN OTHERS THEN
78: l_sqlerrno := to_char(SQLCODE);
79: l_sqlerrmsg := substr(SQLERRM, 1,2000);
78: l_sqlerrno := to_char(SQLCODE);
79: l_sqlerrmsg := substr(SQLERRM, 1,2000);
80: l_error_msg := ' Exception in disable_user_pub_synch for for user_id: ' || p_user_id
81: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
82: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_USER_EVENT_PKG.disable_user_pub_synch',FND_LOG.LEVEL_EXCEPTION);
83: RAISE;
84: END disable_user_pub_synch;
85:
86: FUNCTION is_first_omfs_palm_user(p_user_id IN NUMBER) RETURN BOOLEAN
103: l_user_rec l_user_csr%ROWTYPE;
104:
105: BEGIN
106: CSM_UTIL_PKG.LOG('Entering IS_FIRST_OMFS_PALM_USER for user_id:' || p_user_id,
107: 'CSM_USER_EVENT_PKG.IS_FIRST_OMFS_PALM_USER',FND_LOG.LEVEL_PROCEDURE);
108:
109: OPEN l_user_csr(p_user_id);
110: FETCH l_user_csr INTO l_user_rec;
111: IF (l_user_csr%FOUND) THEN
114: END IF;
115: CLOSE l_user_csr;
116:
117: CSM_UTIL_PKG.LOG('Leaving IS_FIRST_OMFS_PALM_USER for user_id:' || p_user_id,
118: 'CSM_USER_EVENT_PKG.IS_FIRST_OMFS_PALM_USER',FND_LOG.LEVEL_PROCEDURE);
119: RETURN TRUE;
120:
121: EXCEPTION
122: WHEN OTHERS THEN
123: l_sqlerrno := to_char(SQLCODE);
124: l_sqlerrmsg := substr(SQLERRM, 1,2000);
125: l_error_msg := ' Exception in IS_FIRST_OMFS_PALM_USER for for user_id: ' || p_user_id
126: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
127: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_USER_EVENT_PKG.IS_FIRST_OMFS_PALM_USER',FND_LOG.LEVEL_EXCEPTION);
128: RETURN TRUE;
129: END IS_FIRST_OMFS_PALM_USER;
130:
131: PROCEDURE spawn_dashboard_srch_cols_ins(p_user_id IN NUMBER)
135: l_msg VARCHAR2(4000);
136: l_status VARCHAR2(40);
137: BEGIN
138: CSM_UTIL_PKG.LOG('Entering spawn_dashboard_srch_cols_ins for user_id: ' || p_user_id,
139: 'CSM_USER_EVENT_PKG.spawn_dashboard_srch_cols_ins',FND_LOG.LEVEL_PROCEDURE);
140:
141: CSM_DBOARD_SRCH_COLS_EVENT_PKG.Refresh_Acc(l_status,l_msg);
142:
143: CSM_UTIL_PKG.LOG('Leaving spawn_dashboard_srch_cols_ins for user_id: ' || p_user_id,
140:
141: CSM_DBOARD_SRCH_COLS_EVENT_PKG.Refresh_Acc(l_status,l_msg);
142:
143: CSM_UTIL_PKG.LOG('Leaving spawn_dashboard_srch_cols_ins for user_id: ' || p_user_id,
144: 'CSM_USER_EVENT_PKG.spawn_dashboard_srch_cols_ins',FND_LOG.LEVEL_PROCEDURE);
145: EXCEPTION
146: WHEN OTHERS THEN
147: l_sqlerrno := to_char(SQLCODE);
148: l_sqlerrmsg := substr(SQLERRM, 1,2000);
147: l_sqlerrno := to_char(SQLCODE);
148: l_sqlerrmsg := substr(SQLERRM, 1,2000);
149: l_msg := ' Exception in spawn_dashboard_srch_cols_ins for for user_id: ' || p_user_id
150: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
151: CSM_UTIL_PKG.LOG(l_msg, 'csm_user_event_pkg.spawn_dashboard_srch_cols_ins',FND_LOG.LEVEL_EXCEPTION);
152: RAISE;
153: END spawn_dashboard_srch_cols_ins;
154:
155: --Bug 7239431
160: l_msg VARCHAR2(4000);
161: l_return_status VARCHAR2(40);
162: BEGIN
163: CSM_UTIL_PKG.LOG('Entering spawn_perz_ins for user_id: ' || p_user_id,
164: 'CSM_USER_EVENT_PKG.spawn_perz_ins',FND_LOG.LEVEL_PROCEDURE);
165:
166: CSM_UTIL_PKG.LOG('Populating PERSONALIZED CUSTOMIZATION VIEWS Access table',
167: 'CSM_USER_EVENT_PKG.spawn_perz_ins',FND_LOG.LEVEL_PROCEDURE);
168:
163: CSM_UTIL_PKG.LOG('Entering spawn_perz_ins for user_id: ' || p_user_id,
164: 'CSM_USER_EVENT_PKG.spawn_perz_ins',FND_LOG.LEVEL_PROCEDURE);
165:
166: CSM_UTIL_PKG.LOG('Populating PERSONALIZED CUSTOMIZATION VIEWS Access table',
167: 'CSM_USER_EVENT_PKG.spawn_perz_ins',FND_LOG.LEVEL_PROCEDURE);
168:
169: CSM_CUSTMZ_VIEWS_EVENT_PKG.REFRESH_USER(p_user_id);
170:
171: CSM_UTIL_PKG.LOG('Populating PERSONALIZED DELTA PAGE VIEWS Access table',
168:
169: CSM_CUSTMZ_VIEWS_EVENT_PKG.REFRESH_USER(p_user_id);
170:
171: CSM_UTIL_PKG.LOG('Populating PERSONALIZED DELTA PAGE VIEWS Access table',
172: 'CSM_USER_EVENT_PKG.spawn_perz_ins',FND_LOG.LEVEL_PROCEDURE);
173:
174: CSM_PAGE_PERZ_DELTA_EVENT_PKG.REFRESH_USER(p_user_id);
175:
176:
174: CSM_PAGE_PERZ_DELTA_EVENT_PKG.REFRESH_USER(p_user_id);
175:
176:
177: CSM_UTIL_PKG.LOG('Populating PERSONALIZED NEW MESSAGES Access table',
178: 'CSM_USER_EVENT_PKG.spawn_perz_ins',FND_LOG.LEVEL_PROCEDURE);
179:
180: CSM_NEW_MESSAGES_EVENT_PKG.REFRESH_USER(p_user_id);
181:
182: CSM_UTIL_PKG.LOG('Leaving spawn_perz_ins for user_id: ' || p_user_id,
179:
180: CSM_NEW_MESSAGES_EVENT_PKG.REFRESH_USER(p_user_id);
181:
182: CSM_UTIL_PKG.LOG('Leaving spawn_perz_ins for user_id: ' || p_user_id,
183: 'CSM_USER_EVENT_PKG.spawn_perz_ins',FND_LOG.LEVEL_PROCEDURE);
184: EXCEPTION
185: WHEN OTHERS THEN
186: l_sqlerrno := to_char(SQLCODE);
187: l_sqlerrmsg := substr(SQLERRM, 1,2000);
186: l_sqlerrno := to_char(SQLCODE);
187: l_sqlerrmsg := substr(SQLERRM, 1,2000);
188: l_msg := ' Exception in spawn_perz_ins for for user_id: ' || p_user_id
189: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
190: CSM_UTIL_PKG.LOG(l_msg, 'csm_user_event_pkg.spawn_perz_ins',FND_LOG.LEVEL_EXCEPTION);
191: RAISE;
192: END spawn_perz_ins;
193:
194: PROCEDURE spawn_task_ins(p_user_id IN NUMBER)
236:
237:
238: BEGIN
239: CSM_UTIL_PKG.LOG('Entering spawn_task_ins for user_id: ' || p_user_id,
240: 'CSM_USER_EVENT_PKG.spawn_task_ins',FND_LOG.LEVEL_PROCEDURE);
241:
242: -- loop to spawn process
243: FOR l_task_rec IN l_task_csr(p_user_id) LOOP
244: csm_task_event_pkg.task_ins_init(p_task_id=>l_task_rec.task_id);
244: csm_task_event_pkg.task_ins_init(p_task_id=>l_task_rec.task_id);
245: END LOOP;
246:
247: CSM_UTIL_PKG.LOG('Leaving spawn_task_ins for user_id: ' || p_user_id,
248: 'CSM_USER_EVENT_PKG.spawn_task_ins',FND_LOG.LEVEL_PROCEDURE);
249: EXCEPTION
250: WHEN OTHERS THEN
251: l_sqlerrno := to_char(SQLCODE);
252: l_sqlerrmsg := substr(SQLERRM, 1,2000);
251: l_sqlerrno := to_char(SQLCODE);
252: l_sqlerrmsg := substr(SQLERRM, 1,2000);
253: l_error_msg := ' Exception in spawn_task_ins for for user_id: ' || p_user_id
254: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
255: CSM_UTIL_PKG.LOG(l_error_msg, 'csm_user_event_pkg.spawn_task_ins',FND_LOG.LEVEL_EXCEPTION);
256: RAISE;
257: END spawn_task_ins;
258:
259: --12.1XB6
290: l_group_id NUMBER;
291: l_user_id NUMBER;
292: BEGIN
293: CSM_UTIL_PKG.LOG('Entering spawn_incident_ins for user_id: ' || p_user_id,
294: 'CSM_USER_EVENT_PKG.spawn_incident_ins',FND_LOG.LEVEL_PROCEDURE);
295:
296: OPEN c_get_group(p_user_id);
297: FETCH c_get_group INTO l_group_id,l_user_id;
298: CLOSE c_get_group;
304: END LOOP;
305: END IF;
306:
307: CSM_UTIL_PKG.LOG('Leaving spawn_incident_ins for user_id: ' || p_user_id,
308: 'CSM_USER_EVENT_PKG.spawn_incident_ins',FND_LOG.LEVEL_PROCEDURE);
309: EXCEPTION
310: WHEN OTHERS THEN
311: l_sqlerrno := to_char(SQLCODE);
312: l_sqlerrmsg := substr(SQLERRM, 1,2000);
311: l_sqlerrno := to_char(SQLCODE);
312: l_sqlerrmsg := substr(SQLERRM, 1,2000);
313: l_error_msg := ' Exception in spawn_incident_ins for for user_id: ' || p_user_id
314: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
315: CSM_UTIL_PKG.LOG(l_error_msg, 'csm_user_event_pkg.spawn_incident_ins',FND_LOG.LEVEL_EXCEPTION);
316: RAISE;
317: END spawn_incident_ins;
318:
319: PROCEDURE spawn_task_assignment_ins(p_user_id IN NUMBER)
369: l_task_assign_rec l_task_assign_csr% ROWTYPE;
370:
371: BEGIN
372: CSM_UTIL_PKG.LOG('Entering spawn_task_assignment_ins for user_id: ' || p_user_id,
373: 'CSM_USER_EVENT_PKG.spawn_task_assignment_ins',FND_LOG.LEVEL_PROCEDURE);
374:
375: -- loop to spawn process
376: FOR l_task_assign_rec IN l_task_assign_csr(p_user_id) LOOP
377: csm_task_assignment_event_pkg.task_assignment_initializer(p_task_assignment_id=>l_task_assign_rec.task_assignment_id,
379: x_return_status=>l_return_status);
380: END LOOP;
381:
382: CSM_UTIL_PKG.LOG('Leaving spawn_task_assignment_ins for user_id: ' || p_user_id,
383: 'CSM_USER_EVENT_PKG.spawn_task_assignment_ins',FND_LOG.LEVEL_PROCEDURE);
384: EXCEPTION
385: WHEN OTHERS THEN
386: l_sqlerrno := to_char(SQLCODE);
387: l_sqlerrmsg := substr(SQLERRM, 1,2000);
386: l_sqlerrno := to_char(SQLCODE);
387: l_sqlerrmsg := substr(SQLERRM, 1,2000);
388: l_error_msg := ' Exception in spawn_task_assignment_ins for for user_id: ' || p_user_id
389: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
390: CSM_UTIL_PKG.LOG(l_error_msg, 'csm_user_event_pkg.spawn_task_assignment_ins',FND_LOG.LEVEL_EXCEPTION);
391: RAISE;
392: END spawn_task_assignment_ins;
393:
394: PROCEDURE items_acc_processor(p_user_id IN NUMBER)
402: l_category_set_id NUMBER;
403:
404: BEGIN
405: CSM_UTIL_PKG.LOG('Entering items_acc_processor for user_id: ' || p_user_id,
406: 'csm_user_event_pkg.items_acc_processor',FND_LOG.LEVEL_PROCEDURE);
407:
408: l_organization_id := csm_profile_pkg.get_organization_id(p_user_id);
409: l_category_set_id := csm_profile_pkg.get_category_set_id(p_user_id);
410: l_category_id := csm_profile_pkg.get_category_id(p_user_id);
425: p_category_set_id=>l_category_set_id, p_category_id=>l_category_id);
426: END IF;
427:
428: CSM_UTIL_PKG.LOG('Leaving items_acc_processor for user_id: ' || p_user_id,
429: 'csm_user_event_pkg.items_acc_processor',FND_LOG.LEVEL_PROCEDURE);
430: EXCEPTION
431: WHEN OTHERS THEN
432: l_sqlerrno := TO_CHAR(SQLCODE);
433: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);
432: l_sqlerrno := TO_CHAR(SQLCODE);
433: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);
434: l_error_msg := ' Exception in items_acc_processor for user_id :'
435: || to_char(p_user_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
436: CSM_UTIL_PKG.LOG(l_error_msg, 'csm_user_event_pkg.items_acc_processor',FND_LOG.LEVEL_EXCEPTION);
437: RAISE;
438: END items_acc_processor;
439:
440: PROCEDURE spawn_inv_loc_assignment_ins(p_resource_id IN NUMBER, p_user_id IN NUMBER)
452: AND SYSDATE BETWEEN nvl(effective_date_start, SYSDATE) AND nvl(effective_date_end, SYSDATE);
453:
454: BEGIN
455: CSM_UTIL_PKG.LOG('Entering spawn_inv_loc_assignment_ins for user_id: ' || p_user_id,
456: 'csm_user_event_pkg.spawn_inv_loc_assignment_ins',FND_LOG.LEVEL_PROCEDURE);
457:
458: IF csm_util_pkg.is_palm_resource(p_resource_id) THEN
459: FOR r_csp_inv_loc_assignment_rec IN l_csp_inv_loc_assignment_csr(p_resource_id) LOOP
460: CSM_INV_LOC_ASS_EVENT_PKG.INV_LOC_ASSIGNMENT_INS_INIT
462: END LOOP;
463: END IF;
464:
465: CSM_UTIL_PKG.LOG('Leaving spawn_inv_loc_assignment_ins for user_id: ' || p_user_id,
466: 'csm_user_event_pkg.spawn_inv_loc_assignment_ins',FND_LOG.LEVEL_PROCEDURE);
467: EXCEPTION
468: WHEN OTHERS THEN
469: l_sqlerrno := TO_CHAR(SQLCODE);
470: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);
469: l_sqlerrno := TO_CHAR(SQLCODE);
470: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);
471: l_error_msg := ' Exception in spawn_inv_loc_assignment_ins for user_id :'
472: || to_char(p_user_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
473: CSM_UTIL_PKG.LOG(l_error_msg, 'csm_user_event_pkg.spawn_inv_loc_assignment_ins',FND_LOG.LEVEL_EXCEPTION);
474: RAISE;
475: END spawn_inv_loc_assignment_ins;
476:
477: PROCEDURE spawn_po_loc_ass_all_ins(p_resource_id IN NUMBER, p_user_id IN NUMBER)
505: AND au.resource_id = p_resource_id;
506:
507: BEGIN
508: CSM_UTIL_PKG.LOG('Entering spawn_po_loc_ass_all_ins for user_id: ' || p_user_id,
509: 'csm_user_event_pkg.spawn_po_loc_ass_all_ins',FND_LOG.LEVEL_PROCEDURE);
510:
511: IF csm_util_pkg.is_palm_resource(p_resource_id) THEN
512:
513: FOR r_po_loc_ass_all_rec IN l_po_loc_ass_all_csr(p_resource_id) LOOP
527:
528: END IF;
529:
530: CSM_UTIL_PKG.LOG('Leaving spawn_po_loc_ass_all_ins for user_id: ' || p_user_id,
531: 'csm_user_event_pkg.spawn_po_loc_ass_all_ins',FND_LOG.LEVEL_PROCEDURE);
532: EXCEPTION
533: WHEN OTHERS THEN
534: l_sqlerrno := TO_CHAR(SQLCODE);
535: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);
534: l_sqlerrno := TO_CHAR(SQLCODE);
535: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);
536: l_error_msg := ' Exception in spawn_po_loc_ass_all_ins for user_id :'
537: || to_char(p_user_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
538: CSM_UTIL_PKG.LOG(l_error_msg, 'csm_user_event_pkg.spawn_po_loc_ass_all_ins',FND_LOG.LEVEL_EXCEPTION);
539: RAISE;
540: END spawn_po_loc_ass_all_ins;
541:
542: PROCEDURE spawn_csp_req_headers_ins(p_resource_id IN NUMBER, p_user_id IN NUMBER)
563: );
564:
565: BEGIN
566: CSM_UTIL_PKG.LOG('Entering spawn_csp_req_headers_ins for user_id: ' || p_user_id,
567: 'csm_user_event_pkg.spawn_csp_req_headers_ins',FND_LOG.LEVEL_PROCEDURE);
568:
569: IF csm_util_pkg.is_palm_resource(p_resource_id) THEN
570: FOR r_req_headers_rec IN l_req_headers_csr(p_resource_id) LOOP
571: csm_csp_req_headers_event_pkg.csp_req_headers_mdirty_i
575:
576: END IF;
577:
578: CSM_UTIL_PKG.LOG('Leaving spawn_csp_req_headers_ins for user_id: ' || p_user_id,
579: 'csm_user_event_pkg.spawn_csp_req_headers_ins',FND_LOG.LEVEL_PROCEDURE);
580: EXCEPTION
581: WHEN OTHERS THEN
582: l_sqlerrno := TO_CHAR(SQLCODE);
583: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);
582: l_sqlerrno := TO_CHAR(SQLCODE);
583: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);
584: l_error_msg := ' Exception in spawn_csp_req_headers_ins for user_id :'
585: || to_char(p_user_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
586: CSM_UTIL_PKG.LOG(l_error_msg, 'csm_user_event_pkg.spawn_csp_req_headers_ins',FND_LOG.LEVEL_EXCEPTION);
587: RAISE;
588: END spawn_csp_req_headers_ins;
589:
590: PROCEDURE spawn_csp_req_lines_ins(p_resource_id IN NUMBER, p_user_id IN NUMBER)
614: );
615:
616: BEGIN
617: CSM_UTIL_PKG.LOG('Entering spawn_csp_req_lines_ins for user_id: ' || p_user_id,
618: 'csm_user_event_pkg.spawn_csp_req_lines_ins',FND_LOG.LEVEL_PROCEDURE);
619:
620: IF csm_util_pkg.is_palm_resource(p_resource_id) THEN
621:
622: FOR r_req_lines_rec IN l_req_lines_csr(p_resource_id) LOOP
627:
628: END IF;
629:
630: CSM_UTIL_PKG.LOG('Leaving spawn_csp_req_lines_ins for user_id: ' || p_user_id,
631: 'csm_user_event_pkg.spawn_csp_req_lines_ins',FND_LOG.LEVEL_PROCEDURE);
632: EXCEPTION
633: WHEN OTHERS THEN
634: l_sqlerrno := TO_CHAR(SQLCODE);
635: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);
634: l_sqlerrno := TO_CHAR(SQLCODE);
635: l_sqlerrmsg := SUBSTR(SQLERRM, 1,2000);
636: l_error_msg := ' Exception in spawn_csp_req_lines_ins for user_id :'
637: || to_char(p_user_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
638: CSM_UTIL_PKG.LOG(l_error_msg, 'csm_user_event_pkg.spawn_csp_req_lines_ins',FND_LOG.LEVEL_EXCEPTION);
639: RAISE;
640: END spawn_csp_req_lines_ins;
641:
642: PROCEDURE enable_user_pub_synch(p_user_id IN NUMBER)
647: l_return_status VARCHAR2(2000);
648:
649: BEGIN
650: CSM_UTIL_PKG.LOG('Entering enable_user_pub_synch for user_id:' || p_user_id,
651: 'csm_user_event_pkg.enable_user_pub_synch',FND_LOG.LEVEL_PROCEDURE);
652:
653: asg_helper.enable_user_pub_synch(p_user_id, 'SERVICEP');
654:
655: CSM_UTIL_PKG.LOG('Leaving enable_user_pub_synch for user_id:' || p_user_id,
652:
653: asg_helper.enable_user_pub_synch(p_user_id, 'SERVICEP');
654:
655: CSM_UTIL_PKG.LOG('Leaving enable_user_pub_synch for user_id:' || p_user_id,
656: 'csm_user_event_pkg.enable_user_pub_synch',FND_LOG.LEVEL_PROCEDURE);
657: EXCEPTION
658: WHEN OTHERS THEN
659: l_sqlerrno := to_char(SQLCODE);
660: l_sqlerrmsg := substr(SQLERRM, 1,2000);
659: l_sqlerrno := to_char(SQLCODE);
660: l_sqlerrmsg := substr(SQLERRM, 1,2000);
661: l_error_msg := ' Exception in enable_user_pub_synch for for user_id: ' || p_user_id
662: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
663: CSM_UTIL_PKG.LOG(l_error_msg, 'csm_user_event_pkg.enable_user_pub_synch',FND_LOG.LEVEL_EXCEPTION);
664: RAISE;
665: END enable_user_pub_synch;
666:
667: procedure spawn_html5_data(p_username in VARCHAR2)
670: x CLOB; l_ret VARCHAR2(10); l_emsg VARCHAR2(4000);
671: begin
672: select count(1) into l_req from csm_html5_cache where user_name='CSM_CACHE_PVT' and rownum=1;
673: IF l_req=0 THEN
674: CSM_UTIL_PKG.LOG('Spawning HTML5 DDL Cache','csm_user_event_pkg.spawn_html5_data',FND_LOG.LEVEL_PROCEDURE);
675: CSM_HTML5_PKG.query_get_schema_js(x,l_ret,l_emsg);
676: END IF;
677:
678: /* --CSM_HTML5_PKG.generate_html5_data(p_username); --not reqd since lookup data fills sdq and obviates this.*/
698: WHERE user_id = p_user_id;
699:
700: BEGIN
701: CSM_UTIL_PKG.LOG('Entering USER_RESP_INS_INITIALIZER for user_id:' || p_user_id,
702: 'CSM_USER_EVENT_PKG.USER_RESP_INS_INITIALIZER',FND_LOG.LEVEL_PROCEDURE);
703:
704: -- check if responsibility is a MFS responsibility
705: IF NOT is_omfs_palm_responsibility(p_responsibility_id=>p_responsibility_id,
706: p_user_id=>p_user_id) THEN
704: -- check if responsibility is a MFS responsibility
705: IF NOT is_omfs_palm_responsibility(p_responsibility_id=>p_responsibility_id,
706: p_user_id=>p_user_id) THEN
707: CSM_UTIL_PKG.LOG('Responsibility id: ' || p_responsibility_id || ' not a valid MFS responsibility for user_id:' || p_user_id,
708: 'CSM_USER_EVENT_PKG.USER_RESP_INS_INITIALIZER',FND_LOG.LEVEL_EXCEPTION);
709: RETURN;
710: END IF;
711:
712: -- get resource_id of the user
819: -- enable user sync
820: csm_user_event_pkg.enable_user_pub_synch(p_user_id=>p_user_id);
821:
822: CSM_UTIL_PKG.LOG('Leaving USER_RESP_INS_INITIALIZER for user_id:' || p_user_id,
823: 'CSM_USER_EVENT_PKG.USER_RESP_INS_INITIALIZER',FND_LOG.LEVEL_PROCEDURE);
824: EXCEPTION
825: WHEN OTHERS THEN
826: l_sqlerrno := to_char(SQLCODE);
827: l_sqlerrmsg := substr(SQLERRM, 1,2000);
826: l_sqlerrno := to_char(SQLCODE);
827: l_sqlerrmsg := substr(SQLERRM, 1,2000);
828: l_error_msg := ' Exception in USER_RESP_INS_INITIALIZER for for user_id: ' || p_user_id
829: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
830: CSM_UTIL_PKG.LOG(l_error_msg, 'CSM_USER_EVENT_PKG.USER_RESP_INS_INITIALIZER',FND_LOG.LEVEL_EXCEPTION);
831: RAISE;
832: END USER_RESP_INS_INITIALIZER;
833:
834: PROCEDURE user_del_init(p_user_id IN NUMBER)
839: l_return_status VARCHAR2(2000);
840:
841: BEGIN
842: CSM_UTIL_PKG.LOG('Entering user_del_init for user_id:' || p_user_id,
843: 'csm_user_event_pkg.user_del_init',FND_LOG.LEVEL_PROCEDURE);
844:
845: -- purge all ACC tables
846: csm_user_event_pkg.purge_all_acc_tables(p_user_id=>p_user_id);
847:
845: -- purge all ACC tables
846: csm_user_event_pkg.purge_all_acc_tables(p_user_id=>p_user_id);
847:
848: CSM_UTIL_PKG.LOG('Leaving user_del_init for user_id:' || p_user_id,
849: 'csm_user_event_pkg.user_del_init',FND_LOG.LEVEL_PROCEDURE);
850: EXCEPTION
851: WHEN OTHERS THEN
852: l_sqlerrno := to_char(SQLCODE);
853: l_sqlerrmsg := substr(SQLERRM, 1,2000);
852: l_sqlerrno := to_char(SQLCODE);
853: l_sqlerrmsg := substr(SQLERRM, 1,2000);
854: l_error_msg := ' Exception in user_del_init for for user_id: ' || p_user_id
855: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
856: CSM_UTIL_PKG.LOG(l_error_msg, 'csm_user_event_pkg.user_del_init',FND_LOG.LEVEL_EXCEPTION);
857: RAISE;
858: END user_del_init;
859:
860: PROCEDURE purge_all_acc_tables(p_user_id IN NUMBER)
865: l_return_status VARCHAR2(2000);
866:
867: BEGIN
868: CSM_UTIL_PKG.LOG('Entering purge_all_acc_tables for user_id:' || p_user_id,
869: 'csm_user_event_pkg.purge_all_acc_tables',FND_LOG.LEVEL_PROCEDURE);
870:
871: DELETE FROM CSM_DEBRIEF_LINES_ACC WHERE user_id = p_user_id;
872: DELETE FROM CSM_DEBRIEF_HEADERS_ACC WHERE user_id = p_user_id;
873: DELETE FROM CSM_ITEM_INSTANCES_ACC WHERE user_id = p_user_id;
960:
961: CSM_HTML5_PKG.DROP_USER(p_user_id);
962:
963: CSM_UTIL_PKG.LOG('Leaving purge_all_acc_tables for user_id:' || p_user_id,
964: 'csm_user_event_pkg.purge_all_acc_tables',FND_LOG.LEVEL_PROCEDURE);
965: EXCEPTION
966: WHEN OTHERS THEN
967: l_sqlerrno := to_char(SQLCODE);
968: l_sqlerrmsg := substr(SQLERRM, 1,2000);
967: l_sqlerrno := to_char(SQLCODE);
968: l_sqlerrmsg := substr(SQLERRM, 1,2000);
969: l_error_msg := ' Exception in purge_all_acc_tables for for user_id: ' || p_user_id
970: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
971: CSM_UTIL_PKG.LOG(l_error_msg, 'csm_user_event_pkg.purge_all_acc_tables',FND_LOG.LEVEL_EXCEPTION);
972: RAISE;
973: END purge_all_acc_tables;
974:
975: --Populate PIs related to parts transfer
980: l_msg VARCHAR2(4000);
981: l_status VARCHAR2(40);
982: BEGIN
983: CSM_UTIL_PKG.LOG('Entering spawn_mat_txn for user_id: ' || p_user_id,
984: 'CSM_USER_EVENT_PKG.spawn_mat_txn',FND_LOG.LEVEL_PROCEDURE);
985:
986: CSM_MTL_MATERIAL_TXN_ACC_PKG.get_new_user_mat_txn(p_user_id);
987:
988: CSM_UTIL_PKG.LOG('Leaving spawn_mat_txn for user_id: ' || p_user_id,
985:
986: CSM_MTL_MATERIAL_TXN_ACC_PKG.get_new_user_mat_txn(p_user_id);
987:
988: CSM_UTIL_PKG.LOG('Leaving spawn_mat_txn for user_id: ' || p_user_id,
989: 'CSM_USER_EVENT_PKG.spawn_mat_txn',FND_LOG.LEVEL_PROCEDURE);
990: EXCEPTION
991: WHEN OTHERS THEN
992: l_sqlerrno := to_char(SQLCODE);
993: l_sqlerrmsg := substr(SQLERRM, 1,2000);
992: l_sqlerrno := to_char(SQLCODE);
993: l_sqlerrmsg := substr(SQLERRM, 1,2000);
994: l_msg := ' Exception in spawn_perz_ins for for user_id: ' || p_user_id
995: || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
996: CSM_UTIL_PKG.LOG(l_msg, 'csm_user_event_pkg.spawn_perz_ins',FND_LOG.LEVEL_EXCEPTION);
997: RAISE;
998: END spawn_mat_txn;
999:
1000: --PROCEDURE TO DOWNLOAD SERIAL NUMBERS DURING USER CREATION.
1006: l_error_msg VARCHAR(4000);
1007:
1008: BEGIN
1009: CSM_UTIL_PKG.LOG('Entering spawn_mtl_serial_numbers for User_id ' || p_user_id,
1010: 'CSM_USER_EVENT_PKG.spawn_mtl_serial_numbers',FND_LOG.LEVEL_PROCEDURE);
1011:
1012: l_organization_id := csm_profile_pkg.get_organization_id(p_user_id);
1013:
1014: --get all the serial numbers for the User
1014: --get all the serial numbers for the User
1015: CSM_SERIAL_NUMBERS_EVENT_PKG.insert_mtl_serial_numbers(l_organization_id,TO_DATE('1','J'),p_resource_id,p_user_id);
1016:
1017: CSM_UTIL_PKG.LOG('Leaving spawn_mtl_serial_numbers for User_id ' || p_user_id,
1018: 'CSM_USER_EVENT_PKG.spawn_mtl_serial_numbers',FND_LOG.LEVEL_PROCEDURE);
1019:
1020: EXCEPTION
1021: WHEN OTHERS THEN
1022: l_sqlerrno := TO_CHAR(SQLCODE);
1023: l_sqlerrmsg := TO_CHAR(SQLERRM);
1024: l_error_msg := 'Exception in spawn_mtl_serial_numbers for User_id '
1025: || TO_CHAR(p_user_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
1026:
1027: CSM_UTIL_PKG.LOG(l_error_msg,'CSM_USER_EVENT_PKG.spawn_mtl_serial_numbers',FND_LOG.LEVEL_EXCEPTION);
1028: RAISE;
1029: END spawn_mtl_serial_numbers;
1030:
1031: PROCEDURE INSERT_ACC (p_user_id IN NUMBER
1068: AND USR.USER_ID = ACC.USER_ID;
1069:
1070: BEGIN
1071: CSM_UTIL_PKG.LOG('Entering INSERT_ACC for User_id ' || p_user_id,
1072: 'CSM_USER_EVENT_PKG.INSERT_ACC',FND_LOG.LEVEL_PROCEDURE);
1073: OPEN c_asg_user(p_user_id);
1074: FETCH c_asg_user INTO l_user_id,l_owner_id,l_group_id;
1075: CLOSE c_asg_user;
1076:
1093: , p_dml => 'I'
1094: , P_TIMESTAMP => sysdate
1095: );
1096: CSM_UTIL_PKG.LOG('User is inserted into the Access table: User_id ' || p_user_id,
1097: 'CSM_USER_EVENT_PKG.INSERT_ACC',FND_LOG.LEVEL_PROCEDURE);
1098: --If the user is a owner
1099: IF l_user_id = l_owner_id AND l_group_id IS NOT NULL THEN
1100: OPEN c_group_users(l_owner_id);
1101: LOOP
1132: CLOSE c_group_users;
1133:
1134: END IF;
1135: CSM_UTIL_PKG.LOG('Leaving INSERT_ACC for User_id ' || p_user_id,
1136: 'CSM_USER_EVENT_PKG.INSERT_ACC',FND_LOG.LEVEL_PROCEDURE);
1137: EXCEPTION
1138: WHEN OTHERS THEN
1139: l_sqlerrno := TO_CHAR(SQLCODE);
1140: l_sqlerrmsg := TO_CHAR(SQLERRM);
1140: l_sqlerrmsg := TO_CHAR(SQLERRM);
1141: l_error_msg := 'Exception in INSERT_ACC for User_id '
1142: || TO_CHAR(p_user_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
1143:
1144: CSM_UTIL_PKG.LOG(l_error_msg,'CSM_USER_EVENT_PKG.INSERT_ACC',FND_LOG.LEVEL_EXCEPTION);
1145: RAISE;
1146: END INSERT_ACC;
1147:
1148: PROCEDURE DELETE_ACC (p_user_id IN NUMBER
1167:
1168:
1169: BEGIN
1170: CSM_UTIL_PKG.LOG('Entering DELETE_ACC for User_id ' || p_user_id,
1171: 'CSM_USER_EVENT_PKG.DELETE_ACC',FND_LOG.LEVEL_PROCEDURE);
1172:
1173: OPEN c_user_acc(p_user_id);
1174: FETCH c_user_acc INTO l_access_id,l_user_id,l_owner_id;
1175: --Do mark dirty only for the User
1186: --delete for owner,member or individual user
1187: DELETE FROM CSM_USER_ACC WHERE USER_ID =l_user_id;
1188:
1189: CSM_UTIL_PKG.LOG('User is Deleted From the Access table for User_id :' || p_user_id,
1190: 'CSM_USER_EVENT_PKG.DELETE_ACC',FND_LOG.LEVEL_PROCEDURE);
1191:
1192: END IF;
1193:
1194: CSM_UTIL_PKG.LOG('Leaving DELETE_ACC for User_id ' || p_user_id,
1191:
1192: END IF;
1193:
1194: CSM_UTIL_PKG.LOG('Leaving DELETE_ACC for User_id ' || p_user_id,
1195: 'CSM_USER_EVENT_PKG.DELETE_ACC',FND_LOG.LEVEL_PROCEDURE);
1196: EXCEPTION
1197: WHEN OTHERS THEN
1198: l_sqlerrno := TO_CHAR(SQLCODE);
1199: l_sqlerrmsg := TO_CHAR(SQLERRM);
1199: l_sqlerrmsg := TO_CHAR(SQLERRM);
1200: l_error_msg := 'Exception in DELETE_ACC for User_id '
1201: || TO_CHAR(p_user_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
1202:
1203: CSM_UTIL_PKG.LOG(l_error_msg,'CSM_USER_EVENT_PKG.DELETE_ACC',FND_LOG.LEVEL_EXCEPTION);
1204: RAISE;
1205: END DELETE_ACC;
1206:
1207: /*
1229: AND OWNER_ID = b_owner_id;
1230:
1231: BEGIN
1232: CSM_UTIL_PKG.LOG('Entering INSERT_ACC for User_id ' || p_user_id ||' and owner_id: '||p_owner_id,
1233: 'CSM_USER_EVENT_PKG.INSERT_ACC',FND_LOG.LEVEL_PROCEDURE);
1234:
1235: OPEN c_user_acc(p_user_id,p_owner_id);
1236: FETCH c_user_acc INTO l_access_id;
1237: IF c_user_acc%FOUND THEN
1235: OPEN c_user_acc(p_user_id,p_owner_id);
1236: FETCH c_user_acc INTO l_access_id;
1237: IF c_user_acc%FOUND THEN
1238: CSM_UTIL_PKG.LOG('Record already there in the Access table: (User_id,owner_id) : (' || p_user_id||','||p_owner_id||')',
1239: 'CSM_USER_EVENT_PKG.INSERT_ACC',FND_LOG.LEVEL_PROCEDURE);
1240: UPDATE CSM_USER_ACC SET COUNTER=COUNTER+1 ,LAST_UPDATE_DATE=sysdate WHERE ACCESS_ID=l_access_id;
1241: CLOSE c_user_acc;
1242: ELSE
1243:
1248: INSERT INTO CSM_USER_ACC(ACCESS_ID,USER_ID,OWNER_ID,COUNTER,LAST_UPDATE_DATE,LAST_UPDATED_BY,CREATION_DATE,CREATED_BY,LAST_UPDATE_LOGIN)
1249: VALUES (l_access_id,p_user_id,p_owner_id,1,sysdate,1,sysdate,1,1);
1250:
1251: CSM_UTIL_PKG.LOG('Record inserted into the Access table: (User_id,owner_id) : (' || p_user_id||','||p_owner_id||') and Marking dirty',
1252: 'CSM_USER_EVENT_PKG.INSERT_ACC',FND_LOG.LEVEL_PROCEDURE);
1253:
1254: l_markdirty := asg_download.mark_dirty(
1255: p_pub_item => g_pub_item
1256: , p_accessid => l_access_id
1259: , P_TIMESTAMP => sysdate
1260: );
1261: END IF;
1262:
1263: CSM_UTIL_PKG.LOG('Leaving INSERT_ACC for User_id ' || p_user_id ||' and owner_id: '||p_owner_id,'CSM_USER_EVENT_PKG.INSERT_ACC',FND_LOG.LEVEL_PROCEDURE);
1264: EXCEPTION
1265: WHEN OTHERS THEN
1266: l_sqlerrno := TO_CHAR(SQLCODE);
1267: l_sqlerrmsg := TO_CHAR(SQLERRM);
1267: l_sqlerrmsg := TO_CHAR(SQLERRM);
1268: l_error_msg := 'Exception in INSERT_ACC for User_id '
1269: || TO_CHAR(p_user_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
1270:
1271: CSM_UTIL_PKG.LOG(l_error_msg,'CSM_USER_EVENT_PKG.INSERT_ACC',FND_LOG.LEVEL_EXCEPTION);
1272: RAISE;
1273: END INSERT_ACC;
1274:
1275: PROCEDURE DELETE_ACC (p_user_id IN NUMBER,p_owner_id IN NUMBER)
1290: AND OWNER_ID = b_owner_id;
1291:
1292: BEGIN
1293: CSM_UTIL_PKG.LOG('Entering DELETE_ACC for User_id ' || p_user_id ||' and owner_id: '||p_owner_id,
1294: 'CSM_USER_EVENT_PKG.DELETE_ACC',FND_LOG.LEVEL_PROCEDURE);
1295:
1296: OPEN c_user_acc(p_user_id,p_owner_id);
1297: FETCH c_user_acc INTO l_access_id,l_counter;
1298:
1314: END IF;
1315: END IF;
1316:
1317: CSM_UTIL_PKG.LOG('Leaving DELETE_ACC for User_id ' || p_user_id ||' and owner_id: '||p_owner_id,
1318: 'CSM_USER_EVENT_PKG.DELETE_ACC',FND_LOG.LEVEL_PROCEDURE);
1319: EXCEPTION
1320: WHEN OTHERS THEN
1321: l_sqlerrno := TO_CHAR(SQLCODE);
1322: l_sqlerrmsg := TO_CHAR(SQLERRM);
1322: l_sqlerrmsg := TO_CHAR(SQLERRM);
1323: l_error_msg := 'Exception in DELETE_ACC for User_id '
1324: || TO_CHAR(p_user_id) || ':' || l_sqlerrno || ':' || l_sqlerrmsg;
1325:
1326: CSM_UTIL_PKG.LOG(l_error_msg,'CSM_USER_EVENT_PKG.DELETE_ACC',FND_LOG.LEVEL_EXCEPTION);
1327: RAISE;
1328: END DELETE_ACC;
1329:
1330: