52: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
53: then
54: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
55: end if;
56: if (p_event_type = wf_oid.IDENTITY_MODIFY) then
57: if (fnd_log.LEVEL_STATEMENT >= fnd_log.G_CURRENT_RUNTIME_LEVEL) then
58: fnd_log.string(fnd_log.LEVEL_STATEMENT, l_module_source, 'IDENTITY_MODIFY '
59: || 'event is handled by fnd_user_pkg.user_change().');
60: end if;
63: --Check whether this guid already exists. Don't raise alerts because we receive echo
64: --from OID for each user that is created.
65: l_apps_userguid_key := fnd_oid_util.get_fnd_user(p_user_guid => p_user_guid);
66: -- Disable user in FND when user unsubscribed from the application in OID
67: if (p_event_type = wf_oid.SUBSCRIPTION_DELETE) then
68: update fnd_user set end_date= sysdate
69: where user_name = l_apps_userguid_key.user_name;
70: end if;
71: if (l_apps_userguid_key.user_id is not null) then
322: 'EBIZ is NOW capable of understanding IDENTITY_ADD');
323: end if;
324: --RDESPOTO, Add IDENTITY_ADD, 11/09/2004
325: l_event_key := p_event.GetEventKey;
326: l_event_name := WF_OID.IDENTITY_ADD;
327:
328: l_change_source := p_event.GetValueForParameter(
329: fnd_oid_util.G_CHANGE_SOURCE);
330:
346: end if;
347: -- Maintain IDENTITY_ADD event type to pick up email and fax correctly
348: fnd_create_update(
349: p_wf_event => p_event
350: , p_event_type => wf_oid.IDENTITY_ADD
351: , p_user_name => l_event_key
352: , p_user_guid => l_orcl_guid
353: , x_user_id => l_user_id
354: );
386: l_orcl_guid := p_event.GetValueForParameter(
387: fnd_oid_util.G_ORCLGUID);
388: fnd_create_update(
389: p_wf_event => p_event
390: , p_event_type => WF_OID.IDENTITY_MODIFY
391: , p_user_name => p_event.GetEventKey()
392: , p_user_guid => l_orcl_guid
393: , x_user_id => l_user_id
394: );
489: then
490: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
491: end if;
492: l_event_key := p_event.GetEventKey;
493: l_event_name := WF_OID.SUBSCRIPTION_ADD;
494:
495: l_change_source := p_event.GetValueForParameter(
496: fnd_oid_util.G_CHANGE_SOURCE);
497:
512: || l_orcl_guid || ', user_name is ' || l_event_key);
513: end if;
514: fnd_create_update(
515: p_wf_event => p_event
516: , p_event_type => wf_oid.SUBSCRIPTION_ADD
517: , p_user_name => l_event_key
518: , p_user_guid => l_orcl_guid
519: , x_user_id => l_user_id
520: );
571: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
572: end if;
573:
574: l_event_key := p_event.GetEventKey;
575: l_event_name := WF_OID.SUBSCRIPTION_DELETE;
576: l_change_source := p_event.GetValueForParameter(
577: fnd_oid_util.G_CHANGE_SOURCE);
578:
579: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)
590: then
591: insert into wf_entity_changes(
592: entity_type, entity_key_value, flavor, change_date)
593: values(
594: wf_oid.SUBSCRIPTION_DELETE, l_event_key, l_change_source, sysdate);
595:
596: else
597: --Rada, 01/31/2005
598: l_orcl_guid := p_event.GetValueForParameter(
610: , p_end_date => fnd_oid_util.G_NULL
611: , x_user_id => l_user_id);*/
612: fnd_create_update(
613: p_wf_event => p_event
614: , p_event_type => wf_oid.SUBSCRIPTION_DELETE
615: , p_user_name => l_event_key
616: , p_user_guid => l_orcl_guid
617: , x_user_id => l_user_id
618: );
994: --Change_source has to be OID
995: if (l_change_source = fnd_oid_util.G_OID) then
996: hz_create_update(
997: p_wf_event => p_event
998: , p_event_type => wf_oid.IDENTITY_ADD
999: , p_return_status => l_return_status);
1000: --RDESPOTO, End IDENTITY_ADD
1001: end if;
1002:
1031: end if;
1032:
1033: hz_create_update(
1034: p_wf_event => p_event
1035: , p_event_type => wf_oid.IDENTITY_MODIFY
1036: , p_return_status => l_return_status);
1037:
1038: if (l_return_status <> fnd_api.G_RET_STS_SUCCESS)
1039: then
1114: end if;
1115:
1116: hz_create_update(
1117: p_wf_event => p_event
1118: , p_event_type => wf_oid.SUBSCRIPTION_ADD
1119: , p_return_status => l_return_status);
1120:
1121: if (l_return_status <> fnd_api.G_RET_STS_SUCCESS)
1122: then
1386: fnd_log.string(fnd_log.LEVEL_PROCEDURE, l_module_source, 'Begin');
1387: end if;
1388:
1389: l_event_key := p_event.GetEventKey;
1390: l_event_name := WF_OID.SUBSCRIPTION_ADD;
1391: l_change_source := p_event.GetValueForParameter(
1392: fnd_oid_util.G_CHANGE_SOURCE);
1393:
1394: if (fnd_log.LEVEL_PROCEDURE >= fnd_log.G_CURRENT_RUNTIME_LEVEL)