Discussion :

[Exosh]

Bonjour,

Je souhaite créer un fichier à partir d'un autre, tout en le retaillant automatiquement.

Exemple de code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 //SORTIN DD DISP=SHR,DSN=FIC1
 //SORTOUT DD DSN=FIC2,
 //        DISP=(NEW,CATLG), 
 //        STOPAFT=50,
 //        LIKE=FIC1
 //SYSIN    DD *
   SORT FIELDS=COPY

FIC2 récupère les 50 premiers enregistrements de FIC1, mais a la même taille.

Il existe le paramètre SPACE=(CYL,(100,1),RLSE) qui permet de retailler un fichier. Ca fonctionne, mais je suis obligé de renseigner les premières valeurs (CYL, 1 et 100). Si je fais un LIKE, c'est justement pour éviter d'avoir à récupérer manuellement des données.

Existe-t-il un moyen de récupérer CYL, 1 et 100, à partir de FIC1, dans un symbol ?

Sinon, comment retailler le fichier dans ce cas ?

Merci.

[Luc Orient]

Tu écris !

Je souhaite créer un fichier à partir d'un autre, tout en le retaillant automatiquement.

puis :

FIC2 récupère les 50 premiers enregistrements de FIC1, mais a la même taille.

Mais n'est ce pas un peu contradictoire ?


Voici ce que dit la doc pour la paramètre LIKE :

Unless you explicitly code the SPACE parameter for the new data set, the system
determines the space to be allocated for the new data set by adding up the space
allocated in the first three extents of the model data set. Therefore, the space
allocated for the new data set will generally not match the space that was
specified for the model data set. Note that regardless of the units in which the
model data set was allocated, the new data set will be allocated in tracks. This
assumes that space was not specified on the JCL and is being picked up from
the model data set.

[Exosh]

Je veux que la taille du fichier change pour s'adapter au contenu (histoire du RLSE) tout en gardant les autres caractéristiques du fichier de base (fixe, indexé, cyl...). Le seul moyen d'y arriver, à ma connaissance, c'est d'utiliser SPACE. Le problème, c'est qu'il faut renseigner à la main certaines caractéristiques du fichier d'origine, ce que je voudrais éviter.