anchor.diff:  	{_, Secret} = lists:keyfind("secret", 1, Object),
   	RestPort = ?config(port, Config),
   	{ok, SslSock} = ssl:connect({127,0,0,1}, RestPort,  [binary, {active, false}], infinity),
  -	ok = ssl:ssl_accept(SslSock),
   	NewSecret = ocs:generate_password(),
   	PatchBody =  "{\"secret\" : \""  ++ NewSecret ++ "\"}",
   	PatchBodyLen = size(list_to_binary(PatchBody)),
  
positive.code: 	{_, Secret} = lists:keyfind("secret", 1, Object),
  	RestPort = ?config(port, Config),
  	{ok, SslSock} = ssl:connect({127,0,0,1}, RestPort,  [binary, {active, false}], infinity),
  	ok = ssl:ssl_accept(SslSock),
  	NewContentType = "application/json-patch+json",
  	NewPort = 8745,
  	NewProtocol = "DIAMETER",
  
negative.code: 	{"multisession", Multi} = lists:keyfind("multisession", 1, Object),
  	RestPort = ?config(port, Config),
  	{ok, SslSock} = ssl:connect({127,0,0,1}, RestPort,  [binary, {active, false}], infinity),
  	NewContentType = "application/json-patch+json",
  	NewEnabled = false,
  	NewMulti = false,
  