serial %AppsArrayCnts Default %Library.TMFormClass %Library.TMForm %TMSpeedButton %Library.String 1 %Library.List 1 %TMButton %TMButton %TMButton %TMButton %TMButton %TMButton %TMButton %TMButton %TMButton %TMImageList %TMMemo %TMPageControl %TMPopupMenu %TMMenuItem %TMMenuItem %TMMenuItem %TMRichEdit %TMTabSheet %TMTabSheet %TMTabSheet %TMTabSheet %TMTabSheet %TMTreeView %TMTreeView %TMTreeView %TMTreeView initvalue:%String cache 0 %Status document literal IP,Job:%Library.String,ParentNode:%Library.TMTreeNode cache 0 document literal cache 0 document literal cache 0 document literal IP:%Library.String cache 0 %Library.String document literal initvalue:%String cache 0 MApplication document literal Job:%Integer cache 0 document literal initvalue:%String cache 0 %Library.Status document literal cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal Node:%TMTreeNode cache 0 document literal Node:%TMTreeNode cache 0 %Library.String document literal Node:%Library.TMTreeNode cache 0 %Library.Boolean document literal Node:%Library.TMTreeNode cache 0 %Library.String document literal cache 0 document literal cache 0 document literal cache 0 document literal IP:%Library.String cache 0 document literal cache 0 document literal 1) aNodes(ClassName).Text=aNodes(ClassName).Text_" ("_JobCnt_" jobs)" Do ..tvAppsViaCN.Items.EndUpdate() Quit ]]> cache 0 document literal 1) tmpNode.Text=tmpNode.Text_" - "_ExtraCnt_" times" ... Do ..dCOMPASSIGNtvImage(tmpNode) ... Set ..aNodeData(+tmpNode)=Job . Set:(JobCnt>1) aNodes(Extra).Text=aNodes(Extra).Text_" ("_JobCnt_" jobs)" Do ..tvAppsViaExtra.Items.EndUpdate() Quit ]]> cache 0 document literal cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal Args:%String cache 0 document literal 7 3 2 0 5 6 1 4 2 4 3 0 1 %Library.CacheSerialState "%Library.TMFormClass" Address Form pcApps tsViaClassName tsViaIP tsViaJob ilApps TreeView1 tvAppsViaIP Button1 Button2 Button3 Button4 Button5 Button6 Button7 btnClearErrors btnErrorInfo btnExit btnKillOnIP btnKillOnJob btnPurge btnRefresh tvAppsViaCN tvAppsViaJob reErrors btnEmailOnClose btnRemoveEmail btnKillOnCN tsViaExtraInfo tvAppsViaExtra TabSheet1 tsLicenties Memo1 mmoLicense CheckBox1 chkTranslateLicenseAddr pmJump pmiGoToClassName pmiGoToIP pmiGoToJob SpeedButton1 pmKill pmiKillViaClassName pmiKillViaIP pmiKillViaJob btnTransIP lblTransInfo btnTimeOut