Index: WS/Halux/LaserGraveerMachine/LaserDataService.cls.xml
===================================================================
diff -u
--- WS/Halux/LaserGraveerMachine/LaserDataService.cls.xml	(revision 0)
+++ WS/Halux/LaserGraveerMachine/LaserDataService.cls.xml	(revision 74018)
@@ -0,0 +1,78 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WS.Halux.LaserGraveerMachine.LaserDataService">
+<ClassType/>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>WS.OngeauthenticeerdeWebService</Super>
+
+<Parameter name="SERVICENAME">
+<Default>LaserDataService</Default>
+</Parameter>
+
+<Parameter name="NAMESPACE">
+<Default>http://www.vanhoecke.be/Halux/LaserGraveerMachine.LaserDataService</Default>
+</Parameter>
+
+<Property name="Logger">
+<Type>vhLib.Logger</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="LaserDataService">
+<Type>WSimpl.Halux.LaserGraveerMachine.LaserDataService</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="%OnNew">
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	Do ##super()
+	Set ..Logger = ##class(vhLib.Logger).%New("WS.Halux.LaserGraveerMachine.LaserDataService")
+	Set ..LaserDataService = ##class(WSimpl.Halux.LaserGraveerMachine.LaserDataService).%New()
+
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefLogoDataViaVerwerkingId">
+<FormalSpec>GeefLogoDataRequest:WS.Halux.LaserGraveerMachine.GeefLaserDataRequest</FormalSpec>
+<ReturnType>WS.Halux.LaserGraveerMachine.GeefLaserDataResponse</ReturnType>
+<WebMethod>1</WebMethod>
+<Implementation><![CDATA[	Quit ..VerwerkRequest(GeefLogoDataRequest, $$$CurrentMethod)
+]]></Implementation>
+</Method>
+
+<Method name="VerwerkRequest">
+<FormalSpec>Request:%CacheString,UitTeVoerenMethod:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>WS.Halux.LaserGraveerMachine.GeneriekeResponse</ReturnType>
+<Implementation><![CDATA[
+	Set Result = ##class(WS.Halux.LaserGraveerMachine.GeneriekeResponse).%New()
+	Try {
+		Set Result = $Method(..LaserDataService, UitTeVoerenMethod, Request)
+	} Catch {
+		#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+		Set Result.Header.Status = Exception.GeefExceptionCode()
+		Set Result.Header.Omschrijving = Exception.GeefOmschrijving()
+	}
+	If $$$HasLength(Result.Header.Omschrijving) {
+		#dim TeLoggenTekst As %String = ""
+		If $$$HasLength(Result.Header.OmschrijvingVoorLogging) {
+			Set TeLoggenTekst = Result.Header.OmschrijvingVoorLogging
+		} Else {
+			Set TeLoggenTekst = Result.Header.Omschrijving
+		}
+	
+	
+	Do ..Logger.Warning(UitTeVoerenMethod, TeLoggenTekst)
+	}
+	Quit Result
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: WS/Halux/LaserGraveerMachine/GeefLaserDataResponse.cls.xml
===================================================================
diff -u
--- WS/Halux/LaserGraveerMachine/GeefLaserDataResponse.cls.xml	(revision 0)
+++ WS/Halux/LaserGraveerMachine/GeefLaserDataResponse.cls.xml	(revision 74018)
@@ -0,0 +1,73 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WS.Halux.LaserGraveerMachine.GeefLaserDataResponse">
+<Super>WS.Halux.LaserGraveerMachine.GeneriekeResponse</Super>
+
+<Property name="VerwerkingId">
+<Type>%String</Type>
+<Required>1</Required>
+<Parameter name="XMLPROJECTION" value="ELEMENT"/>
+</Property>
+
+<Property name="ProductId">
+<Type>%String</Type>
+<Required>1</Required>
+<Parameter name="XMLPROJECTION" value="ELEMENT"/>
+</Property>
+
+<Property name="KortTekst">
+<Type>%String</Type>
+<Required>1</Required>
+<Parameter name="XMLPROJECTION" value="ELEMENT"/>
+</Property>
+
+<Property name="LogoId">
+<Type>%String</Type>
+<Required>1</Required>
+<Parameter name="XMLPROJECTION" value="ELEMENT"/>
+</Property>
+
+<Property name="Referentie">
+<Type>%String</Type>
+<Required>1</Required>
+<Parameter name="XMLPROJECTION" value="ELEMENT"/>
+</Property>
+
+<Property name="LadeKleur">
+<Type>%String</Type>
+<Required>1</Required>
+<Parameter name="XMLPROJECTION" value="ELEMENT"/>
+</Property>
+
+<Storage name="Default">
+<Type>%Library.CacheSerialState</Type>
+<Data name="GeneriekeResponseState">
+<Structure>listnode</Structure>
+<Subscript/>
+<Value name="1">
+<Value>Header</Value>
+</Value>
+<Value name="2">
+<Value>VerwerkingId</Value>
+</Value>
+<Value name="3">
+<Value>ProductId</Value>
+</Value>
+<Value name="4">
+<Value>KortTekst</Value>
+</Value>
+<Value name="5">
+<Value>LogoId</Value>
+</Value>
+<Value name="6">
+<Value>Referentie</Value>
+</Value>
+<Value name="7">
+<Value>LadeKleur</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>
Index: WS/Halux/LaserGraveerMachine/GeneriekeResponse.cls.xml
===================================================================
diff -u
--- WS/Halux/LaserGraveerMachine/GeneriekeResponse.cls.xml	(revision 0)
+++ WS/Halux/LaserGraveerMachine/GeneriekeResponse.cls.xml	(revision 74018)
@@ -0,0 +1,26 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WS.Halux.LaserGraveerMachine.GeneriekeResponse">
+<Super>%SerialObject,%XML.Adaptor</Super>
+
+<Property name="Header">
+<Type>WS.Halux.LaserGraveerMachine.ResponseHeader</Type>
+<Required>1</Required>
+</Property>
+
+<Storage name="Default">
+<Type>%Library.CacheSerialState</Type>
+<State>GeneriekeResponseState</State>
+<StreamLocation>^WS.Halux.LC8A5.GeneriekeRes4AFS</StreamLocation>
+<Data name="GeneriekeResponseState">
+<Structure>listnode</Structure>
+<Subscript/>
+<Value name="1">
+<Value>Header</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>
Index: WS/Halux/LaserGraveerMachine/ResponseHeader.cls.xml
===================================================================
diff -u
--- WS/Halux/LaserGraveerMachine/ResponseHeader.cls.xml	(revision 0)
+++ WS/Halux/LaserGraveerMachine/ResponseHeader.cls.xml	(revision 74018)
@@ -0,0 +1,46 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WS.Halux.LaserGraveerMachine.ResponseHeader">
+<Super>%SerialObject,%XML.Adaptor</Super>
+
+<Parameter name="XMLIGNORENULL">
+<Type>STRING</Type>
+<Default>1</Default>
+</Parameter>
+
+<Property name="Status">
+<Type>TECH.String</Type>
+<Required>1</Required>
+</Property>
+
+<Property name="Omschrijving">
+<Type>TECH.String</Type>
+</Property>
+
+<Property name="OmschrijvingVoorLogging">
+<Type>TECH.String</Type>
+<Parameter name="XMLPROJECTION" value="NONE"/>
+</Property>
+
+<Storage name="Default">
+<Type>%Library.CacheSerialState</Type>
+<State>ResponseHeaderState</State>
+<StreamLocation>^WS.Halux.LaC8A5.ResponseHeaderS</StreamLocation>
+<Data name="ResponseHeaderState">
+<Structure>listnode</Structure>
+<Subscript/>
+<Value name="1">
+<Value>Status</Value>
+</Value>
+<Value name="2">
+<Value>Omschrijving</Value>
+</Value>
+<Value name="3">
+<Value>OmschrijvingVoorLogging</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>
Index: WS/Halux/LaserGraveerMachine/GeefLaserDataRequest.cls.xml
===================================================================
diff -u
--- WS/Halux/LaserGraveerMachine/GeefLaserDataRequest.cls.xml	(revision 0)
+++ WS/Halux/LaserGraveerMachine/GeefLaserDataRequest.cls.xml	(revision 74018)
@@ -0,0 +1,31 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WS.Halux.LaserGraveerMachine.GeefLaserDataRequest">
+<Super>%SerialObject,%XML.Adaptor</Super>
+
+<Parameter name="XMLIGNORENULL">
+<Type>STRING</Type>
+<Default>1</Default>
+</Parameter>
+
+<Property name="VerwerkingId">
+<Type>%String</Type>
+<Required>1</Required>
+</Property>
+
+<Storage name="Default">
+<Type>%Library.CacheSerialState</Type>
+<State>GeefLaserDataRequestState</State>
+<StreamLocation>^WS.Halux.LC8A5.GeefLaserDaF055S</StreamLocation>
+<Data name="GeefLaserDataRequestState">
+<Structure>listnode</Structure>
+<Subscript/>
+<Value name="1">
+<Value>VerwerkingId</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>
Index: WSimpl/Halux/LaserGraveerMachine/LaserDataService.cls.xml
===================================================================
diff -u
--- WSimpl/Halux/LaserGraveerMachine/LaserDataService.cls.xml	(revision 0)
+++ WSimpl/Halux/LaserGraveerMachine/LaserDataService.cls.xml	(revision 74018)
@@ -0,0 +1,33 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WSimpl.Halux.LaserGraveerMachine.LaserDataService">
+<Super>TECH.RegisteredObject</Super>
+
+<Method name="%OnNew">
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="GeefLogoDataViaVerwerkingId">
+<FormalSpec>GeefLogoDataRequest:WS.Halux.LaserGraveerMachine.GeefLaserDataRequest</FormalSpec>
+<ReturnType>WS.Halux.LaserGraveerMachine.GeefLaserDataResponse</ReturnType>
+<Implementation><![CDATA[
+	Set Response = ##class(WS.Halux.LaserGraveerMachine.GeefLaserDataResponse).%New()
+	
+	Set Response.KortTekst = "123"
+	Set Response.LogoId = "123"
+	Set Response.LadeKleur = "456"
+	Set Response.ProductId = "123"
+	Set Response.VerwerkingId = GeefLogoDataRequest.VerwerkingId
+	
+	Quit Response
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>