Index: zTryout/ARC/APP/impl/OrderExample.cls.xml
===================================================================
diff -u -r1222 -r1640
--- zTryout/ARC/APP/impl/OrderExample.cls.xml	(.../OrderExample.cls.xml)	(revision 1222)
+++ zTryout/ARC/APP/impl/OrderExample.cls.xml	(.../OrderExample.cls.xml)	(revision 1640)
@@ -104,7 +104,7 @@
 	Set KlantAPI = Context.GeefKlantAPI()
 	Set ProductAPI = Context.GeefProductAPI()
 	Set OrderAPI = Context.GeefOrderAPI()
-	Set MagAPI = Context.GeefMagAPI()
+	Set MagAPI = Context.GeefMagazijnAPI()
 	
 	Set Order=OrderAPI.GeefOrder(OrderID)
 	w " ---- Tekstlijn toevoegen -----------------------------",!
@@ -160,8 +160,8 @@
 	. w "Product ", ProductNr, " (", Product.GeefOmschrijving(), "): ", ProductOrders(ProductNr), " items",!
 	. Set Classif = ProductAPI.GeefClassificatie(Product.Nr)
 	. If Classif '= "" { w "   Classificatie: ", Classif.GeefHoofdGroep(), " ", Classif.GeefGroep(), " ", Classif.GeefSubGroep(), ! }
-	. Set Mag = MagAPI.GeefMagazijnInfo(Product.Nr)
-	. w "   Magazijn info: Stock reservatie=", Mag.GeefStock(), ", PalletQty=", Mag.GeefPalletQty(),!
+	. Set StockeerbaarProduct = MagAPI.GeefStockeerbaarProduct(Product.Nr)
+	. w "   Magazijn info: Stock niveau=", StockeerbaarProduct.GeefFysiekStockNiveau(), " Aantal gereserveerd uit stock=", StockeerbaarProduct.GeefAantalGereserveerdUitStock(),!
 	w ProdCount, " products in order ", Order.GeefOrderNr(), !
 	w " ---- Order bewaren -----------------------------------",!
 	Do Order.Save()