anchor.diff:                      AttrType = proplists:get_value(Key, AttributeTypes),
                       case element(Index, Record) of
                           undefined -> undefined;
  +                        null -> undefined;
                           Val -> 
                               case lists:suffix("_id", KeyString) of
                                   true -> integer_to_id(Val, KeyString);
  
positive.code:     {_, TableName, Id} = infer_type_from_id(Record:id()),
      Updates = lists:foldl(fun
              ({id, _}, Acc) -> Acc;
              ({_, undefined}, Acc) -> Acc;
              ({A, V}, Acc) -> 
                  AString = atom_to_list(A),
                  Value = case lists:suffix("_id", AString) of
  
negative.code: escape_sql1([C|Rest], Acc) ->
      escape_sql1(Rest, [C|Acc]).
  
  pack_datetime({Date, {Y, M, S}}) when is_float(S) ->
      pack_datetime({Date, {Y, M, erlang:round(S)}});
  pack_datetime(DateTime) ->
      "TIMESTAMP '" ++ erlydtl_filters:date(DateTime, "c") ++ "'".
  
  