Code: Select all
begin
case :APEX$ROW_STATUS
when 'I' then
insert into emp ( empno, ename, deptno )
values ( :EMPNO, :ENAME, :DEPTNO )
returning rowid into :ROWID;
when 'U' then
update emp
set ename = :ENAME,
deptno = :DEPTNO
where rowid = :ROWID;
when 'D' then
delete emp
where rowid = :ROWID;
end case;
end;