anchor.diff:                              FlatTuple = {<<"flat">>, Flat},
                               BoxTuple = try dderl_sqlbox:boxed_from_pt(ParseTree) of
                                              {error, BoxReason} ->
  -                                               ?Info("Error ~p trying to get the box of the parse tree ~p", [BoxReason, ParseTree]),
  +                                               ?Error("Error ~p trying to get the box of the parse tree ~p", [BoxReason, ParseTree]),
                                                  {<<"boxerror">>, iolist_to_binary(io_lib:format("~p", [BoxReason]))};
                                              {ok, Box} ->
  -                                               ?Info("The box ~p", [Box]),
  +                                               %% ?Debug("The box ~p", [Box]),
                                                  try dderl_sqlbox:box_to_json(Box) of
                                                      JsonBox ->
                                                          {<<"sqlbox">>, JsonBox}
                                                  catch
                                                      Class:Error ->
  -                                                       ?Info("Error ~p:~p converting the box ~p to json: ~n~p~n", [Class, Error, Box, erlang:get_stacktrace()]),
  +                                                       ?Error("Error ~p:~p converting the box ~p to json: ~n~p~n", [Class, Error, Box, erlang:get_stacktrace()]),
                                                          {<<"boxerror">>, iolist_to_binary(io_lib:format("~p:~p", [Class, Error]))}
                                                  end
                                          catch
                                              Class:Error ->
  -                                               ?Info("Error ~p:~p trying to get the box of the parse tree ~p, the st: ~n~p~n", [Class, Error, ParseTree, erlang:get_stacktrace()]),
  +                                               ?Error("Error ~p:~p trying to get the box of the parse tree ~p, the st: ~n~p~n", [Class, Error, ParseTree, erlang:get_stacktrace()]),
                                                  {<<"boxerror">>, iolist_to_binary(io_lib:format("~p:~p", [Class, Error]))}
                                          end,
                               PrettyTuple = try dderl_sqlbox:pretty_from_pt(ParseTree) of
                                                 {error, PrettyReason} ->
  -                                                  ?Info("Error ~p trying to get the pretty of the parse tree ~p", [PrettyReason, ParseTree]),
  +                                                  ?Error("Error ~p trying to get the pretty of the parse tree ~p", [PrettyReason, ParseTree]),
                                                     {<<"prettyerror">>, PrettyReason};
                                                 Pretty ->
                                                     {<<"pretty">>, Pretty}
                                             catch
                                                 Class1:Error1 ->
  -                                                  ?Info("Error ~p:~p trying to get the pretty from the parse tree ~p, the st: ~n~p~n", [Class1, Error1, ParseTree, erlang:get_stacktrace()]),
  +                                                  ?Error("Error ~p:~p trying to get the pretty from the parse tree ~p, the st: ~n~p~n", [Class1, Error1, ParseTree, erlang:get_stacktrace()]),
                                                     {<<"prettyerror">>, iolist_to_binary(io_lib:format("~p:~p", [Class1, Error1]))}
                                             end,
                               case SqlTitle of
  
positive.code:                 {ok, {ParseTrees, _}} ->
                      case ptlist_to_string(ParseTrees) of
                          {error, Reason} ->
                              ?Info("parse_stmt error in fold ~p~n", [Reason]),
                              ReasonBin = iolist_to_binary(io_lib:format("Error parsing the sql: ~p", [Reason])),
                              From ! {reply, jsx:encode([{<<"parse_stmt">>, [{<<"error">>, ReasonBin}, {<<"flat">>, list_to_binary(Sql)}]}])};
                          {multiple, _Flat, FirstPT} ->
  
negative.code:                                 _ ->
                                      ParseStmt = jsx:encode([{<<"parse_stmt">>, [{<<"sqlTitle">>, SqlTitle}, BoxTuple, PrettyTuple, FlatTuple]}])
                              end,
                              %% ?Debug("Json -- ~s", [jsx:prettify(ParseStmt)]),
                              From ! {reply, ParseStmt}
                      end;
                  {parse_error, {PError, Tokens}} ->
  