Buscador cursos informática

     Os dejo un enlace de un buscador de cursos en el que podréis buscar cursos relacionados con el sector de la informática y FP. Espero que os sirva de utilidad y podáis encontrar un curso que os guste:

          http://www.cursosformacionprofesionalfp.com/

JCL: SORT - Curiosidades I

     Hay algunas cosas del SORT que es interesante conocer. Una de ellas es que las condiciones de ordenación pueden estar guardadas en un fichero. ¿Lo sabías? Pues sí, pueden estar en un fichero.

     Solemos estar acostumbrados a ver los pasos de sort con un fichero en el SORTIN, otro en el SORTOUT  y la cláusula SYSIN en donde ponemos:

                      SORT FIELDS=COPY
                      INCLUDE COND=(1,4,ZD,GT,28)

     O lo que proceda en cada caso. Pero también se puede sustituir por lo siguiente:

             //SYSIN DSN=FICHERO.CONDICIONES.SORT,DISP=SHR

     

      En dicho fichero tendríamos el SORT, INCLUDE,...

     Espero que esta entrada os haya servido para aprender una cosa nueva y que sea de utilidad si tenéis dudas de cómo hacer referencia en un paso de SORT a un fichero que contiene las condiciones de ordenación necesarias para ese paso. 

Trucos de informática y programación

     Existen diferentes páginas con trucos de informática y de programación. A continuación paso a detallar una serie de páginas que pueden serte útiles:

• Trucos de Windows (trucos del sistema operativo, de office, ...) y Trucos de Programación (Visual Basic 6 y .NET, C#, ASP .NET,  ...). Estos trucos los encontrarás en: http://www.mistrucos.net/
• Más trucos todavía para ayudarte con la informática e internet. Todos estos trucos los encontrarás en: http://www.trucostecnicos.com/
• Todos los trucos que puedas imaginar acerca de Windows los encontrarás en la siguiente página web: http://www.trucoswindows.com/

     Estas páginas las encontrarás en la sección Trucos de este mismo blog para que no tengas que acceder a esta entrada cada vez que quieras consultar cualquiera de las páginas mencionadas anteriormente. Cada vez que encuentre una página de trucos la incluiré en la sección Trucos.

Cursos TIC con inserción laboral

     Os adjunto link a la página Web de Microforum, página dedicada a cursos TIC con inserción laboral grantizada: http://www.microforum.es/

     Espero que os sea de utilidad.

¿Cómo convertir un VSAM a fichero secuencial?

     En determinados casos nos veremos en la situación de convertir un fichero VSAM en un fichero secuencial.

     Te preguntarás que cómo se hace. Es muy fácil y sencillo: mediante un simple paso de SORT lo podemos conseguir.

     Imagínate que tienes un fichero VSAM llamado FIC.VS.INFORMA

     Para pasar el mencionado fichero a uno secuencial sólo tienes que emplear un paso de SORT en el que hagas algo como lo siguiente:

          //SORT01 EXEC PGM=SORT
          //SORTIN    DD DSN=FIC.VS.INFORMA,DISP=SHR
         //SORTOUT DD DSN=FICH.VSINFORMA.SECUEN,
          //                    DISP=(,CATLG,DELETE),
          //                    SPACE=(CYL,1,1)
          //SORTWK01 DD SPACE=(CYL,(1,1),RLSE)
          //SYSOUT     DD SYSOUT=*
          //SYSIN        DD *
              SORT FIELDS=COPY

     Obsérvese que en la línea del SORTIN se ponde el fichero VSAM y en el SORTOUT se pone el fichero secuencial que se generará al ejecutarse dicho paso de SORT. El fichero secuencial se generará de acuerdo a lo indicado en el SORT FIELDS.

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.