Index: AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml
===================================================================
diff -u -r49530 -r49543
--- AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml	(.../SalesOrderConverter.cls.xml)	(revision 49530)
+++ AXimpl/Dynamics/SalesOrderIn/Converter/SalesOrderConverter.cls.xml	(.../SalesOrderConverter.cls.xml)	(revision 49543)
@@ -601,7 +601,7 @@
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim VerzendWijzeAdmin = ""
+	#dim VerzendWijzeAdmin As %String = ""
 	Try {
 		Set VerzendWijzeAdmin = ##class(AXimpl.AxToAdminUtils).ConvertVerzendingWijze(OrderHeader.DlvMode)
 	} Catch {
Index: AXimpl/AdminToAxUtils.cls.xml
===================================================================
diff -u -r48763 -r49543
--- AXimpl/AdminToAxUtils.cls.xml	(.../AdminToAxUtils.cls.xml)	(revision 48763)
+++ AXimpl/AdminToAxUtils.cls.xml	(.../AdminToAxUtils.cls.xml)	(revision 49543)
@@ -1,6 +1,8 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="AXimpl.AdminToAxUtils">
+<Description>
+Deze klasse dient om formattering uit te voeren en conversies te voorzien die geen data nodig hebben.</Description>
 <Super>TECH.RegisteredObject</Super>
 
 <Method name="ConvertCustomerID">
@@ -211,6 +213,8 @@
 </Method>
 
 <Method name="ConvertVerzendingWijze">
+<Description>
+N.B. Aangezien deze conversie van ID's zijn data uit globals haalt (en niet hardcoded is), is er de suggestie om een Repository te gebruiken, bij volgende grote wijziging.</Description>
 <ClassMethod>1</ClassMethod>
 <FormalSpec>VerzendWijze:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
Index: AXimpl/AxToAdminUtils.cls.xml
===================================================================
diff -u -r49082 -r49543
--- AXimpl/AxToAdminUtils.cls.xml	(.../AxToAdminUtils.cls.xml)	(revision 49082)
+++ AXimpl/AxToAdminUtils.cls.xml	(.../AxToAdminUtils.cls.xml)	(revision 49543)
@@ -1,6 +1,8 @@
 <?xml version="1.0" encoding="UTF-8"?>
 <Export generator="Cache" version="24">
 <Class name="AXimpl.AxToAdminUtils">
+<Description>
+Deze klasse dient om formattering uit te voeren en conversies te voorzien die geen data nodig hebben.</Description>
 <Super>TECH.RegisteredObject</Super>
 
 <Method name="ConvertCustomerID">
@@ -198,6 +200,8 @@
 </Method>
 
 <Method name="ConvertVerzendingWijze">
+<Description>
+N.B. Aangezien deze conversie van ID's zijn data uit globals haalt (en niet hardcoded is), is er de suggestie om een Repository te gebruiken, bij volgende grote wijziging.</Description>
 <ClassMethod>1</ClassMethod>
 <FormalSpec>DlvMode:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
@@ -211,124 +215,6 @@
 	Do:(""=VerzendWijze) ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Geen Admin verzendwijze gevonden voor AX DlvMod '" _ DlvMode _ "'."))
 	Set VerzendWijze = $Translate( VerzendWijze, "&", "`" ) // vhPOPEDIT aanvaardt geen single backquotes; daarom is gekozen voor een andere separator.
 	Quit VerzendWijze
-	
-	;Quit:(""=DlvMode) "AFC"
-	;Quit:(""=DlvMode) "DD1"
-	;Quit:(""=DlvMode) "DIR"
-	;Quit:(""=DlvMode) "E01"
-	;Quit:(""=DlvMode) "E02"
-	;Quit:(""=DlvMode) "E03"
-	;Quit:(""=DlvMode) "E04"
-	;Quit:(""=DlvMode) "E05"
-	;Quit:(""=DlvMode) "E06"
-	;Quit:(""=DlvMode) "E07"
-	;Quit:(""=DlvMode) "E08"
-	;Quit:(""=DlvMode) "E09"
-	;Quit:(""=DlvMode) "E10"
-	;Quit:(""=DlvMode) "E11"
-	;Quit:(""=DlvMode) "E12"
-	;Quit:(""=DlvMode) "EX"
-	;Quit:(""=DlvMode) "EXU"
-	;Quit:(""=DlvMode) "EXD"
-	;Quit:(""=DlvMode) "KLR"
-	;Quit:(""=DlvMode) "OD"
-	;Quit:(""=DlvMode) "POB"
-	;Quit:(""=DlvMode) "PON"
-	;Quit:(""=DlvMode) "R00"
-	;Quit:(""=DlvMode) "R01"
-	;Quit:(""=DlvMode) "R02"
-	;Quit:(""=DlvMode) "R03"
-	;Quit:(""=DlvMode) "R04"
-	;Quit:(""=DlvMode) "R05"
-	;Quit:(""=DlvMode) "R06"
-	;Quit:(""=DlvMode) "R07"
-	;Quit:(""=DlvMode) "R08"
-	;Quit:(""=DlvMode) "R10"
-	;Quit:(""=DlvMode) "R11"
-	;Quit:(""=DlvMode) "R12"
-	;Quit:(""=DlvMode) "R13"
-	;Quit:(""=DlvMode) "R20"
-	;Quit:(""=DlvMode) "R21"
-	;Quit:(""=DlvMode) "R22"
-	;Quit:(""=DlvMode) "R23"
-	;Quit:(""=DlvMode) "R30"
-	;Quit:(""=DlvMode) "R31"
-	;Quit:(""=DlvMode) "R32"
-	;Quit:(""=DlvMode) "R33"
-	;Quit:(""=DlvMode) "R34"
-	;Quit:(""=DlvMode) "R35"
-	;Quit:(""=DlvMode) "R36"
-	;Quit:(""=DlvMode) "R37"
-	;Quit:(""=DlvMode) "R38"
-	;Quit:(""=DlvMode) "R39"
-	;Quit:(""=DlvMode) "R40"
-	;Quit:(""=DlvMode) "R41"
-	;Quit:(""=DlvMode) "R42"
-	;Quit:(""=DlvMode) "R43"
-	;Quit:(""=DlvMode) "R44"
-	;Quit:(""=DlvMode) "R45"
-	;Quit:(""=DlvMode) "R46"
-	;Quit:(""=DlvMode) "R47"
-	;Quit:(""=DlvMode) "R50"
-	;Quit:(""=DlvMode) "R51"
-	;Quit:(""=DlvMode) "R52"
-	;Quit:(""=DlvMode) "R60"
-	;Quit:(""=DlvMode) "R61"
-	;Quit:(""=DlvMode) "R62"
-	;Quit:(""=DlvMode) "R63"
-	;Quit:(""=DlvMode) "R64"
-	;Quit:(""=DlvMode) "R65"
-	;Quit:(""=DlvMode) "R90"
-	;Quit:(""=DlvMode) "R97"
-	;Quit:(""=DlvMode) "R98"
-	;Quit:(""=DlvMode) "R99"
-	;Quit:(""=DlvMode) "SRV"
-	;Quit:(""=DlvMode) "TH"
-	;Quit:(""=DlvMode) "TH1"
-	;Quit:(""=DlvMode) "TH2"
-	;Quit:(""=DlvMode) "TH3"
-	;Quit:(""=DlvMode) "TH4"
-	;Quit:(""=DlvMode) "TH5"
-	;Quit:(""=DlvMode) "TH6"
-	;Quit:(""=DlvMode) "TH7"
-	;Quit:(""=DlvMode) "TH8"
-	;Quit:(""=DlvMode) "TH9"
-	;Quit:(""=DlvMode) "THA"
-	;Quit:(""=DlvMode) "THB"
-	;Quit:(""=DlvMode) "THC"
-	;Quit:(""=DlvMode) "THD"
-	;Quit:(""=DlvMode) "THE"
-	;Quit:(""=DlvMode) "THF"
-	;Quit:(""=DlvMode) "THG"
-	;Quit:(""=DlvMode) "THR"
-	;Quit:(""=DlvMode) "THZ"
-	;Quit:(""=DlvMode) "TNC"
-	;Quit:(""=DlvMode) "TPC"
-	;Quit:(""=DlvMode) "TPO"
-	;Quit:(""=DlvMode) "TPU"
-	;Quit:(""=DlvMode) "U01"
-	;Quit:(""=DlvMode) "U02"
-	;Quit:(""=DlvMode) "U03"
-	;Quit:(""=DlvMode) "U04"
-	;Quit:(""=DlvMode) "U05"
-	;Quit:(""=DlvMode) "U06"
-	;Quit:(""=DlvMode) "U07"
-	;Quit:(""=DlvMode) "U08"
-	;Quit:(""=DlvMode) "U09"
-	;Quit:(""=DlvMode) "U10"
-	;Quit:(""=DlvMode) "U11"
-	;Quit:(""=DlvMode) "VT"
-	;Quit:(""=DlvMode) "WPM"
-	Quit:("AFH"=DlvMode) "AFH"
-	Quit:("TTC"=DlvMode) "DI2"
-	Quit:("IC"=DlvMode) "INT"
-	Quit:("OD1"=DlvMode) "OD1"
-	Quit:("OD2"=DlvMode) "OD2"
-	Quit:("OD3"=DlvMode) "OD3"
-	Quit:("OD4"=DlvMode) "OD4"
-	Quit:("OD5"=DlvMode) "OD5"
-	Quit:("SNT"=DlvMode) "SNT"
-	Quit "DI1"
 ]]></Implementation>
 </Method>
 
