Project: erlyweb

Revision: 218

Author: yarivvv

Date: 17 Dec 2007 01:42:31

• /trunk/src/erlsql/erlsql.erl

  ......	@@ -128,16 +128,19 @@
  128	128	Res;
  129	129	encode({datetime, Val}, AsBinary) ->
  130	130	encode(Val, AsBinary);
  131		encode({{Year, Month, Day}, {Hour, Minute, Second}}, false) ->
  132		Res = two_digits([Year, Month, Day, Hour, Minute, Second]),
  133		lists:flatten(Res);
  134		encode({TimeType, Val}, AsBinary)
  135		when TimeType == 'date';
  136		TimeType == 'time' ->
  137		encode(Val, AsBinary);
  138		encode({Time1, Time2, Time3}, false) ->
  139		Res = two_digits([Time1, Time2, Time3]),
  140		lists:flatten(Res);
  	131	encode({{Year,Month,Day}, {Hour,Minute,Second}}, false) ->
  	132	[Year1,Month1,Day1,Hour1,Minute1,Second1] =
  	133	lists:map(fun two_digits/1,[Year, Month, Day, Hour, Minute,Second]),
  	134	lists:flatten(io_lib:format("'~s-~s-~s ~s:~s:~s'",
  	135	[Year1,Month1,Day1,Hour1,Minute1,Second1]));
  	136	encode({date, {Year, Day, Month}}, false) ->
  	137	[Year1,Month1,Day1] =
  	138	lists:map(fun two_digits/1,[Year, Month, Day]),
  	139	lists:flatten(io_lib:format("'~s-~s-~s'",[Year1,Month1,Day1]));
  	140	encode({time, {Hour, Minute, Second}}, false) ->
  	141	[Hour1,Minute1,Second1] =
  	142	lists:map(fun two_digits/1,[Hour, Minute, Second]),
  	143	lists:flatten(io_lib:format("'~s:~s:~s'",[Hour1,Minute1,Second1]));
  141	144	encode(Val, _AsBinary) ->
  142	145	{error, {unrecognized_value, {Val}}}.
  143	146