DECLARE
  CODIGO NUMBER;
  DATOS SYS_REFCURSOR;
  L_ROW NUMBER;
BEGIN
  CODIGO := 10441;
  PKG_PROCEDIMIENTOS.CONSULTARDATOS( CODIGO => CODIGO , DATOS => DATOS );
  LOOP
    FETCH DATOS INTO L_ROW;
    EXIT  WHEN DATOS%NOTFOUND;
    DBMS_OUTPUT.PUT_LINE('DATO= ' || L_ROW);
  END LOOP;
END;
SARIRI
Hace 16 años
 
 
 
 Entradas
Entradas
 
 
No hay comentarios:
Publicar un comentario