anchor.diff:  -record(state, {recept       :: #recept{},
                   records = [] :: list(),
                   template     :: #recept{},
  -                mode         :: med | dpc}).
  +                mode         :: med | dpc,
  +                skipping = false :: boolean(),
  +                filename     :: filename:filename()
  +               }).
   
   -spec parse_file(filename:filename(), med | dpc) -> {ok, [term()]}.
   parse_file(Filename, Mode) ->
  
positive.code:         end,
  
      InitCtx = #state{template = #recept{file=BinFilename, checksum=BinChecksum},
                       mode = Mode},
      {ok, {Total, ResultCtx}} = ecsv:process_csv_string_with(lists:flatten(Lines), F, {0, InitCtx}),
  
      #state{records=Records1} = ResultCtx,
  
negative.code:     S1 = list_to_binary(S),
      unicode:characters_to_list(S1).
  
  parse_line(Line, LineNo, #state{mode = Mode, filename = Filename} = State) ->
  
      [RecordID|_] = Line,
      Types = case Mode of
                  dpc -> ?DPC_RECORD_TYPES;
                  med -> ?MED_RECORD_TYPES
  