Cobol: Lista de FILE STATUS en pdf

     Hace más de un año adjunté un enlace con la lista de los FILE STATUS. Ahora os podeis descargar la Lista de FILE STATUS en pdf, simplemente teneis que ir a la sección de Descargas HOST existente en este mismo blog. 

Cobol: Lista de SQLCODE en pdf

     Hace más de un año adjunté un enlace con la lista de los SQLCODES. Ahora os podeis descargar la Lista de SQLCODE en pdf, simplemente teneis que ir a la sección de Descargas HOST existente en este mismo blog.

Cobol: Lista de errores en excel

     Cuando un programa Cobol utiliza DB2, ficheros, IMS o DLI se pueden producir una serie de errores en la utilización de dichos elementos. También existen otro tipo de errores como los errores de usuario o los del sistema.

     Ahora os podeis descargar desde la sección de Descargas HOST existente en este mismo blog un archivo comprimido (.zip) que contiene una hoja excel con diferentes tipos de errores como por ejemplo errores DB2, errores de usuario, errores VSAM, errores de sistema, errores IMS y tabla de códigos de retorno DLI. El nombre del archivo es Lista de errores HOST en Excel.

     Espero que os sirva de utilidad.

Dónde estudiar ciclo formativo

Si queréis saber dónde estudiar un ciclo formativo, sólo tenéis que pinchar aquí para acceder a la entrada del blog titulado Blog de Formación Profesional. 

Espero que sirva de utilidad a todos los que queráis estudiar un ciclo formativo de FP.

FP en informática

Os recomiendo la siguiente página acerca de la FP de informática, muy interesante para todos los que quieran estudiar informática en FP:

          http://www.fp-informatica.es/

JCL: Eliminar bloques de filas mediante SORT

     Si de un fichero queremos eliminar las, por ejemplo, 100 primeras filas (dicho fichero tiene N+100 filas) supone que debemos copiar desde la fila 101. Para ello ejecutaremos un paso de SORT como el siguiente:

          //SORT01 EXEC PGM=SORT
          //SORTIN    DD DSN=FICH.PRUEBA.ENTRADA,DISP=SHR
          //SORTOUT DD DSN=FICH.PRUEBA.SALIDA,DISP=(,CATLG,DELETE),
          //                   SPACE=(CYL,1,1,RLSE),
          //                   DCB=(RECFM=FB,BLKSIZE=6144,LRECL=64)
          //                   UNIT=SYSDA
          //SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(1,1),RLSE)
          //SYSOUT     DD SYSOUT=*
          //SYSIN        DD *
              OPTION SKIPREC = 100
              SORT FIELDS=COPY

O como el siguiente:

          //SORT01 EXEC PGM=SORT
          //SORTIN    DD DSN=FICH.PRUEBA.ENTRADA,DISP=SHR
          //SORTOUT DD DSN=FICH.PRUEBA.SALIDA,DISP=(,CATLG,DELETE),
          //                   SPACE=(CYL,1,1,RLSE),
          //                   DCB=(RECFM=FB,BLKSIZE=6144,LRECL=64)
          //                   UNIT=SYSDA
          //SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(1,1),RLSE)
          //SYSOUT     DD SYSOUT=*
          //SYSIN        DD *
              SORT FIELDS=COPY
                 SKIPREC = 100

Fíjate en lo marcado en azul, ya que eso es lo que hace que se ignoren las 100 primeras filas y se empiece a copiar a partir de la 101.

Estudiar Ingeniería Informática

     Si estáis pensando en estudiar ingeniería informática, os recomiendo la siguiente página web: http://www.gradomania.com/

     Si pincháis en el link anterior, veréis la siguiente pantalla:

     En Ingeniería y Arquitectura están detalladas todas las carreras relacionadas con la ingeniería y la arquitectura. Si hacéis clic en Ingeniería  en Informática, aparecerá un listado de todas las universidades españolas que ofrecen dicha titulación.

     Pero si lo preferís, en caso de que esteis interesados en saber si una  determinada universidad imparte la titulación de ingeniería informática, podéis ir a la sección Universidades (situada a la izquierda de la anterior pantalla) y hacer clic en la comunidad autónoma a la que pertenezca dicha universidad. Tras hacer clic aparece un listado de las universidades existentes en la comunidad autónoma elegida, de ese listado no tenéis más que hacer clic en la universidad que prefiráis y ver si imparte dicha titulación.

JCL: Copiar bloques de filas mediante SORT

     Si de un fichero queremos copiar las, por ejemplo, 100 primeras filas (dicho fichero tiene N+100 filas), ejecutaremos un paso de SORT como el siguiente:

          //SORT01 EXEC PGM=SORT
          //SORTIN    DD DSN=FICH.PRUEBA.ENTRADA,DISP=SHR
          //SORTOUT DD DSN=FICH.PRUEBA.SALIDA,
          //                     DISP=(,CATLG,DELETE),
          //                     SPACE=(CYL,1,1)
          //SORTWK01 DD SPACE=(CYL,(1,1),RLSE)
          //SYSOUT     DD SYSOUT=*
          //SYSIN        DD *
              OPTION STOPAFT = 100
              SORT FIELDS=COPY

