Punto de encuentro para "amantes" de los mainframes IBM, COBOL, CICS y DB2
En el COBOL de z/OS, la función intrínseca LENGTH OF devuelve el número de bytes que ocupa una variable. Por lo tanto, utilizada con una variable alfanumérica, devolverá el total de bytes que ocupa la variable, aunque todos ellos contengan espacios. Sin embargo, en muchos casos nos interesa conocer el número de carácteres que contiene…
En este artículo vamos a analizar las diferentes formas que ofrece COBOL de hacer búsquedas en tablas Recordemos que una tabla es cualquier variable definida con más de una ocurrencia o que pertenece a un grupo de nivel superior con más de una ocurrencia. Por ejemplo, supongamos una tabla que almacene nombres de personas definida así: 01 TABLA….
El COBOL de IBM para z/OS incluye dos funciones que simplifican mucho los cálculos con fechas, gracias a que convierten una fecha en formato AAAAMMDD en su equivalente numérico y a la inversa. Ello nos permite hacer sumas o restas con fechas fácilmente, sin necesidad de tener en cuenta el número de días de cada…
Cobol nos ofrece una serie de clases de datos predefinidas que podemos utilizar en expresiones lógicas llamadas condiciones de clase. La utilidad de estas condiciones es comprobar si todos los caracteres EBCDIC de una variable alfanumérica pertenecen a una determinada clase. Las clases predefinidas son: NUMERIC, ALPHABETIC, ALPHABETIC-LOWER (minúsculas) y ALPHABETIC-UPPER (mayúsculas). IF VARIABLE-A IS…
La respuesta es sí. Parece que la idea que se tiene de COBOL como un viejo dinosaurio que lleva decadas sin actualizarse no es del todo exacta. En las últimas versiones del COBOL para z/OS, IBM ha introducido instrucciones específicas para generar el equivalente XML de una estructura de datos COBOL y a la inversa….