The following lines contain the word 'select', 'insert', 'update' or 'delete':
update_mth_event_action(l_event_id, p_action_statuses);
INSERT INTO MTH_EVENTS
(EVENT_ID,EVENT_TYPE,EVENT_DESCRIPTION,REASON_CODE,TAG_READING_TIME,EQUIPMENT_FK_KEY,
SHIFT_WORKDAY_FK_KEY,WORKORDER_FK_KEY,EQUIP_STATUS,
CREATION_DATE, LAST_UPDATE_DATE,CREATION_SYSTEM_ID,LAST_UPDATE_SYSTEM_ID,CREATED_BY,
LAST_UPDATE_LOGIN,LAST_UPDATED_BY)
VALUES (mth_events_d_seq.nextval, p_event_type, p_event_description, p_reason_code, p_reading_time, p_equipment_fk_key,
p_shift_workday_fk_key, p_workorder_fk_key, p_equip_status, SYSDATE, SYSDATE, -1, -99999, -1,
-99999, -99999);
SELECT mth_events_d_seq.CURRVAL INTO l_event_id FROM dual;
SELECT A.PERSONNEL_FK_KEY, A.EMAIL_NOTIFICATION, A.MOBILE_NOTIFICATION,
A.ACTION_TYPE_CODE,
CASE WHEN A.ACTION_HANDLER_CODE IS NOT NULL THEN
DECODE( A.ACTION_HANDLER_CODE, A.ACTION_HANDLER_CODE,
(SELECT B.DESCRIPTION FROM FND_LOOKUPS B
WHERE B.LOOKUP_CODE = A.ACTION_HANDLER_CODE
AND B.LOOKUP_TYPE IN ('MTH_CUSTOM_PLSQL_API','MTH_CUSTOM_WS_API') ))
END AS ACTION_HANLDER_API, A.DOMAIN_NAME
FROM MTH_EVENT_ACTION_SETUP A, MTH_EVENT_SETUP C, MTH_PERSONNEL_D D
WHERE A.EVENT_SETUP_ID = C.EVENT_SETUP_ID
AND C.EVENT_TYPE_CODE = p_event_type
AND C.EQUIPMENT_FK_KEY = p_equipment_fk_key
AND A.PERSONNEL_FK_KEY = D.PERSONNEL_PK_KEY (+)
AND SYSDATE BETWEEN Nvl(D.EFFECTIVE_START_DATE, SYSDATE) AND Nvl(D.EFFECTIVE_END_DATE, SYSDATE)
AND Nvl(C.REASON_CODE,'x') = Nvl(p_reason_code,'x');
PROCEDURE UPDATE_MTH_EVENT_ACTION (p_event_id IN NUMBER,
p_action_statuses IN ActionStatusTableType)
AS
l_action_status_rec ActionStatusRec;
INSERT INTO MTH_EVENT_ACTIONS
(EVENT_ID, ACTION_TYPE_CODE, LINE_NUM, NOTIFICATION_ID, NOTIFICATION_CONTENT, ACTION_REFERENCE_ID,
ACTION_STATUS, ACTION_HANDLER_API, CREATION_DATE, LAST_UPDATE_DATE, CREATION_SYSTEM_ID, LAST_UPDATE_SYSTEM_ID)
VALUES (p_event_id, l_action_status_rec.action_type_code, j,
l_action_status_rec.notification_id,
l_action_status_rec.notification_content,
l_action_status_rec.action_reference_id,
l_action_status_rec.action_status,
l_action_status_rec.action_handler_api,
SYSDATE, SYSDATE, -99999,-99999);
raise_application_error(-20003,'Unknown Exception to Insert MTH_EVENT_ACTIONS');
END UPDATE_MTH_EVENT_ACTION;
SELECT b.equipment_name, a.event_type, a.event_description, To_Char(a.creation_date,'yyyy.mm.dd hh24:mi:ss')
INTO l_equip_name, l_event_type, l_event_description, l_event_time
FROM MTH_EVENTS a, MTH_EQUIPMENTS_D b
WHERE a.event_id = p_event_id
AND a.equipment_fk_key = b.equipment_pk_key;
SELECT email_address
INTO l_email_id
FROM MTH_PERSONNEL_D
WHERE personnel_pk_key = p_event_action_rec.person_fk_key;
SELECT mobile_phone_number
INTO l_mobile_id
FROM MTH_PERSONNEL_D
WHERE personnel_pk_key = p_event_action_rec.person_fk_key;
SELECT b.serial_number, d.ebs_organization_id, c.ASSET_NUMBER, c.ASSET_GROUP_ID
FROM MTH_EVENTS a, MTH_EQUIPMENTS_D b, MTH_ASSET_MST c, MTH_ORGANIZATIONS_L d ,MTH_SYSTEMS_SETUP e
WHERE a.event_id = p_event_id
AND a.equipment_fk_key = b.equipment_pk_key
AND d.ORGANIZATION_CODE = c.maintenance_org_code
AND b.serial_number = c.serial_number (+)
AND l_system_pk=e.system_pk
AND d.system_fk_key=e.system_pk_key;
l_str := 'SELECT fnd_profile.Value@ ' || fnd_profile.Value('MTH_SOURCE_INSTANCE_DBLINK') || '(''MTH_EBS_GLOBAL_NAME'') FROM dual';
l_sql := 'SELECT WORK_REQUEST_ID ' ||
' FROM WIP_EAM_WORK_REQUESTS@'||l_dblink||
' WHERE ASSET_NUMBER = :1 ' ||
' AND ASSET_GROUP = :2 ' ||
' AND ORGANIZATION_ID = :3 ' ||
' AND DESCRIPTION = :4 ';