Index: TECH/ListUtils.cls.xml
===================================================================
diff -u -r490 -r512
--- TECH/ListUtils.cls.xml	(.../ListUtils.cls.xml)	(revision 490)
+++ TECH/ListUtils.cls.xml	(.../ListUtils.cls.xml)	(revision 512)
@@ -395,6 +395,19 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MulitDimensionalToArray">
+<ClassMethod>1</ClassMethod>
+<FormalSpec><![CDATA[&MultiDim:%CacheString,Array:%ArrayOfDataTypes]]></FormalSpec>
+<Implementation><![CDATA[
+	set it = ##class(TECH.ArrayOneDimIterator).%New(.MultiDim)
+	while it.HasNext() {
+		#dim Data = it.Next()
+		#dim Key = it.Key()
+		do Array.SetAt(Data,Key)
+	}
+]]></Implementation>
+</Method>
+
 <Method name="RemoveDuplicateItems">
 <ClassMethod>1</ClassMethod>
 <FormalSpec>List:%ListOfDataTypes</FormalSpec>