IF... Else... Endif

Mensagem por **lugab** » 20 Nov 2018 20:52

Prezados, boa noite...

Em vez de repetir a variavel "CampoA" em cada comparação.....

If ( campoA = campoB)  .or. (campoA=CampoC) .or. (CampoA=CampoD) .or. (CampoA=CampoE)
  acao()
endif

... existe uma forma de usá-la uma única vez ?

If campoaA = CampoB ou CampoC ou Campo D ou CampoE 
   acao()
endif

Se tem, me digam que eu to precisando

Mensagem por **Toledo** » 20 Nov 2018 21:30

Se esta variável CampoA for do tipo caractere, então você poderia fazer o seguinte:

If CampoA $ CampoB+"-"+CampoC+"-"+CampoD+"-"+CampoE
   acao()
endif

Abraços

Mensagem por **lugab** » 20 Nov 2018 23:34

Prof.Toledo

Não, os campos são numéricos, mas comparando o strzero() de cada um deles a sua fórmula funciona

Muito obrigado, mais uma vez

Mensagem por **JoséQuintas** » 21 Nov 2018 04:02

mais ou menos isto:

IF AScan( { campob, campoc, campod, campoe }, Campoa ) != 0