Wow, Thank you very much 

Hello,

There is several method to do so... depending of the context of your needs... if your error msg is at the beginning of the line, in the input text or alone...

You can use extract:

set mystring = "ERRORMSG"

write $extract(mystring,3,*), !

see: https://docs.intersystems.com/latest/csp/docbook/DocBook.UI.Page.cls?KE…

this method would not be used if your input string does not start with "ERRORMSG"

if you know exactly that you want to remove ER from ERRORMSG you can use $replace

set mystring = "this is an ERRORMSG"

write $replace(mystring, "ERRORMSG", "RORMSG"), !

see: https://docs.intersystems.com/latest/csp/docbook/DocBook.UI.Page.cls?KE…

you can use a $piece : https://docs.intersystems.com/latest/csp/docbook/DocBook.UI.Page.cls?KE…

set mystring = "this is an ERRORMSG"

set textToRemove = "ER"

write $piece(mystring,textToRemove)_$piece(mystring,textToRemove,2), !

Though this last method would have a problem is the string "ER" is repeated in the input string

I hope this help

Cheers,

Jacques

Hello,

You have to navigate through subscript using $order.
Assuming your first node is "under2" and won't change, and assuming your date is "DD-MM-YYYY"

you can do:

ClassMethod TestGlobalAccess(){   set ^checker("under2", "Eric David", "02-05-2018") = ""   set ^checker("under2", "Eric2 David2", "02-07-2016") = ""   set ^checker("under2", "Name1 Name2", "07-06-2018") = ""   set Name = ""   for {        set Name = $order(^checker("under2", Name))        quit:Name=""        set DateBirth = ""        for {             set DateBirth = $order(^checker("under2",Name,DateBirth))             quit:DateBirth=""             set CacheDateBirth = $zdateh(DateBirth,15)             if ((+$h-CacheDateBirth)>730) {                  write $$$FormatText("%1 with Birthdate=%2 is older than 2 years",Name,DateBirth), !             }        }    }}

I hope this help.

for date conversion I decided to convert the birthdate into Cache Date, instead of converting $horolog into "DD-MM-YYYY" format.
But your method work also.

If you have only one record you can do:

ClassMethod Test(){   set ^checker("under2", "Eric David", "02-05-2018") = ""   set Name = $order(^checker("under2", ""))   quit:Name=""   set DateBirth = $order(^checker("under2",Name,""))   quit:DateBirth=""   set CacheDateBirth = $zdateh(DateBirth,15)   if ((+$h-CacheDateBirth)>730) {      write $$$FormatText("%1 with Birthdate=%2 is older than 2 years",Name,DateBirth), !   }}

I hope this help.

Cheers,

Jacques

Hello Olga,

Are InterSystems employees allowed to fill a Review or is it only for clients and partners using InterSystems technologies?
Even if it is not for the reward, at least we can review the products we are working on, for our company's fame.

Regards,

Jacques

Hello,

Very nice article. Thank you very much for your time

Regards,

Jacques

Great Article @Henry Pereira  !!!

Thank you very much!
 

Thank you very much @Robert Cemper , I like your point of view.
 

Hello Guilherme,

I'm not sure about what your goal is, but alternatively, you can use Stored Procedure attached to each group

<report xmlns="http://www.intersystems.com/zen/report/definition" name="MyName" runonce="true">
    <attribute name='attribute1' expression='..GetXXXXX(..P1)'/>
    <attribute name='attribute2' expression='..GetXXXXX(..P2)'/>
    <group name="GroupQuery1" queryClass='Custom.Reports.ZEN.StoredProc.StoredProc1' queryName='Query1'>
      <parameter field="attribute1"/>
      <parameter expression="..GetYYYY()"/>
      ...
      <group name="GroupResponse1">
        ...
      </group>
    </group>
    <group name="GroupQuery2" queryClass='Custom.Reports.ZEN.StoredProc.StoredProc2' queryName='Query2'>
      <parameter field="attribute2"/>
      <parameter expression="..GetZZZZZZ()"/>
      ...
      <group name="GroupResponse2">
        ...
      </group>
    </group>
</report>

Hope this help

Regards,

Jacques

Wuhuuuuuu! Congratulations!!!!

Thank you very much @Yuri Marx ! Very nice!
 

Very very very interesting tutorial and wonderful example.
And very funny too (loved the "Mordor co" stuff), thank you so far for taking that time to share.

Thank you !