persistent 1 VHOpslag TECH.Persistent vhLib.Logging %Integer 1 1 Getal,Logging 1 Do ##class(vhLib.LoggingGetalIndex).BouwOp() 1 Do ##class(vhLib.LoggingGetalIndex).BouwOpVoorLogEntry(##class(vhLib.Logging).%OpenId("PRA-W7_DEV1||64666||24")) 1 Logging:vhLib.Logging 1000) { Set Idx = ##class(vhLib.LoggingGetalIndex).%New() Set Idx.Logging = Logging Set Idx.Getal = Getal Do Idx.%Save() } } ]]> 1 %String %CacheSQLStorage ^vhLib.LoggingGetalIndexS data ^vhLib.LoggingGetalIndexD delimited {Getal} {Logging}