Foro de Cobol
Registrate en el Foro de Cobol y Aporta tus experiencias y conocimientos sobre este lenguaje de programacion, con tu ayuda el foro crecera y todos nos podremos beneficiar de los conocimientos de los demas.

Gracias por entrar a COBOLEROS.ES
Síguenos en Twitter

3.5.- PARÁMETRO VOLUME

Ver el tema anterior Ver el tema siguiente Ir abajo

3.5.- PARÁMETRO VOLUME

Mensaje por Coboler@ el Miér Mayo 18, 2011 3:45 am

En esta cláusula VOL=SER=xxxx se indica el volumen en el que va a crearse el fichero.

Si se quiere especificar algún volumen ya previamente referenciado se utiliza la cláusula VOL=REF.

//ddname DD VOLUME=REF=dsname
//ddname DD VOLUME=REF=*.ddname
//ddname DD VOLUME=REF=*.paso.ddname
//ddname DD VOLUME=REF=*.paso.procedimiento.ddname
//ddname DD VOLUME=REF=*.procedimiento.ddname


EJEMPLOS:

//TEST JOB 5675,’DEPT. 25’
//STEP1 EXEC PGM=A1
//D1 DD DSNAME=A01DD,DISP=(,PASS),UNIT=3330,
// SPACE=(TRK,1),VOLUME=SER=333001
//STEP2 EXEC PGM=A2
//D2 DD DSNAME=LIB1,DISP=OLD,UNIT=3340,
// VOLUME=(PRIVATE,SER=123456)
//D3 DD DSNAME=ABC,DISP=(OLD,KEEP),UNIT=AFF=D2,
// VOLUME=SER=777777
//D4 DD DSNAME=TAPE,DISP=OLD,UNIT=(3340-5,P,DEFER),
// VOLUME=SER=(342001,342002,342003,342004,342005)
//D5 DD DSNAME=DISK,DISP=(SHR,KEEP),UNIT=(,P),
// VOLUME=SER=(333005,333008,333010)
//D6 DD UNIT=3340,VOLUME=REF=*.D2,SPACE=(TRK,(5,2))
//D7 DD UNIT=3340,VOLUME=REF=DISK,SPACE=(TRK,(10,5))

Así:

- D1 define un nuevo fichero llamado A01DD que va a ser creado en el volumen 333001 en un disco 3330.
- D2 define un fichero que ya existe que reside en un volumen privado 123456. El volumen está montado en un disco 3340.
- D3 define un fichero que ya existe llamado ABC. Este fichero se guardará después de que el paso termine. ABC está en el volumen 777777. El volumen va a ser montado en el mismo recurso usado por D2.
- D4 define un fichero ya existente llamado TAPE. El fichero está en 5 volúmenes identificados en el parámetro VOLUME. El subparámetro DEFER indica que esos volúmenes se montarán sólo después de que el fichero sea abierto. El subparámetro P pide montajes paralelos, es decir, los 5 volúmenes van a ser montados en el mismo momento en 5 distintas unidades de cinta 3420-5.
- D5 define un fichero que ya existe, llamado DISK. Este fichero puede ser compartido con otro JOB, el programa sólo lo lee. El fichero se va a guardar después de este paso. El sistema determina el número de recursos a alocar desde el numero de volúmenes pedidos, en este caso tres.
- D6 es un fichero temporal, como indica la omisión del parámetro DSNAME. El sistema asume disposición NEW,DELETE. El sistema colocará el fichero en el volumen usado para D2 en el paso STEP2, es decir, en el volumen 123456.
- D7 es otro fichero temporal. Hace referencia a la información del volumen del fichero DISK, definido en el paso STEP2 en la ficha D5. El sistema colocará el fichero en 3 volúmenes 333005, 333008 y 333010.
avatar
Coboler@
Admin

Mensajes : 215
Reputación : 19
Fecha de inscripción : 02/02/2011
Edad : 37
Localización : Madrid

Ver perfil de usuario http://www.coboleros.es

Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba

- Temas similares

 
Permisos de este foro:
No puedes responder a temas en este foro.