Index: TECH/StringUtils.cls.xml
===================================================================
diff -u -r3230 -r3262
--- TECH/StringUtils.cls.xml	(.../StringUtils.cls.xml)	(revision 3230)
+++ TECH/StringUtils.cls.xml	(.../StringUtils.cls.xml)	(revision 3262)
@@ -588,6 +588,21 @@
 <Implementation><![CDATA[	Quit $Translate(String,Karakter,"")
 ]]></Implementation>
 </Method>
+
+<Method name="BuildText">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>Text:%String,Parameters...:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+	#dim Counter As %Integer = 0
+	set it = ##class(TECH.ArrayMultiDimIterator).%New(.Parameters)
+	while it.HasNext() {
+		Set Text = $Replace(Text, "{" _Counter _"}", it.Next())
+		Set Counter = Counter + 1
+	}
+	Quit Text
+]]></Implementation>
+</Method>
 </Class>