Code Snippet | InterSystems Developer Community

Question

Evgeny Shvarov · Dec 18, 2016

How to exclude substring(s) from a string

Hi, community!

Consider you need to exclude substring(s) from a string.

I did it with the following snippet:

/// excludes all the substrings from the string
ClassMethod ExcludeSubstring(substr,str as %String) As %String

{

 while ($L(str,substr)>1) {

 set str=$Piece(str,substr)_$Piece(str,substr,2,*)

            }

 quit str

}

So, for example:

#Code Snippet #ObjectScript #Caché

0 2

0 456

Question

Peter Steiwer · Dec 12, 2016

Iterating through all properties of an object

Is there a better way to iterate through all properties of an object than the following? Perhaps without needing to open a definition of the class but directly against the object?

#Code Snippet #Object Data Model #Caché #InterSystems IRIS

4 6

1 3.4K

Question

Evgeny Shvarov · Nov 22, 2016

Create Namespace snippet

Does anyone have a snippet to create the Namespace and database with defaults in one command?

Something like:

do ##class(Utils.Namespace).Create(Name)

Please share?

Thank you in advance!

#Code Snippet #Namespace #ObjectScript #Caché

1 4

0 820

Question

DQ Hu · Nov 7, 2016

SOAP Fault handling with ERROR #5659: Property '%ZHSLIB.Audit.LogParticipant::Log' required

Environment: Cache for Windows (x86-64) 2015.2.2 (Build 811U) Thu Mar 3 2016 12:55:48 EST [HealthShare Modules:Core:14.01.351

When try the following to send back SOAP Fault, is the following correct way?

Set fault=##class(%SOAP.Fault).%New()
Set fault.faultcode=$$$FAULTServer
Set fault.faultstring="Processing Error"
Set fault.detail= "Error on server"
Do ..ReturnFault(fault)

#Business Service #Code Snippet #ObjectScript #SOAP #HealthShare

0 1

0 755

Question

Juliana Schallert · Jul 20, 2016

ConvertJSONToObject not working when 1st element of a list is blank

Hi,

I am new to Cache and I am trying to convert a JSON string (msgdata) that contains a JSON payload to an object to be saved into a Driver. Entity table. I am running into 2 issues and would appreciate any help:

1) It seems that when the 1st element of a list within the payload (Choices) is an empty string, after I call %ConvertJSONToObject, the obj.%data("payload").Choices contains just 1 empty element, removing the next 3 valid values (10,20,30). The same does not happen if I change the input to [10,20,"",30], in this case it works correctly.

#Code Snippet #Caché

0 3

0 1.1K

Question

Rustam Ibragimov · Jul 12, 2016

How to access routine

Hello, everyone!

I opened one project and there I found such lines as

$$Export^%occXMLExport(filename,"-d /diffexport",InternalName)

#Caché #Code Snippet #ObjectScript

1 3

0 773

Question

Timothy Leavitt · Jul 8, 2016

Best way to compare two arrays for "equality" (same subscripts and values)

I've been trying to write a method to compare two local variables, which may be arrays, for "equality" - that is, to see if they have all the same subscripts (if they're arrays) and values. This is the best I've come up with so far - are there any better/simpler approaches out there?

#Code Snippet #ObjectScript #Caché

3 6

0 1.5K

Question

Francis Galiegue · Apr 25, 2016

Determining whether a class, which you only have the name of, is a unit test class... I know this code sucks; but how to fix it properly?

Hello,

Here's the code:

#Code Snippet #ObjectScript #Caché

0 6

0 557

Question

Jose Antonio Ca... · Apr 1, 2016

How to extract column sorting of %ZEN.tablePane with or without snapShot

Hi all,

I've been looking for a way to extract the sorting from the ^CacheTemp.zenData global that contain the tablePane snapshot data in order to use it on a report following the current UI sorting criteria.

I could see that if the column is sorted by one column, new entries with this structure are created:

^CacheTemp.zenData(<sessionId>,<snapShotId>,<tablePaneId>,"index",<columnId>,<value>,<dataId>)=""

#Caché #Code Snippet #ZEN

0 6

0 565

Question

Evgeny Shvarov · Mar 23, 2016

Get coordinates against street address

Hi!

Does anyone have an example of subj?

I know there is google service for it. Anyone uses it in production? What is the feedback?

In case of positive feedback would you please post the code example?

TIA!

#Caché #Code Snippet

0 5

0 481

Question

Eduard Lebedyuk · Mar 28, 2016

How to display or save stack information?

Hello.

For debugging purposes I sometimes need to display stack information to the current device or save it (to a global for example).

There is this snippet offered in documentation:

ClassMethod StackToDisplay()
{
    For loop = 0:1:$Stack(-1) {
        Write !, "Context level:", loop, ?25, "Context type: ", $Stack(loop)
        Write !, ?5, "Current place: ", $Stack(loop, "PLACE")
        Write !, ?5, "Current source: ", $Stack(loop, "MCODE")
        Write !
    }
}

And to save stack to a global there's always an exception method:

#Code Snippet #Debugging #Object Data Model #Caché

0 11

0 1.7K

Question

Josh Barney · Mar 24, 2016

Help with Mime attachment HTTP post request

I believe the I have followed the instructions to attach a document to the body of a post request but nothing is being sent out in the files{} port of the request. I can either get the stream in "data", not visible at all, or visible but no form data. Any help would be appreciated, below is what I have:

#Code Snippet #REST API #Frontend #Caché

1 3

0 2.5K

Question

Scott Beeson · Feb 16, 2016

Concatenate columns in results with GROUP BY?

Here is my original query:

SELECT EventType, InitiatedAt, COUNT(*) as cnt
FROM HS_IHE_ATNA_Repository.Aggregation
WHERE EventType = 'LOGIN'
AND LocalDateTime > '2016-02-16 11:00:00'
GROUP BY EventType, InitiatedAt

This gives me data like this:

#Code Snippet #Databases #SQL #Caché

0 3

0 7.1K

Question

Scott Beeson · Feb 11, 2016

Ens.Rule.FunctionSet without parameter?

I'm writing some custom functions for use in a routing rule. I have a few that are working, but right now I'm trying to use one that has no parameters. Typically this would be a sub instead of a function, but I'm not familiar enough with Cache to know what I need to do here.

Here is the code:

#Code Snippet #Debugging #Perforce #Ensemble

0 6

0 511

Question

Scott Beeson · Feb 8, 2016

Variable scope in .mac routine?

Given the following code:

#Code Snippet #Caché

0 11

0 664

Question