BL.Sys.Proxy,BL.Sys.Toegang 1 %RegisteredObject 0 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