Histórico da Página

#INCLUDE "totvs.ch"

/*/{Protheus.doc} User Function F183VNAT
    ( Ponto de entrada para validacao da Natureza)
    @type  Function
    @author Cassio S. Dias
    @since 29/11/2023
    @version 12.1.2310
    @param cNatureza
    @return lRet, Logical
    @see (links_or_referenceshttps://tdn.totvs.com/x/7kwpM)
    /*/

User Function F183VNAT(cNatureza) as Logical

	Local lRet as Logical
	Local cNat as character

	lRet := .T.
	cNat := Paramixb

	If cNatureza == cNat
		lRet:=.T.
	else
        MSGALERT( "Natureza inválida para essa operação", "Aviso" )
		lRet :=.F.
	ENDIF

Return lRet