>llOK=.oCodZonas.SAVE(.oRS0) >Layer >case toRS.LockType = adLockBatchOptimistic > .oConnection.BeginTrans() > toRS.ActiveConnection = .oConnection > toRS.UpdateBatch() > if .lErrorOccurred > .oConnection.RollbackTrans() > toRS.CancelBatch() > else > .oConnection.CommitTrans() > endif .lErrorOccurred > toRS.ActiveConnection = .NULL. >Joao,