create or replace procedure sini_test as
i integer;
x integer;
begin
i:=dbms_sql.open_cursor;
dbms_sql.parse(i,'insert into a values(1)',dbms_sql.v7);
x:=dbms_sql.execute(i);
dbms_output.put_line('ODCIColInfo');
exception when others then
if dbms_sql.is_open(i) then
dbms_sql.close_cursor(i);
end if;
raise;
end;