Нужен ли триггер в этом случае. Если похожего обоснования нет в Reasons to Use Triggers, то причина очень часто - скрыть код от коллег, чтобы они его не сразу нашли.
Далее, следует учесть, что "пустой" и NULL
(неопределён), это не одно и тоже.
Посмотрите, как всё красиво получается, приняв во внимание выше изложенное:
create table docs (
id int generated by default on null as identity,
name varchar2 (16), doc clob, len number, status varchar2 (12))
/
create or replace package docpack as
procedure new (name varchar2, doc clob := empty_clob ());
procedure process (id number, doc clob);
end;
/
create or replace package body docpack as
procedure new (name varchar2, doc clob := empty_clob ()) as
id number;
begin
insert into docs values (null, name, doc, length (doc), 'new')
returning id into id;
if doc != empty_clob () then process (id, doc); end if;
end;
procedure process (id number, doc clob) is
begin
/* do something */
update docs set status = 'processed'
where id = process.id;
end;
end;
/
И использовать не сложно:
exec -
docpack.new ('1st doc'); -
docpack.new ('2nd doc', 'abc 123');
select * from docs;
ID NAME DOC LEN STATUS
---------- ---------------- -------- ---------- ------------
1 1st doc 0 new
2 2nd doc abc 123 7 processed