Página orientada a estudiantes y profesionales de la programación e informática. Aunque en este blog intento abarcar diferentes aspectos, está especialmente orientado al entorno HOST (cobol, DB2, JCL,...).
En los jcl's podemos poner condiciones, en función de las cuales se ejecutarán unos pasos u otros.
Un ejemplo, con rama IF podría ser el siguiente: //INICIO IF (PASO01.RC EQ 2) OR (PASO01.RC EQ 2) OR (PASO03.RC EQ 2) //PASO04 EXEC .... //FIN ENDIF
Vemos tres partes a destacar:
INICIO --> Está el IF / THEN junto con la condición
FIN -------> Está el ENDIF, delimita el fin del IF.
PASO04 -> Este paso se encuentra entre el IF / THEN y el ENDIF; lo que significa que, en caso de cumplirse la condición del IF / THEN existente en el paso INICIO, se ejecutaría. Si dicha condición no se cumple, este paso no se ejecutaría.
Otro ejemplo más, en esta ocasión con ramas IF - ELSE. En el siguiente ejemplo vemos la rama IF en el paso INICIO1, si se cumple la condición existente se ejecutarían los pasos del jcl que están a continuación (PASO04, PASO05,...):
//INICIO1 IF (PASO01.RC EQ 2) OR (PASO01.RC EQ 2) OR (PASO03.RC EQ 2) //PASO04 EXEC //PASO05 EXEC .... //ELSE1 ELSE //PASO10 EXEC //PASO11 EXEC ....
//FIN1 ENDIF
Si la mencionada condición no se cumple, la ejecución se iría por la rama ELSE existente en el paso ELSE1, lo que significa que se ejecutarían todos aquellos pasos existentes entre la rama ELSE del paso ELSE1 y el ENDIF del paso FIN1 (en este caso se ejecutarían los pasos PASO10, PASO11, ...).
En las condiciones vemos que se utiliza lo siguiente:
PASO10.RC EQ 2 PASO20.RC EQ 2 PASO30.RC EQ 2 Tenemos que en las condiciones se pone el nombre del paso (PASO10, PASO20, ...) un punto y RC. Ésto es para saber el código con que termina un determinado paso, dicho código puede ser 0 o distinto de 0. En caso de ser distinto de 0, tenemos que un código menor que 8 sería un warning mientras que un código igual o superior a 8 sería un error. A continuación está la comparación = o EQ. Finalmente el código con el que queremos hacer la comparación. Aparte de =/EQ para ver igualdad tenemos otros elementos como:
LE - Less or Equal
LT - Less Than
LE es útil cuando queremos que una condición se ejecute cuando el código devuelto por un paso es menor o igual a un determinado valor. LT es útil cuando queremos que una condición se ejecute cuando el código devuelto por un paso es menor que un determinado valor. Como culturilla general os diré que las palabras INICIO1, ELSE1 y FIN1 que habéis visto para incluir el IF-ELSE-ENDIF se utiliza en algunas instalaciones pero en otras no es necesario ponerlas. ¿Cómo podemos saber si es necesario ponerlas o no? Muy fácil. Mediante la opción 3.14 podemos buscar la palabra IF (eso sí, la pondremos entre comillas simples) en la librería de jcl's de producción para ver jcl's de ejemplo y ver si en alguna de ellas se usan o no. En función de lo que encontremos pues las pondremos o no.
Nos es grato comunicarte desde Programación e informática fácil que ya tenemos página oficial en Facebook.
Simplemente búscanos por nuestro nombre:
Al pinchar sobre el nombre de nuestra página te aparecerá en pantalla:
Cuando ya estés en la anterior pantalla, pincha en el botón Me gusta. En el anterior pantallazo no aparece ese botón porque con mi usuario personal ya he pinchado en dicho botón y en su lugar aparece Te gusta.
¿A qué esperas a darle al Me gusta? Te estaremos esperando.
Durante años la eterna pregunta es si desaparecerá el lenguaje de programación cobol. Ya lo están intentando matar desde hace años diciendo que desaparecerá en tanto o cuanto tiempo.
Pero antes de todo, seguro que todavía no sabes ciertas cosas de tan arcaico lenguaje o desconoces ciertas curiosidades. Tras este paréntesis vayamos a la pregunta del millón: ¿desaparecerá el lenguaje cobol?
En un principio, no se puede saber porque intentar ver el futuro sin ser adivino es difícil pero si nos marcamos plazos de, entorno, 10 años podemos aventurarnos y dar opiniones. Parece ser que hace 10 años ya aventuraban el fin del cobol (pinchar aquí)....pues 10 años después no sólo sigue vivo y coleando sino que, además, aún se hacen ofertas para trabajar en ese lenguaje de programación tal y como se trata en la siguiente entrada del blog de logadmin. Parece que se han equivocado, ¿verdad? Yo diría que van a pasar otros 10 años más y el cobol va a seguir como en el día de hoy: utilizándose como si no hubiera pasado el tiempo.
También hay foros en el que se debate sobre el tema como el siguiente que puedes ver pinchando aquí. Por cierto, estoy totalmente de acuerdo con el comentario de Pep999.
No sólo hay que tener en cuenta los costes de una migración, sino otro factor muy importante. Y ¿cuál es? pues que "bancos y compañías de seguros dejan de funcionar si mañana Cobol desaparece", tal y como puedes leer en el siguiente artículo.
Por ahora llego a la conclusión de que no desaparecerá en un plazo de 10/15 años...o quizás más puesto que al ser usado, en su mayoría, por bancos, ¿de verdad creéis que ese sector, en el que abunda la usura, se va a gastar la pasta en una migración? Yo tengo la respuesta muy clara: un NO rotundo.
Después de todo, ya lo dijo Bill Gates: "No sé qué lenguajes habrá en el futuro, pero seguro que Cobol estará todavía allí"
Pienso que los virus informáticos muestran la naturaleza humana: la única forma de vida que hemos creado hasta el momento es puramente destructiva. Esta cita pertenece a Stephen Hawking. Pues sí, tiene razón...el ser humano es destructivo y si no puede hacer la guerra hará un virus cuando se dedique a la informática.
¿Quién no recuerda a Chikilicuatre cantando el chiki chiki en la edición de Eurovisión del 2008? Si hay alguien con mala memoria puede recordarlo con el siguiente vídeo:
Pues los Coboleros tenemos nuestra propia versión llamada El Coboliky. Aquí la podéis leer:
"El Coboliky"
¡¡¡Teclea, teclea!!!
El coboliky mola mogollón, aunque sea arcaico y no puedas usar ratón.
Ponle coboliky a ese programita, y te encantará, su negra pantallita.
Programa despacio, programa bien suave y no hagas un bucle, mi amol ya tu sabes!
Programan los juniors, Programan los seniors, mi jefe no programa pero se cree muy bueno.
Y el coboliky se programa asi:
1-el Readnes
2-el Comicontrol
3-el Perfomantil
4-el Movecorr
Programa el coboliky, Programa el coboliky, programan los heavys también los frikis
Programan en la ofi, programan en la uni, Programan los fruittis y también los lunnis.
Programa coboliky tomando un café, pero deja de hacerlo, los viernes a las 3 y si estás de guardia programa en tu casa, cuando los de sala, te den la brasa...
Y el coboliky se programa asi:
1-el Readnes
2-el Comicontrol
3-el Perfomantil
4-el Movecorr
Este coboliky, es lo más estable, lo usan los bancos, también los contables.
Y si el coboliky, quieres programar, ponle muchos moves, no pares de validar...
La mayoría de los bancos pueden usar una de las siguientes arquitecturas:
Arquitectura Altamira - usada en, por ejemplo, Bankinter y Barclays
Arquitectura Partenón - usada en, por ejemplo, el Santander
Es un poco complicado encontrar manuales acerca de cualquiera de las arquitecturas, lo que más encuentras son foros. A pesar de esta dificultad, tras horas de búsqueda he encontrado el siguiente manual de arquitectura altamira: pinchar aquí para consultarlo. Sin embargo, de la arquitectura partenón sólo he localizado un vídeo en el que se explica en qué consiste dicha arquitectura: pinchar aquí para ver el vídeo.
En mis más de 5 años de experiencia en HOST sólo me he tenido que enfrentar una vez a un mapa en CICS. La experiencia fue positiva porque sólo tuve que incluir un campo nuevo y a la hora de probar funcionó a la primera.
Lo poco que aprendí es que un mapa era una sucesión de campos que tenían una estructura como la siguiente:
Pasamos a ver qué es cada uno de los elementos que lo componen.
POS=(X,Y)
Para situarse en la pantalla,
X se refiere a la línea e Y a la columna. La coordenada indicada por X e Y se
refiere a la primera posición en la que va a empezar el campo.
LENGTH=DDD
Longitud del campo.
ATTRB=(ATRIB1,
ATRIB2,…)
Atributos del campo. A
continuación se va a indicar una serie de atributos:
NUM –
numérico. Si el campo es numérico se deberá indicar al final PICIN=’9(DDD)’ siendo DDD el mismo
valor que se ha indicado para la longitud, es decir, para el elemento LENGHT.
BRT –
brillante.
ASKIP –
el cursor no se posicionaría en ese campo y pasaría al siguiente que fuera
editable (este atributo se utiliza cuando queremos que se muestre por pantalla un determinado valor previamente recuperado de una tabla a la que se ha accedido mediante select utilizando en la cláusula where el contenido del campo editable que le precede).
PROT –
protegido, no se puede escribir en ese campo.
DRK –
dark, no se muestra por pantalla el campo.
UNPROT –
desprotegido, se puede escribir en ese campo.
La próxima vez que aprenda algo de interés sobre los mapas, lo escribiré.
Si consideramos la informática una ciencia, podemos decir que en el campo de la informática existe investigación y divulgación científica. Por ello, me gustaría comenzar un ciclo de entradas acerca de la divulgación científica en el campo de la informática.
Hoy comenzaremos con tesis doctorales acerca de diferentes aspectos de este campo. Para ello, incluyo sendos enlaces de las universidades Politécnica y Complutense de Madrid en las que se puede tener acceso a diferentes tesis doctorales: