Index: zTryout/MVI/ORDW/IO/Order.cls.xml
===================================================================
diff -u
--- zTryout/MVI/ORDW/IO/Order.cls.xml	(revision 0)
+++ zTryout/MVI/ORDW/IO/Order.cls.xml	(revision 33144)
@@ -0,0 +1,63 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="zTryout.MVI.ORDW.IO.Order">
+<Super>zTryout.MVI.NodeObject</Super>
+
+<Property name="OrderNummer">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
+<Property name="UniekOrderLijnNummer">
+<Type>%String</Type>
+<Private>1</Private>
+</Property>
+
+<Method name="MaakOrder">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>OrderNummer:%String,UniekOrderLijnNummer:%String</FormalSpec>
+<ReturnType>zTryout.MVI.ORDW.IO.Order</ReturnType>
+<Implementation><![CDATA[
+	Set ^ORDW("IO", OrderNummer, UniekOrderLijnNummer) = ""
+	
+	Quit ##class(zTryout.MVI.ORDW.IO.Order).%New(OrderNummer, UniekOrderLijnNummer)
+]]></Implementation>
+</Method>
+
+<Method name="VerwijderOrder">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>OrderNummer:%String,UniekOrderLijnNummer:%String</FormalSpec>
+<Implementation><![CDATA[	Kill ^ORDW("IO", OrderNummer, UniekOrderLijnNummer)
+]]></Implementation>
+</Method>
+
+<Method name="%OnNew">
+<FormalSpec>OrderNummer:%String,UniekOrderLijnNummer:%String</FormalSpec>
+<Private>1</Private>
+<ReturnType>%Status</ReturnType>
+<Implementation><![CDATA[
+	//moet hiervoor reeds een order bestaan?
+	
+	Set ..OrderNummer = OrderNummer
+	Set ..UniekOrderLijnNummer = UniekOrderLijnNummer
+	
+	Do ..Valideer()
+	
+	Quit $$$OK
+]]></Implementation>
+</Method>
+
+<Method name="Valideer">
+<Private>1</Private>
+<Implementation><![CDATA[
+	Try {
+		#dim Node As %String = ^ORDW("IO", ..OrderNummer, ..UniekOrderLijnNummer)
+	} Catch {
+		Do ##class(TECH.ExceptionHandler).Rethrow(##class(zTryout.MVI.Excepties.NietGevondenExceptie).%New(..%ClassName(), "^ORDW(""IO"", " _ ..OrderNummer _ ", " _ ..UniekOrderLijnNummer _ ")"))
+	}
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>
Index: zTryout/MVI/UnitTest/ORDW/IO/Order/Test.cls.xml
===================================================================
diff -u
--- zTryout/MVI/UnitTest/ORDW/IO/Order/Test.cls.xml	(revision 0)
+++ zTryout/MVI/UnitTest/ORDW/IO/Order/Test.cls.xml	(revision 33144)
@@ -0,0 +1,55 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Export generator="Cache" version="24">
+<Class name="zTryout.MVI.UnitTest.ORDW.IO.Order.Test">
+<Super>vhUnitTest.TestCase</Super>
+
+<Parameter name="BestaandOrderNummer">
+<Type>%String</Type>
+<Default>123456</Default>
+</Parameter>
+
+<Parameter name="OnbestaandOrderNummer">
+<Type>%String</Type>
+<Default>654321</Default>
+</Parameter>
+
+<Parameter name="UniekOrderLijnNummer">
+<Type>%String</Type>
+<Default>abcd</Default>
+</Parameter>
+
+<Method name="OnBeforeOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ##super(aTestName)
+	
+	Do ##class(zTryout.MVI.ORDW.IO.Order).VerwijderOrder(..#OnbestaandOrderNummer, ..#UniekOrderLijnNummer)
+	Do ##class(zTryout.MVI.ORDW.IO.Order).VerwijderOrder(..#BestaandOrderNummer, ..#UniekOrderLijnNummer)
+	
+	Do ##class(zTryout.MVI.ORDW.IO.Order).MaakOrder(..#BestaandOrderNummer, ..#UniekOrderLijnNummer)
+]]></Implementation>
+</Method>
+
+<Method name="OnAfterOneTest">
+<FormalSpec>aTestName:%String</FormalSpec>
+<Implementation><![CDATA[
+	Do ##super(aTestName)
+	
+	Do ##class(zTryout.MVI.ORDW.IO.Order).VerwijderOrder(..#BestaandOrderNummer, ..#UniekOrderLijnNummer)
+]]></Implementation>
+</Method>
+
+<Method name="Test: Exceptie wordt geraised indien onbestaand WMS IO Order">
+<Implementation><![CDATA[
+	#dim Omschrijvingen As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Geen resultaat gevonden voor", "Order", ..#OnbestaandOrderNummer, ..#UniekOrderLijnNummer)
+	#dim VerwachteExceptie = ##class(Tools.Test.VerwachteExceptie).%New("zTryout.MVI.Excepties.NietGevondenExceptie", Omschrijvingen)
+
+	Do ..ZetVerwachteExceptie(VerwachteExceptie)
+	
+	#dim Order As zTryout.MVI.ORDW.IO.Order = ##class(zTryout.MVI.ORDW.IO.Order).%New(..#OnbestaandOrderNummer, ..#UniekOrderLijnNummer)
+]]></Implementation>
+</Method>
+</Class>
+
+
+</Export>