Index: BL/Legacy/FLOW.cls.xml
===================================================================
diff -u -r67121 -r67656
--- BL/Legacy/FLOW.cls.xml	(.../FLOW.cls.xml)	(revision 67121)
+++ BL/Legacy/FLOW.cls.xml	(.../FLOW.cls.xml)	(revision 67656)
@@ -133,13 +133,13 @@
 		Set Artikelnummer = rs.Data("itemid")		
 		Set Aantal = +rs.Data("qty")
 		Set ProductID = ProductAPI.GeefProductIdVoorIdentNummer(Artikelnummer)
-	} 
-	
-	If (+LeverancierID > 0) {
+		
+		If (+LeverancierID > 0) {
 		Set LeverancierID = "L||"_$P(##class(AXimpl.AxToAdminUtils).ConvertSupplierIDHLX(LeverancierID),"||",2)
 		#dim Toelevering As DOM.AKP.Toelevering = ToeleveringAPI.MaakNieuwToelevering(LeverancierID)
 		Do ToeleveringLCS.VoegToeProductVoorLeverancier(Toelevering, LeverancierID, ProductID, Aantal)
-	}
+		}
+	} 
 	
 	While (ResultSetIterator.HasNext())
 	{
Index: FLOWTOE.mac.rou
===================================================================
diff -u -r67114 -r67656
--- FLOWTOE.mac.rou	(.../FLOWTOE.mac.rou)	(revision 67114)
+++ FLOWTOE.mac.rou	(.../FLOWTOE.mac.rou)	(revision 67656)
@@ -474,7 +474,7 @@
  . Set AantalPaginas=(Aantal\PalletAantal)+(Aantal#PalletAantal>0)
  . Do ##class(CHUI.Prod.VoorraadIdentificatieDoc).PrintProductVoorraadPagina(PRNr,PalletAantal,AantalPaginas,TLNr)
  If $Data(^AfdrukkenVoorraadIdentificatieToelevering(TLNr)) Do
- . Do VerwijderToelevering^FLOWTOE3(LEVNr,TLNr)
+ . Do DELOBJ^FLOWTOE3(TLNr)
  . Kill ^AfdrukkenVoorraadIdentificatieToelevering(TLNr)
  Quit
  ;