anchor.diff:  
   class procedure TFileOperaHandler.FileDelete(pvDataObject: TSimpleMsgPack);
   var
  -  lvFileName, lvRealFileName:String;
  -  lvCrc, lvSize:Cardinal;
  +  lvFileName:String;
   begin
     lvFileName:= extractServerFileName(pvDataObject);
     if not FileExists(lvFileName) then
  
positive.code: var
    lvFileStream:TFileStream;
    lvFileName, lvRealFileName:String;
    lvCrc:Cardinal;
  begin
    lvFileName:= extractServerFileName(pvDataObject);
  
  
negative.code: const
    SEC_SIZE = 1024 * 4;
  var
    lvFileName:String;
    lvINfo:TSimpleMsgPack;
  begin
    lvFileName := extractServerFileName(pvDataObject);
  