Nesse vídeo demonstraremos em como fazer uma negação de condição, utilizando ! ou .Not.

Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:

//Bibliotecas
#Include "TOTVS.ch"
 
/*/{Protheus.doc} User Function zExe008
Exemplo de como utilizar os operadores de negação ! e .Not.
@type Function
@author Atilio
@since 26/11/2022
@see https://tdn.engpro.totvs.com.br/display/tec/Operadores+Comuns
@obs
    **** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****
/*/
 
User Function zExe008()
    Local aArea   := FWGetArea()
    Local nValorA := 0
    Local nValorB := 1
 
    //Se A NEGAÇÃO da condição for verdadeira
    If ! nValorA == nValorB
        FWAlertInfo("Mensagem de teste", "Primeiro If")
    EndIf
 
    //Se A NEGAÇÃO da condição for verdadeira
    If .Not. nValorA == nValorB
        FWAlertInfo("Mensagem de teste", "Segundo If")
    EndIf
 
    FWRestArea(aArea)
Return

Bom pessoal, por hoje é só.
Abraços e até a próxima.

Tags: AdvPLMaratonaProtheusTL++