BL.Sys.Proxy,BL.Sys.Toegang
1
%RegisteredObject
Kan menu niet verkrijgen.
1
BL.Sys.Proxy.pxStatus
CurrentDepth Do
.. Set CurrentDepth=objTR.Depth
.. If CurrentDepth=1 Do
... Do XML.StartDocument()
... Do XML.RootElement(objTR.Name,"")
.. Else Do
... Do AddStartTagToQueue(objTR.Name) ;ipv element te starten kijken we of onderliggende niveaus 'toegang' hebben, indien wel, dan schrijven we eerst de queue leeg
. Else If objTR.Depth