anchor.diff:              ShortLen = erlang:min(length(Line), length(Cols0)),
               {Line1,_} = lists:split(ShortLen, Line),
               {Cols, _} = lists:split(ShortLen, Cols0),
  +            %% case LineNo of
  +            %%     N when N < 1185 andalso N > 1180 ->
  +            %%         ?debugFmt("~w", [lists:zip(Cols, Line1)]);
  +            %%     N when N < 1181 -> ok;
  +            %%     _ ->
  +            %%         exit(normal)
  +            %% end,
  +
               Data0 = lists:map(fun({Col, Entry}) ->
                                         %%?debugVal({Col,Entry}),
                                         case check_type(Col, Entry) of
                                             {ok, {K,V}} ->
                                                 {K, V};
  +                                          {warning, {error, O}} ->
  +                                              _ = lager:warning("Line ~p: ~p",[LineNo, O]),
  +                                              {col, null};
  +
                                             {warning, {K,null}} ->
                                                 %% _ = lager:warning("required value is empty at ~s: ~ts",
                                                 %%                   [RecordID, hardcode_list_to_string(K)]),
  
positive.code:                        NewList = lists:reverse(Recept#recept.segments),
                         [Recept#recept{segments=NewList}|Records0]
                 end,
      _ = lager:info("~p records.~n", [length(Records1)]),
  
      case InfoExtractor of
          undefined -> Records1;
  
negative.code:     %% meddatum:log(">>>> => ~ts~n", [unicode:characters_to_binary(Entry, utf8)]),
      {ok, {Name, unicode:characters_to_binary(Entry, unicode)}};
  check_type({Name, gyymm, 5}, Entry) ->
      case gyymm2date(Entry) of
          {ok, Date} -> {ok, {Name, Date}};
          {error, O} -> {warning, {error, O}}
      end;
  
  check_type({Name, gyymmdd, 7}, Entry) ->
      case gyymmdd2date(Entry) of
          {ok, Date} -> {ok, {Name, Date}};
          {error, O} -> {warning, {error, O}}
      end;
  
  check_type({Name, jy_code, _}, Entry) when length(Entry) =:= 1 ->
      {ok, {Name, unicode:characters_to_binary(Entry)}}.
  
  