bonjour,
j'ai un fichier en sortie (variable) :
j'alimente directement fichier en sortie (programme) :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 01 W-ZONE. 05 ZONE-1 PIC X(01). 05 FILLER PIC X(01) value '|'. 05 ZONE-2 PIC X(20). 05 FILLER PIC X(01) value '|'. 05 ZONE-3 PIC X(05). 05 FILLER PIC X(01) value '|'. 05 ZONE-4 PIC X(20). 05 FILLER PIC X(01) value '|'.
MOVE 'A' TO ZONE-1.
MOVE 'AZERT' TO ZONE-2.
MOVE '12345' TO ZONE-3.
MOVE 'TIT' TO ZONE-4.
Résultat j'ai :
Code : Sélectionner tout - Visualiser dans une fenêtre à part A|AZERT |12345|TIT |
comment faire pour supprimer l'espace a droit de fichier en sortie ? soit par JCL ou cobol
Résultat attendu :
Code : Sélectionner tout - Visualiser dans une fenêtre à part A|AZERT|12345|TIT|
merci d'avance
Partager