Nesse vídeo iremos demonstrar como é o funcionamento do operador ;, que serve para continuar a execução do código na próxima linha (ou próximo comando).
Abaixo o código fonte desenvolvido para o exemplo em vídeo acima:
//Bibliotecas
#Include "TOTVS.ch"
/*/{Protheus.doc} User Function zExe005
Exemplo de como utilizar o operador ; (Ponto e Vírgula), para continuar a execução na próxima linha
@type Function
@author Atilio
@since 26/11/2022
@obs
**** Apoie nosso projeto, se inscreva em https://www.youtube.com/TerminalDeInformacao ****
/*/
User Function zExe005()
Local aArea := FWGetArea()
Local cTexto := ""
Local aDados := {}
//Demonstra a continuação da linha na próxima através do ponto e vírgula
cTexto := "O rato " + ;
"roeu a roupa " + ;
"do rei de Roma"
FWAlertInfo(cTexto, "Conteúdo da variável cTexto")
//Cria um array com vários elementos
aDados := { ;
"terminaldeinformacao.com", ;
"autumncodemaker.com", ;
"atiliosistemas.com" ;
}
FWAlertInfo("Tamanho do array: " + cValToChar(Len(aDados)), "Variável aDados")
FWRestArea(aArea)
Return
Bom pessoal, por hoje é só.
Abraços e até a próxima.