New post

#InterSystems IRIS

23

InterSystems IRIS is a Complete Data Platform
InterSystems IRIS gives you everything you need to capture, share, understand, and act upon your organization’s most valuable asset – your data.
As a complete platform, InterSystems IRIS eliminates the need to integrate multiple development technologies. Applications require less code, fewer system resources, and less maintenance.

I want to embed the DTL editor in a third party web application.

If I open up the DTL editor then the full management portal banner is displayed.

http://localhost:52773/csp/healthshare/user/EnsPortal.DTLEditor.zen?DT=Foo.NewDTL1.dtl

If I open the same DTL in studio then I get just the editor, the banner is not displayed.

The DTLEditor page has the property studioMode that controls the banner display, but its not obvious how this is set.

0 1
2 230

Continuing on the journey of implementing %UnitTest, @Timothy.Leavitt's Test Coverage package, and automated testing with Jenkins.

My question today: why do we utilize a unit test root directory?

I've been defining packages and classes to write unit tests as I've been developing and I run the tests on the command line or using a routine file that is setup as a debug target which has been working great. I use DebugRunTestCase() to do this (so the classes aren't deleted).

4 4
1 485

From IRIS log, I found lots of following content

05/05/22-01:05:11:375 (16166) 0 [Generic.Event] ECP: Mirror Connection request from 'SM25SDLMIIRROR:LOCALHOST.LOCALDOMAIN:IRIS' (10.xxx.xxx.27:33040)

05/05/22-01:05:11:376 (16166) 1 [Generic.Event] ECP: Active server not defined, cannot redirect mirror connection

Could any one explain a little bit for me?

0 4
0 371

Given I have a property 

Class All.AllBooks Extends %Library.Persistent
{

Property ID As %Integer;

Property Title As User.Book;

}

In the class method

ClassMethod GetABookById(id As %Integer) As %Status
{

SET MyBooks = ##class(All.Allbooks).%OpenId(id)

SET obj = {

     "ID" : (MyBooks.%Id())

     "Title" : (MyBooks.Title)

}

WRITE obj.%ToJSON()

Quit 1
}

How do Access the foreign key in JSON() data

0 7
0 615
Question
· Apr 30, 2022
SQL JSON_OBJECT

Hi.

I'm trying to serialize property of type %TimeStamp in SQL statement with JSON_OBJECT, but I get a raw string instead of JSON DateTime format string. %JSONExport method on the same object works fine.

Any ideas?

Regards,
Matjaž

0 3
0 276
Question
· Apr 29, 2022
%JSON.Adaptor

Hi.

Is it possible to set in XData mappings (or any other way) to serialize the property value as display value rather than value it self?

Regards,
Matjaž

0 5
0 396
Question
· Apr 27, 2022
using SSH to connect to IRIS

Has anyone here successfully connected to a community edition version of IRIS through port 22 to localhost? I have been trying for hours and hours to connect a Mobaxterm terminal session to IRIS and am at a total loss. Im not sure if port 22 isnt opening at this point or if its a configuration issue on my part. I am seeing either "Remote side unexpectedly closed network connection" or "connection refused" when i try to run the SSH session. I have tried 22/51773/1972 etc port settings under add/edit server to no avail. Any help is appreciated. Thanks.

Mobaxterm settings

0 1
0 763

Hello

We have a solution with an EnsLib.EMail.InboundAdapter as services that scan a mailbox on incoming mail with attachments.

When a new email arrives, the service sends the request (with a property %Net.MailMessage) to the process. In the process, we try to loop through and retrieve part 2 which we assume is the file.

set Part = pRequest.Mail.Parts.GetAt (2)

We can read out the file name:
Set FileName = Part.FileName

But how, and is it possible, to save the attached file to disk drive?

0 4
0 366
Question
· Apr 25, 2022
Run multiple Update sql queries

Hi everyone, how do you run multiple quires?

I have tried couple of different ways, but not working.

SET sql = 2

Set sql(1) = "UPDATE QUERY"

Set sql(2) = "UPDATE QUERY"

Set sqlStatement=##class(%SQL.Statement).%New()

Set sc1=sqlStatement.%Prepare(.sql)

If $$$ISOK(sc1) {

Set tResult = sqlStatement.%Execute()

}

else{

$$$LOGERROR("Failed")

}

0 4
0 1.7K