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.

No hay comentarios:

Publicar un comentario