387: --and old status is not same as new status
388: AND (l_old_iso_header_rec.SYSTEM_STATUS <>l_iso_header_rec.SYSTEM_STATUS)
389: )
390: ) THEN
391: l_test := (WF_EVENT.TEST(l_status_pending_event));
392:
393: IF(WF_EVENT.TEST(l_status_pending_event) <> 'NONE') THEN
394:
395: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug ('Calling iSOLATION Wkflow required check API...') ; END IF;
389: )
390: ) THEN
391: l_test := (WF_EVENT.TEST(l_status_pending_event));
392:
393: IF(WF_EVENT.TEST(l_status_pending_event) <> 'NONE') THEN
394:
395: IF EAM_PROCESS_WO_PVT.Get_Debug = 'Y' THEN EAM_ERROR_MESSAGE_PVT.Write_Debug ('Calling iSOLATION Wkflow required check API...') ; END IF;
396:
397:
853: l_status_pending_event VARCHAR2(240);
854: l_event_name VARCHAR2(240);
855: l_parameter_list wf_parameter_list_t;
856: l_event_key VARCHAR2(200);
857: l_wf_event_seq NUMBER;
858: l_return_status VARCHAR2(1);
859: l_err_text VARCHAR2(2000);
860: l_msg_count NUMBER;
861: BEGIN
864: l_status_pending_event := 'oracle.apps.eam.isolation.status.change.pending';
865:
866:
867: --if status change needs approval
868: IF( p_approval_required AND (WF_EVENT.TEST(l_status_pending_event) <> 'NONE')) THEN
869:
870: SELECT EAM_SAFETYWORKFLOW_EVENT_S.NEXTVAL
871: INTO l_wf_event_seq
872: FROM DUAL;
867: --if status change needs approval
868: IF( p_approval_required AND (WF_EVENT.TEST(l_status_pending_event) <> 'NONE')) THEN
869:
870: SELECT EAM_SAFETYWORKFLOW_EVENT_S.NEXTVAL
871: INTO l_wf_event_seq
872: FROM DUAL;
873:
874: l_parameter_list := wf_parameter_list_t();
875: l_event_name := l_status_pending_event;
873:
874: l_parameter_list := wf_parameter_list_t();
875: l_event_name := l_status_pending_event;
876:
877: l_event_key := TO_CHAR(l_wf_event_seq);
878: INSERT INTO EAM_SAFETY_WORKFLOWS
879: (OBJECT_ID,TRANSACTION_ID,WORKFLOW_TYPE,LAST_UPDATE_DATE,LAST_UPDATED_BY,
880: CREATION_DATE,CREATED_BY,LAST_UPDATE_LOGIN)
881: VALUES
878: INSERT INTO EAM_SAFETY_WORKFLOWS
879: (OBJECT_ID,TRANSACTION_ID,WORKFLOW_TYPE,LAST_UPDATE_DATE,LAST_UPDATED_BY,
880: CREATION_DATE,CREATED_BY,LAST_UPDATE_LOGIN)
881: VALUES
882: (p_eam_iso_rec.isolation_id,l_wf_event_seq,1,SYSDATE,FND_GLOBAL.user_id,
883: SYSDATE,FND_GLOBAL.user_id,FND_GLOBAL.login_id
884: );
885:
886:
885:
886:
887: WF_CORE.CONTEXT('Enterprise Asset Management...','Isolation Released change event','Building parameter list');
888: -- Add Parameters
889: Wf_Event.AddParameterToList(p_name =>'ISOLATION_ID',
890: p_value => TO_CHAR(p_eam_iso_rec.isolation_id),
891: p_parameterlist => l_parameter_list);
892: Wf_Event.AddParameterToList(p_name =>'ISOLATION_NAME',
893: p_value =>p_eam_iso_rec.isolation_name,
888: -- Add Parameters
889: Wf_Event.AddParameterToList(p_name =>'ISOLATION_ID',
890: p_value => TO_CHAR(p_eam_iso_rec.isolation_id),
891: p_parameterlist => l_parameter_list);
892: Wf_Event.AddParameterToList(p_name =>'ISOLATION_NAME',
893: p_value =>p_eam_iso_rec.isolation_name,
894: p_parameterlist => l_parameter_list);
895: Wf_Event.AddParameterToList(p_name =>'ORGANIZATION_ID',
896: p_value => TO_CHAR(p_eam_iso_rec.organization_id),
891: p_parameterlist => l_parameter_list);
892: Wf_Event.AddParameterToList(p_name =>'ISOLATION_NAME',
893: p_value =>p_eam_iso_rec.isolation_name,
894: p_parameterlist => l_parameter_list);
895: Wf_Event.AddParameterToList(p_name =>'ORGANIZATION_ID',
896: p_value => TO_CHAR(p_eam_iso_rec.organization_id),
897: p_parameterlist => l_parameter_list);
898: Wf_Event.AddParameterToList(p_name =>'NEW_USER_STATUS',
899: p_value => TO_CHAR(p_eam_iso_rec.USER_DEFINED_STATUS),
894: p_parameterlist => l_parameter_list);
895: Wf_Event.AddParameterToList(p_name =>'ORGANIZATION_ID',
896: p_value => TO_CHAR(p_eam_iso_rec.organization_id),
897: p_parameterlist => l_parameter_list);
898: Wf_Event.AddParameterToList(p_name =>'NEW_USER_STATUS',
899: p_value => TO_CHAR(p_eam_iso_rec.USER_DEFINED_STATUS),
900: p_parameterlist => l_parameter_list);
901: Wf_Event.AddParameterToList(p_name =>'OLD_SYSTEM_STATUS',
902: p_value => TO_CHAR(p_eam_iso_rec.SYSTEM_STATUS),
897: p_parameterlist => l_parameter_list);
898: Wf_Event.AddParameterToList(p_name =>'NEW_USER_STATUS',
899: p_value => TO_CHAR(p_eam_iso_rec.USER_DEFINED_STATUS),
900: p_parameterlist => l_parameter_list);
901: Wf_Event.AddParameterToList(p_name =>'OLD_SYSTEM_STATUS',
902: p_value => TO_CHAR(p_eam_iso_rec.SYSTEM_STATUS),
903: p_parameterlist => l_parameter_list);
904: Wf_Event.AddParameterToList(p_name =>'OLD_USER_STATUS',
905: p_value => TO_CHAR(p_old_eam_iso_rec.USER_DEFINED_STATUS),
900: p_parameterlist => l_parameter_list);
901: Wf_Event.AddParameterToList(p_name =>'OLD_SYSTEM_STATUS',
902: p_value => TO_CHAR(p_eam_iso_rec.SYSTEM_STATUS),
903: p_parameterlist => l_parameter_list);
904: Wf_Event.AddParameterToList(p_name =>'OLD_USER_STATUS',
905: p_value => TO_CHAR(p_old_eam_iso_rec.USER_DEFINED_STATUS),
906: p_parameterlist => l_parameter_list);
907: Wf_Event.AddParameterToList(p_name =>'NEW_SYSTEM_STATUS',
908: p_value => TO_CHAR(p_new_system_status),
903: p_parameterlist => l_parameter_list);
904: Wf_Event.AddParameterToList(p_name =>'OLD_USER_STATUS',
905: p_value => TO_CHAR(p_old_eam_iso_rec.USER_DEFINED_STATUS),
906: p_parameterlist => l_parameter_list);
907: Wf_Event.AddParameterToList(p_name =>'NEW_SYSTEM_STATUS',
908: p_value => TO_CHAR(p_new_system_status),
909: p_parameterlist => l_parameter_list);
910: Wf_Event.AddParameterToList(p_name =>'WORKFLOW_TYPE',
911: p_value => TO_CHAR(1),
906: p_parameterlist => l_parameter_list);
907: Wf_Event.AddParameterToList(p_name =>'NEW_SYSTEM_STATUS',
908: p_value => TO_CHAR(p_new_system_status),
909: p_parameterlist => l_parameter_list);
910: Wf_Event.AddParameterToList(p_name =>'WORKFLOW_TYPE',
911: p_value => TO_CHAR(1),
912: p_parameterlist => l_parameter_list);
913: Wf_Event.AddParameterToList(p_name =>'REQUESTOR',
914: p_value =>FND_GLOBAL.USER_NAME ,
909: p_parameterlist => l_parameter_list);
910: Wf_Event.AddParameterToList(p_name =>'WORKFLOW_TYPE',
911: p_value => TO_CHAR(1),
912: p_parameterlist => l_parameter_list);
913: Wf_Event.AddParameterToList(p_name =>'REQUESTOR',
914: p_value =>FND_GLOBAL.USER_NAME ,
915: p_parameterlist => l_parameter_list);
916: Wf_Event.AddParameterToList(p_name =>'WORKFLOW_NAME',
917: p_value => p_workflow_name,
912: p_parameterlist => l_parameter_list);
913: Wf_Event.AddParameterToList(p_name =>'REQUESTOR',
914: p_value =>FND_GLOBAL.USER_NAME ,
915: p_parameterlist => l_parameter_list);
916: Wf_Event.AddParameterToList(p_name =>'WORKFLOW_NAME',
917: p_value => p_workflow_name,
918: p_parameterlist => l_parameter_list);
919: Wf_Event.AddParameterToList(p_name =>'WORKFLOW_PROCESS',
920: p_value => p_workflow_process,
915: p_parameterlist => l_parameter_list);
916: Wf_Event.AddParameterToList(p_name =>'WORKFLOW_NAME',
917: p_value => p_workflow_name,
918: p_parameterlist => l_parameter_list);
919: Wf_Event.AddParameterToList(p_name =>'WORKFLOW_PROCESS',
920: p_value => p_workflow_process,
921: p_parameterlist => l_parameter_list);
922: Wf_Core.Context('Enterprise Asset Management...','Isolation Released Event','Raising event');
923:
920: p_value => p_workflow_process,
921: p_parameterlist => l_parameter_list);
922: Wf_Core.Context('Enterprise Asset Management...','Isolation Released Event','Raising event');
923:
924: Wf_Event.Raise( p_event_name => l_event_name,
925: p_event_key => l_event_key,
926: p_parameters => l_parameter_list);
927: l_parameter_list.DELETE;
928: WF_CORE.CONTEXT('Enterprise Asset Management...','Isolation Released Event','After raising event');