%RegisteredObject 1 ProductID:%String,AantalNodig:%Integer %Boolean 0,AantalNodig>FysStock Set FysStock = FysStock + ..GeefGestockeerdeFysischeVoorraad(ProductID) If AantalNodig>0,AantalNodig>FysStock Quit 0 Quit 1 ]]> 1 ProductID:%String %Decimal 1 KlantID:%Integer,OrderID:%String,Value:%Integer %Boolean 1 KlantID:DOM.VKP.VanHoeckeKlantID,OrderID:%String %Boolean