anchor.diff:    vResponse: string;
   begin
     vResponse := Patch(Content);
  -
     if Trim(vResponse) <> '' then
       Result := TJsonUtil.UnMarshal<T>(vResponse)
     else
  
positive.code:   vResponse: string;
  begin
    vResponse := Put(Content);
  
    if Trim(vResponse) <> '' then
      Result := TJsonUtil.UnMarshal<T>(vResponse)
    else
  
negative.code:   vResponse: string;
  begin
    vResponse := Post(Content);
    if Trim(vResponse) <> '' then
      Result := TJsonUtil.UnMarshal<T>(vResponse)
    else
  