Nesse vídeo demonstraremos como utilizar o operador menor ou menor igual.

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

//Bibliotecas
#Include "TOTVS.ch"

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

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

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

    FWRestArea(aArea)
Return

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

Tags: AdvPLMaratonaProtheusTL++