Reescritura de procedimientos almacenados de Oracle

Crear o reemplazar el procedimiento pro_unit_cacl(v_string varchar2, cur_arg out sys_refcursor)

Como

num número;

num1 número;

C2 varchar 2(50);

El cursor cur2 es

seleccione _ char(a . WYID)De v _ unit _ classifty a donde a . p>

Inicio

Abrir cur2

Anillo

Ingrese cur2 a C2;

seleccione d . v _ unidad _ clase cincuenta d donde d WYID = c2

num:= 1;

mientras num lt=num1 bucle

Inicio

.

Insertar en unidad _ house select d . FILE _ ID, d.FILE_TYPE, d.TYPE, 0, 0, d . FILE _ TYPE | , 5)), 1, 0) | ' _ ' | d. TIPO | ' _ ' | _ unidad gtJBWH';

num: = num 1;

;

Fin;

Finalizar bucle;

Salir cuando cur2Notfound;

Finalizar bucle;

Cerrar cur2

abre cur _ arg para seleccionar * de la unidad _ casa——el resultado será guardar los datos en el cursor y regresar.

Fin;