Index: WS/Transsmart/tns/doDelete.cls.xml
===================================================================
diff -u -r59489 -r59640
--- WS/Transsmart/tns/doDelete.cls.xml	(.../doDelete.cls.xml)	(revision 59489)
+++ WS/Transsmart/tns/doDelete.cls.xml	(.../doDelete.cls.xml)	(revision 59640)
@@ -6,7 +6,7 @@
 <ClassType>serial</ClassType>
 <CompileAfter/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>%SerialObject,%XML.Adaptor</Super>
+<Super>WS.Transsmart.tns.RequestBase,%SerialObject,%XML.Adaptor</Super>
 <Inheritance>right</Inheritance>
 
 <Parameter name="ELEMENTQUALIFIED">
@@ -47,6 +47,9 @@
 <Value name="2">
 <Value>actionInfo</Value>
 </Value>
+<Value name="3">
+<Value>VerzendDataID</Value>
+</Value>
 </Data>
 </Storage>
 </Class>
Index: WS/Transsmart/tns/doBooking.cls.xml
===================================================================
diff -u -r59489 -r59640
--- WS/Transsmart/tns/doBooking.cls.xml	(.../doBooking.cls.xml)	(revision 59489)
+++ WS/Transsmart/tns/doBooking.cls.xml	(.../doBooking.cls.xml)	(revision 59640)
@@ -6,7 +6,7 @@
 <ClassType>serial</ClassType>
 <CompileAfter/>
 <ProcedureBlock>1</ProcedureBlock>
-<Super>%SerialObject,%XML.Adaptor</Super>
+<Super>WS.Transsmart.tns.RequestBase,%SerialObject,%XML.Adaptor</Super>
 <Inheritance>right</Inheritance>
 
 <Parameter name="ELEMENTQUALIFIED">
@@ -66,6 +66,9 @@
 <Value name="4">
 <Value>customerDocuments</Value>
 </Value>
+<Value name="5">
+<Value>ID</Value>
+</Value>
 </Data>
 </Storage>
 </Class>
Index: WS/Transsmart/tns/RequestBase.cls.xml
===================================================================
diff -u
--- WS/Transsmart/tns/RequestBase.cls.xml	(revision 0)
+++ WS/Transsmart/tns/RequestBase.cls.xml	(revision 59640)
@@ -0,0 +1,54 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="WS.Transsmart.tns.RequestBase">
+<Abstract>1</Abstract>
+<ClassType>serial</ClassType>
+<CompileAfter/>
+<ProcedureBlock>1</ProcedureBlock>
+<Super>%SerialObject,%XML.Adaptor</Super>
+<Inheritance>right</Inheritance>
+
+<Property name="VerzendDataID">
+<Type>%String</Type>
+<Private>1</Private>
+<Parameter name="XMLPROJECTION" value="NONE"/>
+</Property>
+
+<Method name="%OnNew">
+<FormalSpec>VerzendDataID:%String=""</FormalSpec>
+<Private>1</Private>
+<ProcedureBlock>1</ProcedureBlock>
+<ReturnType>%Status</ReturnType>
+<ServerOnly>1</ServerOnly>
+<Implementation><![CDATA[
+	set ..VerzendDataID = VerzendDataID
+	quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="ZetVerzendDataID">
+<FormalSpec>VerzendDataID:%String</FormalSpec>
+<Implementation><![CDATA[	Set ..VerzendDataID = VerzendDataID
+]]></Implementation>
+</Method>
+
+<Method name="GeefVerzendDataID">
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[	quit ..VerzendDataID
+]]></Implementation>
+</Method>
+
+<Storage name="Default">
+<Type>%Library.CacheSerialState</Type>
+<State>RequestBaseState</State>
+<StreamLocation>^WS.Transsmart.tns.RequestBaseS</StreamLocation>
+<Data name="RequestBaseState">
+<Value name="1">
+<Value>VerzendDataID</Value>
+</Value>
+</Data>
+</Storage>
+</Class>
+
+
+</Export>