MsQuit - Controle de acesso ao sistema

O Ponto de Entrada MSQUIT foi disponibilizado para auxiliar nos processos de controle de acessos do sistema e será executado ao selecionar a opção Finalizar ou Logoff da Final e as opções de Logoff do sistema ao utilizar a interface TEMAP10.O ponto de entrada irá receber como parâmetro um vetor (PARAMIXB) com uma variável lógica que identificará se o ponto de entrada está sendo executado a partir da opção de Logoff.

MSFINAL.PRW

MsQuit - Controle de acesso ao sistema ( [ ] )

()

Observação:

Este ponto de entrada não é executado à partir das telas de login do sistema.

User Function MSQUIT()Local lLogoff 	:= ParamIxb[1] //variável lógica que identifica se o P.E. está sendo executado pelo Logoff.Local cMsg 	:= ""If lLogOff	cMsg := "Usuário: "+Alltrim(cUserName)+" efetuou logoff do sistema"Else	cMsg := "Usuário: "+Alltrim(cUserName)+" saiu totalmente do sistema"EndIfApMsgAlert(cMsg)Return