Index: vhUnitTest/APPS/VKP/OrderIngaveService/TekstLijnenToevoeger/VoegToeOpmerkingLijnenAanOrder/Test.cls.xml
===================================================================
diff -u -r29059 -r41444
--- vhUnitTest/APPS/VKP/OrderIngaveService/TekstLijnenToevoeger/VoegToeOpmerkingLijnenAanOrder/Test.cls.xml	(.../Test.cls.xml)	(revision 29059)
+++ vhUnitTest/APPS/VKP/OrderIngaveService/TekstLijnenToevoeger/VoegToeOpmerkingLijnenAanOrder/Test.cls.xml	(.../Test.cls.xml)	(revision 41444)
@@ -7,7 +7,8 @@
 <Implementation><![CDATA[
 	Set OrderMock = ##class(vhTest.Mock.DOM.VKP.Order).%New()
 	#dim OfferteMock As vhTest.Mock.APPS.VKP.Offerte = ..GeefOfferteMock()
-	
+	Do OfferteMock.VerwachtMethodCall("IsVhisie4").DanReturn($$$False)
+		
 	#dim TekstOrderLijnMockLevertijd As vhTest.Mock.DOM.VKP.TekstOrderlijn = ..GeefTekstOrderLijnMock()
 	#dim TekstOrderLijnMockUNIEDI As vhTest.Mock.DOM.VKP.TekstOrderlijn = ..GeefTekstOrderLijnMock()
 	#dim TekstOrderLijnMockOpmerking1 As vhTest.Mock.DOM.VKP.TekstOrderlijn = ..GeefTekstOrderLijnMock()
@@ -29,6 +30,7 @@
 	Do TekstOrderLijnMockOpmerking2.Verifieer()
 	Do TekstOrderLijnMockLegeLijn.Verifieer()
 	Do OrderMock.Verifieer()
+	Do OfferteMock.Verifieer()
 ]]></Implementation>
 </Method>
 
Index: APPS/VKP/OrderIngaveService/TekstLijnenToevoeger.cls.xml
===================================================================
diff -u -r34794 -r41444
--- APPS/VKP/OrderIngaveService/TekstLijnenToevoeger.cls.xml	(.../TekstLijnenToevoeger.cls.xml)	(revision 34794)
+++ APPS/VKP/OrderIngaveService/TekstLijnenToevoeger.cls.xml	(.../TekstLijnenToevoeger.cls.xml)	(revision 41444)
@@ -40,7 +40,11 @@
 	#dim OpmerkingTekstblok As %String = ""
 	#dim mdTekstLijnen As %String
 	Set OpmerkingTekstblok = OpmerkingTekstblok _ "Levertijd: "_ ..FormatAPI.FormatHorolog(Offerte.GeefLeverDatum(),"DD-MM-JJJJ") _ $$$CRLF
-	Set OpmerkingTekstblok = OpmerkingTekstblok _ "UNI-EDI-nr: "_Offerte.GeefEDINummerVoorEindklant() _ $$$CRLF
+	If (Offerte.IsVhisie4()) {
+		Set OpmerkingTekstblok = OpmerkingTekstblok _ "Vhisie4-nr: "_Offerte.GeefExterneId() _ $$$CRLF
+	} else {
+		Set OpmerkingTekstblok = OpmerkingTekstblok _ "UNI-EDI-nr: "_Offerte.GeefEDINummerVoorEindklant() _ $$$CRLF
+	}
 	If $L(..TrimWhitespacesEnCRxLF(Offerte.GeefBestelOpmerking())) {
 		Set OpmerkingTekstblok = OpmerkingTekstblok _ "Opmerking:"_$$$CRLF 
 		Set OpmerkingTekstblok = OpmerkingTekstblok _ Offerte.GeefBestelOpmerking() _ $$$CRLF