I did a logic to read all globals of the namespace and show only the globals that have the size larger than 100 mb:
VerGlobal new global,set,tamanho,qtde set (global,qtde)="" kill ^mtempTAMANHOGLO for { set global=$order(^$global(global)) quit:global="" set sc=##class(%Library.GlobalEdit).GetGlobalSize($zu(12,""),global,.tamanho,,1) set qtde=qtde+1 set ^mtempLISTA(global)=global if tamanho>100 { set ^mtempTAMANHOGLO(tamanho,global)=global } w # write !, "Quantidade de globais verificadas "_qtde }
I did a logic to read all globals of the namespace and show only the globals that have the size larger than 100 mb:
VerGlobal
new global,set,tamanho,qtde
set (global,qtde)=""
kill ^mtempTAMANHOGLO
for {
set global=$order(^$global(global)) quit:global=""
set sc=##class(%Library.GlobalEdit).GetGlobalSize($zu(12,""),global,.tamanho,,1)
set qtde=qtde+1
set ^mtempLISTA(global)=global
if tamanho>100 {
set ^mtempTAMANHOGLO(tamanho,global)=global
}
w #
write !, "Quantidade de globais verificadas "_qtde
}
quit 1