Index: vhUnitTest/WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonParser/GeefMaatwerkDetails/Test.cls.xml
===================================================================
diff -u -r63530 -r65580
--- vhUnitTest/WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonParser/GeefMaatwerkDetails/Test.cls.xml	(.../Test.cls.xml)	(revision 63530)
+++ vhUnitTest/WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonParser/GeefMaatwerkDetails/Test.cls.xml	(.../Test.cls.xml)	(revision 65580)
@@ -3,6 +3,64 @@
 <Class name="vhUnitTest.WSimpl.PM.Maatwerk.MaatwerkService.DotNet.MaatwerkDetailsFromJsonParser.GeefMaatwerkDetails.Test">
 <Super>vhUnitTest.TestCase</Super>
 
+<Method name="Assign: Test lege json-stream geeft leeg object">
+<Description>
+/* ====================================================================================================================== */ 
+</Description>
+<Private>1</Private>
+<ProcedureBlock>0</ProcedureBlock>
+<Implementation><![CDATA[
+RoutineLabel00a  /* Test lege halffabrikaten en kosten 
+  {	}
+*/
+]]></Implementation>
+</Method>
+
+<Method name="Test: Test lege json-stream geeft leeg object">
+<Implementation><![CDATA[
+	#dim JsonStream As %Stream = ..GeefStream("RoutineLabel00a")
+	
+	Set Parser = ##class(WSimpl.PM.Maatwerk.MaatwerkService.DotNet.MaatwerkDetailsFromJsonParser).%New()
+	#dim MaatwerkDetails As APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson = Parser.GeefMaatwerkDetailsFromJson(JsonStream)
+	
+	If ($$$AssertTrue($IsObject(MaatwerkDetails))) {
+		Do $$$AssertEquals(MaatwerkDetails.%ClassName($$$True),"APPS.PM.Maatwerk.dto.DotNet.MaatwerkDetailsParsedFromJson")
+		Do $$$AssertEquals(MaatwerkDetails.KlasseNaamInfo,"")
+		Do $$$AssertEquals(MaatwerkDetails.ProbleemRapport,"")
+		Do $$$AssertFalse($IsObject(MaatwerkDetails.Halffabrikaten))
+		Do $$$AssertFalse($IsObject(MaatwerkDetails.Kosten))
+		If $$$AssertTrue($IsObject(MaatwerkDetails.VerwijderdeHalffabItems)) {
+			Do $$$AssertEquals(MaatwerkDetails.VerwijderdeHalffabItems.Count(),0)
+		}
+	}
+]]></Implementation>
+</Method>
+
+<Method name="Assign: Test ongeldige json-stream geeft error">
+<Private>1</Private>
+<ProcedureBlock>0</ProcedureBlock>
+<Implementation><![CDATA[
+RoutineLabel00b  /* Test lege halffabrikaten en kosten 
+  {	
+	"$type": "MaatwerkCalculator.Dom.PM.dto.MaatwerkDetails, MaatwerkCalculator.Dom",     
+	"UTOnbekendeProperty": null,     
+}
+*/
+]]></Implementation>
+</Method>
+
+<Method name="Test: Test ongeldige json-stream geeft error">
+<Implementation><![CDATA[
+	#dim JsonStream As %Stream = ..GeefStream("RoutineLabel00b")
+
+	#dim Substrings As %ListOfDataTypes = ##class(TECH.ListUtils).CreateListOfDataTypes("Parsen van het JSON bericht is gefaald", "Cache error: <PROPERTY DOES NOT EXIST>", "*UTOnbekendeProperty")
+	Do ..ZetVerwachteExceptie(##class(Tools.Test.VerwachteExceptie).%New("TECH.Exceptions.GeneralErrorException", Substrings))
+	
+	Set Parser = ##class(WSimpl.PM.Maatwerk.MaatwerkService.DotNet.MaatwerkDetailsFromJsonParser).%New()
+	Do Parser.GeefMaatwerkDetailsFromJson(JsonStream)
+]]></Implementation>
+</Method>
+
 <Method name="Assign: Test lege halffabrikaten en kosten">
 <Description>
 /* ====================================================================================================================== */