これは
InterSystems FAQ サイトの記事です。
InterSystems IRIS では、管理ポータルの [システムエクスプローラ] > [SQL] : ウィザード > リンクテーブルで行うリンクテーブルの作成をコマンドで行うことが可能です。
リンクテーブルの作成には、%SYSTEM.SQL.Schema クラスの CreateLinkedTable メソッドを使用します。詳細は、クラスリファレンスをご覧ください。
実行は以下のように行います。
set sc = $SYSTEM.SQL.Schema.CreateLinkedTable("<dsn>","<Schema>","<Table>","<primaryKeys>","<localClass>","<localTable>","")
/// 第1引数：dsn - SQLゲートウェイ接続名
/// 第2引数：Schema - リンク元のスキーマ名
/// 第3引数：Table - リンク元のテーブル名
/// 第4引数：primaryKeys - プライマリーキー
/// 第5引数：localClass - リンク先のクラス名 例：User.LinkedClass
/// 第6引数：localTable - リンク先のSQLテーブル名(SqlTableName)
/// 第7引数：columnMap - リンク先フィールド情報
こちらで実行する場合、リンクテーブルはReadOnly属性で作成されます。ReadOnly属性を外したい場合は、第7引数の columnMap で指定する必要があります。
例：columnMap("external field name") = $lb("new class property name","new sql field name","read-only(1/0)")
こちら のサンプルでは、全てのフィールド(カラム)に対して ReadOnlyなし(0) を設定する columnMap を作成し、リンクテーブルを作成しています。また、primaryKey はリンク元テーブルの primaryKey を引き継げるようにしています。
使用方法は以下のようになります。
do ##class(ISC.LinkUtils).LinkTable("<dsn>","<Schema>","<Table>","<localClass>")
/// 第1引数：dsn - SQLゲートウェイ接続名
/// 第2引数：Schema - リンク元のスキーマ名
/// 第3引数：Table - リンク元のテーブル名
/// 第4引数：localClass - リンク先のクラス名 例：User.LinkedClass
今回使用したサンプルはこちらからもご覧いただけます。 👉https://github.com/
Intersystems-jp/CreateLinkedTable
