timergaliev,
Для начала нужно понимать что файл с расширением doc если он создан Вордом то это нифига не текстовый файл а бинарный. Ну а во вторых опять же стоит прочитать документацию,
а так работать с текстовыми файлами очень легко например вот так
(with-open-file (s "e:/1.gdl" :direction :output :if-exists :overwrite :if-does-not-exist :create)
(format s "graph: { ~%")
(clsql:do-query ((x) "select distinct x from vsm_matrix where name_matrix='a'")
(format s "node: { title: \"~S\" }~%" x))
(clsql:do-query ((x y) "select x,y from vsm_matrix where name_matrix='a' and x!=y")
(format s "edge: { source: \"~S\" target: \"~S\" }~%" y x))
(format s "}"))