第三章 使用多维存储(全局变量)（一）

本章描述了使用多维存储(全局变量)可以执行的各种操作。

以全局变量存储数据

在全局节点中存储数据很简单:像对待任何其他变量一样对待全局变量。
区别在于对全局变量的操作是自动写入数据库的。

创建全局变量

创建新的全局变量不需要设置工作；只需将数据设置为全局变量即可隐式创建新的全局结构。可以创建全局变量(或全局变量下标)并通过单个操作将数据放入其中，也可以创建全局变量(或下标)并通过将其设置为空字符串将其保留为空。在ObjectScript中，这些操作是使用SET命令完成的。

下面的例子定义了一个名为Color(如果还不存在)的全局变量，并将值“Red”与之关联。
如果已经存在一个名为Color的全局变量，那么这些示例将其修改为包含新信息。

在ObjectScript中：

 SET ^Color = "Red"

注意：在应用程序中使用直接全局访变量问时，应制定并遵守命名约定，以防止应用程序的不同部分相互“遍历”；这类似于为类、方法和其他变量开发命名约定。

在全局变量节点中存储数据

要在全局下标节点中存储值，只需像设置任何其他变量数组一样设置全局节点的值。如果指定的节点以前不存在，则会创建该节点。如果它确实存在，则其内容将替换为新值。

可以通过表达式(称为全局引用)指定全局内的节点。全局引用由脱字符(^)、全局名称和(如果需要)一个或多个下标值组成。下标(如果有)用括号“()”括起来，并用逗号分隔。每个下标值本身都是一个表达式：文字值、变量、逻辑表达式，甚至是全局引用。

设置全局节点的值是一个原子操作：它肯定会成功，不需要使用任何锁来确保并发性。

以下都是有效的全局引用：

在ObjectScript中：

   SET ^Data = 2
   SET ^Data("Color")="Red"
   SET ^Data(1,1)=100        /*第二级下标(1，1)设置为值100。第一级下标(^DATA(1))不存储任何值。 */   
   SET ^Data(^Data)=10       /*全局变量^data的值是下标的名称。 */
   SET ^Data(a,b)=50         /*局部变量a和b的值是下标的名称 */
   SET ^Data(a+10)=50       

此外，还可以在运行时使用间接方式构造全局引用。

在全局变量节点中存储结构化数据

每个全局节点可以包含最多32K个字符的单个字符串。

数据通常以以下方式之一存储在节点中：

• 作为最多32K个字符的单个字符串(具体地说，32K - 1)。
• 作为包含多条数据的字符分隔字符串。

要使用字符分隔符在节点中存储一组字段，只需使用连接操作符(_)将这些值连接在一起。下面的ObjectScript示例使用#字符作为分隔符：

   SET ^Data(id)=field(1)_"#"_field(2)_"#"_field(3)

检索数据时，可以使用$PIECE函数将字段拆分：

    SET data = $GET(^Data(id))
    FOR i=1:1:3 {
        SET field(i) = $PIECE(data,"#",i)
    }
    QUIT

• 作为包含多条数据的$LIST编码字符串。

$LIST函数使用特殊的长度编码方案，不需要保留分隔符。(这是InterSystems IRIS对象和SQL使用的默认结构。)

要在节点中存储一组字段，请使用$LISTBUILD函数构造列表：

   SET ^Data(id)=$LISTBUILD(field(1),field(2),field(3))

检索数据时，可以使用$LIST或$LISTGET函数将字段拆分：

    SET data = $GET(^Data(id))
    FOR i = 1:1:3 {
        SET field(i)=$LIST(data,i)
    }
    QUIT

• 作为较大数据集(例如流或“BLOB”)的一部分。

由于单个节点的数据量限制在略低于32K，因此可以通过将数据存储在一组连续节点中来实现更大的结构(如流)：

   SET ^Data("Stream1",1) = "First part of stream...."
   SET ^Data("Stream1",2) = "Second part of stream...."
   SET ^Data("Stream1",3) = "Third part of stream...."

获取流的代码(如%GlobalCharacterStream类提供的流)循环遍历结构中的连续节点，该结构将数据作为连续字符串提供。
- 作为一个位串。

如果正在实现位图索引(位字符串中的位对应表中的行的索引)，应该将全局索引的节点值设置为位字符串。
请注意IRIS使用压缩算法来编码位串;
因此，位串只能使用IRIS $BIT函数来处理。

• 作为一个空节点。

如果感兴趣的数据是由节点本身提供的，那么通常将实际下标设置为空字符串("")。
例如，将名称与ID值相关联的索引通常是这样的:

  SET ^Data("APPLE",1) = ""
  SET ^Data("ORANGE",2) = ""
  SET ^Data("BANANA",3) = ""

删除全局节点

要从数据库中删除一个全局节点、一组子节点或整个全局节点，请使用ObjectScript kill或ZKILL命令。

Kill命令删除特定全局引用处的所有节点(数据及其在数组中的相应条目)，包括任何子代节点。也就是说，所有以指定下标开头的节点都将被删除。

例如，ObjectScript语句：

  KILL ^Data

删除整个^Data全局变量。对此全局变量的后续引用将返回<UNDEFINED>错误。

ObjectScript语句：

   KILL ^Data(100)

删除^Data全局变量中节点100的内容。如果有子代节点，如^data(100，1)、^data(100，2)和^data(100，1，2，3)，这些子节点也会被删除。

ObjectScript ZKILL命令用于删除指定的全局或全局下标节点。它不会删除子代子节点。

注意：在杀死一个大型全局变量之后，该全局变量曾经占用的空间可能没有完全释放，因为垃圾收集器守护进程在后台将这些块标记为空闲。因此，在终止大型全局变量之后立即调用SYS.Database类的ReturnUnusedSpace方法可能不会返回预期大小的空间，因为该全局占用的块可能尚未释放。

不能对全局变量使用new命令。

测试全变量局节点的存在

要测试特定全局变量(或其后代)是否包含数据，请使用$DATA函数。

$DATA返回一个值，该值指示指定的全局变量引用是否存在。可能的返回值包括：

状态值	含义
0	全局变量未定义。
1	全局变量存在并包含数据，但没有子代。请注意，空字符串(“”)可用作数据。
10	全局变量有后代(包含指向子节点的向下指针)，但本身不包含数据。对此类变量的任何直接引用都将导<UNDEFINED>错误。例如，如果$data(^y)返回10，则SET x=^y将产生<UNDEFINED>错误。
11	全局变量既包含数据，又有后代(包含指向子节点的向下指针)。

检索全局变量节点的值

要获取存储在特定全局变量节点中的值，只需使用全局引用作为表达式：

   SET color = ^Data("Color")    ; assign to a local variable
   WRITE ^Data("Color")          ; use as a command argument
   SET x=$LENGTH(^Data("Color")) ; use as a function parameter

$GET函数

还可以使用$GET函数获取全局节点的值：

   SET mydata = $GET(^Data("Color"))

这将检索指定节点的值(如果存在)，如果该节点没有值，则返回空字符串(“”)。如果节点没有值，可以使用可选的第二个参数$get返回指定的默认值。

WRITE、ZWRITE和ZZDUMP命令

可以使用各种ObjectScript显示命令显示全局变量或全局变量子节点的内容。WRITE命令以字符串形式返回指定全局或子节点的值。ZWRITE命令返回全局变量的名称及其值，以及它的每个子代节点及其值。ZZDUMP命令以十六进制转储格式返回指定全局或子节点的值。