oracle - Lisp から Oracle plsql プロシージャを実行するにはどうすればよいですか?

Question

どうすれば始められますか?

Answer 1

Clojure を使用してこれを実現する最も簡単な方法を見つけました。コード例は次のとおりです。

(ns example
  (:require [clojure.contrib.sql :as sql])
  (:import  [java.sql Types]))


(def devdb {:classname "oracle.jdbc.driver.OracleDriver"
            :subprotocol "oracle"
            :subname "thin:username/password@localhost:1509:devdb"
            :create true})

(defn exec-ora-stored-proc [input-param db callback]
  (sql/with-connection db
    (with-open [stmt (.prepareCall (sql/connection) "{call some_schema.some_package.test_proc(?, ?, ?)}")]
      (doto stmt
        (.setInt               1 input-param)
        (.registerOutParameter 2 Types/INTEGER)
        (.registerOutParameter 3 oracle.jdbc.driver.OracleTypes/CURSOR)
        (.execute))
      (callback (. stmt getInt 2) (. stmt getObject 3)))))

(exec-ora-stored-proc
 123 ;;input param value
 devdb
 (fn [err-code res-cursor]
   (println (str "ret_code: " err-code))
   ;; prints returned refcursor rows
   (let [resultset (resultset-seq res-cursor)]
     (doseq [rec resultset]
       (println rec)))))

Answer 2

OracleSQLデータベースへのインターフェースが必要です。ボブが指摘したように、AllegroCLにはそのようなインターフェースがあります。

GNU CLISPには、データベースへのインターフェイスも付属しているようです。

Answer 3

Common LispプログラムからOracleを実行する最も簡単な方法は、CLSQLを使用することです。CommonLispのデータベースを使って何かをするためのパッケージは他にもたくさんあります。Clikiのデータベースページをご覧ください