go to post Marc Mundt · Mar 22 Standalone installers for Caché ODBC drivers are available on the software distribution page in the WRC.
go to post Marc Mundt · Mar 20 Hi Rochdi, You don't need to use %File and then copy it to a file stream. You can just use %Stream.FileCharacter to directly open and read the file: Set stream=##class(%Stream.FileCharacter).%New() Set sc=stream.LinkToFile("c:\myfile.txt") While 'stream.AtEnd { Set line=stream.Read() ; Process the chunk here } And I can confirm that I've also seen %Stream.FileCharacter significantly outperform %File for reads. -Marc
go to post Marc Mundt · Feb 7 I suspect the problem is that you're using a %DynamicObject. BPLs should use persistent/persistable objects because business process execution can in some cases be suspended temporarily and then resumed. Before execution is suspended, context objects are saved into the DB. %DynamicObjects are not persistent objects, so their values are lost when execution is suspended. You can overcome this by using %ToJSON to serialize the %DynamicObject into a stream property of the context object. Streams are persistable. The life cycle of a business process requires it to have certain state information saved to disk and restored from disk, whenever the business process suspends or resumes execution. This feature is especially important for long-running business processes, which may take days or weeks to complete. https://docs.intersystems.com/irisforhealth20223/csp/docbook/DocBook.UI....
go to post Marc Mundt · Jan 18 I've seen Zen reports used extensively for Chinese content, so they can definitely handle the far reaches of the Unicode realm. What happens if you do this? write !,"<PostInfo>My GE: "_$c(8805)_"</PostInfo>" or this? write !,"<PostInfo>My GE: "_$zcvt($c(8805),"O","UTF8")_"</PostInfo>" Some other things to check: Check if the TTF file for the font you're using contains that glyph. Make sure your report is set to use UTF-8 encoding: https://docs.intersystems.com/ens201815/csp/docbook/DocBook.UI.Page.cls?... Look at the intermediary files (the .xml which contains the data in particular) that Zen generates to see if/how that item was output: https://docs.intersystems.com/ens201815/csp/docbook/DocBook.UI.Page.cls?... https://docs.intersystems.com/ens201815/csp/docbook/DocBook.UI.Page.cls?... Check to see if FOP is reporting any errors: https://docs.intersystems.com/ens201815/csp/docbook/DocBook.UI.Page.cls?...
go to post Marc Mundt · Jan 12 It's not clear to me what "early binding" means in the context of a data transformation. Do you mean something that happens at the time the DTL is compiled rather than at runtime? If you can clarify what you mean by "early binding" that will help us get you an answer.
go to post Marc Mundt · Jan 12 It would be great to have a cheat-sheet for all of these keyboard shortcuts and other tricks, especially in terms of "if you used to do X in Studio, here's how to do that in VS Code". A few months ago I happened across the incantation for the VS Code equivalent of Studio's "Find in Files" (free text search of server-side classes) but forgot the key combination and haven't had the time to try to figure out which docs to check and guess at whether it's a standard feature of VS Code or of the ObjectScript plug-in.
go to post Marc Mundt · Dec 6, 2022 Yes, you can absolutely do that. You separate statements with 2 spaces. Here's an example: for i=1:1:10 { write i,! write i*10,! } This gives the same output: for i=1:1:10 { write i,! write i*10,! } It also works without brackets, but IMHO is less readable: for i=1:1:10 write i,! write i*10,!
go to post Marc Mundt · Nov 7, 2022 Menno, In your ObjectScript code you never base64 decode the key: set key="pZR8qfrz7t47G+dboyJCH4NnJRrF+dJbvxq37y/cLUo=" ... Set encrypted=$SYSTEM.Encryption.AESCBCEncrypt($zcvt(text,"O","UTF8"),key,iv) But you did this in Python: keyBase64="pZR8qfrz7t47G+dboyJCH4NnJRrF+dJbvxq37y/cLUo=" key = base64.b64decode(keyBase64) ... cipher = AES.new(key, AES.MODE_CBC)
go to post Marc Mundt · Nov 7, 2022 Adding the additional logging helped. Looking at it now, it looks like it is working as coded: 9413847-9428572 BEGENING OF LOOP FOR: XAL465.1110.A0 9413847-9428572 START RECURSIVE 9421986-9428572 Has Value 9413847-9428572 BEGENING OF LOOP FOR: XAL465.1110.A1 The call for 9413847 is looping through all results of the query. It finds that 9421986 has a composition so it calls itself recursively. The call for 9421986 finds that it already has a value so it returns control to the 9413847 loop which continues iterating. If you want all super and sub loops to quit as soon as any sub-loop finds "has value" then you will need to check for this condition inside the loop.
go to post Marc Mundt · Nov 4, 2022 It's a bit hard to follow the output. I think things will become clearer if you add "mainArticle" and "article" to every WRITE statement, for example: W !, $G(mainArticle),"-",$G(article)," Has Value"...W !, $G(mainArticle),"-",$G(article)," BEGENING OF LOOP FOR: "_rs.articleCode...W !, $G(mainArticle),"-",$G(article)," START RECURSIVE"...W !, $G(mainArticle),"-",$G(article)," END OF LOOP"