CLS
Color W+                  
at (02,08) "Ola, "+@userid+" , Bem-vindo a Rede SEPLAG"
at (04,08) "Aguarde. Definindo os Parametros de Sua Conexao !!!"
sleep 1                        
small
Color b+/n
BOX (0,0,24,79,SINGLE)           
Color b/n
BOX (8,06,21,70,SINGLE)              
Color g+/n
Color w+/n
AT (10,08) "Usuário           : "    
AT (11,08) "Nome              : "
AT (12,08) "Privilégio        : "
AT (13,08) "Estação           : "
AT (14,08) "Dominio           : "
AT (15,08) "Servidor de Logon : "
at (16,08) "Hora              : "
at (17,08) "Data              : "
Color y+/n
AT (10,28) @userid              
AT (11,28) @fullname   
AT (12,28) @priv
AT (13,28) @wksta
AT (14,28) @domain
AT (15,28) @lserver
AT (16,28) @time
AT (17,28) ""+@mdayno+"/"+@monthno+"/"+@year
Color y+/n
AT (19,08) "Aguarde, Gravando os Parametros de Sua Conexão ...!"
sleep 3
if ingroup("Domain Users")
   USE Y: "\\SRVSUPORTE\PUBLIC" /PERSISTENT
endif
if ingroup("LEXCOLOR2")
   ADDPRINTERCONNECTION ("\\SRV-IMP2.SEPLAG.LOCAL\L-SECEXEC")
endif
if ingroup("ACESSO_LEX_2ANDAR")
   ADDPRINTERCONNECTION ("\\SRV-IMP2.SEPLAG.LOCAL\L-SGTG")
endif
if ingroup("QLIKVIEW_ADM")
   USE P: "\\SRV-QLIK\apl" 
endif
if ingroup("FINANCEIRO")
   USE X: "\\SRVARQ01\FINANCIAL"
   ADDPRINTERCONNECTION ("\\SRV-IMP2.SEPLAG.LOCAL\X-FINAN")
   ADDPRINTERCONNECTION ("\\SRV-IMP2.SEPLAG.LOCAL\X-FINAN2")
   ADDPRINTERCONNECTION ("\\SRV-IMP2.SEPLAG.LOCAL\X-PROTOC")
   SETDEFAULTPRINTER ("\\SRV-IMP2.SEPLAG.LOCAL\X-FINAN")
endif
if ingroup("FINANCIAL2")
    USE T: "\\SRVARQ01\REJANE"
    USE W: "\\SRVARQ01\GRUPOS"  
    USE X: "\\SRVARQ01\FINANCIAL"
   ADDPRINTERCONNECTION ("\\SRV-IMP2.SEPLAG.LOCAL\L-SGTG")
endif
if ingroup("ADMINISTRATIVO")
   USE X: "\\SRVARQ01\ADMINISTRATIVO"
   ADDPRINTERCONNECTION ("\\SRV-IMP2.SEPLAG.LOCAL\X-SGTG")
   ADDPRINTERCONNECTION ("\\SRV-IMP2.SEPLAG.LOCAL\X-PROTOC")
   SETDEFAULTPRINTER ("\\SRV-IMP2.SEPLAG.LOCAL\X-SGTG2")
endif
if ingroup("ADMINISTRATIVO2")
   USE W: "\\SRVARQ01\GRUPOS"
   USE X: "\\SRVARQ01\ADMINISTRATIVO"
   ADDPRINTERCONNECTION ("\\SRV-IMP2.SEPLAG.LOCAL\L-SGTG")
endif
EXIT

Y: "\ \ SRVSUPORTE \ PUBLIC" / PERSISTENT
USE X: "\ \ SRVARQ01 \ FINANCIAL"

USE P: "\ \ SRV-QLIK \ apl"

Del '%USERPROFILE%\debug.log'                     ; start with a fresh file
$Rc = RedirectOutput('%USERPROFILE%\debug.log')
@DATE ' - ' @TIME ?

@USERID ': member of group xxxx' ?