Инструмент генерации кода для схемы SQL для объектов Корма

Ответ 1

Пока нет, но вы можете запросить у вас словарь данных СУБД, чтобы начать работу.

Например, в MySQL вы можете начать с:

select concat('(defentity ', t.table_name ,')') as defentity
  from information_schema.tables t
  where table_schema = 'mySchema';

Ответ 2

Это работает для меня, подумал о том, чтобы реализовать. Я был немного взорван, что у Кормы нет этой функции! (примечание: я провел это против MSSQL)

(defentity INFORMATION_SCHEMA.tables)
(def tables (map #(get % :TABLE_NAME) 
              (select 'INFORMATION_SCHEMA.tables (fields :TABLE_NAME) 
                      (where {:TABLE_TYPE "BASE TABLE"})))) ;notice the quote

(prn tables)
;(map #(def %) tables) ;additional concept
(map #(defentity %) tables) ;not sure this is required anymore

(select (first tables))