Index: APPS/TRANSP/Transsmart/impl/EtiketService.cls.xml
===================================================================
diff -u -r59827 -r59849
--- APPS/TRANSP/Transsmart/impl/EtiketService.cls.xml	(.../EtiketService.cls.xml)	(revision 59827)
+++ APPS/TRANSP/Transsmart/impl/EtiketService.cls.xml	(.../EtiketService.cls.xml)	(revision 59849)
@@ -137,7 +137,9 @@
 		
 	#dim ShipmentInfoReference As %String = ..GeefShipmentInfoReference(Levering)
 	#dim Request as WS.Transsmart.tns.getDocs = ..RequestBouwer.MaakgetDocsRequest(ShipmentInfoReference)
+	
 	#dim Response As WS.Transsmart.tns.getDocsResponse = ..GeefDocs(Request)
+	
 	#dim ZlpEtiketten As %ListOfObjects = ..MaakEtikettenLijst(Response)
 	
 	Quit ZlpEtiketten
@@ -166,6 +168,7 @@
 		#dim Response As WS.Transsmart.tns.getDocsResponse = ..TranssmartWSClient.getDocs(Request)
 	} Catch {
 		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+		Do ##class(vhLib.Logger).LogExceptie(Exception)
 		Do ##class(vhLib.Logger).%New("Transsmart").ErrorMail("VerwerkRequest","Verzenden bericht mislukt."_$C(13,10)_$C(13,10)_Exception.ToString())
 		Set Error =##class(APPS.TRANSP.Transsmart.Error).%New("VH99",Exception.GeefOmschrijving())
 		do ..ThrowError(Error)