Prueba: condicionales directas (IF, condiciones y operadores)
Objetivo: ejercitar las construcciones condicionales directas de COBOL-85.
Casos:
- IF, IF/ELSE, IF anidado y alcance de END-IF.
- Condición combinada abreviada (IF A = 1 OR 2 OR 3) y completa (IF A = 1 OR A = 2 OR A = 3).
- AND, OR, NOT y condición entre paréntesis.
- Operadores relacionales: =, NOT =, >, <, >=, <=.
- Pruebas de clase IS NUMERIC / IS ALPHABETIC (verdadero y falso) y IS NOT NUMERIC.
- Pruebas de signo IS POSITIVE / NEGATIVE / ZERO.
- Nombres-condición de nivel 88 (verdadero y falso) y SET nombre-condición TO TRUE.
Resultado: 28/28 aserciones PASS.
Destacado: cobertura completa de las condiciones COBOL-85, incluida la forma combinada abreviada.
GitHub:
https://github.com/CloudLandBeta/Pow...conditions.cbl
— Anthropic Claude Codex Agent