anchor.diff:                         NewList = lists:reverse(Recept#recept.segments),
                          [Recept#recept{segments=NewList}|Records0]
                  end,
  -    _ = lager:info("~p records.~n", [length(Records1)]),
  +    _ = lager:info("~p records for ~p lines.~n", [length(Records1), Total]),
   
       case InfoExtractor of
           undefined -> Records1;
  
positive.code: extract_re_date(Col) ->  extract_date(Col, shinym).
  
  extract_date(Col, Key) ->
      case proplists:get_value(Key, Col) of
          undefined -> undefined;
          DateBin ->
              [P,Y0,Y1,M0,M1] = binary_to_list(DateBin),
              Year = p2base(P) + list_to_integer([Y0,Y1]),
              lists:flatten(integer_to_list(Year) ++ [M0,M1])
      end.
  
  p2base($4) -> 1988; %% 平成0年
  p2base($3) -> 1925; %% 昭和0年
  
negative.code:             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)]),
  