O como el siguiente:

          //SORT01 EXEC PGM=SORT
          //SORTIN    DD DSN=FICH.PRUEBA.ENTRADA,DISP=SHR
          //SORTOUT DD DSN=FICH.PRUEBA.SALIDA,
          //                     DISP=(,CATLG,DELETE),
          //                     SPACE=(CYL,1,1)
          //SORTWK01 DD SPACE=(CYL,(1,1),RLSE)
          //SYSOUT     DD SYSOUT=*
          //SYSIN        DD *
              SORT FIELDS=COPY
               STOPAFT = 100

Fíjate en lo marcado en azul, ya que eso es lo que hace que se copien las 100 primeras filas.

JCL: Obtener fichero en claro mediante SORT

     Los ficheros pueden contener campos numéricos en hexadecimal. Si los editamos no veremos números sino caracteres extraños. Si quisiéramos ver el valor de dichos campos tendríamos que ejecutar el comando HEX ON. Si ese fichero con campos numéricos en hexadecimal tuviéramos que enviarlo a un usuario, y no quisiéramos que viera esos caracteres extraños, deberíamos ponerlo en claro. Ese fichero que se ha generado en claro es el que se envía puesto que los campos numéricos se ven con números y no con caracteres extraños. ¿Y cómo se pone un fichero en claro? Muy fácil. Se hace con un simple paso de SORT como el siguiente:

          //SORT01 EXEC PGM=SORT
          //SORTIN    DD DSN=FICH.PRUEBA.ENTRADA,DISP=SHR
          //SORTOUT DD DSN=FICH.PRUEBA.SALIDA,
          //                     DISP=(,CATLG,DELETE),
          //                     SPACE=(CYL,1,1)
          //SORTWK01 DD SPACE=(CYL,(1,1),RLSE)
          //SYSOUT     DD SYSOUT=*
          //SYSIN        DD *
              SORT FIELDS=COPY
              OUTREC FIELDS=(1,10,
                                         11,8,
                                         19,2,BI,M11,LENGTH=4,
                                         21,2,BI,M11,LENGTH=4,
                                         23,2,
                                         25,2,
                                         27,3,PD,M11,LENGTH=5,
                                         30,5,PD,M11,LENGTH=9,
                                         35,26,
                                         61,8)

     Lo que está marcado en rosa es para campos alfanuméricos (PIC X(-)). Como verás, todos tienen dos números: el primero indica la posición donde empieza el campo en el fichero FICH.PRUEBA.ENTRADA y el segundo indica la longitud del campo.

     Lo que está marcado en morado son campos numéricos de tipo:
          S9(4)COMP

     Lo que está marcado en azul es un campo numérico de tipo:
          S9(3)V9(2)COMP-3

     Lo que está marcado en verde oscuro es un campo numérico de tipo:
         S9(9)COMP-3

     Como observarás, al inicio de todas las filas que hacen referencia a campos numéricos empiezan con dos números: el primero indica la posición donde empieza el campo en el fichero FICH.PRUEBA.ENTRADA y el segundo indica la longitud del campo.

     Con el anterior paso de SORT, a partir de un fichero con campos numéricos en hexadecimal llamado FICH.PRUEBA.ENTRADA, generamos un fichero en claro llamado FICH.PRUEBA.SALIDA en el que los campos numéricos no se visualizan en hexadecimal sino que se representan mediante números.

Libro recomendado del mes

     Voy a comenzar a recomendar libros de informática que os puedan ser útil, ya sea en el día a día de vuestros estudios o en vuestro trabajo.

     El primer libro que os voy a recomendar es Algoritmos + Estructuras de datos = Programas de Niklaus Wirth (editorial Del Castillo). Este libro de 1986 es muy útil para todos aquellos estudiantes que estén dando sus primeros pasos en Pascal.

Master en creación de videojuegos

     Voy a adjuntar un enlace con información acerca de un master en creación de videojuegos. Lo podrás realizar de manera on-line y el certificado es expedido por Deusto Formación. El enlace mencionado es el siguiente:

http://www.deustoformacion.com/master-creacion-videojuegos.asp?c=I10653M9999

     También puedes acceder por este otro enlace:

                              www.deustoformacion.com/VideoJuegos

     Según la información indicada, tiene buena pinta el curso. Aunque Deusto Formación no es el único que oferta un master en creación de videojuegos. También puedes realizar dicho master en:

                              www.uem.es/Programacion_Videojuegos
                              www.evolisnet.com/programacion

Si eres programador, ¿acabarás de analista?

http://orientacion-laboral.infojobs.net/programador-informatico-analista

Artículo de infojobs acerca del futuro profesional de los programadores informáticos.

JCL: Introducción Sort (continuación)

     Hemos visto diferentes casos en los que se usa el paso de SORT pero aún hay más casos en los que se utiliza, como por ejemplo:

• Crear un fichero en claro
• Generar un fichero de salida que contenga las X primeras filas del fichero de entrada
• Generar un fichero de salida que no contenga las X primeras filas del fichero de entrada

     En próximas entradas iremos viendo ejemplos de cada uno de los casos indicados anteriomente.

Manuales en pdf

     He encontrado una página desde la cual te puedes descargar manuales en pdf de dreamweaver, fireworks, flash y muchos más.

     El enlace es el siguiente: http://www.manualespdf.es/