新しい投稿

Encontrar

記事
· 2024年10月30日 2m read

第六章 主设备、当前设备、空设备

第六章 主设备、当前设备、空设备

明确使用主设备

USE 0USE $principal向进程的主体设备隐式发出OPEN命令。如果另一个进程拥有该设备,则该进程会挂在隐式OPEN上,就像它遇到任何OPEN时一样。

为该进程不拥有的任何其他设备(由于先前的OPEN命令)发出USE命令会产生错误。

仅当进程获取设备时,没有超时的OPEN命令才将控制权返回给进程。可以通过键盘中断命令(如Ctrl-C )中断打开命令。由于保护问题或无效设备名称而无法成功的OPEN将永远挂起。当在OPEN命令中指定超时时, OPEN将在超时到期时将控制权返回给进程。

使用主设备的选项

根据主要设备的性质,可以指定其他特定于设备的参数,这些参数对于管道(进程间通信) 、文件和终端 I/O是不同的。例如,可以使用 TLS 连接打开主设备:

ディスカッション (0)1
続けるにはログインするか新規登録を行ってください
質問
· 2024年10月30日

Using the other unit testing frameworks with IPM?

I assume IPM manifest tag UnitTest is tightly coupled with the standard unit test framework, right? However we have our own one that predates the standard one and we are not going to switch.

I think I need to import the unit test cases and then be able to run a single class method for the test run. Any ideas how this would be possible?

9 Comments
ディスカッション (9)3
続けるにはログインするか新規登録を行ってください
質問
· 2024年10月30日

dynamic SQL in object script code

i am trying to embed a dynamic SQL into Objectscript code , but the %NEXT() will return 0 , however when i copy the same query and run it in the SQL bit it will give me the result i want 
the code :

set myquery = "SELECT"
set myquery = myquery_" $PIECE(Substring(M.Rawcontent,Charindex('PD1|',M.Rawcontent),1000),'|',4),"
set myquery = myquery_" H1.TargetConfigName,"
set myquery = myquery_" H.Timecreated,"
set myquery = myquery_" H.MessageBodyId"
set myquery = myquery_" FROM"
set myquery = myquery_" Ens.MessageHeader H"
set myquery = myquery_" left outer join Enslib_HL7.Message M ON (H.MessageBodyId=M.ID)"
set myquery = myquery_" left outer join Ens.MessageHeader H1 ON(H.SessionID=H1.SessionID AND H1.TargetBusinessType='BusinessOperation')"
set myquery = myquery_" left outer join Enslib_HL7.Message M1 ON (H1.MessageBodyId=M1.ID)"
set myquery = myquery_" WHERE"
set myquery = myquery_" H.Timecreated >= '2024-10-14 00:00:00.000' AND"
set myquery = myquery_" H.Timecreated <= '2024-10-29 00:00:00.000' AND"
set myquery = myquery_" H.SourceConfigName IN ('Epic ADT_Router') AND"
set myquery = myquery_" H1.TargetConfigName IN ('EMS - Outgoing ADT/Scheduling/Orders') AND"
set myquery = myquery_" LEN($PIECE(Substring(M.Rawcontent,Charindex('PD1|',M.Rawcontent),1000),'|',4)) > 4"
set myquery = myquery_" GROUP BY"
set myquery = myquery_" H1.TargetConfigName"
$$$LOGINFO(myquery)
set tStatement = ##class(%SQL.Statement).%New()
set qStatus = tStatement.%Prepare(myquery)
if qStatus'=1 {write "%Prepare failed:" do $System.Status.DisplayError(qStatus)}
set rset = tStatement.%Execute()
if (rset.%SQLCODE '= 0) {write "%Execute failed:", !, "SQLCODE ", rset.%SQLCODE, ": ", rset.%Message quit}
$$$LOGINFO(rset.%SQLCODE)
Do rset.%Display()
//$$$LOGINFO(rset.%Display())
$$$LOGINFO(rset.%Print("|"))
$$$LOGINFO("Next "_rset.%Next())
$$$LOGINFO("GETDATA "_rset.%GetData(1))
while rset.%Next(){
$$$LOGINFO("Print "_rset.%Print("^|^"))
$$$LOGINFO("ODS "_rset.ods)
$$$LOGINFO("GETDATA "_rset.%GetData(1))
}

here is the  SQL runner results :

2 Comments
ディスカッション (2)3
続けるにはログインするか新規登録を行ってください
質問
· 2024年10月30日

Sonatype Nexus as IPM repository?

It's not supported at the moment but is it possible to implement the Sonatype Nexus (or JFrog Artifactory) support based on the current (or upcoming) IPM version?

In repo command help I see there is a support for filesystem repositories (which I have not yet tried) and my current (hopefully not far-fetched) interpretation is the IPM is designed to be able to support different repositories:

zpm:IPMTEST1>help repo
[...]
  ■ Filesystem repository:
    ∙ -filesystem, -f, -fs : Create/update a filesystem repository
    ∙ -depth, -d <value> : For filesystem repositories, specifies the depth (number of folders underneath the root) to search for files named module.xml
    ∙ -path, -p <value> : For filesystem repositories, specifies the path to the root directory
[...]
  ■ Examples
    ∙ repo -name LocalFiles -snapshots 1 -fs -depth 2 -path C:\MyWorkspace\RootModuleDir\
      Create a repository pointing to the filesystem with name LocalFiles, accepting snapshots, looking for files named module.xml up to 2 directories deep in C:\MyWorkspace\RootModuleDir\

The motivation: we already have a repository implementation used for Java and Docker builds and we would like to reuse that instead introducing a new component. I believe we're not the only ones here with this setup.

5 Comments
ディスカッション (5)4
続けるにはログインするか新規登録を行ってください
記事
· 2024年10月30日 10m read

Production IRIS pilotée par une base de données avec des adaptateurs entrants personnalisés

L'utilisation traditionnelle d'une production IRIS consiste, pour un adaptateur entrant, à recevoir des données d'une source externe, à envoyer ces données à un service IRIS, puis à faire en sorte que ce service envoie ces données par l'intermédiaire de la production.

ディスカッション (0)2
続けるにはログインするか新規登録を行ってください