$ZREFERENCE

Synopsis

$ZREFERENCE
$ZR

概要

$ZREFERENCE は、最後のグローバル参照の名前と添え字を含みます。これは、ネイキッド・インジケータとして知られています。

最後のグローバル参照は、グローバル (^myglob)、またはプロセス・プライベート・グローバル (^||myppg) のいずれかです。$ZREFERENCE は、後続でその変数に対してどのプロセス・プライベート・グローバル接頭語が使用されるかに関わらず、その変数に対して最初に使用されていた形式でプロセス・プライベート・グローバル接頭語を返します。以下の $ZREFERENCE の説明において、“グローバル” という言葉は、両方の種類の変数を指します。

最後のグローバル参照とは、コマンドまたは関数から最近参照されたグローバルのことです。ObjectScript は処理を左から右の順に実行するので、最後のグローバル参照は、常に一番右端のグローバルになります。コマンドまたは関数が複数の引数を取る場合、一番右端の引数で指定されたグローバルが最後のグローバル参照です。引数が複数のグローバル参照を含む場合、一番右端に指定されたグローバルが最後のグローバル参照です。この厳密な左から右の順は、括弧を使用して演算の順序を定義する場合でも、正しく保持されます。

明示的なグローバル参照が発行されるとき、Caché は $ZREFERENCE を更新します。グローバル参照に評価される式 (ローカル変数など) を呼び出しても、$ZREFERENCE は更新されません。

最後のグローバル参照が失敗していたとしても、$ZREFERENCE には、最後のグローバル参照が含まれます。コマンドが未定義のグローバルを参照して <UNDEFINED> エラーが返された場合でも、グローバルが定義されたかのように、Caché はそのグローバル参照に $ZREFERENCE を更新します。この動作は、%SYSTEM.Process.Undefined()Opens in a new tab メソッドの設定には影響されません。

このコマンドの実行に失敗していたとしても、多くの場合、$ZREFERENCE には、最後のグローバル参照が含まれます。各グローバルが参照されると、Caché によって $ZREFERENCE が更新されます。例えば、(数値を 0 で割ろうとすると) <DIVIDE> エラーを返すコマンドは、エラーが発生する前にコマンド内で参照された最後のグローバルに $ZREFERENCE を更新します。しかし、<SYNTAX> エラーは $ZREFERENCE を更新しません。

ネイキッド・グローバル参照

最後のグローバル参照がネイキッド・グローバル参照である場合、$ZREFERENCE には現在のネイキッド・グローバル参照の完全な形式 (外部で読み取り可能) が含まれます。詳細は、以下の例を参照してください。

  SET ^MyData(1)="fruit"
  SET ^MyData(1,1)="apples" ; Full global reference
  SET ^(2)="oranges"        ; Naked global reference,
                            ; implicitly ^MyData(1,2)
  WRITE !,$ZREFERENCE       ; Returns "^MyData(1,2)"

ネイキッド・グローバル参照に関する詳細は、"Caché グローバルの使用法" の "多次元ストレージの使用法 (グローバル)" を参照してください。

例

以下の例は、最後のグローバル参照を返します。

   SET ^a(1,1)="Hello"  ; Full global reference
   SET ^(2)=" world!"   ; Naked global reference
   WRITE $ZREFERENCE

これは、以下を返します。

^a(1,2)

以下の例は、複数の異なるコマンドからグローバル参照を返します。WRITE と ZWRITE は、同じグローバル参照でも異なる表示を行うことに注意してください。

   SET (^barney,^betty,^wilma,^fred)="flintstone"
   WRITE !,$ZREFERENCE
   KILL ^flies
   WRITE !,$ZREFERENCE
   WRITE !,^fred
   WRITE !,$ZREFERENCE,!
   ZWRITE ^fred
   WRITE !,$ZREFERENCE

これは、以下を返します。

^fred          ; last of several globals set in left-to-right order
^flies         ; KILL sets global indicator, though no global to kill
flintstone                ; WRITE global
^fred                       ; global from WRITE
^fred="flintstone"   ; ZWRITE global
^fred("")                 ; global from ZWRITE

以下の例は、拡張グローバル参照を返します。ネームスペース名は常に、大文字で返されることに注意してください。

   SET ^["samples"]a(1,1)="Hello"
   SET ^(2)=" world!"
   WRITE $ZREFERENCE
   QUIT

これは、以下を返します。

^["SAMPLES"]a(1,2)

以下の例は、最後のグローバル参照を返します。この場合は ^a(1) です。これは、$LENGTH 関数の引数として使用されます。

   SET ^a(1)="abcdefghijklmnopqrstuvwxyz"
   SET ^b(1)="1234567890"
   SET x=$LENGTH(^a(1))
   WRITE $ZREFERENCE
   QUIT

以下の例では、$ZREFERENCE に設定されている値が最後のグローバル参照であるかのように返されます。この場合、値は ^a(1,1) です。

   SET ^a(1,1)="abcdefghijklmnopqrstuvwxyz"
   SET ^b(1,1)="1234567890"
   WRITE !,^(1)
             ; Naked reference uses last global
   SET $ZREFERENCE="^a(1,1)"
   WRITE !,$ZREFERENCE
   WRITE !,^(1)
             ; Naked reference uses $ZREFERENCE
             ; value, rather than last global.

以下の例は、拡張グローバル参照を設定します。引用符が二重になっていることに注目してください。

   KILL ^x
   WRITE !,$ZREFERENCE
   SET $ZREFERENCE="^[""samples""]a(1,2)"
   WRITE !,$ZREFERENCE

関連項目

• ZNSPACE コマンド

• $NAMESPACE 特殊変数

• $ZNSPACE 特殊変数

• "Caché システム管理ガイド" の "ネームスペースの構成"

• "Caché グローバルの使用法" の "グローバル構造"

• "Caché グローバルの使用法" の "ネイキッド・グローバル参照"