Index: vhTest/Fake/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml
===================================================================
diff -u -r48522 -r49543
--- vhTest/Fake/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml	(.../CustomerInConverter.cls.xml)	(revision 48522)
+++ vhTest/Fake/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml	(.../CustomerInConverter.cls.xml)	(revision 49543)
@@ -21,14 +21,12 @@
 
 <Method name="ZetLeverAdressenBestaandeKlant">
 <FormalSpec>Klant:DOM.VKP.VanHoeckeKlant,Cust:AXif.Dynamics.CustomerIn.MessageParts.AxdEntityCust</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ZetLeverAdressenNieuweKlant">
 <FormalSpec>Klant:DOM.VKP.VanHoeckeKlant,Cust:AXif.Dynamics.CustomerIn.MessageParts.AxdEntityCust</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="RolesContains">
Index: AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml
===================================================================
diff -u -r48545 -r49543
--- AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml	(.../CustomerInConverter.cls.xml)	(revision 48545)
+++ AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter.cls.xml	(.../CustomerInConverter.cls.xml)	(revision 49543)
@@ -86,7 +86,7 @@
 	Do KlantPartij.ZetToenaam(..GeefKlantToenaam(Cust))
 	Do KlantPartij.ZetTaal(..GeefTaal(Cust))
 	Do KlantPartij.ZetTelefoon1(..GeefTelefoon1(Cust))
