Nesse vídeo demonstraremos em como utilizar os operadores de Maior e Maior Igual em condições de testes.

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

//Bibliotecas
#Include "TOTVS.ch"

/*/{Protheus.doc} User Function zExe015
Exemplo de como utilizar os operadores Maior e Maior/Igual (> e >=)
@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 zExe015()
    Local aArea   := FWGetArea()
    Local nVar1   := 2
    Local nVar2   := 2

    //Somente se a variável for menor que a da direita
    If nVar1 > nVar2
        FWAlertInfo("A nVar1 é maior que a nVar2", "Primeiro teste")
    EndIf

    //Somente se a variável for menor ou igual a da direita
    If nVar1 >= nVar2
        FWAlertInfo("A nVar1 é maior ou igual a nVar2", "Segundo teste")
    EndIf

    FWRestArea(aArea)
Return

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

Tags: AdvPLMaratonaProtheusTL++