go to post Dmitry Maslennikov · May 25 Creating an Index with SQL, not directly in ObjectScript, will build Index by default if you don't say do not do it.
go to post Dmitry Maslennikov · Apr 24 There is no way, to catch the possible issues for the previous version of IRIS. The best case scenario is if you automate the build process, for instance with Docker, and test a compile stage on different versions of IRIS. But the ability to successfully compile may not prove that it will work, it would be better to have some unit tests, which will check it. One more thing, may help, to check it, using the such tool as ObjectScript Quality, can help with checking System's API version. Where you can set the oldest supported version of IRIS, and during the scan, it can check if Methods are available in that particular version.
go to post Dmitry Maslennikov · Apr 10 Or just add this to the end of docker run command -a "iris session iris -U%SYS '##class(Security.Users).UnExpireUserPasswords(\"*\")'"
go to post Dmitry Maslennikov · Apr 3 Implemented it with SQL Procedure CREATE OR REPLACE PROCEDURE %ZDJANGO.CLONE_DATABASE(sourceNS %String, targetNS %String) LANGUAGE OBJECTSCRIPT { new $namespace set $namespace = "%SYS" $$$ThrowOnError(##class(Config.Namespaces).Get(sourceNS, .sourceNSparams)) $$$ThrowOnError(##class(Config.Namespaces).Get(targetNS, .targetNSparams)) for kind="Globals", "Routines" { $$$ThrowOnError(##class(Config.Databases).Get(sourceNSparams(kind), .sourceDBparams)) $$$ThrowOnError(##class(Config.Databases).Get(targetNSparams(kind), .targetDBparams)) set from = sourceDBparams("Directory") set to = targetDBparams("Directory") quit:$Data(done(to)) set done(to) = "" $$$ThrowOnError(##class(SYS.Database).Copy(from, to, , , 4)) } } DANGER: Do not use it, made specifically for my case, it may overwrite database
go to post Dmitry Maslennikov · Apr 3 You can do this query SELECT TABLE_SCHEMA, TABLE_NAME FROM INFORMATION_SCHEMA.TABLES WHERE TABLE_TYPE='BASE TABLE' Filter by TABLE_TYPE is to get rid of system tables
go to post Dmitry Maslennikov · Mar 20 Is it really the reading file taking so much time or using $piece on the line and setting it to global too? There are various things here that may slow you, even $increment (best to be replaced by i+1) You can also split the reading file and set it to global by two parts, and use $sortbegin Try to run your code with %SYS.MONLBL started, it will help you understand where it spends more time.
go to post Dmitry Maslennikov · Mar 20 You may slow a bit your process, to leave some process time to other processes. to do so, you would need to use hang command, somewhere in the loop, with some small value such as 0.1 seconds, and depends how fast is your process may do it once per 100 iterations or more
