DECLARE
CURSOR CURSOR_TIENDA IS SELECT COMP.NOMBRE, PRODU.NOM_PROD FROM COMPRADOR COMP, PRODUCTO PRODU WHERE COMP.ID_COMPRADOR=PRODU.ID_COMPRADOR;
BEGIN
FOR REC_REGISTRO IN CURSOR_TIENDA LOOP
DBMS_OUTPUT.PUT_LINE('COMPRADOR: '||REC_REGISTRO.NOMBRE|| 'NOMBRE DEL PRODUCTO:' ||REC_REGISTRO.NOM_PROD);
END LOOP;
END;
/
El cursor que nos encargo
@daton