美文网首页
第十三章 使用动态SQL(六)

第十三章 使用动态SQL(六)

作者: Cache技术分享 | 来源:发表于2021-03-29 07:49 被阅读0次

第十三章 使用动态SQL(六)

%ObjectSelectMode = 1 Swizzling字段名称属性

下面的示例使用%ObjectSelectMode = 1进行准备,当使用字段名称属性返回值时,其类型类别为可Swizzle类型的字段(持久性类,序列类或流类)将自动发生Swizzle。转换字段值的结果是相应的对象参考(oref)。使用%Get()%GetData()方法访问字段时,InterSystems IRIS不会执行此筛选操作。在此示例中,rset.Home处于Swizzle状态,而引用同一字段的rset.%GetData(2)处于not swizzled状态:

/// d ##class(PHA.TEST.SQL).PropSQL2()
ClassMethod PropSQL2()
{
    SET myquery = "SELECT TOP 5 Name,Home FROM Sample.Person"
    SET tStatement = ##class(%SQL.Statement).%New(0)
    SET tStatement.%ObjectSelectMode=1
    WRITE !,"set ObjectSelectMode=",tStatement.%ObjectSelectMode,!
    SET qStatus = tStatement.%Prepare(myquery)
    IF qStatus'=1 {
        WRITE "%Prepare failed:" DO $System.Status.DisplayError(qStatus) QUIT
    }
    SET rset = tStatement.%Execute()
    WHILE rset.%Next() {
        WRITE "Row count ",rset.%ROWCOUNT,!
        WRITE rset.Name
        WRITE " ",rset.Home,!
        WRITE rset.%GetData(1)
        WRITE " ",$LISTTOSTRING(rset.%GetData(2)),!!
    }
    WRITE !,"End of data"
    WRITE !,"Total row count=",rset.%ROWCOUNT
}

DHC-APP> d ##class(PHA.TEST.SQL).PropSQL2()
 
set ObjectSelectMode=1
Row count 1
yaoxin 5@Sample.Address
yaoxin 889 Clinton Drive,St Louis,WI,78672
 
Row count 2
xiaoli 5@Sample.Address
xiaoli
 
Row count 3
姚鑫 5@Sample.Address
姚鑫
 
Row count 4
姚鑫 5@Sample.Address
姚鑫
 

下面的示例使用%ObjectSelectMode = 1从唯一记录ID(%ID)导出所选记录的Home_State值。请注意,在原始查询中未选择Home_State字段:

/// d ##class(PHA.TEST.SQL).PropSQL2()
ClassMethod PropSQL2()
{
    SET myquery = "SELECT TOP 5 %ID AS MyID,Name,Age FROM Sample.Person"
    SET tStatement = ##class(%SQL.Statement).%New()
    SET tStatement.%ObjectSelectMode=1
    SET qStatus = tStatement.%Prepare(myquery)
    IF qStatus'=1 {WRITE "%Prepare failed:" DO $System.Status.DisplayError(qStatus) QUIT}
    SET rset = tStatement.%Execute()
    WHILE rset.%Next() {
        WRITE rset.Name
        WRITE " Home State:",rset.MyID.Home.State,!
    }
    WRITE !,"End of data"
    WRITE !,"Total row count=",rset.%ROWCOUNT
}

DHC-APP>d ##class(PHA.TEST.SQL).PropSQL2()
yaoxin Home State:WI
xiaoli Home State:
姚鑫 Home State:
姚鑫 Home State:
姚鑫 Home State:
 
End of data
Total row count=5

如果已配置,则如果配置了swizzled属性,但系统无法生成引用,则系统会生成<SWIZZLE FAIL>错误。如果引用的属性已从磁盘中意外删除或被另一个进程锁定,则会发生这种情况。要确定SWIZZLE失败的原因,请在<SWIZZLE FAIL>错误之后立即在%objlasterror中查找并解码此%Status值。

默认情况下,未配置<SWIZZLE FAIL>。可以通过设置SET ^%SYS("ThrowSwizzleError")=1或使用InterSystems IRIS管理门户来全局设置此行为。在“系统管理”中,选择“配置”,然后选择“ SQL和对象设置”,然后选择“对象”。在此屏幕上,可以设置<SWIZZLE FAIL>选项。

%Get("fieldname")方法

可以使用%Get(“ fieldname”)实例方法按字段名称或字段名称别名返回数据值。 Dynamic SQL根据需要解析字母大小写。如果指定的字段名称或字段名称别名不存在,系统将生成<PROPERTY DOES NOT EXIST>错误。

下面的示例从查询结果集中返回Home_State字段和Last_Name别名的值。

