FishEye: Tag 31713 refers to a dead (removed) revision in file `APPS/OV/OrderBevestiging/impl/EDIOrderBevestigingMaker.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
Index: APPS/OV/OrderBevestiging/OrderBevestiger.cls.xml
===================================================================
diff -u -r29059 -r31713
--- APPS/OV/OrderBevestiging/OrderBevestiger.cls.xml	(.../OrderBevestiger.cls.xml)	(revision 29059)
+++ APPS/OV/OrderBevestiging/OrderBevestiger.cls.xml	(.../OrderBevestiger.cls.xml)	(revision 31713)
@@ -5,7 +5,7 @@
 
 <Method name="VerstuurOrderBevestiging">
 <Abstract>1</Abstract>
-<FormalSpec>OrderID:%String</FormalSpec>
+<FormalSpec>OrderID:TECH.String</FormalSpec>
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 </Class>
Index: APPS/OV/OrderBevestiging/OrderBevestigingWachtrijService.cls.xml
===================================================================
diff -u -r29059 -r31713
--- APPS/OV/OrderBevestiging/OrderBevestigingWachtrijService.cls.xml	(.../OrderBevestigingWachtrijService.cls.xml)	(revision 29059)
+++ APPS/OV/OrderBevestiging/OrderBevestigingWachtrijService.cls.xml	(.../OrderBevestigingWachtrijService.cls.xml)	(revision 31713)
@@ -6,7 +6,7 @@
 
 <Method name="PlaatsInWachtRij">
 <Abstract>1</Abstract>
-<FormalSpec>OrderID:%String</FormalSpec>
+<FormalSpec>OrderID:TECH.String</FormalSpec>
 <Implementation><![CDATA[]]></Implementation>
 </Method>
 
FishEye: Tag 31713 refers to a dead (removed) revision in file `APPS/OV/OrderBevestiging/impl/BruynzeelVerstuurder.cls.xml'.
FishEye: No comparison available.  Pass `N' to diff?
Index: APPS/OV/OrderBevestiging/impl/OrderBevestigingWachtrijService.cls.xml
===================================================================
diff -u -r31323 -r31713
--- APPS/OV/OrderBevestiging/impl/OrderBevestigingWachtrijService.cls.xml	(.../OrderBevestigingWachtrijService.cls.xml)	(revision 31323)
+++ APPS/OV/OrderBevestiging/impl/OrderBevestigingWachtrijService.cls.xml	(.../OrderBevestigingWachtrijService.cls.xml)	(revision 31713)
@@ -3,36 +3,32 @@
 <Class name="APPS.OV.OrderBevestiging.impl.OrderBevestigingWachtrijService">
 <Super>TECH.RegisteredObject,APPS.OV.OrderBevestiging.OrderBevestigingWachtrijService</Super>
 
-<Property name="Afhandelaar">
-<Type>APPS.OV.OrderBevestiging.OrderBevestigingWachtrijAfhandelaar</Type>
+<Property name="WachtrijAfhandelaar">
+<Type>APPS.OV.OrderBevestiging.WachtrijAfhandelaar</Type>
 <Private>1</Private>
 </Property>
 
 <Method name="%OnNew">
-<FormalSpec>OrderBevestigingWachtrijAfhandelaar:APPS.OV.OrderBevestiging.OrderBevestigingWachtrijAfhandelaar</FormalSpec>
+<FormalSpec>WachtrijAfhandelaar:APPS.OV.OrderBevestiging.WachtrijAfhandelaar</FormalSpec>
 <Private>1</Private>
 <ProcedureBlock>1</ProcedureBlock>
 <ReturnType>%Status</ReturnType>
 <ServerOnly>1</ServerOnly>
 <Implementation><![CDATA[
-	set ..Afhandelaar = OrderBevestigingWachtrijAfhandelaar
+	Set ..WachtrijAfhandelaar = WachtrijAfhandelaar
 	
-	quit $$$OK
+	Quit $$$OK
 ]]></Implementation>
 </Method>
 
 <Method name="VerstuurBevestigingen">
-<Implementation><![CDATA[	do ..Afhandelaar.VerstuurBevestigingen()
+<Implementation><![CDATA[	Do ..WachtrijAfhandelaar.VerstuurBevestigingen()
 ]]></Implementation>
 </Method>
 
 <Method name="PlaatsInWachtRij">
-<FormalSpec>OrderID:%String</FormalSpec>
-<Implementation><![CDATA[
-	#dim Order As DOM.VKP.Order = ##class(DOM.DomeinContext).Instance().GeefOrderAPI().GeefOrder(OrderID)
-	#dim OrderBevestiging As APPS.OV.OrderBevestiging.data.Order= ##class(APPS.OV.OrderBevestiging.data.Order).%New(Order.GeefKlantID(), OrderID)
-	
-	do OrderBevestiging.Save()
+<FormalSpec>OrderID:TECH.String</FormalSpec>
+<Implementation><![CDATA[	Do ..WachtrijAfhandelaar.BewaarBevestigingen(OrderID)
 ]]></Implementation>
 </Method>
 </Class>
Index: APPS/OV/OrderBevestiging/Verstuurder.cls.xml
===================================================================
diff -u
--- APPS/OV/OrderBevestiging/Verstuurder.cls.xml	(revision 0)
+++ APPS/OV/OrderBevestiging/Verstuurder.cls.xml	(revision 31713)
@@ -0,0 +1,15 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="APPS.OV.OrderBevestiging.Verstuurder">
+<Abstract>1</Abstract>
+<Super>TECH.Interface</Super>
+
+<Method name="VerstuurBevestigingen">
+<Abstract>1</Abstract>
+<FormalSpec>TeBevestigenOrders:%ListOfObjects</FormalSpec>
+<Implementation><![CDATA[]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>