クラス内でメソッドとして関数を生成します。
Synopsis
CREATE FUNCTION name(parameter_list) characteristics code_body
引数
name 作成する関数の名前。識別子です。この関数名には、修飾されていない場合 (StoreName) と修飾されている場合 (Patient.StoreName) があります。
parameter_list オプション — 値を関数に渡すために使用するパラメータのリスト。パラメータのリストは括弧で囲み、パラメータはコンマで区切ります。
characteristics オプション — 関数の特性を指定する 1 つ以上のキーワード。使用可能なキーワードは、FOR、FINAL、PRIVATE、PROCEDURE、RETURNS、SELECTMODE です。複数の特性は、空白で区切り、任意の順序で指定できます。
LANGUAGE OBJECTSCRIPT
LANGUAGE SQL
オプションcode_body で使用するプログラミング言語。LANGUAGE OBJECTSCRIPT (Caché ObjectScript の場合) または LANGUAGE SQL を指定します。LANGUAGE 節が省略される場合は、SQL が既定です。
code_body メソッドのプログラム・コード。メソッドは関数として指定するため、値を返すようにコードを記述する必要があります。
概要
CREATE FUNCTION 文は、クラスのメソッドとして関数を生成します。このクラス・メソッドは、SQL ストアド・プロシージャとして投影されます。CREATE PROCEDURE 文は、SQL ストアド・プロシージャとして投影されるメソッドの生成にも使用できます。メソッドで値を返すときには CREATE FUNCTION を使用する必要がありますが、値を返さないメソッドの生成にも使用できます。
関数の生成には、GRANT コマンドで指定された %CREATE_FUNCTION 管理者特権が必要です。
SQL 文内からの SQL 関数の呼び出しの詳細は、このドキュメントの "SQL の概念" のページの "関数の呼び出し" を参照してください。さまざまな状況での SQL ストアド・プロシージャの呼び出しについては、"CALL" 文を参照してください。
引数
name
関数として生成するメソッドの名前です。この関数名には、修飾されない場合 (StoreName) と、クラス名の指定で修飾される場合 (Patient.StoreName) があります。
parameter-list
値を関数に渡すために使用するパラメータのリストです。パラメータのリストは括弧で囲み、リストのパラメータ宣言はコンマで区切ります。リストのパラメータ宣言は、先頭から順に、パラメータ・モードを指定するキーワード (IN : 入力値、OUT : 出力値、INOUT : 入力、変更、出力)、パラメータ名、パラメータのデータ型、さらにオプションのキーワード DEFAULT から成ります。キーワード DEFAULT の後には、パラメータの既定値を一重引用符で囲んだ文字列で記述します。例えば以下のようになります。
IN Salary FLOAT DEFAULT '0'
このメソッドは、プロシージャ・コンテキスト・ハンドラを使用して、プロシージャとその呼び出し元 (ODBC サーバなど) 間でプロシージャ・コンテキストの受け渡しを行います。このプロシージャ・コンテキスト・ハンドラは、Caché によって (%qHandle:%SQLProcContext として) %sqlcontext オブジェクトを使用して自動生成されます。
以下のようにプロシージャ・コンテキスト・ハンドラは、%SQLProcContext 型で最初のパラメータとして明示的に宣言できます。
  INOUT pHandle %SQLProcContext
