第六十五章 SQL函数 %INTERNAL

返回逻辑格式表达式的格式转换函数。

大纲

%INTERNAL(expression)

%INTERNAL expression

参数

• expression - 要转换的表达式。
  字段名、包含字段名的表达式，或返回可转换数据类型(如DATE或%List)中的值的函数。

描述

%INTERNAL将表达式转换为逻辑格式，与当前选择模式(显示模式)无关。逻辑格式是数据的内存格式(对其执行操作的格式)。%INTERNAL通常用于选择列表SELECT-ITEM。

可以在WHERE子句中使用%INTERNAL，但强烈建议不要使用%INTERNAL，因为使用%INTERNAL会阻止在指定字段上使用索引，并且%INTERNAL会强制所有比较区分大小写，即使该字段有默认排序规则也是如此。

应用%INTERNAL会将列标题名称更改为诸如“Expression_1”之类的值；因此，通常需要指定列名别名，如下面的示例所示。

%INTERNAL将数据类型%DATE的值转换为整数数据类型值。%INTERNAL将数据类型%TIME的值转换为数字(15，9)数据类型值。之所以提供此转换，是因为ODBC或JDBC客户端不识别逻辑%DATE和%TIME值。

%INTERNAL是否转换日期取决于日期字段或函数返回的数据类型。%INTERNAL转换CURDATE、CURRENT_DATE、CURTIME和CURRENT_TIME值。它不转换CURRENT_TIMESTAMP、GETDATE、GETUTCDATE、NOW和$HOROLOG值。

不能将流字段指定为ObjectScript一元函数(包括所有格式转换函数，%Internal除外)的参数。%INTERNAL函数允许将流字段作为表达式值，但不对该流字段执行任何操作。

%INTERNAL是InterSystems SQL扩展。

要将表达式转换为显示格式，而不考虑当前的选择模式，请使用%EXTERNAL函数。要将表达式转换为ODBC格式，而不考虑当前的SELECT模式，请使用%ODBCOUT函数。

示例

下面的动态SQL示例以当前选择模式格式返回出生日期(道布)数据值，并使用%INTERNAL函数返回相同的数据。出于演示目的，在此程序中，为每次调用随机确定%SelectMode值：

ClassMethod Internal()
{
    s tStatement = ##class(%SQL.Statement).%New()
    s tStatement.%SelectMode=$RANDOM(3)
    if tStatement.%SelectMode=0 {WRITE "Select mode LOGICAL",! }
    elseif tStatement.%SelectMode=1 {WRITE "Select mode ODBC",! }
    elseif tStatement.%SelectMode=2 {WRITE "Select mode DISPLAY",! }
    s myquery = 2
    s myquery(1) = "SELECT TOP 5 DOB,%INTERNAL(DOB) AS IntDOB "
    s myquery(2) = "FROM Sample.Person"
    s qStatus = tStatement.%Prepare(.myquery)
    s rset = tStatement.%Execute()
    d rset.%Display()
    w !,"End of data"
}

DHC-APP>d ##class(PHA.TEST.SQLCommand).Internal()
Select mode DISPLAY
DOB     IntDOB
04/25/1990      54536

01/02/2014      63189
01/02/2014      63189
01/28/1978      50066

5 Rows(s) Affected
End of data

下面的示例显示了此函数的两种语法形式；在其他方面它们是相同的。它们指定%LIST字段的%EXTERNAL(显示格式)、%INTERNAL(逻辑格式)和%ODBCOUT(ODBC格式)：

SELECT TOP 10 %EXTERNAL(FavoriteColors) AS ExtColors,
              %INTERNAL(FavoriteColors) AS IntColors,
              %ODBCOUT(FavoriteColors) AS ODBCColors
FROM Sample.Person

SELECT TOP 10 %EXTERNAL FavoriteColors AS ExtColors,
              %INTERNAL FavoriteColors AS IntColors,
              %ODBCOUT FavoriteColors AS ODBCColors
FROM Sample.Person