[Home] [Help]
1: PACKAGE BODY asg_helper AS
2: /*$Header: asghlpb.pls 120.15 2011/01/10 11:15:19 saradhak ship $*/
3:
4: -- DESCRIPTION
5: -- This package is used for miscellaneous chores
141: END IF;
142: IF(check_is_log_enabled(g_stmt_level))
143: THEN
144: log('Calling populate_access_records for user: ' || p_user_name ||
145: ' and publication: ' || p_pub_name,'asg_helper',g_stmt_level);
146: END IF;
147:
148: OPEN c_wrapper_name(p_pub_name);
149: FETCH c_wrapper_name into l_wrapper_name;
151: IF l_wrapper_name IS NULL THEN
152: IF(check_is_log_enabled(g_err_level))
153: THEN
154: log('Wrapper for publication: ' || p_pub_name || ' is null',
155: 'asg_helper',g_err_level);
156: END IF;
157: RAISE_APPLICATION_ERROR(-20989, 'Callback package missing for ' ||
158: 'publication: ' || p_pub_name);
159: END IF;
164: '.populate_access_records( :1 ); END;';
165: IF(check_is_log_enabled(g_stmt_level))
166: THEN
167: log('Callback SQLCommand: ' || l_callback_string,
168: 'asg_helper',g_stmt_level);
169: END IF;
170: EXECUTE IMMEDIATE l_callback_string
171: USING l_user_id;
172: EXCEPTION
173: WHEN OTHERS THEN
174: IF(check_is_log_enabled(g_err_level))
175: THEN
176: log('Exception in call to populate access records: ' ||
177: SQLERRM, 'asg_helper',g_err_level);
178: END IF;
179: RAISE;
180: END;
181:
212: END IF;
213: IF(check_is_log_enabled(g_stmt_level))
214: THEN
215: log('Calling delete_access_records for user: ' || p_user_name ||
216: ' and publication: ' || p_pub_name,'asg_helper',g_stmt_level);
217: END IF;
218: OPEN c_wrapper_name(p_pub_name);
219: FETCH c_wrapper_name into l_wrapper_name;
220: CLOSE c_wrapper_name;
221: IF l_wrapper_name IS NULL THEN
222: IF(check_is_log_enabled(g_err_level))
223: THEN
224: log('Wrapper for publication: ' || p_pub_name || ' is null',
225: 'asg_helper',g_err_level);
226: END IF;
227: RAISE_APPLICATION_ERROR(-20989, 'Callback package missing for ' ||
228: 'publication: ' || p_pub_name);
229: END IF;
234: '.delete_access_records(:2); END;';
235: IF(check_is_log_enabled(g_stmt_level))
236: THEN
237: log('Callback SQLCommand: ' || l_callback_string,
238: 'asg_helper',g_stmt_level);
239: END IF;
240: EXECUTE IMMEDIATE l_callback_string
241: USING l_user_id;
242: EXCEPTION
243: WHEN OTHERS THEN
244: IF(check_is_log_enabled(g_err_level))
245: THEN
246: log('Exception in call to delete access records: ' ||
247: SQLERRM, 'asg_helper',g_err_level);
248: END IF;
249: RAISE;
250: END;
251:
304: THEN
305: log('Created Sequence Partition for user: ' || p_user_name ||
306: ' and sequence: ' || p_seq_name || ' with start value: ' ||
307: p_start_value || ' and next value: ' || p_next_value,
308: 'asg_helper',g_stmt_level);
309: END IF;
310:
311: END create_seq_partition;
312:
322: COMMIT;
323: IF(check_is_log_enabled(g_stmt_level))
324: THEN
325: log('Dropped Sequence Partition for user: ' || p_user_name ||
326: ' and sequence: ' || p_seq_name,'asg_helper',g_stmt_level);
327: END IF;
328: END drop_seq_partition;
329:
330: -- insert pub responsibilities
364: IF(check_is_log_enabled(g_stmt_level))
365: THEN
366: log('Created user pub responsibility record for user: ' || p_user_name ||
367: ' and publication: ' || p_pub_name || ' and responsibility id: ' ||
368: p_resp_id || ' and app id: ' || p_app_id,'asg_helper',g_stmt_level);
369: END IF;
370:
371: END insert_user_pub_resp;
372:
393: COMMIT;
394: IF(check_is_log_enabled(g_stmt_level))
395: THEN
396: log('Deleted user pub record for user: ' || p_user_name ||
397: ' and publication: ' || p_pub_name,'asg_helper',g_stmt_level);
398: END IF;
399: END delete_user_pub;
400:
401:
415: IF(check_is_log_enabled(g_stmt_level))
416: THEN
417: log('Deleted user pub responsibility record for user: ' || p_user_name ||
418: ' and publication: ' || p_pub_name || ' and responsibility id: ' ||
419: p_resp_id,'asg_helper',g_stmt_level);
420: END IF;
421: END delete_user_pub_resp;
422:
423: -- wrapper on fnd_log
508: WHEN OTHERS THEN
509: IF(check_is_log_enabled(g_err_level))
510: THEN
511: log('Exception in purgesdq during drop_user: ' || l_user_name,
512: 'asg_helper',g_err_level);
513: END IF;
514: END;
515:
516: --delete from asg_purge_sdq and asg_complete_refresh
530: COMMIT;
531: IF(check_is_log_enabled(g_stmt_level))
532: THEN
533: log('Done cleaning up user meta data during drop user: ' || p_user_name,
534: 'asg_helper',g_stmt_level);
535: END IF;
536: EXCEPTION
537: WHEN OTHERS THEN
538: IF(check_is_log_enabled(g_err_level))
537: WHEN OTHERS THEN
538: IF(check_is_log_enabled(g_err_level))
539: THEN
540: log('Exception in drop_user ' || SQLERRM,
541: 'asg_helper',g_err_level);
542: END IF;
543: RAISE;
544: END drop_user;
545:
641: enabled = 'N';
642:
643: IF l_disabled_user > 0 THEN
644: l_synch_enabled := FND_API.G_FALSE;
645: p_disabled_synch_message := asg_helper.get_param_value(
646: 'DISABLED_SYNCH_MESSAGE_UC');
647: return l_synch_enabled;
648: END IF;
649:
664: USING p_user_name;
665:
666: IF (l_disabled_pubs >0) THEN
667: l_synch_enabled := FND_API.G_FALSE;
668: p_disabled_synch_message := asg_helper.get_param_value(
669: 'DISABLED_SYNCH_MESSAGE_ACC');
670: return l_synch_enabled;
671: END IF;
672:
689: USING p_user_name;
690:
691: IF (l_disabled_pubs >0) THEN
692: l_synch_enabled := FND_API.G_FALSE;
693: p_disabled_synch_message := asg_helper.get_param_value(
694: 'DISABLED_SYNCH_MESSAGE_PATCH');
695: END IF;
696:
697: return l_synch_enabled;
1007: wf_event.raise(p_event_name=>'oracle.apps.asg.sync.failure',
1008: p_event_key=>to_char(l_session_id),p_parameters=>l_wf_param.getParameterList,
1009: p_event_data=>null,p_send_date=>null);
1010:
1011: log('Raised event oracle.apps.asg.sync.failure','asg_helper.raise_sync_error_event',g_stmt_level);
1012:
1013: EXCEPTION
1014: WHEN others THEN
1015: l_sqlerrno := to_char(SQLCODE);
1013: EXCEPTION
1014: WHEN others THEN
1015: l_sqlerrno := to_char(SQLCODE);
1016: l_sqlerrmsg := substr(SQLERRM, 1,2000);
1017: log('Failed raising event oracle.apps.asg.sync.failure - '||l_sqlerrno||':'||l_sqlerrmsg,'asg_helper.raise_sync_error_event',g_err_level);
1018: END raise_sync_error_event;
1019:
1020: --API for autonomous update of hwm_tranid and synch_errors.
1021: --if p_tranid is null the hwm_tranid col is not changed.
1041: OPEN get_pub(p_device_type);
1042: LOOP
1043: FETCH get_pub INTO l_pub_name;
1044: EXIT WHEN get_pub%NOTFOUND;
1045: log('Setting synch time for pub_name: '||l_pub_name,'asg_helper',g_stmt_level);
1046: UPDATE asg_user_pub_resps
1047: SET synch_date = sysdate
1048: WHERE user_name = p_user_name
1049: AND pub_name = l_pub_name;
1523: END enable_olite_privs;
1524:
1525:
1526:
1527: END asg_helper;