Comandos e Condições Cobol

    Os programas sempre necessita tomar decisões sobre que rumo tomar em certas circunstâncias. Para que o programa possa fazer isto existem dois comandos condicionais o IF e o EVALUATE.

    O comando IF é utilizado para tomadas de decisões simples do tipo se for verdade faça isto senão faça aquilo.

Exemplo:

...............
if nome equal "Dionatan"
   display nome
else
   display "Desconhecido"
end-if
...............

    Neste exemplo, caso variável nome seja igual a "Dionatan" então o comando display nome será executado, caso contrário será executado o comando display "Desconhecido". Neste exemplo não foi usado à cláusula THEN a mesma é opcional, outro detalhe importante é referente ao ponto, caso o programador opte em adotar um ponto por comando, ele deve se atentar no seguinte.

............ Isto esta errado ...........
if nome equal "Dionatan".
  display nome.
else.
  display "Desconhecido".
end-if.
.........................................
........ Isto esta certo ...........
.........................................
if nome equal "Dionatan"
  display nome
else
   display "Desconhecido"
end-if.
........................................

    O comando IF irá considerar como o fim de seus comandos a cláusula END-IF ou o primeiro ponto encontrado.

    A cláusula EVALUATE possui um sofisticado mecanismo de análises condicionais, onde podemos utilizar as mesmas condições aceitas pela cláusula IF e, além disso, algumas cláusulas próprias do comando. ALSO indica que EVALUATE deverá analisar duas condições distintas simultaneamente. Podemos também utilizar a instrução TRUE e FALSE, que indicarão que a análise deverá ser feita nas entradas WHEN. WHEN OTHER é uma alternativa caso nenhuma das condições WHEN gere um TRUE na avaliação.