Cursores con update en postgre

[ciberwapv2]

Hola despues de una busqueda intensa por internet y de muchas pruebas fallidas hasta que se me agotaban las ganas por fin logres que me funcionara un maldito cursor en postgres creo que la gente de postgres no se preocupa tanto en dar un buen ejemplo de uso osea un ejemplo practico solo en sus manuales te describen que significa cada palabra reservada y no se van al grano. pero buep les dejo un ejemplo del que yo hice esta hecho en postgres 9.0

Código SQL:

DECLARE vcursor CURSOR FOR SELECT prospecto FROM presupuesto_det WHERE presupuesto = 1;
DECLARE vprospecto BIGINT;
 
BEGIN
 
    OPEN vcursor;
    loop
    
        FETCH vcursor INTO vprospecto;
        EXIT WHEN NOT FOUND;
                
                -- Aca van las sentencias
        UPDATE prospectos
        SET desde_presupuesto_det ='S', estado_prospecto = 3
        WHERE empresa = 1 AND
            sucursal = 1 AND
            ejercicio = 2010 AND
            prospecto = vprospecto;
        
    END loop;
    CLOSE vcursor;
END;
 

Saludos desde Paraguay, espero que a alguien le sirva este ejemplo