All
Accepted answers
Enrico Parisi 路 Apr 23, 2024 go to post

On the other hand, are you sure that your method is that same that WRITE uses to interrogate the environment ?

Why should I care? Why do you care?

Enrico Parisi 路 Apr 23, 2024 go to post

The WRITE command, when passed no argument, does a reflexion on the system.

Well, it simply list/write all defined variables in current stack level, something you can perform using standard Object Script commands and functions, no need to look at Write source code.

To do that you can use $order,  $query, and indirection, with some trick needed for the variables you use to perform the listing, or, maybe simpler, you can use output redirection (to a string for example) and then...well, an argument less Write command 馃槉

Some hint for the first option:

USER>set a=1,b=2,b(1)=3,x=""
 
USER>set x=$order(@x)
 
USER>write x
a
USER>set x=$order(@x)
 
USER>write x
b
USER>set x=$query(@x)
 
USER>w x
b(1)

For output redirection, see IO Redirect in ObjectScript in Open Exchange.

Enrico Parisi 路 Apr 23, 2024 go to post

Maybe your certificate file needs to include the full certificate chain, from your certificate to the CA.

Enrico Parisi 路 Apr 21, 2024 go to post

In order to better understand the problem, you may use SoapUI to "manually" call the WS and try different options/messages to figure what's wrong with your call.

Enrico Parisi 路 Apr 21, 2024 go to post

How are you calling the WS?

Are you using a Business Operation with EnsLib.SOAP.OutboundAdapter?

To understand how the header can be customized, can you provide a sample of your SOAP call?

Enrico Parisi 路 Apr 20, 2024 go to post

I really, really doubt that the issue is the header namespace prefix.

What does the error (soap fault) says?

Enrico Parisi 路 Apr 19, 2024 go to post 
EPTEST>Set comp=$system.Encryption.Base64Decode("y61UKEstqlTIyc9LVyguKcoEUuUZmckZCnmpqSnFCiX5CkmpCimpaTmJJakpAA==")
 
EPTEST>Set sc=##class(Community.Compress).UnDeflate(comp,.uncomp)
 
EPTEST>Write uncomp
my very long string which needs to be deflated

Works fine for me

Enrico Parisi 路 Apr 19, 2024 go to post

The code I posted does exactly what you need.

You can compress/decompress with deflate or gzip using device I/O.

Enrico Parisi 路 Apr 19, 2024 go to post

Then you can download IRIS community edition that you can use for evaluation.

In the main page of the Developer Community click "Download InterSystems IRIS" in the left of the page.

Enrico Parisi 路 Apr 19, 2024 go to post

Here is a sample method to deflate without using file I/O and using XDEV instead.

ClassMethod UnDeflate(Compressed As %String, Output UnDeflated As %String) As %Status
{
    Set sc=$$$OK
    Try {
        ; open XDEV device
        Set dev="|XDEV|"_+$JOB
        Open dev:($ZF(-6,$$$XSLTLibrary,12):/HOSTNAME="XSLT") Use dev
        ; write compressed string
        Write Compressed
        ; flush buffers
        Write *-3
        ; change device mode to deflate and rewind
        Use dev:(:/COMPRESS="DEFLATE":/POSITION=0)
        ; read uncompressed content
        Read UnDeflated
    } Catch CatchError {
        #dim CatchError as %Exception.SystemException
        Set sc=CatchError.AsStatus()
    }
    Close dev
    Quit sc
}

I really wish that InterSystems implement the various compress/deflate/gzip functionality available in device I/O as utility methods. Without silly wrappers! 馃槈

Another wish, please InterSystems document XDEV device I/O.

Enrico Parisi 路 Apr 19, 2024 go to post

If I understand correctly you need to deflate and I suppose you want to add the custom wrapper to use $System.Util.Decompress(), if so...you can't. I mean you can't use $System.Util.Decompress() BUT, you can indeed deflate using I/O as in the example I posted in that post/thread.

Enrico Parisi 路 Apr 19, 2024 go to post

I agree that I don't like #; as a comment BUT, I prefer ; instead, I'm not a fan of // comments, probably because I'm an old InterSystems user.

Fortunately there is a way to change it, thank you for sharing the details.

Enrico Parisi 路 Apr 18, 2024 go to post

Beware that OnFailureTimeout() does not work as expected as described in this post.

The issue is present up to 2023.3 and is fixed in 2024.1.

Enrico Parisi 路 Apr 18, 2024 go to post 
    Set Found=0
    Set Id=""
    For  {
        Set Id=$order(^DataTest(Id)) Quit:Id=""
        If $listget(^DataTest(Id),2)=1516 {
            Set Found=1
            Quit
        }
    }
    If Found Write "Found 1516 in Id: ",Id,!
Enrico Parisi 路 Apr 18, 2024 go to post

What problem are you facing configuring system default settings for Ens.Alert component? If should work as any other component.

I suggest to read the relevant documentation for your version:

Defining System Default Settings

and if you find some issue please provide some detail of the specific problem you are facing.

Enrico Parisi 路 Apr 5, 2024 go to post

Please note that all timestamps (TimeCreted, TimeProcessed) in Ens.MessageHeader use Ens.DataType.UTC datatype. It's UTC time.

So, in what mode is your query running?

GETDATE() : A date/time function that returns the current local date and time.

Enrico Parisi 路 Apr 3, 2024 go to post

these are system classes that are part of the product that do exists in the new installed version in the %SYS namespace.

If the Studio screenshot you have posted is not from the %SYS namespace (it really does not seems so), then probably the System package is mapped to that namespace, possibly also the related globals. But...I'm guessing here from the little details and context you provide.

Enrico Parisi 路 Apr 3, 2024 go to post

You had 24 errors during compilation, maybe (probably) one of the 24 is the "missing" class.

Can you try to compile that class individually?

Enrico Parisi 路 Apr 3, 2024 go to post

If your classes are in deployed mode, then you need the source code that (hopefully) was saved before deploying the classes.

Enrico Parisi 路 Apr 3, 2024 go to post

If %f is not working in your environment my guess is that, for some reason, the property OriginalFilename is not set in the incoming message to your EnsLib.File.PassthroughOperation Business Operation.

Where is the incoming message coming from? Why the OriginalFilename  is not set?
Can you provide some more details on your environment?

Enrico Parisi 路 Apr 2, 2024 go to post

Often the if command is used for $increment because that is the "cheapest"/lightest way to increment a (local/global) variable.
In other words, it's a kind of performance optimization when using $increment.

Personally I use all the times I use $increment and I don't need the incremented value back.

Enrico Parisi 路 Apr 2, 2024 go to post

For your response I assume you are searching for a class used by a Business Host component within a production.

Using IRIS you can search for that, and much more, using "Interface Reference" within the Management portal:

Unfortunately you are using an old version where this feature is not available.

Add this to the (possibly long) list of good reasons to move to IRIS.

Enrico Parisi 路 Apr 2, 2024 go to post

Once you have configured jdbc or odbc gateway to your sqllite DB, then the easier way is to use data migration wizard, from Magegement Portal:

System Explorer -> SQL, then Wizards -> Data Migration

"The Data Migration Wizard will help you copy SQL table definitions and data by using your defined SQL Gateway connections."