Terça, Julho 14, 2020

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.