Передача в процедуру параметра Clob

Добрый день, жители форума.
Прочитала все, что нашла на форуме про Clob, но так и не поняла, как передать его в процедуру.


Нужно записать в переменную mega_mess типа varchar2 текст, потом передать его переменной mega_mess_clob типа Clob, затем вызвать процедуру с параметром mega_mess_clob.

Procedure A
as
mega_mess varchar2(4000);
mega_mess_clob clob;
...
begin
mega_mess :='';
mega_mess_clob:=null;
...
mega_mess:='text';
mega_mess_clob:=TO_CLOB(mega_mess);
procedure_A('parametr_1', 'parametr_2', ..., 'parametr_n', mega_mess_clob); -- ???
end;

Никто не может помочь? ..

Procedure A
as 
mega_mess varchar2(4000);
mega_mess_clob clob;
...
begin
...
mega_mess:='text';
dbms_lob.createtemporary(mega_mess_clob, true);
dbms_lob.writeappend(mega_mess_clob, length(mega_mess), mega_mess);
procedure_A('parametr_1', 'parametr_2', ..., 'parametr_n', mega_mess_clob);
...
dbms_lob.freetemporary(mega_mess_clob);
...
end;

Большое спасибо! Работает!