Bonjour
je crée un fichier de plusieurs lignes via un IEBGENER tout simple
Sauf que le fichier en sortie se retrouve en NUMBER ON et donc contient des informations en fin de colonne
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 //ETA0020 EXEC PGM=IEBGENER //SYSPRINT DD SYSOUT=* //SYSIN DD DUMMY //SYSUT1 DD * DSN SYSTEM(TEST) RUN PROGRAM(JDE00324) PLAN(TESTBU1) PARM('£VAL£') /* //SYSUT2 DD DSN=U01WKS.$$PS01$$.AEP.AEPHBAAZ, // DISP=(,CATLG),DSORG=PS,RECFM=FB,LRECL=80, // SPACE=(CYL,(1,1),RLSE)
Et cela m'embête grandement car j'ai ensuite un programme qui remplace le paramètre £VAL£ par un champ de 10 caractères
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 ***************************** Top of Data ****************************** -1----+----2----+----3----+----4----+----5----+----6----+----7----+----8 TEM(TEST) 00520002 GRAM(JDE00324) PLAN(TEST1BU1) PARM('£VAL£') 00530002
mais le programme croit qu'il n'y a plus de place pour décaler à droite.
Y a t-il une option sur le IEBGENER qui permettrait de créer un fichier forcé à NUMBER OFF?
Partager