gnue/forms/src/GFObjects GFBlock.py

[James Thompson]

CVSROOT:        /cvsroot/gnue
Module name:    gnue
Branch:         
Changes by:     James Thompson <address@hidden> 03/06/14 18:18:56

Modified files:
        forms/src/GFObjects: GFBlock.py 

Log message:
        current record focus now stays with the proper record when prior 
records are deleted.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/gnue/gnue/forms/src/GFObjects/GFBlock.py.diff?tr1=1.82&tr2=1.83&r1=text&r2=text

Patches:
Index: gnue/forms/src/GFObjects/GFBlock.py
diff -c gnue/forms/src/GFObjects/GFBlock.py:1.82 
gnue/forms/src/GFObjects/GFBlock.py:1.83
*** gnue/forms/src/GFObjects/GFBlock.py:1.82    Sat May 24 22:20:08 2003
--- gnue/forms/src/GFObjects/GFBlock.py Sat Jun 14 18:18:56 2003
***************
*** 382,390 ****
      GDebug.printMesg(1, "processing commit on block %s"%self.name,1)
  
      self.mode='commit'
! 
      self._resultSet.setRecord(self._precommitRecord)
  
      if not self._dataSourceLink.hasMaster():
        self._resultSet.post()
        self._dataSourceLink._dataObject.commit()
--- 382,398 ----
      GDebug.printMesg(1, "processing commit on block %s"%self.name,1)
  
      self.mode='commit'
!     
      self._resultSet.setRecord(self._precommitRecord)
  
+     # Backstep thru the record adjusting for any prior records that
+     # will be deleted.  Keeps the record postition properly adjusted
+     # during deletes.
+     for notUsed in range(self._currentRecord+1):
+       self.prevRecord()
+       if self._resultSet.current.isDeleted():
+         self._precommitRecord -= 1
+ 
      if not self._dataSourceLink.hasMaster():
        self._resultSet.post()
        self._dataSourceLink._dataObject.commit()
***************
*** 396,401 ****
--- 404,410 ----
      # ui corruption can occur in zipcode.gfd if
      # you commit while in or after a record that
      # is to be deleted.
+ 
      self.jumpRecord(self._precommitRecord)
  
      # If all our records were deleted, create an empty record