Index: TECH/Cmd/impl/CommandExecuter.cls.xml
===================================================================
diff -u -r1380 -r1392
--- TECH/Cmd/impl/CommandExecuter.cls.xml	(.../CommandExecuter.cls.xml)	(revision 1380)
+++ TECH/Cmd/impl/CommandExecuter.cls.xml	(.../CommandExecuter.cls.xml)	(revision 1392)
@@ -8,6 +8,12 @@
 <Private>1</Private>
 </Property>
 
+<Property name="HeeftCorrecteExitCodeGroterDanNul">
+<Type>%Boolean</Type>
+<InitialExpression>0</InitialExpression>
+<Private>1</Private>
+</Property>
+
 <Method name="%OnNew">
 <FormalSpec>ZFExecuter:TECH.Cmd.impl.ZFExecuter</FormalSpec>
 <Private>1</Private>
@@ -20,6 +26,12 @@
 ]]></Implementation>
 </Method>
 
+<Method name="StelInHeeftCorrecteExitCodeGroterDanNul">
+<FormalSpec>HeeftCorrecteExitCodeGroterDanNul:%Boolean</FormalSpec>
+<Implementation><![CDATA[	Set ..HeeftCorrecteExitCodeGroterDanNul = HeeftCorrecteExitCodeGroterDanNul
+]]></Implementation>
+</Method>
+
 <Method name="Execute">
 <FormalSpec>Command:TECH.Cmd.Command,ServerName:%String</FormalSpec>
 <ReturnType>%Boolean</ReturnType>
@@ -30,7 +42,8 @@
 	#dim WachtOpKindProcess As %String = ..GeefWachtOpKindProcess(Command)
 	Do ##class(vhLib.Logger).%New("Computer").Info(Command.%ClassName(1),"Begin: "_$C(13,10)_UitTeVoerenCommand)
 	#dim Results As %String = ..ZFExecuter.Execute(WachtOpKindProcess,UitTeVoerenCommand)
-	If (Results '= 0)
+	If (('..HeeftCorrecteExitCodeGroterDanNul && (Results '= 0)) || 
+		(..HeeftCorrecteExitCodeGroterDanNul && (Results < 0)))
 	{			
 		#dim FoutOnderwerp As %String = ..VervangServerName(Command.GeefFoutOnderwerp(),ServerName)
 		#dim FoutMelding As %String = ..VervangServerName(Command.GeefFoutmelding(),ServerName)
Index: TECH/Cmd/Commands/PSExec.cls.xml
===================================================================
diff -u -r1388 -r1392
--- TECH/Cmd/Commands/PSExec.cls.xml	(.../PSExec.cls.xml)	(revision 1388)
+++ TECH/Cmd/Commands/PSExec.cls.xml	(.../PSExec.cls.xml)	(revision 1392)
@@ -23,11 +23,6 @@
 <Private>1</Private>
 </Property>
 
-<Property name="VoerUitOpEigenToestel">
-<Type>%Boolean</Type>
-<Private>1</Private>
-</Property>
-
 <Property name="UitvoeringParameterLijst">
 <Type>%String</Type>
 <Collection>list</Collection>
@@ -64,27 +59,18 @@
 ]]></Implementation>
 </Method>
 
-<Method name="ZetVoerUitOpEigenToestel">
-<FormalSpec>VoerUitOpEigenToestel:%Boolean</FormalSpec>
-<Implementation><![CDATA[	Set ..VoerUitOpEigenToestel = VoerUitOpEigenToestel
-]]></Implementation>
-</Method>
-
 <Method name="GeefCommand">
 <ReturnType>%String</ReturnType>
 <Implementation><![CDATA[
 	#dim Command As %String = "psexec"
-	If $$$Not(..VoerUitOpEigenToestel){
-		Set Command = Command_" \\[ServerName]"
-	}
+	Set Command = Command_" \\[ServerName]"
+	
 	If (..GebruikerNaam '= "")  && (..Paswoord '= "") {
 		Set Command = Command_" -u "_..GebruikerNaam
 		Set Command = Command_" -p "_..Paswoord	
 	}
 	Set:'..WachtenTotUitgevoerdIs Command = Command_" -d"
-	If $$$Not(..VoerUitOpEigenToestel) { 
-		Set Command = Command_" -i"
-	}
+	Set Command = Command_" -i"
 	Set Command = Command_" "_..UitTeVoerenProcess
 	
 	Set UitvoeringParameterIt = ##class(TECH.ListIterator).%New(..UitvoeringParameterLijst)