/// d ##class(PHA.TEST.SQL).PropSQL4()
ClassMethod PropSQL4()
{
    SET myquery = "SELECT TOP 5 Home_State,Name AS Last_Name FROM Sample.Person"
    SET tStatement = ##class(%SQL.Statement).%New(2)
    SET qStatus = tStatement.%Prepare(myquery)
    IF qStatus'=1 {
        WRITE "%Prepare failed:" DO $System.Status.DisplayError(qStatus) QUIT
    }
    SET rset = tStatement.%Execute()
    WHILE rset.%Next() {
        WRITE rset.%Get("Home_State")," : ",rset.%Get("Last_Name"),!
    }
    WRITE !,"End of data"
    WRITE !,"Total row count=",rset.%ROWCOUNT
}
DHC-APP>d ##class(PHA.TEST.SQL).PropSQL4()
WI : yaoxin
 : xiaoli
 : 姚鑫
 : 姚鑫
 : 姚鑫
 
End of data
Total row count=5

必须使用%Get("fieldname")实例方法从使用%PrepareClassQuery()准备的现有查询中按字段属性名称检索单个数据项。如果字段属性名称不存在,则系统会生成<PROPERTY DOES NOT EXIST>错误。

下面的示例从内置查询中按字段属性名称返回Nsp(命名空间)字段值。因为此查询是现有的存储查询,所以此字段检索需要使用%Get("fieldname")方法。请注意,由于“Nsp”是属性名称,因此区分大小写:

/// d ##class(PHA.TEST.SQL).PropSQL5()
ClassMethod PropSQL5()
{
    SET tStatement = ##class(%SQL.Statement).%New(2)
    SET qStatus = tStatement.%PrepareClassQuery("%SYS.Namespace","List")
    IF qStatus'=1 {
        WRITE "%Prepare failed:" DO $System.Status.DisplayError(qStatus) QUIT
    }
    SET rset = tStatement.%Execute()
    WHILE rset.%Next() {
        WRITE "Namespace: ",rset.%Get("Nsp"),!
    }
    WRITE !,"End of data"
    WRITE !,"Total row count=",rset.%ROWCOUNT
}
DHC-APP>d ##class(PHA.TEST.SQL).PropSQL5()
Namespace: %SYS
Namespace: DHC-APP
Namespace: DHC-CHSSWEB
Namespace: DHC-CSM
Namespace: DHC-DATA
Namespace: DHC-DWR
Namespace: DHC-EKG
Namespace: DHC-HEIS
Namespace: DHC-HR
Namespace: DHC-LISDATA
Namespace: DHC-LISSRC
Namespace: DHC-MEDSRC
Namespace: DHC-MRQ
Namespace: DOCBOOK
Namespace: FDBMS
Namespace: PACS
Namespace: PIS
Namespace: RIS
Namespace: SAMPLES
Namespace: USER
 
End of data
Total row count=20

重复名称:如果名称解析为相同的属性名称,则它们是重复的。重复名称可以是对同一字段的多个引用,对表中不同字段的引用或对不同表中字段的引用。如果SELECT语句包含相同字段名称或字段名称别名的多个实例,则%Get(“fieldname”)始终返回查询中指定的重复名称的最后一个实例。这与rset.PropName相反,后者返回查询中指定的重复名称的第一个实例。在下面的示例中显示:

/// d ##class(PHA.TEST.SQL).PropSQL6()
ClassMethod PropSQL6()
{
    SET myquery = "SELECT c.Name,p.Name FROM Sample.Person AS p,Sample.Company AS c"
    SET tStatement = ##class(%SQL.Statement).%New()
    SET qStatus = tStatement.%Prepare(myquery)
    IF qStatus'=1 {
        WRITE "%Prepare failed:" DO $System.Status.DisplayError(qStatus) QUIT
    }
    SET rset = tStatement.%Execute()
    WHILE rset.%Next() {
        WRITE "Prop=",rset.Name," Get=",rset.%Get("Name"),! 
    }
    WRITE !,rset.%ROWCOUNT," End of data"
}

%GetData(n)方法

%GetData(n)实例方法返回由结果集的整数计数列号索引的当前行的数据您可以将%GetData(n)与使用%Prepare()准备的指定查询或使用%PrepareClassQuery()准备的存储查询一起使用。

使用%PrepareClassQuery()准备。
整数n对应于查询中指定的选择项列表的序列。除非在选择项列表中明确指定,否则不会为RowID字段提供整数n值。如果n大于查询中的选择项数,或者为0,或者为负数,则Dynamic SQL不返回任何值,也不发出错误。

%GetData(n)是返回特定重复字段名称或重复别名的唯一方法; rset.Name返回第一个重复项,%Get(“Name”)返回最后一个重复项。

/// d ##class(PHA.TEST.SQL).PropSQL7()
ClassMethod PropSQL7()
{
   SET myquery="SELECT TOP 5 Name,SSN,Age FROM Sample.Person"
   SET tStatement = ##class(%SQL.Statement).%New()
   SET qStatus = tStatement.%Prepare(myquery)
   IF qStatus'=1 {
       WRITE "%Prepare failed:" DO $System.Status.DisplayError(qStatus) QUIT
   }
   SET rset = tStatement.%Execute()
   WHILE rset.%Next() {
       WRITE "Years:",rset.%GetData(3)," Name:",rset.%GetData(1),!
   }
   WRITE "End of data"
   WRITE !,"Total row count=",rset.%ROWCOUNT
}
DHC-APP>d ##class(PHA.TEST.SQL).PropSQL7()
Years:30 Name:yaoxin
Years: Name:xiaoli
Years:7 Name:姚鑫
Years:7 Name:姚鑫
Years:43 Name:姚鑫
End of data
Total row count=5

