text: BEGIN;
  
  DECLARE foo CURSOR FOR SELECT 1 UNION SELECT 2;
  
  SAVEPOINT foo;
  
  FETCH 1 FROM foo;
   ?column? 
  ----------
          1
  
  ROLLBACK TO SAVEPOINT foo;
  
  FETCH 1 FROM foo;
   ?column? 
  ----------
          2
  
  COMMIT;
  