Index: WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonParser.cls.xml
===================================================================
diff -u -r63253 -r63314
--- WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonParser.cls.xml	(.../MaatwerkDetailsFromJsonParser.cls.xml)	(revision 63253)
+++ WSimpl/PM/Maatwerk/MaatwerkService/DotNet/MaatwerkDetailsFromJsonParser.cls.xml	(.../MaatwerkDetailsFromJsonParser.cls.xml)	(revision 63314)
@@ -21,12 +21,34 @@
 	#dim From As %String = "$type"
 	#dim To As %String = "KlasseNaamInfo"
 	
-	Do ##class(TECH.StreamUtils).Replace(JSONStream,From,To)
+	Do ..ReplaceTextInJsonStream(JSONStream,From,To)
 	
 	Quit JSONStream
 ]]></Implementation>
 </Method>
 
+<Method name="ReplaceTextInJsonStream">
+<Description>
+Bij de gewone behandeling krijgen we met maxstring error te maken, omdat de json string allemaal op 1 lijn staat. </Description>
+<FormalSpec>Stream:%Stream.Object,Search:%String,Replace:%String</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim EndOfLine As %Boolean
+	Set Stream.LineTerminator = "}"
+	Set tmpStream = ##class(%GlobalCharacterStream).%New()
+	Do Stream.Rewind()
+	Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(Stream.Rewind())
+	While 'Stream.AtEnd {
+		#dim String As %String = Stream.ReadLine(,,.EndOfLine)
+		Set String = ##class(TECH.StringUtils).Replace(String,.Search,.Replace)_$SELECT(EndOfLine:Stream.LineTerminator, 1:"")
+		Do tmpStream.Write(String)
+	}	
+	Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(Stream.Clear())
+	Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(Stream.CopyFrom(tmpStream))
+	Do ##class(TECH.Exceptions.StatusException).ThrowIndienNietOK(Stream.Rewind())
+]]></Implementation>
+</Method>
+
 <Method name="ParseJsonStreamNaarObject">
 <Description>
 Deze method kan best toegevoegd worden aan de klasse "TECH.JSON.Parser" </Description>
Index: WSimpl/PM/Maatwerk/MaatwerkService/DotNet/ClassnameFromJsonNaarDomConverter.cls.xml
===================================================================
diff -u -r63266 -r63314
--- WSimpl/PM/Maatwerk/MaatwerkService/DotNet/ClassnameFromJsonNaarDomConverter.cls.xml	(.../ClassnameFromJsonNaarDomConverter.cls.xml)	(revision 63266)
+++ WSimpl/PM/Maatwerk/MaatwerkService/DotNet/ClassnameFromJsonNaarDomConverter.cls.xml	(.../ClassnameFromJsonNaarDomConverter.cls.xml)	(revision 63314)
@@ -57,7 +57,7 @@
 <Implementation><![CDATA[
 	#dim CacheClassname As %String = ..ExtractClassnameFromJson(KostItemParsedFromJson.KlasseNaamInfo)
 	
-	Quit ..GeefVolledigeKlasseNaam(..PackageVoorDomLaag_".Kost", CacheClassname, ".")
+	Quit ..GeefVolledigeKlasseNaam(..PackageVoorDomLaag_".Kost", CacheClassname)
 ]]></Implementation>
 </Method>
 
Index: WSimpl/PM/Maatwerk/MaatwerkService/DotNet/VerwijderdeHalffabItemsFromJsonNaarDomConverter.cls.xml
===================================================================
diff -u -r63233 -r63314
--- WSimpl/PM/Maatwerk/MaatwerkService/DotNet/VerwijderdeHalffabItemsFromJsonNaarDomConverter.cls.xml	(.../VerwijderdeHalffabItemsFromJsonNaarDomConverter.cls.xml)	(revision 63233)
+++ WSimpl/PM/Maatwerk/MaatwerkService/DotNet/VerwijderdeHalffabItemsFromJsonNaarDomConverter.cls.xml	(.../VerwijderdeHalffabItemsFromJsonNaarDomConverter.cls.xml)	(revision 63314)
@@ -8,13 +8,15 @@
 <ReturnType>%ArrayOfObjects</ReturnType>
 <Implementation><![CDATA[
 	Set VerwijderdeHalffabItems = ##class(%ArrayOfObjects).%New()
-	
-	Set VerwijderdeHalffabItemsIterator = ##class(TECH.ListIterator).%New(VerwijderdeHalffabItemsParsedFromJson)
-	While (VerwijderdeHalffabItemsIterator.HasNext()) {
-		#dim VerwijderdHalffabItemParsedFromJson As APPS.PM.Maatwerk.dto.DotNet.VerwijderdHalffabItemParsedFromJson	= VerwijderdeHalffabItemsIterator.Next()
-		#dim Key As %String = VerwijderdeHalffabItemsIterator.Key()
+	If (..HeeftVerwijderdeHalffabItems(VerwijderdeHalffabItemsParsedFromJson)) {
+		Set VerwijderdeHalffabItemsIterator = ##class(TECH.ListIterator).%New(VerwijderdeHalffabItemsParsedFromJson)
 		
-		Do VerwijderdeHalffabItems.SetAt(..GeefVerwijderdHalffabItem(VerwijderdHalffabItemParsedFromJson), Key)
+		While (VerwijderdeHalffabItemsIterator.HasNext()) {
+			#dim VerwijderdHalffabItemParsedFromJson As APPS.PM.Maatwerk.dto.DotNet.VerwijderdHalffabItemParsedFromJson	= VerwijderdeHalffabItemsIterator.Next()
+			#dim Key As %String = VerwijderdeHalffabItemsIterator.Key()
+			
+			Do VerwijderdeHalffabItems.SetAt(..GeefVerwijderdHalffabItem(VerwijderdHalffabItemParsedFromJson), Key)
+		}
 	}
 	
 	Quit VerwijderdeHalffabItems
@@ -34,6 +36,25 @@
 	Quit VerwijderdHalffabItem
 ]]></Implementation>
 </Method>
+
+<Method name="HeeftVerwijderdeHalffabItems">
+<FormalSpec>VerwijderdeHalffabItemsParsedFromJson:%ArrayOfObjects</FormalSpec>
+<Private>1</Private>
+<Implementation><![CDATA[
+	#dim HeeftVerwijderdeHalffabItems As %Boolean = (VerwijderdeHalffabItemsParsedFromJson.Count() > 0)
+	
+	//Als KlasseNaamInfo het enige item is dan is dit item onterecht door de JSON parser toegevoegd
+	If (VerwijderdeHalffabItemsParsedFromJson.Count() = 1) {
+		#dim Key As %String = ""		
+		Do VerwijderdeHalffabItemsParsedFromJson.GetNext(.Key)
+		If (Key = "KlasseNaamInfo") {
+			Set HeeftVerwijderdeHalffabItems = $$$False	
+		} 
+	}
+	
+	Quit HeeftVerwijderdeHalffabItems
+]]></Implementation>
+</Method>
 </Class>