Index: vhPowerTools/DOM/AKP/Toelevering/ToeleveringVerwijderaar.cls.xml
===================================================================
diff -u -r48120 -r48125
--- vhPowerTools/DOM/AKP/Toelevering/ToeleveringVerwijderaar.cls.xml	(.../ToeleveringVerwijderaar.cls.xml)	(revision 48120)
+++ vhPowerTools/DOM/AKP/Toelevering/ToeleveringVerwijderaar.cls.xml	(.../ToeleveringVerwijderaar.cls.xml)	(revision 48125)
@@ -5,25 +5,35 @@
 
 <Method name="VerwijderAlleToeleveringen">
 <Implementation><![CDATA[
-	Do ##class(vhLib.OldSchool).InitVars()
 	
-	#dim ToeleveringAPI as DOM.AKP.ToeleveringAPI = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI()
+	#dim Keuze as %String ="" 
+	Write "Ben je zeker dat alle Toeleveringen mogen verwijderd worden in deze omgeving? [J/*]"
+	Read Keuze
 	
-	#dim ToeleveringIDIterator as TECH.Iterator = ToeleveringAPI.GeefToeleveringIDIterator()
-	
-	While (ToeleveringIDIterator.HasNext()){
-		#Dim ToeleveringID as %String = ToeleveringIDIterator.Next()	
-		if ToeleveringAPI.BestaatToelevering(ToeleveringID) {
-			w !,"Verwijderen Toelevering :" _ ToeleveringID
+	if Keuze = "J" {	
 
-			try {
-				Do ToeleveringAPI.VerwijderToelevering(ToeleveringID)
-				w " gelukt"
-			} catch {
-				w " niet gelukt"
-				#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+		Do ##class(vhLib.OldSchool).InitVars()
+		
+		#dim ToeleveringAPI as DOM.AKP.ToeleveringAPI = ##class(DOM.DomeinContext).Instance().GeefToeleveringAPI()
+		
+		#dim ToeleveringIDIterator as TECH.Iterator = ToeleveringAPI.GeefToeleveringIDIterator()	
+		
+		While (ToeleveringIDIterator.HasNext()){
+			#Dim ToeleveringID as %String = ToeleveringIDIterator.Next()	
+			if ToeleveringAPI.BestaatToelevering(ToeleveringID) {
+				w !,"Verwijderen Toelevering :" _ ToeleveringID
+
+				try {
+					Do ToeleveringAPI.VerwijderToelevering(ToeleveringID)
+					w " gelukt"
+				} catch {
+					w " niet gelukt"
+					#dim Exception As TECH.Exceptions.Exception = ##class(TECH.ExceptionHandler).Catch()
+				}
 			}
 		}
+	} else {
+		w !,!,"Oef. dat was nipt.",!
 	}
 ]]></Implementation>
 </Method>