Index: AXimpl/AdminToAxUtils.cls.xml
===================================================================
diff -u -r55643 -r55693
--- AXimpl/AdminToAxUtils.cls.xml	(.../AdminToAxUtils.cls.xml)	(revision 55643)
+++ AXimpl/AdminToAxUtils.cls.xml	(.../AdminToAxUtils.cls.xml)	(revision 55693)
@@ -244,7 +244,10 @@
 <ClassMethod>1</ClassMethod>
 <FormalSpec>VerzendWijze:%String,LandNr:%String,FoutBijOngeldigeConversie:%Boolean=1</FormalSpec>
 <ReturnType>%String</ReturnType>
-<Implementation><![CDATA[	Quit ..ConvertVerzendingWijze(VerzendWijze, FoutBijOngeldigeConversie)
+<Implementation><![CDATA[
+	Set VerzendWijze = $Replace(VerzendWijze,"GL4","DI1")
+
+	Quit ..ConvertVerzendingWijze(VerzendWijze, FoutBijOngeldigeConversie)
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/AXimpl/AdminToAxUtils/Test.cls.xml
===================================================================
diff -u -r48681 -r55693
--- vhUnitTest/AXimpl/AdminToAxUtils/Test.cls.xml	(.../Test.cls.xml)	(revision 48681)
+++ vhUnitTest/AXimpl/AdminToAxUtils/Test.cls.xml	(.../Test.cls.xml)	(revision 55693)
@@ -35,6 +35,13 @@
 	Kill ^RES("KLANT","PI","VERZENDWAX","D","UT1;1&UT1;2")
 ]]></Implementation>
 </Method>
+
+<Method name="Test: Convert VerzendWijze GL4 wordt geconverteerd naar DI1 omdat GL4 niet gekend is in AX">
+<Implementation><![CDATA[
+	Set Converter = ##class(AXimpl.AdminToAxUtils).%New()
+	Do $$$AssertEquals(Converter.ConvertVerzendingWijzeMetLandNr("GL4;1&GL4;2&GL4;3"), "DI1 MaDiWo")
+]]></Implementation>
+</Method>
 </Class>