Loop Cursor

Ow.. como faço pra fazer um loop num cursor?

DROP PROCEDURE FECHA_PEDIDO//
CREATE PROCEDURE FECHA_PEDIDO(IN V_HOSP integer)
BEGIN

 DECLARE V_PEDIDO integer;
 DECLARE VREG CURSOR FOR SELECT ped_codigo from pedido where hos_codigo = V_HOSP;
 OPEN VREG;
 FETCH VREG INTO V_PEDIDO;
 UPDATE pedido set ped_aberto = 'N' where ped_codigo = V_PEDIDO;
 CLOSE VREG;
 END

eu preciso fazer um loop para fechar todos os pedidos.. mas naum sei fazer o loop....