(defun sql-query (cmd conn &key (types :auto))
(clsql:query cmd :database conn :types types))
(defun sql-execute (cmd conn)
(clsql:execute-command cmd :database conn))
(defun sql-query (cmd conn &key (types :auto))
(clsql:query cmd :database conn :types types))
(defun sql-execute (cmd conn)
(clsql:execute-command cmd :database conn))