α» ApacheDerby edit** « wiki αt10xxxxx

List all tables

{{{ (do (Class/forName "org.apache.derby.jdbc.EmbeddedDriver") (let [con (java.sql.DriverManager/getConnection"jdbc:derby:base;create=true") stmt (.createStatement con)] ((defn recurs [rs] (if (.next rs) (str " " (.getString rs "TABLE_NAME") (recurs rs)) )) (.getTables (.getMetaData con) nil nil nil (into-array ["TABLE"])))) ) ) }}}

List all tables

List all PayMent's

{{{ (.executeQuery stmt "select * from payment"))) }}}