common lispでDBのdatetime

common lispでデータベースを触っていても、
どうやってdatetime型を入れればいいのかわからないでいました。

例えば
phpであれば

date("Y-m-d H:i:s");

というのが定番だと思います。

common lispでdatetime型の作り方がわからないのは多値について理解していないからでした。
多値

日時を多値で返してくれる関数はあるのでそれを使うとできました。

(defun now ()
  (multiple-value-bind (second minute hour date month year) (get-decoded-time)
    (concatenate 'string (write-to-string year)  "-" (write-to-string month) "-" (write-to-string date) " " (write-to-string hour) ":" (write-to-string minute) ":" (write-to-string second))))

(format t "~A" (now))

なるほどこれでバックエンド作成が進みますね。