Index: TECH/FileInfo.cls.xml
===================================================================
diff -u -r734 -r748
--- TECH/FileInfo.cls.xml	(.../FileInfo.cls.xml)	(revision 734)
+++ TECH/FileInfo.cls.xml	(.../FileInfo.cls.xml)	(revision 748)
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-01-27 17:01:07">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel) 5.0.21 (Build 6408)" ts="2011-01-31 13:03:05">
 <Class name="TECH.FileInfo">
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
@@ -27,5 +27,5 @@
 <Type>%String</Type>
 </Property>
 </Class>
-<Checksum value="1969484576"/>
+<Checksum value="2172655803"/>
 </Export>
Index: TECH/StringUtils.cls.xml
===================================================================
diff -u -r734 -r748
--- TECH/StringUtils.cls.xml	(.../StringUtils.cls.xml)	(revision 734)
+++ TECH/StringUtils.cls.xml	(.../StringUtils.cls.xml)	(revision 748)
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-01-27 17:01:07">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel) 5.0.21 (Build 6408)" ts="2011-01-31 13:03:06">
 <Class name="TECH.StringUtils">
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
@@ -30,5 +30,5 @@
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="1428322427"/>
+<Checksum value="1519191299"/>
 </Export>
Index: TECH/ListIterator.cls.xml
===================================================================
diff -u -r734 -r748
--- TECH/ListIterator.cls.xml	(.../ListIterator.cls.xml)	(revision 734)
+++ TECH/ListIterator.cls.xml	(.../ListIterator.cls.xml)	(revision 748)
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-01-27 17:01:07">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel) 5.0.21 (Build 6408)" ts="2011-01-31 13:03:05">
 <Class name="TECH.ListIterator">
 <ProcedureBlock>1</ProcedureBlock>
 <Super>Iterator,%RegisteredObject</Super>
@@ -78,5 +78,5 @@
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="3776575317"/>
+<Checksum value="455216968"/>
 </Export>
Index: TECH/IO.cls.xml
===================================================================
diff -u -r734 -r748
--- TECH/IO.cls.xml	(.../IO.cls.xml)	(revision 734)
+++ TECH/IO.cls.xml	(.../IO.cls.xml)	(revision 748)
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-01-27 17:01:07">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel) 5.0.21 (Build 6408)" ts="2011-01-31 13:03:05">
 <Class name="TECH.IO">
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
@@ -38,5 +38,5 @@
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="619202149"/>
+<Checksum value="947623154"/>
 </Export>
Index: TECH/Files.cls.xml
===================================================================
diff -u -r734 -r748
--- TECH/Files.cls.xml	(.../Files.cls.xml)	(revision 734)
+++ TECH/Files.cls.xml	(.../Files.cls.xml)	(revision 748)
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-01-27 17:01:07">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel) 5.0.21 (Build 6408)" ts="2011-01-31 13:03:05">
 <Class name="TECH.Files">
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
@@ -125,5 +125,5 @@
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="3614063259"/>
+<Checksum value="2300618512"/>
 </Export>
Index: TECH/Enumeration.cls.xml
===================================================================
diff -u -r734 -r748
--- TECH/Enumeration.cls.xml	(.../Enumeration.cls.xml)	(revision 734)
+++ TECH/Enumeration.cls.xml	(.../Enumeration.cls.xml)	(revision 748)
@@ -1,10 +1,11 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-01-27 17:01:07">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel) 5.0.21 (Build 6408)" ts="2011-01-31 13:03:04">
 <Class name="TECH.Enumeration">
 <ClassType>datatype</ClassType>
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%String</Super>
-<TimeChanged>62117,58611.046881</TimeChanged>
+<TimeChanged>62119,58805.855303</TimeChanged>
+<TimeCreated>62122,46984.625893</TimeCreated>
 <ClassDefinitionError>0</ClassDefinitionError>
 
 <Method name="ValueList">
@@ -31,5 +32,5 @@
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="408149922"/>
+<Checksum value="2778309393"/>
 </Export>
