Index: vhLib/OldSchool.cls.xml
===================================================================
diff -u -r242 -r532
--- vhLib/OldSchool.cls.xml	(.../OldSchool.cls.xml)	(revision 242)
+++ vhLib/OldSchool.cls.xml	(.../OldSchool.cls.xml)	(revision 532)
@@ -13,6 +13,7 @@
 	Set U = $get(U,";")
 	Set Q = $get(Q,"K")
 	Set QT = $get(QT)
+	set TD = $get(TD,##class(TECH.StringUtils).Replace($$EXTTIME^vhLib.DataTypes(),":"," u "))
 	Set DT = ##class(TECH.DateTime).GeefDatumInPuntNotatie(##class(TECH.DateTime).CurrentDate())
 	Set DD = $Piece(##class(TECH.DateTime).GeefDatumInPuntNotatie(##class(TECH.DateTime).CurrentDate()),".")
 	Set boot = $get(boot,##class(TECH.Context.RuntimeContext).Instance().GeefServerNaam())