anchor.diff:  
   
       % DB cleanup
  +    RemoveStorageAns = rpc:call(FSLogicNode, dao_lib, apply, [dao_vfs, remove_storage, [{uuid, StorageUUID}], ?ProtocolVersion]),
  +    ?assertEqual(ok, RemoveStorageAns)
  +
       ?assertEqual(ok, rpc:call(CCM, dao_lib, apply, [dao_vfs, remove_file, ["groups/veilfstestgroup"], ?ProtocolVersion])),
       ?assertEqual(ok, rpc:call(CCM, dao_lib, apply, [dao_vfs, remove_file, ["groups"], ?ProtocolVersion])),
   
  
positive.code:     Ans7 = rpc:call(CCM, logical_files_manager, create, ["veilfstestuser/dir/file.txt"]), 
      ?assertEqual(ok, Ans7),
  
      DN.
  
  
  %% ====================================================================
  
negative.code:     % TODO Usunac jak wreszcie baza bedzie czyszczona miedzy testami
      rpc:call(CCM, user_logic, remove_user, [{dn, DN}]),
  
      {Ans1, StorageUUID} = rpc:call(CCM, fslogic_storage, insert_storage, [?SH, ?TEST_ROOT]),
      ?assertEqual(ok, Ans1),
      {Ans5, _} = rpc:call(CCM, user_logic, create_user, [Login, Name, Teams, Email, DnList]),
      ?assertEqual(ok, Ans5),
  