Index: WS/AX/Inventory/VoorraadService.cls.xml
===================================================================
diff -u -r74850 -r75094
--- WS/AX/Inventory/VoorraadService.cls.xml	(.../VoorraadService.cls.xml)	(revision 74850)
+++ WS/AX/Inventory/VoorraadService.cls.xml	(.../VoorraadService.cls.xml)	(revision 75094)
@@ -43,16 +43,16 @@
 <Implementation><![CDATA[
 	Set Reponse = ##class(WS.AX.Inventory.WijzigVoorraadResponse).%New()
 	#dim VoorraadWijzigingen As OBJTimpl.MES.dtoCorrelateVoorraadWijzigingen = ..MapRequest(VoorraadWijzigingRequest)
-	
-	;Do ..ImporteerVoorraadWijziging.VerwerkWijzigingen(VoorraadWijzigingen)
-	;Set Reponse.Detail = ..ConverteerDetailResponse(..ImporteerVoorraadWijziging.pxWijzigingen)
-	;If $$$Not(..ImporteerVoorraadWijziging.pxWijzigingen.Fout = "") {
-	;	Set Reponse.Success = $$$False
-	;	Set Reponse.Fout = ..ImporteerVoorraadWijziging.pxWijzigingen.Fout
-	;} Else {
+
+	Do ..ImporteerVoorraadWijziging.VerwerkWijzigingen(VoorraadWijzigingen)
+	Set Reponse.Detail = ..ConverteerDetailResponse(..ImporteerVoorraadWijziging.pxWijzigingen)
+	If $$$Not(..ImporteerVoorraadWijziging.pxWijzigingen.Fout = "") {
+		Set Reponse.Success = $$$False
+		Set Reponse.Fout = ..ImporteerVoorraadWijziging.pxWijzigingen.Fout
+	} Else {
 		Set Reponse.Success = $$$True
-	;	Set Reponse.Fout = ""
-	;}
+		Set Reponse.Fout = ""
+	}
 		
 	Quit Reponse
 ]]></Implementation>
@@ -72,12 +72,12 @@
 		#dim ProductVoorraadWijzigenDto As WS.AX.Inventory.dto.ProductDto = Iterator.Next()
 		Set DtoVoorraadWijzigingDto = ##class(OBJTimpl.MES.dtoCorrelateVoorraadWijziging).%New()
 			
-		Set DtoVoorraadWijzigingDto.Entiteit = ProductVoorraadWijzigenDto.Entiteit
+		Set DtoVoorraadWijzigingDto.Entiteit = ##class(TECH.StringUtils).ToUpper(ProductVoorraadWijzigenDto.Entiteit)
 		Set DtoVoorraadWijzigingDto.ItemIdAX = ProductVoorraadWijzigenDto.ItemIdAX
 		Set DtoVoorraadWijzigingDto.Delta = ProductVoorraadWijzigenDto.Delta
 		Set DtoVoorraadWijzigingDto.RedenWijziging = ProductVoorraadWijzigenDto.RedenWijziging
 		Set DtoVoorraadWijzigingDto.OorsprongWijziging = ProductVoorraadWijzigenDto.OorsprongWijziging
-		Set DtoVoorraadWijzigingDto.ProductieSysteem = ProductVoorraadWijzigenDto.ProductieSysteem
+		Set DtoVoorraadWijzigingDto.ProductieSysteem = ##class(TECH.StringUtils).ToUpper(ProductVoorraadWijzigenDto.ProductieSysteem)
 		
 		Do DtoWijzigingen.Lijst.Insert(DtoVoorraadWijzigingDto)
 	}