Index: vhLib/OldSchool.cls.xml
===================================================================
diff -u -r879 -r3879
--- vhLib/OldSchool.cls.xml	(.../OldSchool.cls.xml)	(revision 879)
+++ vhLib/OldSchool.cls.xml	(.../OldSchool.cls.xml)	(revision 3879)
@@ -21,6 +21,22 @@
 	Quit
 ]]></Implementation>
 </Method>
+
+<Method name="InitAdminVars">
+<Description>
+Bovenop de "very basic" variabelen van InitVars() wordt in deze method ook een set extra variabelen opgezet, die typisch ook aanwezig zijn tijdens een Admin-sessie. 
+   
+Oproepen via 
+  Do ##class(vhLib.OldSchool).InitAdminVars()</Description>
+<ClassMethod>1</ClassMethod>
+<ProcedureBlock>0</ProcedureBlock>
+<Implementation><![CDATA[
+	Do ##class(vhLib.OldSchool).InitVars()
+	Do ^cA604
+
+	Quit
+]]></Implementation>
+</Method>
 </Class>