Index: vhUnitTest/AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder/Test.cls.xml
===================================================================
diff -u -r44221 -r46287
--- vhUnitTest/AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder/Test.cls.xml	(.../Test.cls.xml)	(revision 44221)
+++ vhUnitTest/AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder/Test.cls.xml	(.../Test.cls.xml)	(revision 46287)
@@ -10,7 +10,7 @@
 	Set DocumentReferenties.KlantOrderNummer = "KlantOrderNummer"
 	Set Order = ##class(vhTest.Utils.DOM.VKP.Order).VoegtoeDocumentReferenties(Order,DocumentReferenties)
 	Set Order = ##class(vhTest.Utils.DOM.VKP.Order).VoegtoeLeveradres(Order,##class(vhTest.Utils.DOM.VKP.LeverAdres).Belgisch())
-
+	Set Order = ##class(vhTest.Utils.DOM.VKP.Order).VoegtoeTekst(Order,##class(DOM.VKP.enu.TekstAfdrukDocumentType).Faktuur(),"")
 	Set OrderHoofdingConverteerder = ##class(AXimpl.Dynamics.SalesOrderOut.Converter.OrderHoofdingConverteerder).%New()
 		
 	#dim OrderHeader as AXif.Dynamics.SalesOrderOut.MessageParts.AxdEntityOrderHeader = OrderHoofdingConverteerder.Converteer(Order,"MessageId")
@@ -38,6 +38,26 @@
 	Do $$$AssertCorrectGemaakteBestanden(..GeefBestandLocatie())
 ]]></Implementation>
 </Method>
+
+<Method name="Test Tekst Orderniveau">
+<Implementation><![CDATA[
+	#dim Order as DOM.VKP.Order = ##class(vhTest.Utils.DOM.VKP.Order).StandaardOrderHoofding()
+	Set DocumentReferenties = ##class(DOM.VKP.DocumentReferenties).%New()
+	Set DocumentReferenties.KlantOrderNummer = "KlantOrderNummer"
+	Set Order = ##class(vhTest.Utils.DOM.VKP.Order).VoegtoeDocumentReferenties(Order,DocumentReferenties)
+	Set Order = ##class(vhTest.Utils.DOM.VKP.Order).VoegtoeLeveradres(Order,##class(vhTest.Utils.DOM.VKP.LeverAdres).Belgisch())
+
+	Set Order = ##class(vhTest.Utils.DOM.VKP.Order).VoegtoeTekst(Order,##class(DOM.VKP.enu.TekstAfdrukDocumentType).Faktuur(),"FaktuurTekst")
+	
+	Set OrderHoofdingConverteerder = ##class(AXimpl.Dynamics.SalesOrderOut.Converter.OrderHoofdingConverteerder).%New()
+		
+	#dim OrderHeader as AXif.Dynamics.SalesOrderOut.MessageParts.AxdEntityOrderHeader = OrderHoofdingConverteerder.Converteer(Order,"MessageId")
+	
+	
+	
+	Do $$$AssertEquals(OrderHeader.InvoiceBody,"FaktuurTekst")
+]]></Implementation>
+</Method>
 </Class>