Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Bloco de código
languagejava
themeMidnight
firstline1
titleFA630EST
linenumberstrue
#INCLUDE "TOTVS.CH"
/*/{Protheus.doc} User Function FA630EST
    (Ponto de entrada para permitir ou nao que determinado usuario efetue esta operacao (estorno))
    @type  Logical
    @author Cassio S. Dias
    @since 13/11/2023
    @version 12.1.2310
    @return lRet, LOGICAL
    @see (links_or_referenceshttps://tdn.totvs.com/x/sFL4Lw)
    /*/
User Function FA630EST() as logical
	Local lRet :=.T.

	aIdBlock:={"000006","000013","000041"}//id dos usuárioS sem permissão

	if __cUserId $ aIdBlock
		MSGALERT( "Usário não autorizado para esta operação", "Sem Permissão" )
		lRet:=.F.
	EndIf

Return lRet

...