anchor.diff:  		ok ->
   			ipdr_xdr(Log, IoDevice, Cont, T);
   		{error, Reason} ->
  +			error_logger:error_report([file:format_error(Reason),
  +					{error, Reason}]),
   			file:close(IoDevice),
   			disk_log:close(Log),
   			{error, Reason}
  
positive.code: 		{error, eexist} ->
  			ipdr_file2(FileName, Log, Format, Directory);
  		{error, Reason} ->
  			disk_log:close(Log),
  			{error, Reason}
  	end.
  
negative.code: 		ok ->
  			ipdr_file3(Log, IoDevice, xdr, Cont);
  		{error, Reason} ->
  			error_logger:error_report([file:format_error(Reason),
  					{error, Reason}]),
  			file:close(IoDevice),
  			disk_log:close(Log),
  			{error, Reason}
  