(When verbose (format t "UMLS Import: Creating custom tables.~%"))
(sql-create-custom-tables conn)
(When verbose (format t "UMLS Import: Creating custom indices.~%"))
(When verbose (format t "UMLS Import: Creating custom tables.~%"))
(sql-create-custom-tables conn)
(When verbose (format t "UMLS Import: Creating custom indices.~%"))