Utility methods for %ListOfObjects. REMARK: Probably this functionality exists already somewhere.... 1 %RegisteredObject 0 1 Listbuild:%List %ListOfDataTypes 1 List:%ListOfDataTypes %List 1 List:%ListOfDataTypes,Delim:%String="\" OPGELET : Het resultaat van PiecesToList is een %ListOfDataTypes Dit is anders dan in PiecesToList^vhLib() , want daar is het resultaat een ListBuild. Opgelet dus bij code-rewrite! 1 PieceDelimitedList:%String,Delim:%String %ListOfDataTypes Copy the list-items from sourceList into targetList. Returns the targetList. 1 sourceList:%ListOfObjects,targetList:%ListOfObjects="" %ListOfObjects Maakt een diepe copy (2 diep) van een aray. De elementen van de array moeten %RegisteredObjects zijn. 1 Source:%AbstractArray %AbstractArray 1 sourceList:%ListOfDataTypes,targetList:%ListOfDataTypes="" %ListOfDataTypes Werkt ook voor ListOfObjects en Item een object 1 List:%ListOfDataTypes,Item:%String 1 Value:%CacheString,List:%CacheString,AllOccurences:%Boolean=0 %Boolean Oproepen via set Lijst=##class(TECH.ListUtils).CreateListOfDataTypes("value1","value2","value3", ... 1 ArgItems...:%String %ListOfDataTypes Oproepen via set Lijst=##class(TECH.ListUtils).CreateListOfObjects(obj1,obj2,obj3, ... 1 ArgItems...:%String %ListOfObjects 1 list:%AbstractList,mdArgItems:%String 1