Index: IINT.mac.rou =================================================================== diff -u -r2070 -r2097 --- IINT.mac.rou (.../IINT.mac.rou) (revision 2070) +++ IINT.mac.rou (.../IINT.mac.rou) (revision 2097) @@ -94,6 +94,16 @@ I '$G(^cLOG(boot,"LOGON",0)) S K=$P($G(^cLOG(boot,"DEV",io),0),"\") I $D(^cLOG(0,"LOGON",K)) X ^(K) D BX^cQ13 I $D(^cLOG(boot,"LOGIN",io)) H:'^(io) S K=$P(^(io),"\",2) I $L(K),K'["^II" G @K + + new TerminalNavigatieService,ComputerNaam + Set TerminalNavigatieService=##Class(APPS.CHUI.TerminalNavigatieService).%New() + Set ComputerNaam=##Class(TECH.Context.RuntimeContext).Instance().GeefComputerNaam() + if TerminalNavigatieService.HeeftTaak(ComputerNaam) { + Do TerminalNavigatieService.VoerTaakUit(ComputerNaam) + Quit + } + + 11 I $D(^cLOG(boot,"MODEM",io)),^(io,1) U 0:(:"S") F I=1:1:20 H 1 R !,K:0 I '$T,'$L(K) Q 12 I io>1!workst I '$G(^cLOG(boot,"TTT"),1) D G 33 . W !!?2,$P($T(@("T2"_QT)),";",2),io,$P($T(@("T2"_QT)),";",3),$J,$P($T(@("T2"_QT)),";",4)