Histórico da Página

#INCLUDE "totvs.ch"
/*/{Protheus.doc} User Function FA281VLR
    (Se P.E existir e retornar .T., abre a tela para que o usuário altere o valor)
    @type  logical
    @author Cassio S. Dias
    @since 14/11/2023
    @version 12.12310
    @return lRet, logical
    @see (links_or_referenceshttps://tdn.totvs.com/x/pHL4Lw)
    /*/
User Function FA281VLR() as logical
    local lRet :=.F.
    local aUserOk:={"000000","000009","000100"}

    if __cUserId $(aUserOk)
        lRet:=.T.
        else
        MSGINFO( "Usuário não autorizado", "Sem Permissão" )    
    endif
    
Return lRet