Index: AXimpl/AxToAdminUtils.cls.xml
===================================================================
diff -u -r48380 -r48386
--- AXimpl/AxToAdminUtils.cls.xml	(.../AxToAdminUtils.cls.xml)	(revision 48380)
+++ AXimpl/AxToAdminUtils.cls.xml	(.../AxToAdminUtils.cls.xml)	(revision 48386)
@@ -208,7 +208,7 @@
 		Quit:(VerzendWijze="")
 		Quit:($Piece(^RES("KLANT","PI","VERZENDWAX","D",VerzendWijze), "`", 2) = DlvMode)
 	}
-	Do:(""=VerzendWijze) ##class(TECH.ExceptionHandler).Throw("Geen Admin verzendwijze gevonden voor AX DlvMod '" _ DlvMode _ "'.")
+	Do:(""=VerzendWijze) ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Geen Admin verzendwijze gevonden voor AX DlvMod '" _ DlvMode _ "'."))
 	Quit VerzendWijze
 	
 	;Quit:(""=DlvMode) "AFC"
Index: AXimpl/AdminToAxUtils.cls.xml
===================================================================
diff -u -r48379 -r48386
--- AXimpl/AdminToAxUtils.cls.xml	(.../AdminToAxUtils.cls.xml)	(revision 48379)
+++ AXimpl/AdminToAxUtils.cls.xml	(.../AdminToAxUtils.cls.xml)	(revision 48386)
@@ -215,8 +215,8 @@
 <FormalSpec>VerzendWijze:%String</FormalSpec>
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
-	Set DlvMode=$Piece( $Get(^RES("KLANT","PI","VERZENDWAX","D",VerzendWijze)), "\", 1)
-	Do:(""=DlvMode) ##class(TECH.ExceptionHandler).Throw("Geen AX Delivery Mode gevonden voor Admin Verzendwijze '" _ VerzendWijze _ "'.")
+	Set DlvMode=$Piece( $Get(^RES("KLANT","PI","VERZENDWAX","D",VerzendWijze), ""), "`", 2)
+	Do:(""=DlvMode) ##class(TECH.ExceptionHandler).Throw(##class(TECH.Exceptions.GeneralErrorException).%New("Geen AX Delivery Mode gevonden voor Admin Verzendwijze '" _ VerzendWijze _ "'."))
 	Quit DlvMode
 ]]></Implementation>
 </Method>