Index: TECH/enu/ExceptionCode.cls.xml
===================================================================
diff -u -r1186 -r1480
--- TECH/enu/ExceptionCode.cls.xml	(.../ExceptionCode.cls.xml)	(revision 1186)
+++ TECH/enu/ExceptionCode.cls.xml	(.../ExceptionCode.cls.xml)	(revision 1480)
@@ -6,160 +6,160 @@
 <Super>%String</Super>
 
 <Parameter name="VALUELIST">
-<Default>;1000:GeneralError;1001:PropertyRequired;1002:ParameterRequired;1002:ParameterInvalid;1003:ObjectExpected;1004:Locked;1005:InvalidInput;1005:InvalidOutput;1007:InvalidID;1006:Create object;1008:InvalidEnumerationValue;1009:Unimplemented;1010:FilesystemFailed;3000:ObjectValidationFailed;3001:SaveFailed;5000:UserError;5005:BevestigingNodig;5804:Concurrency;1012:IllegalUsage</Default>
+<Default>;-1000;-1001;-1002;-1002;-1003;-1004;-1005;-1005;-1005;-1007;-1012;-1006;-1008;-1009;-1010;-1011;-3000;-3001;-5000;-5005;-5804;-4000</Default>
 </Parameter>
 
 <Method name="GeneralError">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1000:GeneralError"
+<Implementation><![CDATA[	Quit "-1000"
 ]]></Implementation>
 </Method>
 
 <Method name="PropertyRequired">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1001:PropertyRequired"
+<Implementation><![CDATA[	Quit "-1001"
 ]]></Implementation>
 </Method>
 
 <Method name="ParameterRequired">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1002:ParameterRequired"
+<Implementation><![CDATA[	Quit "-1002"
 ]]></Implementation>
 </Method>
 
 <Method name="ParameterInvalid">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1002:ParameterInvalid"
+<Implementation><![CDATA[	Quit "-1002"
 ]]></Implementation>
 </Method>
 
 <Method name="ObjectExpected">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1003:ObjectExpected"
+<Implementation><![CDATA[	Quit "-1003"
 ]]></Implementation>
 </Method>
 
 <Method name="Locked">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1004:Locked"
+<Implementation><![CDATA[	Quit "-1004"
 ]]></Implementation>
 </Method>
 
 <Method name="InvalidInput">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1005:InvalidInput"
+<Implementation><![CDATA[	Quit "-1005"
 ]]></Implementation>
 </Method>
 
 <Method name="InvalidUserInput">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1005:InvalidUserInput"
+<Implementation><![CDATA[	Quit "-1005"
 ]]></Implementation>
 </Method>
 
 <Method name="InvalidOutput">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1005:InvalidOutput"
+<Implementation><![CDATA[	Quit "-1005"
 ]]></Implementation>
 </Method>
 
 <Method name="InvalidID">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1007:InvalidID"
+<Implementation><![CDATA[	Quit "-1007"
 ]]></Implementation>
 </Method>
 
 <Method name="IllegalUsage">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1012:IllegalUsage"
+<Implementation><![CDATA[	Quit "-1012"
 ]]></Implementation>
 </Method>
 
 <Method name="CreateObject">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1006:CreateObject"
+<Implementation><![CDATA[	Quit "-1006"
 ]]></Implementation>
 </Method>
 
 <Method name="InvalidEnumerationValue">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1008:InvalidEnumerationValue"
+<Implementation><![CDATA[	Quit "-1008"
 ]]></Implementation>
 </Method>
 
 <Method name="Unimplemented">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1009:Unimplemented"
+<Implementation><![CDATA[	Quit "-1009"
 ]]></Implementation>
 </Method>
 
 <Method name="FilesystemFailed">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1010:FilesystemFailed"
+<Implementation><![CDATA[	Quit "-1010"
 ]]></Implementation>
 </Method>
 
 <Method name="FailedAuthentication">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "1011:FailedAuthentication"
+<Implementation><![CDATA[	Quit "-1011"
 ]]></Implementation>
 </Method>
 
 <Method name="ObjectValidationFailed">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "3000:ObjectValidationFailed"
+<Implementation><![CDATA[	Quit "-3000"
 ]]></Implementation>
 </Method>
 
 <Method name="SaveFailed">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "3001:SaveFailed"
+<Implementation><![CDATA[	Quit "-3001"
 ]]></Implementation>
 </Method>
 
 <Method name="UserError">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "5000:UserError"
+<Implementation><![CDATA[	Quit "-5000"
 ]]></Implementation>
 </Method>
 
 <Method name="BevestigingNodig">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "5005:BevestigingNodig"
+<Implementation><![CDATA[	Quit "-5005"
 ]]></Implementation>
 </Method>
 
 <Method name="Concurrency">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "5804:Concurrency"
+<Implementation><![CDATA[	Quit "-5804"
 ]]></Implementation>
 </Method>
 
 <Method name="DeviceFailed">
 <ClassMethod>1</ClassMethod>
 <ReturnType>TECH.enu.ExceptionCode</ReturnType>
-<Implementation><![CDATA[	Quit "4000:FilesystemFailed"
+<Implementation><![CDATA[	Quit "-4000"
 ]]></Implementation>
 </Method>
 </Class>