Index: APPS/TRANSP/Transsmart/impl/Etiket.cls.xml
===================================================================
diff -u
--- APPS/TRANSP/Transsmart/impl/Etiket.cls.xml	(revision 0)
+++ APPS/TRANSP/Transsmart/impl/Etiket.cls.xml	(revision 59676)
@@ -0,0 +1,89 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.TRANSP.Transsmart.impl.Etiket">
+<Super>TECH.Mockable</Super>
+
+<Property name="ConfigMgr">
+<Type>TECH.Config.ConfigMgr</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ProjectSettingsAPI">
+<Type>DOM.common.impl.ProjectSettingsAPI</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="TranssmartWSClient">
+<Type>WS.Transsmart.TboxServicePort</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="RequestBouwer">
+<Type>APPS.TRANSP.Transsmart.RequestDataBouwer</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="ResponseControleur">
+<Type>APPS.TRANSP.Transsmart.impl.ResponseControleur</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="Zbl">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>ConfigMgr:TECH.Config.ConfigMgr="",ProjectSettingsAPI:DOM.common.impl.ProjectSettingsAPI="",TranssmartWSClient:WS.Transsmart.TboxServicePort=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Set ..ConfigMgr = $$$Inject(ConfigMgr,##class(TECH.Config.ConfigMgr).Instance())
+	Set ..ProjectSettingsAPI = $$$Inject(ProjectSettingsAPI, ##class(DOM.common.impl.ProjectSettingsAPI).%New())
+
+	If ..ConfigMgr.GeefOmgeving()="PROD" {
+		Set ..TranssmartWSClient = $$$Inject(TranssmartWSClient,##class(WS.Transsmart.impl.TboxServicePort).%New())
+		Do ..TranssmartWSClient.ZetLocationVoorOmgeving(..ConfigMgr.GeefOmgeving())
+	}
+	else {
+		if ..ProjectSettingsAPI.GebruikTranssmartAcceptOmgeving()
+		{ 
+			Set ..TranssmartWSClient = $$$Inject(TranssmartWSClient,##class(WS.Transsmart.impl.TboxServicePort).%New())
+			Do ..TranssmartWSClient.ZetLocationVoorOmgeving(..ConfigMgr.GeefOmgeving())
+		} else {		
+			Set ..TranssmartWSClient=##class(WS.Transsmart.impl.LoggingTboxServicePort).%New()		
+		}
+	}
+	Do ..SetSSLConfiguration("Transsmart")
+	Do ..ZetAuthenticationHeader()
+	Set ..RequestBouwer = $$$Inject(RequestBouwer,##class(APPS.TRANSP.Transsmart.impl.RequestDataBouwer).%New())
+	Set ..ResponseControleur = $$$Inject(ResponseControleur,##class(APPS.TRANSP.Transsmart.impl.ResponseControleur).%New())
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="ZetAuthenticationHeader">
+<Implementation><![CDATA[	Do ..TranssmartWSClient.HeadersOut.SetAt( ..TranssmartWSClient.GeefAuthenticationHeader(),1)
+]]></Implementation>
+</Method>
+
+<Method name="SetSSLConfiguration">
+<FormalSpec>SSLConfiguration:%String</FormalSpec>
+<Implementation><![CDATA[	Set ..TranssmartWSClient.SSLConfiguration = SSLConfiguration
+]]></Implementation>
+</Method>
+
+<Method name="GeefEtiketten">
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[
+	//%ListOfObjects(ELEMENTTYPE="WSdata.EC.ExterneVerkoop.VerzendingMogelijkheid.Selectie")
+	Set ZlpEtiketten = ##class(%ListOfObjects).%New()
+	Quit ZlpEtiketten
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Mock/APPS/TRANSP/Transsmart/impl/Etiket.cls.xml
===================================================================
diff -u
--- vhTest/Mock/APPS/TRANSP/Transsmart/impl/Etiket.cls.xml	(revision 0)
+++ vhTest/Mock/APPS/TRANSP/Transsmart/impl/Etiket.cls.xml	(revision 59676)
@@ -0,0 +1,37 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Mock.APPS.TRANSP.Transsmart.impl.Etiket">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden - lokale aanpassingen zijn niet nodig.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>APPS.TRANSP.Transsmart.impl.Etiket,Tools.Mock.MockClassBase</Super>
+<Inheritance>right</Inheritance>
+
+<Method name="%OnNew">
+<FormalSpec>ConfigMgr:TECH.Config.ConfigMgr="",ProjectSettingsAPI:DOM.common.impl.ProjectSettingsAPI="",TranssmartWSClient:WS.Transsmart.TboxServicePort=""</FormalSpec>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefEtiketten">
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[	quit ..VerwerkMethodCall("GeefEtiketten")
+]]></Implementation>
+</Method>
+
+<Method name="SetSSLConfiguration">
+<FormalSpec>SSLConfiguration:%String</FormalSpec>
+<Implementation><![CDATA[	do ..VerwerkMethodCall("SetSSLConfiguration",SSLConfiguration)
+]]></Implementation>
+</Method>
+
+<Method name="ZetAuthenticationHeader">
+<Implementation><![CDATA[	do ..VerwerkMethodCall("ZetAuthenticationHeader")
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: vhTest/Fake/APPS/TRANSP/Transsmart/impl/Etiket.cls.xml
===================================================================
diff -u
--- vhTest/Fake/APPS/TRANSP/Transsmart/impl/Etiket.cls.xml	(revision 0)
+++ vhTest/Fake/APPS/TRANSP/Transsmart/impl/Etiket.cls.xml	(revision 59676)
@@ -0,0 +1,26 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="vhTest.Fake.APPS.TRANSP.Transsmart.impl.Etiket">
+<Description>
+Deze klasse werd automatisch gegenereerd en onderhouden, nieuwe methodes worden automatisch bijgevoegd, bestaande blijven zoals ze zijn.
+Een hercompilatie van de basis interface - met een correct werkende studiohook ( v2.20 ++ ) - zorgt ervoor dat deze klasse aangepast wordt</Description>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>APPS.TRANSP.Transsmart.impl.Etiket</Super>
+
+<Method name="GeefEtiketten">
+<ReturnType>%ListOfObjects</ReturnType>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="SetSSLConfiguration">
+<FormalSpec>SSLConfiguration:%String</FormalSpec>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+
+<Method name="ZetAuthenticationHeader">
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>