Index: TECH/File.cls.xml
===================================================================
diff -u -r734 -r748
--- TECH/File.cls.xml	(.../File.cls.xml)	(revision 734)
+++ TECH/File.cls.xml	(.../File.cls.xml)	(revision 748)
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-01-27 17:01:07">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel) 5.0.21 (Build 6408)" ts="2011-01-31 13:03:05">
 <Class name="TECH.File">
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%Library.File</Super>
@@ -56,5 +56,5 @@
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="2880372399"/>
+<Checksum value="222568097"/>
 </Export>
Index: TECH/CSP/CSPApplicatie.cls.xml
===================================================================
diff -u -r734 -r748
--- TECH/CSP/CSPApplicatie.cls.xml	(.../CSPApplicatie.cls.xml)	(revision 734)
+++ TECH/CSP/CSPApplicatie.cls.xml	(.../CSPApplicatie.cls.xml)	(revision 748)
@@ -1,8 +1,8 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-01-27 17:01:07">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel) 5.0.21 (Build 6408)" ts="2011-01-31 13:03:04">
 <Class name="TECH.CSP.CSPApplicatie">
 <Super>%RegisteredObject</Super>
-<TimeChanged>62117,48251.508726</TimeChanged>
+<TimeChanged>62122,39425.779742</TimeChanged>
 <TimeCreated>62118,40201.147412</TimeCreated>
 <ClassDefinitionError>0</ClassDefinitionError>
 
@@ -74,7 +74,7 @@
 	set result = $zutil(5)
 	
 	#else
-	
+		
 	set HuidigeNamespace = $zutil(5)
 	
 	znspace "%SYS"
@@ -94,6 +94,16 @@
 	quit result
 ]]></Implementation>
 </Method>
+
+<Method name="GetPhysicalFilename">
+<ClassMethod>1</ClassMethod>
+<FormalSpec>cspFile:%String</FormalSpec>
+<ReturnType>%String</ReturnType>
+<Implementation><![CDATA[
+
+	quit $system.CSP.GetFileName(cspFile)
+]]></Implementation>
+</Method>
 </Class>
-<Checksum value="838845926"/>
+<Checksum value="3020416657"/>
 </Export>
Index: TECH/SourceCodeUtils.cls.xml
===================================================================
diff -u -r734 -r748
--- TECH/SourceCodeUtils.cls.xml	(.../SourceCodeUtils.cls.xml)	(revision 734)
+++ TECH/SourceCodeUtils.cls.xml	(.../SourceCodeUtils.cls.xml)	(revision 748)
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-01-27 17:01:07">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel) 5.0.21 (Build 6408)" ts="2011-01-31 13:03:06">
 <Class name="TECH.SourceCodeUtils">
 <ProcedureBlock>1</ProcedureBlock>
 <Super>%RegisteredObject</Super>
@@ -76,5 +76,5 @@
 ]]></Implementation>
 </Method>
 </Class>
-<Checksum value="4190360586"/>
+<Checksum value="706874168"/>
 </Export>
Index: TECH/Iterator.cls.xml
===================================================================
diff -u -r734 -r748
--- TECH/Iterator.cls.xml	(.../Iterator.cls.xml)	(revision 734)
+++ TECH/Iterator.cls.xml	(.../Iterator.cls.xml)	(revision 748)
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="UTF-8"?>
-<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel/P4) 5.0.21 (Build 6408)" ts="2011-01-27 17:01:07">
+<Export generator="Cache" version="9" zv="Cache for Windows NT (Intel) 5.0.21 (Build 6408)" ts="2011-01-31 13:03:05">
 <Class name="TECH.Iterator">
 <Description>
 Generic iterator interface.  Since we're not typed this interface
@@ -25,5 +25,5 @@
 <ReturnType>%CacheString</ReturnType>
 </Method>
 </Class>
-<Checksum value="3938277302"/>
+<Checksum value="2063432301"/>
 </Export>