The following lines contain the word 'select', 'insert', 'update' or 'delete':
P_DELETEABLE_FLAG in varchar2,
P_LAST_UPDATE_DATE in varchar2,
P_ENABLE_NONSEED_FLAG in VARCHAR2,
P_CUSTOM_MODE in VARCHAR2
)
is
l_demand_plan_id number;
f_ludate date; -- entity update date in file
db_ludate date; -- entity update date in db
select DEMAND_PLAN_ID
into l_demand_plan_id
from MSD_DEMAND_PLANS
where DEMAND_PLAN_NAME = P_DEMAND_PLAN_NAME;
select EVENT_ID
into l_event_id
from MSD_EVENTS
where EVENT_NAME = P_EVENT;
f_ludate := nvl(to_date(P_LAST_UPDATE_DATE, 'YYYY/MM/DD'), sysdate);
select LAST_UPDATED_BY, LAST_UPDATE_DATE
into db_luby, db_ludate
from msd_dp_events
where DEMAND_PLAN_ID = l_demand_plan_id
and EVENT_ID = l_event_id;
-- Update existing row
update msd_dp_events
set last_update_date = f_ludate ,
deleteable_flag = P_DELETEABLE_FLAG ,
enable_nonseed_flag = P_ENABLE_NONSEED_FLAG ,
last_updated_by = f_luby ,
last_update_login = 0
where demand_plan_id = l_demand_plan_id
and event_id = l_event_id;
insert into msd_dp_events
(DEMAND_PLAN_ID ,
DP_EVENT_ID,
EVENT_ID,
CREATION_DATE ,
CREATED_BY ,
LAST_UPDATE_DATE ,
LAST_UPDATED_BY ,
LAST_UPDATE_LOGIN ,
ENABLE_NONSEED_FLAG ,
DELETEABLE_FLAG
)
values
(l_demand_plan_id ,
msd_dp_events_s.nextval,
l_event_id,
f_ludate ,
f_luby ,
f_ludate ,
f_luby ,
0 ,
P_ENABLE_NONSEED_FLAG ,
P_DELETEABLE_FLAG
);