-	#dim PrimairAdres As DOM.VKP.LeverAdres = ..LeverAdresUtils.GeefPrimairAdres(Cust, "Update")
+	#dim PrimairAdres As DOM.VKP.LeverAdres = ..LeverAdresUtils.MaakPrimairAdres(Cust, "Update")
 	;Do KlantPartij.Zet ??? (..GeefFax(Cust)) geen zetbare property op klant of partij
 	Do KlantPartij.ZetAdres(PrimairAdres)
 	Do KlantPartij.Save()
@@ -120,7 +120,7 @@
 	; Set dtoKlant.Opmerking1 = ???
 	; Set dtoKlant.FrequentieAanbrengerCommissie = ???
 
-	Set dtoKlant.Adres = ..LeverAdresUtils.GeefPrimairAdres(Cust, "Insert")
+	Set dtoKlant.Adres = ..LeverAdresUtils.MaakPrimairAdres(Cust, "Insert")
 	#dim PartijID As DOM.common.PartijID = ..KlantLevenCyclusService.MaakKlant(dtoKlant,TypeTemplateKlant)
 	
 	#Dim Klant as DOM.VKP.VanHoeckeKlant = ..VerkoopApi.GeefKlant(PartijID)	
Index: vhTest/Mock/AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml
===================================================================
diff -u -r48545 -r49543
--- vhTest/Mock/AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml	(.../LeverAdresUtils.cls.xml)	(revision 48545)
+++ vhTest/Mock/AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml	(.../LeverAdresUtils.cls.xml)	(revision 49543)
@@ -8,10 +8,10 @@
 <Super>AXimpl.Dynamics.CustomerIn.Converter.LeverAdresUtils,Tools.Mock.MockClassBase</Super>
 <Inheritance>right</Inheritance>
 
-<Method name="GeefPrimairAdres">
+<Method name="MaakPrimairAdres">
 <FormalSpec>Cust:AXif.Dynamics.CustomerIn.MessageParts.AxdEntityCust,InsertOfUpdate:%String</FormalSpec>
 <ReturnType>DOM.VKP.LeverAdres</ReturnType>
-<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefPrimairAdres",Cust,InsertOfUpdate)
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("MaakPrimairAdres",Cust,InsertOfUpdate)
 ]]></Implementation>
 </Method>
 
Index: vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml
===================================================================
diff -u -r48654 -r49543
--- vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 48654)
+++ vhUnitTest/AXimpl/Dynamics/CustomerIn/Converter/CustomerInConverter/Test.cls.xml	(.../Test.cls.xml)	(revision 49543)
@@ -55,13 +55,13 @@
 	Do KlantMock.VerwachtMethodCall("ZetVerzendingWijze", "DI1").DanDoeNiks()
 	Do KlantMock.VerwachtMethodCall("Save").DanDoeNiks()
 	
