Práctica 1 - datos clientes.sql

De FdIwiki ABD
Revisión a fecha de 11:37 14 mar 2016; Jorge (Discusión | contribuciones)

(dif) ← Revisión anterior | Revisión actual (dif) | Revisión siguiente → (dif)
Saltar a: navegación, buscar
 CREATE OR REPLACE PROCEDURE DATOS_CLIENTES AS 
   importeTotal number := 0;
 BEGIN
   FOR cursorPedido IN(
     SELECT CLIENTES.dni
     FROM CLIENTES)
   LOOP
     importeTotal := importeTotal + PEDIDOS_CLIENTE_TOT(cursorPedido.dni);
   END LOOP;
 
   DBMS_output.put_line('-----------------------------------------------------------------');
   DBMS_output.put_line('SUMA DE TODOS LOS PEDIDOS DE TODOS LOS CLIENTES: ' || importeTotal);
   DBMS_output.put_line('-----------------------------------------------------------------');
 
 END DATOS_CLIENTES;