Index: WS/OBJT/WMSService.cls.xml =================================================================== diff -u -r66958 -r67044 --- WS/OBJT/WMSService.cls.xml (.../WMSService.cls.xml) (revision 66958) +++ WS/OBJT/WMSService.cls.xml (.../WMSService.cls.xml) (revision 67044) @@ -35,7 +35,7 @@ Set ^PV(Entiteit,ItemId,Delta)=$zdt($h,8) Set Fout="" If ($ZCVT(Entiteit,"U")'="VHBE") && ($ZCVT(Entiteit,"U")'="HLX") Quit "Foutieve entiteit" - Set Fout=##class(OBJTimpl.WMSOrder.ImporteerVoorraadWijziging).%New().VerwerkWebservice($ZCVT(Entiteit,"U"), ItemId, Delta) + Set Fout=##class(OBJTimpl.WMSOrder.ImporteerVoorraadWijziging).%New().VerwerkWebservice($ZCVT(Entiteit,"U"), ItemId, Delta, Lossing) Quit $S(Fout="":"OK",1:Fout) ]]>