The following lines contain the word 'select', 'insert', 'update' or 'delete':
procedure INSERT_ROW (
PX_EVENT_CONDITION_ID in out NOCOPY NUMBER,
P_FROM_TO_STATUS_CODE in VARCHAR2,
P_INCIDENT_STATUS_ID in NUMBER,
P_RELATIONSHIP_TYPE_ID in NUMBER,
P_START_DATE_ACTIVE in DATE,
P_END_DATE_ACTIVE in DATE,
P_SEEDED_FLAG in VARCHAR2,
P_APPLICATION_ID in NUMBER,
P_EVENT_CODE in VARCHAR2,
P_CREATION_DATE in DATE,
P_CREATED_BY in NUMBER,
P_LAST_UPDATE_DATE in DATE,
P_LAST_UPDATED_BY in NUMBER,
P_LAST_UPDATE_LOGIN in NUMBER,
X_OBJECT_VERSION_NUMBER out NOCOPY NUMBER
) is
CURSOR C2 IS SELECT CS_SR_ACTION_TRIGGERS_S.nextval FROM sys.dual;
insert into CS_SR_ACTION_TRIGGERS (
EVENT_CONDITION_ID,
EVENT_CODE,
FROM_TO_STATUS_CODE,
INCIDENT_STATUS_ID,
RELATIONSHIP_TYPE_ID,
START_DATE_ACTIVE,
END_DATE_ACTIVE,
SEEDED_FLAG,
APPLICATION_ID,
CREATED_BY,
CREATION_DATE,
LAST_UPDATE_DATE,
LAST_UPDATE_LOGIN,
LAST_UPDATED_BY,
OBJECT_VERSION_NUMBER
) values (
PX_EVENT_CONDITION_ID,
P_EVENT_CODE,
P_FROM_TO_STATUS_CODE,
P_INCIDENT_STATUS_ID,
P_RELATIONSHIP_TYPE_ID,
P_START_DATE_ACTIVE,
P_END_DATE_ACTIVE,
P_SEEDED_FLAG,
P_APPLICATION_ID,
P_CREATED_BY,
P_CREATION_DATE,
P_LAST_UPDATE_DATE,
P_LAST_UPDATE_LOGIN,
P_LAST_UPDATED_BY,
L_OBJECT_VERSION_NUMBER
);
end INSERT_ROW;
cursor c is select
OBJECT_VERSION_NUMBER
from CS_SR_ACTION_TRIGGERS
where EVENT_CONDITION_ID = P_EVENT_CONDITION_ID
for update of EVENT_CONDITION_ID nowait;
fnd_message.set_name('FND', 'FORM_RECORD_DELETED');
procedure UPDATE_ROW (
P_EVENT_CONDITION_ID in NUMBER,
P_FROM_TO_STATUS_CODE in VARCHAR2,
P_INCIDENT_STATUS_ID in NUMBER,
P_RELATIONSHIP_TYPE_ID in NUMBER,
P_START_DATE_ACTIVE in DATE,
P_END_DATE_ACTIVE in DATE,
P_SEEDED_FLAG in VARCHAR2,
P_APPLICATION_ID in NUMBER,
P_EVENT_CODE in VARCHAR2,
P_LAST_UPDATE_DATE in DATE,
P_LAST_UPDATED_BY in NUMBER,
P_LAST_UPDATE_LOGIN in NUMBER,
X_OBJECT_VERSION_NUMBER out NOCOPY NUMBER
) is
l_object_Version_number number;
update CS_SR_ACTION_TRIGGERS set
OBJECT_VERSION_NUMBER = OBJECT_VERSION_NUMBER + 1,
FROM_TO_STATUS_CODE = P_FROM_TO_STATUS_CODE,
INCIDENT_STATUS_ID = P_INCIDENT_STATUS_ID,
RELATIONSHIP_TYPE_ID = P_RELATIONSHIP_TYPE_ID,
START_DATE_ACTIVE = P_START_DATE_ACTIVE,
END_DATE_ACTIVE = P_END_DATE_ACTIVE,
SEEDED_FLAG = P_SEEDED_FLAG,
APPLICATION_ID = P_APPLICATION_ID,
EVENT_CODE = P_EVENT_CODE,
LAST_UPDATE_DATE = P_LAST_UPDATE_DATE,
LAST_UPDATED_BY = P_LAST_UPDATED_BY,
LAST_UPDATE_LOGIN = P_LAST_UPDATE_LOGIN
where EVENT_CONDITION_ID = P_EVENT_CONDITION_ID
RETURNING OBJECT_VERSION_NUMBER INTO L_OBJECT_VERSION_NUMBER;
end UPDATE_ROW;
procedure DELETE_ROW (
P_EVENT_CONDITION_ID in NUMBER
) is
begin
delete from CS_SR_ACTION_TRIGGERS
where EVENT_CONDITION_ID = P_EVENT_CONDITION_ID;
end DELETE_ROW;
P_LAST_UPDATE_DATE IN VARCHAR2,
P_LAST_UPDATED_BY IN NUMBER,
P_LAST_UPDATE_LOGIN IN NUMBER,
P_OBJECT_VERSION_NUMBER IN NUMBER
)
IS
-- Out local variables for the update / insert row procedures.
lx_object_version_number NUMBER := 0;
UPDATE_ROW (
P_EVENT_CONDITION_ID =>l_event_condition_id,
P_FROM_TO_STATUS_CODE =>p_from_to_status_code,
P_INCIDENT_STATUS_ID =>p_incident_status_id,
P_RELATIONSHIP_TYPE_ID =>p_relationship_type_id,
P_START_DATE_ACTIVE =>to_date(p_start_date_active,'DD-MM-YYYY'),
P_END_DATE_ACTIVE =>to_date(p_end_date_active,'DD-MM-YYYY'),
P_SEEDED_FLAG =>p_seeded_flag,
P_APPLICATION_ID =>p_application_id,
P_EVENT_CODE =>p_event_code,
P_LAST_UPDATE_DATE =>nvl(to_date(p_last_update_date,
'DD-MM-YYYY'),sysdate),
P_LAST_UPDATED_BY =>l_user_id,
P_LAST_UPDATE_LOGIN =>0,
X_OBJECT_VERSION_NUMBER =>lx_object_version_number
);
INSERT_ROW (
PX_EVENT_CONDITION_ID =>l_event_condition_id,
P_FROM_TO_STATUS_CODE =>p_from_to_status_code,
P_INCIDENT_STATUS_ID =>p_incident_status_id,
P_RELATIONSHIP_TYPE_ID =>p_relationship_type_id,
P_START_DATE_ACTIVE =>to_date(p_start_date_active,'DD-MM-YYYY'),
P_END_DATE_ACTIVE =>to_date(p_end_date_active,'DD-MM-YYYY'),
P_SEEDED_FLAG =>p_seeded_flag,
P_APPLICATION_ID =>p_application_id,
P_EVENT_CODE =>p_event_code,
P_CREATION_DATE =>nvl(to_date( p_creation_date,
'DD-MM-YYYY'),sysdate),
P_CREATED_BY =>l_user_id,
P_LAST_UPDATE_DATE =>nvl(to_date(p_last_update_date,
'DD-MM-YYYY'),sysdate),
P_LAST_UPDATED_BY =>l_user_id,
P_LAST_UPDATE_LOGIN =>0,
X_OBJECT_VERSION_NUMBER =>lx_object_version_number
);