Mostrando entradas con la etiqueta VSAM. Mostrar todas las entradas
Mostrando entradas con la etiqueta VSAM. Mostrar todas las entradas

lunes, 15 de abril de 2013

Cobol: Lista de FILE STATUS (para VSAM)

Hemos visto los posibles FILE STATUS que puede devolver un fichero secuencial cuando éste es manejado en un programa cobol. Pero, ¿qué sucede con los VSAM o ficheros indexados?

Aquí os dejo un listado de FILE STATUS para VSAM: FILE STATUS (para VSAM)

Este listado es el más completo que he encontrado porque en este listado existen algunos códigos, como el 19, que no son contemplados en otros listados que he encontrado en otras páginas.

viernes, 1 de marzo de 2013

Cobol: manejo de ficheros VSAM

     He encontrado unos apuntes realmente interesantes acerca del manejo de ficheros VSAM y de longitud variable. El enlace de dichos apuntes es el siguiente: http://es.scribd.com/doc/36278564/CODIFICACION-COBOL-VSAM

     Son unos apuntes muy útiles en caso de tener que manejar ese tipo de ficheros en un programa cobol.

     Desde aquí quiero agradecer al autor de dichos apuntes, taurus22, por compartirlos.

miércoles, 11 de julio de 2012

¿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.