PC Toledo

Enviado: **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

Enviado: **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

Enviado: **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

Enviado: **21 Nov 2018 04:02**

mais ou menos isto:

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

IF... Else... Endif