支持HL7 转FHIR,CDA 转FHIR,FHIR转HL7的云服务
InterSystems IRIS for Health™ 是全球第一个也是唯一一个专门为医疗应用程序的快速开发而设计的数据平台,用于管理全世界最重要的数据。它包括强大的开箱即用的功能:事务处理和分析、可扩展的医疗保健数据模型、基于 FHIR 的解决方案开发、对医疗保健互操作性标准的支持等等。所有这些将使开发者能够快速实现价值并构建具有突破性的应用程序。了解更多信息。
InterSystems IRIS for Health™ 是全球第一个也是唯一一个专门为医疗应用程序的快速开发而设计的数据平台,用于管理全世界最重要的数据。它包括强大的开箱即用的功能:事务处理和分析、可扩展的医疗保健数据模型、基于 FHIR 的解决方案开发、对医疗保健互操作性标准的支持等等。所有这些将使开发者能够快速实现价值并构建具有突破性的应用程序。了解更多信息。
支持HL7 转FHIR,CDA 转FHIR,FHIR转HL7的云服务
可以使用标准DDL命令在InterSystems SQL中定义表:
InterSystems SQL中可用的DDL命令
ALTER命令 ALTER TABLE,ALTER VIEWCREATE 命令 CREATE TABLE,CREATE VIEW,CREATE INDEX,CREATE TRIGGERDROP 命令 DROP TABLE,DROP VIEW,DROP INDEX,DROP TRIGGER可以通过多种方式执行DDL命令,包括:
在ObjectScript方法或例程中,可以使用嵌入式SQL来调用DDL命令。
例如,以下方法创建一个Sample.Employee表:
/// d ##class(PHA.TEST.SQL).CreateTable()
ClassMethod CreateTable() As %String
{
&sql(CREATE TABLE Sample.InterSystems IRIS提供了两种方法来唯一标识表中的行:RowID和主键。
可选的主键是一个有意义的值,应用程序可以使用该值唯一地标识表中的行(例如,联接中的行)。主键可以是用户指定的数据字段,也可以是多个数据字段的组合。主键值必须是唯一的,但不必是整数值。 RowID是一个内部用于标识表中行的整数值。通常,主键是由应用程序生成的值,而RowID是由InterSystems IRIS生成的唯一整数值。
系统会自动创建一个主map,以使用RowID字段访问数据行。如果定义主键字段,系统将自动创建并维护主键索引。
显然,具有两个不同的字段和索引来标识行的双重性不一定是一件好事。可以通过以下两种方式之一解析为单个行标识符和索引:
IDKEY。
可以通过使用关键字PrimaryKey和IdKey在类定义中标识主键索引来实现这一点(如果为此目的设置了PKey is IdKey标志,也可以在DDL中实现这一点)。
这使得主键索引成为表的主映射。
因此,主键将被用作行的主要内部地址。
如果主键包含多个字段,或者主键值不是整数,那么这种方法的效率会较低。RowID整数作为应用程序使用的主键(例如,在joins中)。可以通过定义表(使用CREATE TABLE)或通过定义投影到表的持久类来创建表:
由于以下原因,这两个名字之间的对应关系可能不相同:
SqlTableName类关键字来提供不同的SQL表名。SQLUser;
初始默认包名为“User”。表、视图或存储过程名称可以是限定的(schema.name),也可以是限定的(name)。
InterSystems SQL支持以下算术运算符:
+ 加法操作符。
例如,17+7 = 24。
– 减法运算符。
例如,17-7等于10。
注意,这些字符中的一对是InterSystems SQL注释指示器。
因此,要指定两个或多个减法操作符或负号,必须使用空格或圆括号。
例如,17- -7或17-(-7)等于24。
| 运算符 | 描述 |
|---|---|
+ |
加法操作符。 |
– |
减法运算符。例如,17-7等于10。注意,这些字符中的一对是InterSystems SQL注释指示器。因此,要指定两个或多个减法操作符或负号,必须使用空格或圆括号。 |
* |
乘法运算符。例如,17*7等于119。 |
/ |
除法操作符。例如:17/7 = 2.428571428571428571。 |
\ |
整数除法运算符。例如,17\7等于2。 |
# |
模运算符。例如,17 #7等于3。注意,因为#字符也是一个有效的标识符字符,要将它用作模运算符,应该指定它与操作数之间用前后空格分隔 |
E |
求幂(科学记数法)运算符。可以是大写或小写。例如:7E3 = 7000。指数过大会导致SQLCODE -7“指数超出范围”错误。例如1E309、7E308。 |
() |
分组操作符。用于嵌套算术运算。 |
InterSystems SQL提供对InterSystems IRIS®Data Platform数据库中存储的数据的无懈可击的标准关系访问。
InterSystems SQL提供以下优势:
提供例程信息。
^$|nspace|ROUTINE(routine_name)
^$|nspace|R(routine_name)
|nspace|或[nspace] 可选-扩展SSVN引用,可以是显式名称空间名称,也可以是隐含名称空间。必须计算为带引号的字符串,该字符串括在方括号([“nspace”])或竖线(|“nspace”|)中。命名空间名称不区分大小写;它们以大写字母存储和显示。可以将^$ROUTINE结构化系统变量用作$DATA、$ORDER和$QUERY函数的参数,以从当前命名空间(默认)或指定命名空间返回例程信息。^$ROUTINE返回有关例程的OBJ代码版本的例程信息。
在InterSystems ObjectScript中,一个例程有三个代码版本:MAC(用户编写的代码,可能包括宏预处理器语句)、INT(编译的MAC代码,用于执行宏预处理)和OBJ(可执行目标代码)。可以使用^$ROUTINE global返回关于int代码版本的信息。可以使用^$ROUTINE返回有关OBJ代码版本的信息。
此可选参数允许使用扩展SSVN引用在另一个命名空间中指定全局。
标识符是SQL实体的名称,例如表、视图、列(字段)、模式、表别名、列别名、索引、存储过程、触发器或其他SQL实体。 标识符名称在其上下文中必须是唯一的; 例如,同一模式中的两个表或同一表中的两个字段不能具有相同的名称。 但是,不同模式中的两个表或不同表中的两个字段可以具有相同的名称。 在大多数情况下,相同的标识符名称可以用于不同类型的SQL实体; 例如,一个模式、该模式中的表以及该表中的字段都可以具有相同的名称,而不会产生冲突。 但是,同一个模式中的表和视图不能具有相同的名称。
InterSystems IRIS®数据平台SQL标识符遵循一组命名约定,根据标识符的使用,这可能会受到进一步的限制。 标识符不区分大小写。
标识符可以是简单标识符,也可以是分隔符。 InterSystems SQL默认支持简单标识符和分隔标识符。
简单标识符有以下语法:
simple-identifier ::= identifier-start { identifier-part }
identifier-start ::= letter | % | _
identifier-part ::= letter | number | _ | @ | # | $
标识符start是SQL标识符的第一个字符。
它必须是下列之一:
本章概述了InterSystems SQL的特性,特别是那些SQL标准未涵盖的特性,或者与InterSystems IRIS®数据平台统一数据架构相关的特性。 本教程假定读者具备SQL知识,并不是为介绍SQL概念或语法而设计的。
本章讨论以下主题:
在InterSystems SQL中,数据显示在表中。每个表都包含许多列。一个表可以包含零个或多个数据值行。以下术语大体上等效:
| 数据术语 | 关系数据库术语 | InterSystems IRIS术语 |
|---|---|---|
| 数据库 | 架构 | 包 |
| 数据库 | 表 | persistent class(持久类) |
| 字段 | 列 | 属性 |
| 记录 | 行 |
表有两种基本类型:基表(包含数据,通常简称为表)和视图(基于一个或多个表提供逻辑视图)。
SQL模式提供了一种将相关表,视图,存储过程和缓存查询的集合进行分组的方法。模式的使用有助于防止表级别的命名冲突,因为表,视图或存储过程的名称在其模式内必须唯一。应用程序可以在多个架构中指定表。
SQL模式与持久性类包相对应。通常,模式与其相应的程序包具有相同的名称,但是由于不同的模式命名约定或故意指定了不同的名称,因此这些名称可能有所不同。模式到程序包的映射在SQL到类名的转换中有进一步描述。
InterSystems SQL命令(也称为SQL语句)以关键字开头,后跟一个或多个参数。其中一些参数可能是子句或函数,由它们自己的关键字标识。
;)终止。否则,InterSystems SQL命令不需要或接受分号命令终止符。在InterSystems SQL中指定分号命令终止符会导致SQLCODE -25错误。 TSQL的InterSystemsIRIS®数据平台实现(Transact-SQL)接受但不需要分号命令终止符。在将SQL代码导入Inter Systems SQL时,会去除分号命令终止符。InterSystems SQL关键字包括命令名称,函数名称,谓词条件名称,数据类型名称,字段约束,优化选项和特殊变量。
提供锁名信息。
^$|nspace|LOCK(lock_name,info_type,pid)
^$|nspace|L(lock_name,info_type,pid)
|nspace|或[nspace] [nspace]可选-扩展SSVN引用,显式名称空间名称或隐含名称空间。必须计算为带引号的字符串,该字符串括在方括号([“nspace”])或竖线(|“nspace”|)中。命名空间名称不区分大小写;它们以大写字母存储和显示。lock_name的哪种类型的信息。可用选项有“所有者”、“标志”、“模式”和“计数”。作为独立函数调用^$LOCK时需要。pid对其他info_type关键字没有影响。^$LOCK结构化系统变量返回有关当前命名空间或本地系统上指定命名空间中的锁的信息。
大家好!
InterSystems IRIS 有一个名为 Interoperability(互操作性)的菜单。
它提供了轻松创建系统集成(适配器、记录映射、BPM、数据转换等)的机制,因此可以轻松连接不同的系统。
数据中继过程中可以包括各种操作,例如:为了连接没有正常连接的系统,可以根据目标系统的规范来接收(或发送)数据。 此外,在发送数据之前,可以从其他系统获取和添加信息。 还可以从数据库(IRIS 等)获取和更新信息。
在本系列文章中,我们将讨论以下主题,同时查看 示例代码 以帮助您了解工作原理以及在系统中集成互操作性时需要进行哪种开发。
首先,我介绍一下我们将在本系列文章中使用的案例研究。
某公司运营着一个购物网站,他们正在更改产品信息的显示顺序以配合季节变化。
但是,有些商品无论季节如何都能卖得很好,而有些商品在意料之外的时间卖出,这不符合当前的显示顺序更改规则,
因此,我们研究了按照当天的温度而不是季节来更改显示顺序的可能性。 调查购买产品时的温度变得非常必要。
由于可以使用外部 Web API 来查询天气信息,因此我们计划收集购买时的天气信息,并将其记录在后面的审核数据库中。
案例非常简单,但您需要使用“外部 Web API”来收集信息,并且需要将获得的信息和购买信息结合起来记录在数据库中。
InterSystems IRIS 元素周期表

PDF 版本:https://github.com/yurimarx/iris-periodic-table/raw/master/periodic%20table%20iris.pdf
GIT 源:https://github.com/yurimarx/iris-periodic-table
InterSystems IRIS 是一个具有许多功能的数据平台。 这些功能和相关的 IRIS 主题都体现在元素周期表中。
最近完成了针对IRIS医疗版2020.1版本的性能及可扩展性基准测试,重点关注HL7v2的互操作性。本文介绍了在各种工作负载下观察到的吞吐量,并提供了IRIS医疗版用作HL7v2消息传输互操作性引擎时的系统常规配置和调整准则。
基准测试模拟了与实际环境接近的工作负载(详细信息请参见“工作负载说明和方法”部分)。本次测试的工作负载包括HL7v2患者管理(ADT)和生命体征结果(ORU)数据,并包含数据内容转换和路由。
IRIS医疗版2020.1版本可以表明,采用第二代Intel®Xeon®可扩展处理器和Intel®Optane™SSD DC P4800X系列SSD存储的商用服务器,每天的持续消息吞吐量超过23亿条(入站和出站总量),与此前的Ensemble 2017.1 HL7v2吞吐量基准测试相比,扩展性提高了一倍多。
.jpeg)
不少客户问我关于从Cache迁移到IRIS的问题。为什么要迁移到IRIS?Cache是优秀的,稳定的,有很好的性能,为什么要迁移到IRIS呢?这些客户是对的,但在过去几年,数字化转型提出了不少新问题、新需求和新挑战,客户需要更灵活、更完整、更前瞻的解决方案,InterSystems公司很有远见地洞察到了这一点,推出了IRIS。
一句话,IRIS是一套数据平台解决方案,它帮助客户和合作伙伴为迎接数字化转型的挑战提供了充足的弹药。
提供系统间IRIS进程(JOB)信息。
^$JOB(job_number)
^$J(job_number)
job_number 输入ObjectScript命令时创建的系统特定OBJ编号。每个活动的InterSystems IRIS进程都有一个唯一的作业号。登录到系统会启动一个作业。在UNIX®系统上,作业号是调用InterSystems IRIS时启动的子进程的PID。JOB_NUMBER必须指定为整数;不支持十六进制值。可以将^$JOB结构化系统变量用作$DATA、$ORDER和$QUERY函数的参数,以获取有关本地InterSystems IRIS系统上是否存在InterSystems IRIS作业的信息。
以下示例显示如何将^$JOB用作$DATA、$ORDER和$QUERY函数的参数。
$DATA(^$JOB(job_number))
^$JOB作为$DATA的参数返回一个整数值,该值指示指定的作业是否作为节点存在于^$JOB中。下表显示了$DATA可以返回的整数值。
| Value | Meaning |
|---|---|
| 0 | JOB不存在 |
| 1 | JOB存在 |
以下示例测试系统间IRIS进程是否存在。
DHC-APP>SET x=$JOB
DHC-APP>WRITE !提供有关全局变量和进程私有全局变量的信息。
^$|nspace|GLOBAL(global_name)
^$|nspace|G(global_name)
^$||GLOBAL(global_name)
^$||G(global_name)
|nspace| 或 [nspace] - 可选-扩展SSVN引用,可以是显式名称空间名称,也可以是隐含名称空间。必须计算为带引号的字符串,该字符串括在方括号([“nspace”])或竖线(|“nspace”|)中。命名空间名称不区分大小写;它们以大写字母存储和显示。^$||global()语法时,与进程专用全局名称相对应的无下标全局名称:^a表示^||a。可以将^$GLOBAL用作$DATA、$ORDER和$QUERY函数的参数,以返回有关当前名称空间(默认名称空间)或指定名称空间中是否存在全局变量的信息。还可以使用^$global返回有关存在进程私有全局变量的信息。
可以使用^$global获取有关所有命名空间中是否存在进程私有全局变量的信息。可以将进程专用全局的查找指定为^$||global或^$|“^”|global。
包含一个字符串,描述do命令后面的InterSystems IRIS.line的当前版本。
$ZVERSION
$ZV
$ZVERSION包含一个字符串,该字符串显示当前运行的InterSystems IRIS®Data Platform实例的版本。
以下示例返回$ZVERSION字符串:
DHC-APP>WRITE $ZVERSION
Cache for Windows (x86-64) 2016.2 (Build 736U) Fri Sep 30 2016 11:46:02 EDT
此字符串包括InterSystems IRIS安装的类型(产品和平台,包括CPU类型)、版本号(2018.1)、该版本中的内部版本号(内部版本号中的“U”表示UNICODE以及创建此版本的InterSystems IRIS的日期和时间。“EST”是东部标准时间(美国东部的时区),“EDT”是东部夏令时
通过调用GetVersion()类方法可以返回相同的信息,如下所示:
DHC-APP>WRITE $SYSTEM.Version.GetVersion()
Cache for Windows (x86-64) 2016.2 (Build 736U) Fri Sep 30 2016 11:46:02 EDT
以通过调用其他%SYSTEM.
包含当前错误陷阱处理程序的名称。
$ZTRAP
$ZT
$ZTRAP包含当前错误陷阱处理程序的行标签名和/或例程名。有三种方法可以设置$ZTRAP:
SET $ZTRAP=“location”SET $ZTRAP=“*location”SET $ZTRAP=“^%ET” or “^%ETN”在这里,位置可以指定为标签(当前例程中的行标签)、^routine(指定外部例程的开始)或label^routine(指定外部例程中的指定标签)。
然而,$ZTRAP=label^routine不能用于程序块。过程块中的$ZTRAP不能用于转到过程体之外的位置;过程块中的$ZTRAP只能引用该过程块中的一个位置。
使用设置命令,可以将位置指定为带引号的字符串。
^routine(指定外部例程的开始)或label^routine(指定外部例程中的指定标签)。不要在引用过程或过程中的标签的例程中指定位置。这是一个无效位置;当InterSystems IRIS试图执行$ZTRAP时,会导致运行时错误。$ZTRAP不能用于转到过程体之外的位置;过程块中的$ZTRAP只能引用该过程块中的一个位置。包含格林威治子午线的时区偏移量。
$ZTIMEZONE
$ZTZ
$ZTIMEZONE可以通过两种方式使用:
$ZTIMEZONE包含从格林威治子午线偏移的时区(以分钟为单位)。 (格林威治子午线包括整个英国和爱尔兰。)此偏移量表示为-1440到1440范围内的有符号整数。格林威治以西的时区指定为正数;格林威治东部的时区指定为负数。 (时区必须以分钟为单位,因为并非所有时区都以小时为单位。)默认情况下,$ZTIMEZONE初始化为计算机操作系统设置的时区。
注意:$ZTIMEZONE将本地时间调整为固定的偏移量。它不适应夏令时或其他当地时间的变化。 InterSystems IRIS从基础操作系统获取本地时间,该操作系统将本地时间变体应用于为该计算机配置的位置。因此,使用$ZTIMEZONE调整的本地时间将从配置的语言环境中获取其本地时间变化,而不是在$ZTIMEZONE中指定的时区。
使用格林威治子午线($ZTIMEZONE = 0)的时区计数来计算UTC时间。它与当地格林威治时间不同。格林威治标准时间(GMT)一词可能令人困惑;格林威治的当地时间与冬季的UTC相同。在夏季,它与UTC的差异为一小时。这是因为应用了称为英国夏令时的本地时间变体。
包含协调世界时间格式的当前日期和时间。
$ZTIMESTAMP
$ZTS
$ZTIMESTAMP包含协调的通用时间值形式的当前日期和时间。这是世界范围内的时间和日期标准;此值很可能与当地的时间(和日期)值不同。
$ZTIMESTAMP将日期和时间表示为以下格式的字符串:
ddddd,sssss.fff
其中ddddd是一个整数,指定自1840年12月31日起的天数;sssss是一个整数,指定自当天午夜以来的秒数,fff是一个可变的数字,指定小数秒。这种格式类似于$HOROLOG,只是$HOROLOG不包含分数秒。
假设当前日期和时间(世界协调时)如下:
2018-02-22 15:17:27.984
当时,$ZTIMESTAMP的值为:
64701,55047.984
$ZTIMESTAMP报告协调世界时(UTC),它独立于时区。因此,$ZTIMESTAMP提供了一个跨时区的统一时间戳。这可能不同于本地时间值和本地日期值。
$ZTIMESTAMP时间值是一个十进制数值,以秒及其分数为单位计算时间。分数秒的位数可能从零到九不等,具体取决于计算机时钟的精度。在视窗系统上,小数精度是三位小数;在UNIX系统上,它是六位十进制数字。$ZTIMESTAMP在此小数部分中抑制尾随零或尾随小数点。请注意,在午夜后的第一秒内,秒表示为0.
包含进程的最大可用内存。
$ZSTORAGE
$ZS
$ZSTORAGE包含JOB的进程私有内存的最大内存量(以KB为单位)。此内存可用于局部变量、堆栈和其他表。此内存限制不包括例程目标代码的空间。此内存根据需要分配给进程,例如在分配数组时。
一旦将此内存分配给进程,通常在该进程退出之前不会释放它。但是,当大量内存被使用(例如,大于32MB)然后被释放时,系统间IRIS会尝试在可能的情况下将释放的内存释放回操作系统。
还可以使用$ZSTORAGE设置最大内存大小。例如,以下语句将作业的最大进程专用内存设置为524288 KB:
SET $ZSTORAGE=524288
更改$ZSTORAGE会更改$STORAGE特殊变量的初始值,该变量包含进程的当前可用内存(以字节为单位)。
$ZSTORAGE的最大值为2147483647。$ZSTORAGE默认值为262144。$ZSTORAGE的最小值为128。$ZSTORAGE值大于最大值或小于最小值会自动默认为最大值或最小值。$ZSTORAGE设置为整数值;InterSystems IRIS截断任何小数部分(如果指定)。
可以通过更改最大每进程内存(KB)系统配置设置来更改$ZSTORAGE默认值。
包含当前全局变量global引用。
$ZREFERENCE
$ZR
$ZREFERENCE包含上次全局引用的名称和下标。这就是所谓裸指针。
注意:最后一个全局引用是最近访问的全局节点。通常,这是对全局的最新显式引用。但是,某些命令可能在内部使用$ORDER函数遍历全局下标(ZWRITE命令就是一个例子),或者它们可能在内部引用其他全局脚本。发生这种情况时,$ZREFERENCE包含上次访问的全局节点,该节点可能不是为命令指定的全局节点。
最后一个全局引用可以是全局(^myglob)或进程专用全局(^||myppg)。$ZREFERENCE以最初用于该变量的形式返回进程专用全局前缀,而不管随后对该变量使用哪个进程专用全局前缀。在接下来的$ZREFERENCE描述中,单词“global”指的是这两种类型的变量。
最后一个全局引用是命令或函数最近引用的全局。由于ObjectScript按从左到右的顺序执行操作,因此最后一个全局引用始终是最右侧的全局引用。当命令或函数使用多个参数时,最右侧参数中指定的全局参数是最后一个全局引用。当参数包含多个全局引用时,最右侧指定的全局引用是最后一个全局引用。即使使用圆括号来定义操作顺序,从左到右的严格顺序也是正确的。
包含当前进程的父进程的ID。
$ZPARENT
$ZP
$ZPARENT包含使用JOB命令创建当前进程的父进程的ID。如果当前进程不是使用JOB命令创建的,则$ZPARENT包含0(零)。
不能使用SET命令修改此特殊变量。尝试这样做会导致<SYNTAX>错误。
包含pi的值。
$ZPI
$zpi包含数值常量Pi到小数点后18位的值(3.141592653589793238)。
该值经常用于三角函数,例如正弦函数$ZSIN。
包含读取顺序文件期间的当前文件位置。
$ZPOS
$ZPOS包含顺序文件读取期间的当前文件位置。如果没有正在进行的顺序文件读取,则$ZPOS包含0(零)。
当打开文件进行顺序读取时,每次从该设备读取都会将$ZPOS设置为文件中下一次读取的位置。$ZPOS值是读取、读取*或读取#n结束时的实际文件偏移量(以字节为单位)。用户在读取多字节字符集时必须适当小心。
可以使用$ZSEEK函数设置当前文件位置。不能使用SET命令修改此特殊变量。尝试这样做会导致<SYNTAX>错误。
包含下一个全局节点的值。
$ZORDER
$ZO
$ZORDER包含当前全局引用之后的下一个全局节点的值(在$QUERY序列中,而不是$ORDER序列中)。如果没有下一个全局节点,访问$ZORDER将导致<unfined>错误,指示$ZORDER成功访问的最后一个全局节点。
不能使用SET命令修改此特殊变量。尝试这样做会导致<SYNTAX>错误。
下面的示例使用WHILE循环重复调用$ZORDER以遍历一系列下标节点:
/// d ##class(PHA.TEST.SpecialVariables).包含当前命名空间名称。
$ZNSPACE
$ZNSPACE包含当前命名空间的名称。通过设置$ZNSPACE,可以更改当前名称空间。
要获取当前命名空间名称,请执行以下操作:
DHC-APP>SET ns=$ZNSPACE
DHC-APP>WRITE ns
DHC-APP
还可以通过调用%SYSTEM.SYS类的Namespace()方法来获取当前命名空间的名称,如下所示:
DHC-APP>SET ns=$SYSTEM.SYS.NameSpace()
DHC-APP>WRITE ns
DHC-APP
可以使用%SYS.Namespace类的Existes()方法测试命名空间是否已定义,如下所示:
DHC-APP>WRITE ##class(%SYS.Namespace).Exists("USER")
1
DHC-APP>WRITE ##class(%SYS.Namespace).Exists("LOSER")
0
对于UNIX®系统,默认命名空间建立为系统配置选项。对于Windows系统,它是使用命令行启动选项设置的。
命名空间名称不区分大小写。InterSystems IRIS始终以全大写字母显示显式名称空间名称,以全小写字母显示隐含的名称空间名称。
要获取指定进程的命名空间名称,请使用%SYS.
包含当前例程名称。
$ZNAME
$ZN
$ZNAME包含在当前进程上执行的例程的名称。通常,这是ZLOAD加载的当前例程。如果当前没有执行任何例程,则$ZNAME包含空字符串。
当ZLOAD加载一个例程时,它将成为所有名称空间中当前进程的当前加载例程。因此,可以使用$ZNAME显示任何名称空间中当前加载的例程的名称,而不仅仅是加载该例程的名称空间。
例程名称区分大小写。
请注意,尝试ZLOAD例程失败会删除当前加载的例程,并将$ZNAME设置为空字符串。
不能使用SET命令修改此特殊变量。尝试这样做会导致<SYNTAX>错误。
$ZNAME值可以通过以下任何命令设置:
包含当前I/O设备打开参数。
$ZMODE
$ZM
$ZMODE包含使用OPEN或USE命令为当前设备指定的参数。返回的字符串包含用于以规范形式打开当前I/O设备的参数。这些参数值由反斜杠分隔符分隔。TCP/IP IO上的开放参数(如“M”)被规范化为“PSTE”。“Y”和“K”参数值始终放在最后。
不能使用SET命令修改此特殊变量。尝试这样做会导致<SYNTAX>错误。
以下示例使用$ZMODE返回当前设备的参数:
/// d ##class(PHA.TEST.SpecialVariables).ZMODE()
ClassMethod ZMODE()
{
WRITE !,"当前的开放模式有: ",$PIECE($ZMODE,"\")
WRITE !,"NLS集合为: ",$PIECE($ZMODE,"\",2)
WRITE !,"网络编码是: ",$PIECE($ZMODE,"\",4)
}
DHC-APP> d ##class(PHA.TEST.SpecialVariables).ZMODE()
当前的开放模式有: RY
NLS集合为: Latin1
网络编码是: GB18030
d ##class(PHA.TEST.SpecialVariables).包含JOB状态信息。
$ZJOB
$ZJ
$ZJOB包含一个数字,其中每个位代表作业状态的一个特定方面。 $ZJOB返回一个整数,该整数由设置的状态位的总和组成。例如,如果$ZJOB = 5,则表示设置了1位和4位。
要测试单个$ZJOB位设置,可以使用整数除(\)和模(#)运算符。例如,$ZJOB\x#2,其中x是位号。下表显示了位的布局(按位的位置值)、其设置和含义:
| Bit | Set to | Meaning |
|---|---|---|
| 1 | 1 | Job 从终端提示符启动。 |
| 1 | 0 | Job 从routine开始. |
| 2 | 1 | Job 由JOB命令启动. |
| 2 | 0 | Job 通过在终端提示下登录或从例程登录开始。 |
| 4 | 1 | <INTERRUPT> 已启用。 CTRL-C可以中断正在运行的程序。 |
| 4 | 0 | <INTERRUPT>被禁用,但已通过OPEN或USE命令显式启用了<INTERRUPT>的终端行除外。 |
| 8 | 1 | <Interrupt>已收到并挂起。 |
| 8 | 0 | 未收到<Interrupt>。值8由OPEN和USE命令以及CTRL-C引起的错误陷阱清除。 |
| 1024 | 1 | 无论其他条件如何,日志记录都会被禁用。 |
| 1024 | 0 | 如果其他条件指示日志记录,则为此作业启用日志记录。 |
不能使用SET命令修改此特殊变量。
包含有关当前终端I / O设备的信息。
$ZIO
$ZI
$ZIO包含有关当前I / O设备的信息。
对于作为终端的终端设备,$ZIO包含字符串TRM:。如果当前终端设备是远程连接的,则$ZIO包含有关远程连接的信息。
对于通过TELNET连接的终端设备,$ZIO包含以下内容:host | port:
| 参数 | 描述 |
|---|---|
| host | 远程主机IP地址,格式为IPv4:nnn.nnn.nnn.nnn(其中nnn是十进制数字)或IPv6格式:h:h:h:h:h:h:h:h,其中h为十六进制数。 |
| por | 远程IP端口号。 |
这两个值由竖线字符分隔。例如127.0.0.1 | 23。
如果当前设备不是终端:
$ZIO包含文件的完整规范路径名。$ZIO包含空字符串。以下示例返回当前设备信息:
/// d ##class(PHA.TEST.SpecialVariables).ZIO()
ClassMethod ZIO()
{
SET x = $CASE($ZIO,
"TRM:":"终端",
"CON:":"控制台",
"":"既不是终端也不是文件")
WRITE "当前设备是 ",x
}