Robert Cemper · Feb 14, 2022 go to post

It should be sufficient to add this to init:script

set user=##class(Security.Users).%OpenId("unknownuser")
do user.Roles.Insert("%All")
do user.%Save()
 ;;; just for comfort
set smp=##class(Security.Applications).%OpenId("/csp/sys")
set smp.AutheEnabled=64
do smp.%Save()

set

Robert Cemper · Feb 9, 2022 go to post

FOR loop does not accept a quit with argument.

ERROR: CodeGolf.CHK.cls(7) :QUIT with arguments not allowed here c

but return is 5 chars more 

Robert Cemper · Feb 6, 2022 go to post

possible but not likely:  your friendly WIN Firewall blocks port 1972 in both directions)

Robert Cemper · Feb 6, 2022 go to post

You could check in mgmt Portal  MEMORY at the Bottom Super server Port
The next chance is that you run out of licenses. Also available in MgmPortal.  
(CSP/ZEN can be a huge license eater)

Robert Cemper · Feb 6, 2022 go to post

#1
Caché Studio can't access IRIS for version reasons. Reverse IRIS studio can sometimes.
Better run separate versions.
#2
Studio requires access to SuperServerPort.  Actual 1972 previous was 51773.
if your IRIS runs in a Docker Container check the port mapping .    

Robert Cemper · Feb 3, 2022 go to post

Big THANKS to the whole community for the interest and the trust in my contribution,
Not to forget to thank the excellent support team and the fruitful cooperation within the community!

Robert Cemper · Feb 2, 2022 go to post

this works unlimited but has no exit if none unmatched found
method length = 64,
and it shows only the abs. value  38 instead of -38

y=$lfs(o) i=1:1 a=$lf(y,i),b=$lf(y,-i) ret:a+b&'(a*b) i

Robert Cemper · Feb 2, 2022 go to post

but it  fails if the unpaired is < -9 as in the ref.example

"-110,110,-38,-38,-62,62,-38,-38,-38"    and doesn't stop

Robert Cemper · Feb 2, 2022 go to post

size = 65   return 0 if all pared;   { 0 is excluded for pairing }

ClassMethod Solve(o As %String) As %Integer
{
 s y=$lfs(o) f i=1:1:$ll(y) s c=$li(y,i) ret:'$lf(y,-c) c
 q 0
}
Robert Cemper · Jan 31, 2022 go to post
set def=##class(%Dictionary.CompiledClass).%OpenId("Sample.Person.JSON")
write def.SqlSchemaName
Sample_Person
write def.SqlTableName
JSON
Robert Cemper · Jan 31, 2022 go to post

example:

set def=##class(%Dictionary.CompiledClass).%OpenId("oex.Dir")
write def.SqlSchemaName
oex
write def.SqlTableName
Dir 

Robert Cemper · Jan 27, 2022 go to post

A serious problem I also struggled with.
I think inside IRIS there is not much chance to get across the MAXSTRING limit.