anchor.diff:              let dest = queue.toKey(set)
               let client:IDatabase = queue.client
               let multi = client.CreateTransaction()
  -            do! multi.ListRemoveAsync (activeList, toValueI64 this.jobId) |> Async.AwaitTask |> Async.Ignore
  +            do! multi.ListRemoveAsync (activeList, toValueI64 this.jobId) 
  +                |> Async.AwaitTask 
  +                |> Async.Ignore
               do! multi.SetAddAsync (dest, toValueI64 this.jobId) |> Async.AwaitTask |> Async.Ignore
               return! multi.ExecuteAsync() |> Async.AwaitTask                       
           }
  
positive.code:             let client = queue.client
              let! job = client.HashGetAllAsync (jobId) |> Async.AwaitTask
              //staan hash values altijd op dezelfde volgorde
              return Job.fromData (queue, job.[0].Value |> fromValueI64, job.[1].Value |> fromValueStr, job.[2].Value |> fromValueStr, job.[3].Value |> fromValueI32) 
          }
      static member fromData (queue:Queue<'a>, jobId: Int64, data: string, opts: string, progress: int) =
          let sData = JsonConvert.DeserializeObject<'a>(data)
  
negative.code:             match lock with
              | true -> 
                  let key = this.toKey("completed");
                  let! contains = 
                      this.client.SetContainsAsync (key, job.jobId |> toValueI64) 
                      |> Async.AwaitTask
                  if contains then 
                      do! processJob(job)
              | false -> ()
  