ivo is an Avid Reader. No contributions for 2024.
Without a doubt, there will be something to
share on the Community in 2025!
User bio
404 bio not found
Member since Jul 17, 2017
Replies:

an overcomplicated solution:

Go() [] PUBLIC
{
    s cont = 0,pos = 1,lines = 0
    do {
        set line = $Text(Go+pos)
        set cont = cont + (($LENGTH(line,"{")-1)-($LENGTH(line,"}")-1))
        set lines = lines + 1
        set pos = pos + 1
    } while (cont > 0)
    s x=1
    if (x=1) a=}
    f i=0:1:lines $Text(Go+i),!
    s x=1
    if (x=1) a=}
    if (a=x) {
        b=a
    }
}

Open Exchange applications:
Certifications & Credly badges:
ivo has no Certifications & Credly badges yet.
Global Masters badges:
Followers:
ivo has no followers yet.
Following:
ivo has not followed anybody yet.