declare resarrest_cursor insensitive cursor for
  select ResourceID, DateStart, InstitutionID, DecisionNum, DateEnd
    from tResArrest

open resarrest_cursor

fetch resarrest_cursor into @ResourceID,
                            @DateStart,
                            @InstitutionID,
                           @DecisionNum,
                            @DateEnd

while @@SQLSTATUS =  0 
begin

    select @ResArrestID=Offset                                     
    from tResArrestSeed  
                                         
                                        
                               
  begin tran                                        
  save tran ISEED_TR                                                       
  insert into iResArrestSeed (ZF)   
  select  0                                           
  select @ResArrestID = @ResArrestID + @@identity                      
  rollback tran ISEED_TR                            
  commit tran

  update tResArrest
     set ResArrestID = @ResArrestID
   where ResourceID    = @ResourceID
     and DateStart     = @DateStart
     and InstitutionID = @InstitutionID
     and DecisionNum   = @DecisionNum
     and DateEnd       = @DateEnd

  fetch resarrest_cursor into @ResourceID,
                              @DateStart,
                              @InstitutionID,
                              @DecisionNum,
                              @DateEnd
end

deallocate cursor resarrest_cursor