-	Do ..LeverAdresUtilsMock.IndienMethodCall("GeefPrimairAdres",KlantMock,"Update").DanReturn(..GeefAddress())
+	Do ..LeverAdresUtilsMock.IndienMethodCall("MaakPrimairAdres",KlantMock,"Update").DanReturn(..GeefAddress())
 	
 	#dim LandMock As vhTest.Mock.DOM.common.Land = ##class(vhTest.Mock.DOM.common.Land).%New()
 	Do LandMock.IndienMethodCall("GeefCode").DanReturn("BE")
 	Do ..LandRepositoryMock.IndienMethodCall("GeefViaLandCodeIso3","BEL").DanReturn(LandMock)
 	
-	Do ..LeverAdresUtilsMock.IndienMethodCall("GeefPrimairAdres",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(..GeefAddress())
+	Do ..LeverAdresUtilsMock.IndienMethodCall("MaakPrimairAdres",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(..GeefAddress())
 	Do ..LeverAdresUtilsMock.IndienMethodCall("ZetLeverAdressenBestaandeKlant",KlantMock,$$$ElkeWaarde).DanDoeNiks()
 	
 	Do ..GeefConverter().Convert(..GeefCust("01111","Klant1"))
@@ -105,7 +105,7 @@
 	Do KlantMock.VerwachtMethodCall("Save").DanDoeNiks()
 	;Do KlantMock.VerwachtMethodCall("GeefLeverAdressen").DanDoeNiks()
 	
-	Do ..LeverAdresUtilsMock.IndienMethodCall("GeefPrimairAdres",KlantMock,"Update").DanReturn(..GeefAddress())
+	Do ..LeverAdresUtilsMock.IndienMethodCall("MaakPrimairAdres",KlantMock,"Update").DanReturn(..GeefAddress())
 	
 	#dim Cust As AXif.Dynamics.CustomerIn.MessageParts.AxdEntityCust = ..GeefCust("01111","Klant1")
 	Set Cust.PostalAddress.GetAt(1).DlvModeId = "UnitTestOngekendeDlvMode"
@@ -114,7 +114,7 @@
 	Do LandMock.IndienMethodCall("GeefCode").DanReturn("BE")
 	Do ..LandRepositoryMock.IndienMethodCall("GeefViaLandCodeIso3","BEL").DanReturn(LandMock)
 	
-	Do ..LeverAdresUtilsMock.IndienMethodCall("GeefPrimairAdres",Cust,$$$ElkeWaarde).DanReturn(Adres)
+	Do ..LeverAdresUtilsMock.IndienMethodCall("MaakPrimairAdres",Cust,$$$ElkeWaarde).DanReturn(Adres)
 	Do ..LeverAdresUtilsMock.IndienMethodCall("ZetLeverAdressenBestaandeKlant",KlantMock,Cust).DanDoeNiks()
 	
 	Do ..GeefConverter().Convert(Cust)
@@ -135,7 +135,7 @@
 	Do LandMock.IndienMethodCall("GeefCode").DanReturn("BE")
 	Do ..LandRepositoryMock.IndienMethodCall("GeefViaLandCodeIso3","BEL").DanReturn(LandMock)
 	
-	Do ..LeverAdresUtilsMock.IndienMethodCall("GeefPrimairAdres",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(..GeefAddress())
+	Do ..LeverAdresUtilsMock.IndienMethodCall("MaakPrimairAdres",$$$ElkeWaarde,$$$ElkeWaarde).DanReturn(..GeefAddress())
 	Do ..LeverAdresUtilsMock.IndienMethodCall("ZetLeverAdressenNieuweKlant",KlantMock,$$$ElkeWaarde).DanDoeNiks()
 	
 	Do ..GeefConverter().Convert(..GeefCust("01111","Klant1"))
@@ -176,7 +176,7 @@
 	Do LandMock.IndienMethodCall("GeefCode").DanReturn("BE")
 	Do ..LandRepositoryMock.IndienMethodCall("GeefViaLandCodeIso3","BEL").DanReturn(LandMock)
 	
-	Do ..LeverAdresUtilsMock.IndienMethodCall("GeefPrimairAdres",Cust,$$$ElkeWaarde).DanReturn(..GeefAddress())
+	Do ..LeverAdresUtilsMock.IndienMethodCall("MaakPrimairAdres",Cust,$$$ElkeWaarde).DanReturn(..GeefAddress())
 	Do ..LeverAdresUtilsMock.IndienMethodCall("ZetLeverAdressenNieuweKlant",KlantMock,Cust).DanDoeNiks()
 	
 	Do ..GeefConverter().Convert(Cust)
@@ -209,7 +209,7 @@
 	Do LandMock.IndienMethodCall("GeefCode").DanReturn("BE")
 	Do ..LandRepositoryMock.IndienMethodCall("GeefViaLandCodeIso3","BEL").DanReturn(LandMock)
 	
-	Do ..LeverAdresUtilsMock.IndienMethodCall("GeefPrimairAdres",Cust,$$$ElkeWaarde).DanReturn(..GeefAddress())
+	Do ..LeverAdresUtilsMock.IndienMethodCall("MaakPrimairAdres",Cust,$$$ElkeWaarde).DanReturn(..GeefAddress())
 	Do ..LeverAdresUtilsMock.IndienMethodCall("ZetLeverAdressenNieuweKlant",KlantMock,Cust).DanDoeNiks()
 
 	Do ..GeefConverter().Convert(Cust)
Index: vhTest/Fake/AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml
===================================================================
diff -u -r48545 -r49543
--- vhTest/Fake/AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml	(.../LeverAdresUtils.cls.xml)	(revision 48545)
+++ vhTest/Fake/AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml	(.../LeverAdresUtils.cls.xml)	(revision 49543)
@@ -14,6 +14,13 @@
 ]]></Implementation>
 </Method>
 
+<Method name="MaakPrimairAdres">
+<FormalSpec>Cust:AXif.Dynamics.CustomerIn.MessageParts.AxdEntityCust,InsertOfUpdate:%String</FormalSpec>
+<ReturnType>DOM.VKP.LeverAdres</ReturnType>
+<Implementation><![CDATA[	Quit ""
+]]></Implementation>
+</Method>
+
 <Method name="RolesContains">
 <FormalSpec>Roles:%ListOfDataTypes,Name:%String</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
@@ -23,14 +30,12 @@
 
 <Method name="ZetLeverAdressenBestaandeKlant">
 <FormalSpec>Klant:DOM.VKP.VanHoeckeKlant,Cust:AXif.Dynamics.CustomerIn.MessageParts.AxdEntityCust</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 
 <Method name="ZetLeverAdressenNieuweKlant">
 <FormalSpec>Klant:DOM.VKP.VanHoeckeKlant,Cust:AXif.Dynamics.CustomerIn.MessageParts.AxdEntityCust</FormalSpec>
-<Implementation><![CDATA[
-]]></Implementation>
+<Implementation><![CDATA[]]></Implementation>
 </Method>
 </Class>
 
Index: AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml
===================================================================
diff -u -r48545 -r49543
--- AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml	(.../LeverAdresUtils.cls.xml)	(revision 48545)
+++ AXimpl/Dynamics/CustomerIn/Converter/LeverAdresUtils.cls.xml	(.../LeverAdresUtils.cls.xml)	(revision 49543)
@@ -152,7 +152,7 @@
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim VerzendWijzeAdmin = ""
+	#dim VerzendWijzeAdmin As %String = ""
 	Try {
 		Set VerzendWijzeAdmin = ..AxToAdminUtils.ConvertVerzendingWijze(DlvMode)
 	} Catch {
@@ -186,7 +186,7 @@
 ]]></Implementation>
 </Method>
 
-<Method name="GeefPrimairAdres">
+<Method name="MaakPrimairAdres">
 <FormalSpec>Cust:AXif.Dynamics.CustomerIn.MessageParts.AxdEntityCust,InsertOfUpdate:%String</FormalSpec>
 <ReturnType>DOM.VKP.LeverAdres</ReturnType>
 <Implementation><![CDATA[
Index: AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder.cls.xml
===================================================================
diff -u -r49202 -r49543
--- AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder.cls.xml	(.../OrderHoofdingConverteerder.cls.xml)	(revision 49202)
+++ AXimpl/Dynamics/SalesOrderOut/Converter/OrderHoofdingConverteerder.cls.xml	(.../OrderHoofdingConverteerder.cls.xml)	(revision 49543)
@@ -79,7 +79,7 @@
 <Private>1</Private>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	#dim DlvMode = ""
+	#dim DlvMode As %String = ""
 	Try {
 		Set DlvMode = ##class(AXimpl.AdminToAxUtils).ConvertVerzendingWijze(Order.GeefVerzendingWijze())
 	} Catch {