anchor.diff:                      | true, v -> Some(v :?> 'T)
                       | false, _ -> None
           
  -                let affinity = tryGet Settings.AffinityPropertyName
  +                let affinity = tryGet Settings.AffinityProperty
                   let deliveryCount = message.DeliveryCount
  -                let parentId = fromGuid (message.Properties.[Settings.ParentTaskIdPropertyName] :?> Guid)
  -                let streamPos = tryGet Settings.StreamOffsetPropertyName
  +                let parentId = fromGuid (message.Properties.[Settings.ParentTaskIdProperty] :?> Guid)
  +                let streamPos = tryGet Settings.StreamOffsetProperty
                   let lockToken = message.LockToken
                   let body = fromGuid (message.GetBody<Guid>())
  +                let jobId = fromGuid (message.Properties.[Settings.JobIdProperty] :?> Guid)
                   let dequeueTime = DateTimeOffset.Now
                   let info = {
  -                    JobId = body
  +                    JobId = jobId
  +                    ContentId = body
                       ConfigurationId = config
                       MessageLockId = lockToken
                       ParentJobId = parentId
  
positive.code:     static member MaxLockDuration = WorkerManager.MaxHeartbeatTimespan // 5 minutes, max value
      static member MaxTTL = TimeSpan.MaxValue
      static member ServerWaitTime = TimeSpan.FromMilliseconds(50.)
      static member AffinityPropertyName = "worker"
      static member ParentTaskIdPropertyName = "parentId"
      static member StreamOffsetPropertyName = "offset"
      static member SubscriptionAutoDeleteInterval = TimeSpan.MaxValue 
  
  /// Info stored in BrokeredMessage.
  
negative.code:         async { 
              let! blob = Blob.Create(config, job.TaskEntry.Id, job.Id, fun () -> job)
              let msg = new BrokeredMessage(toGuid job.Id)
              msg.Properties.Add(Settings.JobIdProperty, toGuid job.Id)
              msg.Properties.Add(Settings.ParentTaskIdProperty, toGuid job.TaskEntry.Id)
              match job.TargetWorker with
              | Some target -> msg.Properties.Add(Settings.AffinityProperty, target.Id)
              | _ -> ()
              do! sendF msg
              return blob.Size
  