Index: APPS/TRANSP/Transsmart/impl/BerichtVerzenderTemplate.cls.xml
===================================================================
diff -u -r60532 -r60534
--- APPS/TRANSP/Transsmart/impl/BerichtVerzenderTemplate.cls.xml	(.../BerichtVerzenderTemplate.cls.xml)	(revision 60532)
+++ APPS/TRANSP/Transsmart/impl/BerichtVerzenderTemplate.cls.xml	(.../BerichtVerzenderTemplate.cls.xml)	(revision 60534)
@@ -120,8 +120,8 @@
 	do ##class(vhLib.Logger).%New().Info(..%ClassName(1)_"::"_$$$CurrentMethod,Request.%ClassName(1))
 	#dim Response as WS.Transsmart.tns.getStatusResponse =""
 	Try {
-		Set:(Request.%ClassName(1) = "WS.Transsmart.tns.doBooking") Response = ..TranssmartWSClient.doBooking(Request)
-		Set:(Request.%ClassName(1) = "WS.Transsmart.tns.doDelete") Response = ..TranssmartWSClient.doDelete(Request)
+		Set:(Request.%IsA(##class(WS.Transsmart.tns.doBooking).%ClassName(1))) Response = ..TranssmartWSClient.doBooking(Request)
+		Set:(Request.%IsA(##class(WS.Transsmart.tns.doDelete).%ClassName(1))) Response = ..TranssmartWSClient.doDelete(Request)
 	} Catch {
 		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
 		Do ##class(vhLib.Logger).LogEnMailExceptie(Exception)