O comando IF permite que você condicionalmente executar um comando. Você pode opcionalmente Cláusula ELSE sobre o comando IF.
Se a expressão teste for avaliada como falsa existe uma cláusula ELSE, o comando associado a cláusula ELSE é executada. As palavras-chave não podem ser abreviadas.
IF [condition] THEN [COBOL statements] ELSE [COBOL statements] END-IF.
Condição
Uma condição de relação simples com a seguinte forma: Item-1 operador de item-2. Item-1 e ponto-2 pode ser um item de dados ou um literal. O operador pode ser uma das seguintes operações:
- >
- <
- =
- NOT =
- >=
- <=
- NOT <
- NOT >
Comando
Quando o comando IF e ELSE são aninhados e estão presentes, ELSE ou END-IF está associado com o mais próximo IF dentro do mesmo bloco.
Diferentemente do COBOL, a Ferramenta de Depuração requer terminação de pontuação (;) após comandos.
Notas:
- A cláusula ELSE deve ser incluída sempre que a cláusula IF a Ferramenta de depuração para obter mais entrada (por exemplo, um IF contendo USE ou outros comandos que causam Debug para ser reiniciado porque um AT-condition ocorre).
- O frase COBOL "NEXT SENTENCE" não é suportada.
- As combinações de comparação com campos de data com janelas não são suportadas.
- As comparações entre campos de data expandidos com diferentes cláusulas DATE FORMAT não são suportadas.
- Se o DADOS opção do comando PLAYBACK ENABLE está em vigor, o IF pode ser usado enquanto você repete as instruções gravadas usando o comando PLAYBACK.
- Para programas COBOL otimizados, o IF não pode referenciar quaisquer variáveis descartadas pelo otimizador.