Menu de navegação

[Anônimo]

❓ Como posso resolver o problema de n?mero de cursores excedido? J? aumentei o par?metro open_cursor no init do banco. No script que estou executando cada cursor que ? aberto ? fechado cfe. segue:
Declare
compilation_error Exception;
Pragma Exception_Init(compilation_error, -24344);
mcount INTEGER;

comando_w Varchar2(1000);

PROCEDURE compila( comando VARCHAR2 ) IS
l_cursor Integer Default 0;
rc Integer Default 0;
BEGIN
l_cursor := dbms_sql.open_cursor;
dbms_sql.parse(l_cursor, comando, dbms_sql.native);
rc := dbms_sql.Execute(l_cursor);
dbms_sql.close_cursor(l_cursor);
EXCEPTION
When compilation_error THEN
dbms_output.put_line(comando || ‘;’);
dbms_output.put_line(‘show err;’);
End;

[Autor]

Posts