anchor.diff:  			ipdr_csv(Log, IoDevice, {Cont, T});
   		{error, Reason} ->
   			error_logger:error_report([file:format_error(Reason),
  -					{error, Reason}]),
  +					{module, ?MODULE}, {log, Log}, {error, Reason}]),
   			file:close(IoDevice),
   			disk_log:close(Log),
   			{error, Reason}
  
positive.code: 			file_chunk(Log, IoDevice, binary, start);
  		{error, Reason} ->
  			error_logger:error_report([file:format_error(Reason),
  					{module, ?MODULE}, {log, Log}, {error, Reason}]),
  			{error, Reason}
  	end.
  
  
negative.code: 				ok ->
  					ipdr_log3(IpdrLog, _Start, End, NewSeqNum, {Cont, T});
  				{error, Reason} ->
  					Descr = lists:flatten(disk_log:format_error(Reason)),
  					Trunc = lists:sublist(Descr, length(Descr) - 1),
  					error_logger:error_report([Trunc, {module, ?MODULE},
  							{log, IpdrLog}, {error, Reason}]),
  					disk_log:close(IpdrLog),
  					{error, Reason}
  			end;
  