New post
AllAccepted answers
Eduard Lebedyuk · Feb 15, 2022

Something like this?

SELECT
    ID,
    name,
    processedDate,
    processedTime
FROM MYprocesses m
WHERE NOT EXISTS (  SELECT 1
                    FROM MYprocesses m1
                    WHERE 1=1
                        AND m1.name=m.name
                        AND TO_POSIXTIME(m1.processedDate||' '||m1.processedTime, 'yyyy/mm/dd hh:mm:ss') > TO_POSIXTIME(m.processedDate||' '||m.processedTime, 'yyyy/mm/dd hh:mm:ss'))

Replace TO_POSIXTIME with TO_TIMESTAMP on older versions.

If record ids are aligned with time (meaning higher id has higher processed date/time) you can simplify and speed up the query:

SELECT
    ID,
    name,
    processedDate,
    processedTime
FROM MYprocesses m
WHERE NOT EXISTS (  SELECT 1
                    FROM MYprocesses m1
                    WHERE 1=1
                        AND m1.name=m.name
                        AND m1.id>m.id)
Eduard Lebedyuk · Feb 14, 2022

Interoperability callbacks can now be written in Python.

Class dc.DFOperation Extends Ens.BusinessOperation
{

Method OnMessage(ByRef request As Ens.StringContainer, Output response As Ens.Response) As %Status [ Language = python ]
{
    import pandas
    import iris

    query = request.value.StringValue
    response.value = iris.cls('Ens.Response')._New()
    
    stmt = iris.sql.prepare(query)
    rs = stmt.execute()
    df = rs.dataframe()
    
    iris.cls('Ens.Util.Log').LogInfo("dc.DFOperation", "OnMessage", "Dataframe load success")
    
    return iris.cls('%SYSTEM.Status').OK()
}

}
Eduard Lebedyuk · Feb 12, 2022

Just checked XML spec and there's nothing about escaping $c(10) or $c(13).

The only symbols which must be escaped are:

  • " "
  • & &
  • ‘ '
  • ' '
  • < &lt;
  • > &gt;

You can check $zcvt - it produces the same output:

zw $zcvt("< > &" _$c(10)_$c(13)_ "TEST", "O", "XML")

If you need byte for byte compatibility you'll need a custom datatype with a redefined LogicalToXSD method. Something like:

Class test.XMLString Extends %String
{

ClassMethod LogicalToXSD(%val As %String) As %String [ CodeMode = objectgenerator, ServerOnly = 1 ]
{
    quit:%mode'="propertymethod" $$$OK
    Do %code.WriteLine($c(9) _ "set %val = $zcvt(%val,""O"",""XML"")")
    For replace=$lb("$c(10)","""&#xA"""),$lb("$c(13)","""&#xD""") {
        Set from = $lg(replace, 1)
        Set to = $lg(replace, 2)
        Do %code.WriteLine($c(9) _ "set %val = $replace(%val," _ from _ ", " _ to _")")
    }
    Do %code.WriteLine($c(9) _ "quit %val")
    Quit $$$OK
}

}
Eduard Lebedyuk · Feb 11, 2022

No. %Save never throws an exception, just returns a %Status variable. In your scenario it would return an error indicating validation failure on LastName.

Class User.Person Extends %Persistent
{

Property LastName As %String(MAXLEN = 30);

/// do ##class(User.Person).Test()
ClassMethod Test()
{
    set obj = ..%New()
    set obj.LastName = $j("", 50)
    set sc = obj.%Save()    
    w $System.Status.GetErrorText(sc)
}
}

Results in:

ERROR #7201: Datatype value ' ' length longer than MAXLEN allowed of 30
  > ERROR #5802: Datatype validation failed on property 'User.Person:LastName', with value equal to " "
Eduard Lebedyuk · Feb 10, 2022

From the docs:

  • <STRINGSTACK> An expression is too long, there are too many expressions in an argument for a single command, or an expression contains many very long strings. Simplify the expression.
  • <MAXSTRING> There has been an attempt to specify or create a data string longer than the implementation allows. The maximum string size is 3,641,144 characters. Attempting to concatenate strings that would result in a string exceeding this maximum string size results in a <MAXSTRING> error.

MAXSTRING is always related to maximum length of 3,641,144 characters for one string (assuming long strings are enabled). STRINGSTACK can be raised in several different circumstances, including a lot of small strings, recursion and so on.

Increasing bbsiz may help avoid STRINGSTACK error, but not MAXSTRING.

In your case use streams by replacing:

set file=object.%Get(i).file

with:

set file=object.%Get(i).%Get("file",,"stream")