%SQLProcContext の属性は SQLCode と RowCount です。これらは通常、以下のように SQL 変数 SQLCODE と %ROWCOUNT に設定されます。
SET pHandle.SQLCode=SQLCODE,pHandle.RowCount=%ROWCOUNT
characteristics
利用できるキーワードは以下のとおりです。
FOR classname メソッドを生成するクラス名を指定します。そのクラスが存在しない場合は新規作成します。関数名を認証することによりクラス名を指定することもできます。FOR 節で指定されたクラス名の方が、関数名の認証により指定されたクラス名よりも優先されます。
FINAL サブクラスがメソッドをオーバーライドできないように指定します。既定では、メソッドは最終ではありません。FINAL キーワードはサブクラスによって継承されます。
PRIVATE メソッドがそれ自身のクラス、またはサブクラスの他のメソッドによってのみ起動できることを指定します。既定ではメソッドはパブリックで、制限なしに起動できます。この制限はサブクラスによって継承されます。
PROCEDURE メソッドが SQL ストアド・プロシージャとして投影されることを指定します。ストアド・プロシージャはサブクラスに継承されます。CREATE FUNCTION は常に SQL ストアド・プロシージャに投影するため、このキーワードはオプションです。このキーワードは、PROC と略すことができます。
RETURNS datatype メソッドの呼び出しで返される値のデータ型を指定します。RETURNS が省略されると、メソッドは値を返すことができません。この仕様はサブクラスによって継承されます。
SELECTMODE mode メソッドのコンパイルに使用するモードを指定します。使用可能な値は、LOGICAL、ODBC、RUNTIME、DISPLAY です。既定は LOGICAL です。
SELECTMODE はデータを返すモードを指定します。mode 値が LOGICAL の場合は、論理 (内部保存) 値が返されます。例えば、日付は $HOROLOG 形式で返されます。mode 値が ODBC の場合、論理と ODBC 間の変換が適用され、ODBC 形式値が返されます。mode 値が DISPLAY の場合、論理と表示間の変換が適用され、表示形式値が返されます。mode 値が RUNTIME の場合、ローカル変数 %Runtime を設定して、実行時にモードを LOGICAL、ODBC、DISPLAY のいずれかに設定できます。これは、%Library.ResultSet RuntimeMode プロパティを使用して設定できます。RUNTIME モードの既定は LOGICAL です。
SELECTMODE に指定した値は、#SQLCOMPILE SELECT=mode のように Caché ObjectScript クラス・メソッド・コードの最初に追加されます。
LANGUAGE
code_body に使用している言語を指定するキーワード節。使用可能な節は、LANGUAGE OBJECTSCRIPT (Caché ObjectScript の場合) か、LANGUAGE SQL です。LANGUAGE 節が省略される場合は、SQL が既定です。
code_body
生成されるメソッドのプログラム・コード。このコードは SQL または Caché ObjectScript で指定します。使用する言語は LANGUAGE 節と一致させる必要があります。ただし、Caché ObjectScript のコードには埋め込み SQL を記述できます。
Caché は、メソッドの実際のコードを生成するために提供されたコードを使用します。指定するコードが SQL の場合、メソッドの生成時にコード行が追加されます。追加のコードでは、SQL が Caché ObjectScript "ラッパ" に埋め込まれ、(必要に応じて) プロシージャ・コンテキスト・ハンドラが作成され、返り値が処理されます。以下は この Caché から生成されたラッパ・コードの例です。
   NEW SQLCODE,%ROWID,%ROWCOUNT,title
   &sql( SELECT col FROM tbl )
   QUIT $GET(title)
指定したコードが OBJECTSCRIPT の場合、(NEW 変数で、QUIT を使用して終了し、(オプションで) 完了時に値を返す) "ラッパ" を明示的に定義する必要があります。
以下の例は、Caché ObjectScript コードを呼び出す関数を作成します。ObjectScript コードは埋め込み SQL を含んでいます。
CREATE FUNCTION Sample_Employee.GetTitle
     ( INOUT pHandle %SQLProcContext, 
       SSN VARCHAR(11), 
       INOUT Title VARCHAR(50) )
    PROCEDURE
    RETURNS VARCHAR(30)
    FOR Sample.Employee
    LANGUAGE OBJECTSCRIPT
    {
        NEW SQLCODE,%ROWCOUNT
        &sql(SELECT Title INTO :Title FROM Sample.Employee 
             WHERE SSN = :SSN)
        IF $GET(pHandle)'=$$$NULLOREF {
           SET pHandle.SQLCode=SQLCODE
           SET pHandle.RowCount=%ROWCOUNT }
           QUIT
     }
関連項目
DROP FUNCTION