返回多个结果集

CALL语句可以将多个动态结果集作为一个集合返回,称为结果集序列(RSS)。

下面的示例使用%NextResult()方法分别返回多个结果集:

/// d ##class(PHA.TEST.SQL).PropSQL8()
ClassMethod PropSQL8()
{
    SET mycall = "CALL Sample.CustomSets()"
    SET rset = ##class(%SQL.Statement).%ExecDirect(,mycall)
    IF rset.%SQLCODE'=0 {
        WRITE !,"ExecDirect SQLCODE=",rset.%SQLCODE,!,rset.%Message  QUIT
    }
    SET rset1=rset.%NextResult()
    DO rset1.%Display()
    WRITE !,"End of 1st Result Set data",!!
    SET rset2=rset.%NextResult()
    DO rset2.%Display()
    WRITE !,"End of 2nd Result Set data"
}
DHC-APP> d ##class(PHA.TEST.SQL).PropSQL8()
ID      Name    Street  City    State   Spouse
3       Davis,Robert I. 4177 Franklin Court     Fargo   WY      86
2       Hanson,Roberta O.       9840 Ash Drive  Boston  KS      155
4       Huff,Olga M.    1902 Franklin Avenue    Vail    DE      150
1       Woo,Jocelyn A.  9932 Clinton Avenue     Queensbury      NM      14
5       Zubik,George T. 8102 First Drive        Denver  VA      110
 
5 Rows(s) Affected
End of 1st Result Set data
 
ID      Name    Street  City    State   Spouse
5       Campos,Alvin N. 1847 Franklin Drive     Ukiah   WY      206
1       Fripp,Kristen A.        1487 Ash Place  Islip   NC      133
3       Jafari,Christen K.      7384 Washington Court   Newton  CO      168
4       Kratzmann,Mark V.       9573 Second Blvd        Chicago OR      43
2       O'Donnell,George H.     3413 Main Drive Newton  RI      143
7       Ravazzolo,Danielle Y.   2898 Clinton Blvd       Tampa   HI      133
10      Rodriguez,Sophia U.     4766 Clinton Avenue     Ukiah   AR      202
6       Sverdlov,Phyllis J.     5010 Oak Place  Fargo   VT      214
8       Uhles,Andrew O. 4931 Madison Street     Bensonhurst     IA      129
9       Xerxes,Mo C.    49 Main Drive   Vail    CA      151
 
10 Rows(s) Affected
End of 2nd Result Set data

相关文章

  • 第十三章 使用动态SQL(六)

    第十三章 使用动态SQL(六) 用%ObjectSelectMode = 1 Swizzling字段名称属性 下面...

  • 第十三章 使用动态SQL(一)

    第十三章 使用动态SQL(一) 动态SQL简介 动态SQL是指在运行时准备并执行的SQL语句。在动态SQL中,准备...

  • 第十三章 使用动态SQL(三)

    第十三章 使用动态SQL(三) 执行SQL语句 有两种使用%SQL.Statement类执行SQL语句的方法: %...

  • 第十三章 使用动态SQL(七)

    第十三章 使用动态SQL(七) SQL元数据 动态SQL提供以下类型的元数据: 在“准备”之后,描述查询类型的元数...

  • 第十三章 使用动态SQL(四)

    第十三章 使用动态SQL(四) 返回完整结果集 使用%Execute()或%ExecDirect()执行语句将返回...

  • 第十三章 使用动态SQL(二)

    第十三章 使用动态SQL(二) 准备SQL语句 准备一条SQL语句将验证该语句,为后续执行做准备,并生成有关该SQ...

  • 第十三章 使用动态SQL(五)

    第十三章 使用动态SQL(五) 从结果集中返回特定的值 要从查询结果集中返回特定的值,必须一次一行遍历结果集。要遍...

  • <四> MyBatis的基本使用

    主要内容: 一、动态参数二、自定义结果映射三、SQL片段的使用四、动态SQL五、MyBatis级联操作六、延迟加载...

  • 强大的动态SQL

    1 动态SQL# 那么,问题来了: 什么是动态SQL? 动态SQL有什么作用? 传统的使用JDBC的方法,相信大家...

  • MyBatis:动态 SQL

    1. 动态 SQL 简而言之,动态 SQL 就是在 Mapper 中使用分支、循环等逻辑。常见的动态 SQL 元素...

网友评论

      本文标题:第十三章 使用动态SQL(六)

      本文链接:https://www.haomeiwen.com/subject/cquvhltx.html