Suppression des blancs avec COBOL
Fermé
benidrar
-
25 janv. 2005 à 08:42
blux Messages postés 26001 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 24 avril 2024 - 5 mai 2008 à 09:30
blux Messages postés 26001 Date d'inscription dimanche 26 août 2001 Statut Modérateur Dernière intervention 24 avril 2024 - 5 mai 2008 à 09:30
A voir également:
- Suppression des blancs avec COBOL
- Forcer suppression fichier - Guide
- Suppression page word - Guide
- Suppression compte instagram - Guide
- Suppression des cookies - Guide
- Suppression compte facebook - Guide
7 réponses
blux
Messages postés
26001
Date d'inscription
dimanche 26 août 2001
Statut
Modérateur
Dernière intervention
24 avril 2024
3 289
25 janv. 2005 à 10:26
25 janv. 2005 à 10:26
Salut,
UNSTRING ... DELIMITED BY ALL SPACES INTO ...
Ca devrait le faire...
A+ Blux
UNSTRING ... DELIMITED BY ALL SPACES INTO ...
Ca devrait le faire...
A+ Blux
"Les cons, ça ose tout. C'est même à ça qu'on les reconnait"
Merci, j'ai essayé
mais apparemment cela ne fonctionne pas!
Il y a toujours les blancs
de je veux éliminer uniquement les blancs à droite
par exemple:
'DE SEVRES '
ne pas supprimer l'espace entre 'de' et 'sevres'
A plus
mais apparemment cela ne fonctionne pas!
Il y a toujours les blancs
de je veux éliminer uniquement les blancs à droite
par exemple:
'DE SEVRES '
ne pas supprimer l'espace entre 'de' et 'sevres'
A plus
blux
Messages postés
26001
Date d'inscription
dimanche 26 août 2001
Statut
Modérateur
Dernière intervention
24 avril 2024
3 289
26 janv. 2005 à 10:02
26 janv. 2005 à 10:02
Ok, donc dans ce cas, la seule solution est de redéfinir ta zone de saisie en tableau :
05 toto occurs 200.
10 str pic x.
move tavariable to toto.
Et ensuite tu fais une boucle qui décrémente i de 200 à 1 et tu testes x(i) jusqu'à ce que x(i) soit différent d'espace. Dès que ta condition est vraie tu recopies la suite dans une autre variable (avec 'string').
05 toto occurs 200.
10 str pic x.
move tavariable to toto.
Et ensuite tu fais une boucle qui décrémente i de 200 à 1 et tu testes x(i) jusqu'à ce que x(i) soit différent d'espace. Dès que ta condition est vraie tu recopies la suite dans une autre variable (avec 'string').
Bonjour
Si à priori, tu ne sais pas ou mettre les blancs, ça parait difficile!!
'DE SEVRES " Comment savoir qu'il faut laisser le blanc entre DE et
SEVRES ???
Une fois déterminé ce problème, le reste est résolu...
KAIDI
Si à priori, tu ne sais pas ou mettre les blancs, ça parait difficile!!
'DE SEVRES " Comment savoir qu'il faut laisser le blanc entre DE et
SEVRES ???
Une fois déterminé ce problème, le reste est résolu...
KAIDI
blux
Messages postés
26001
Date d'inscription
dimanche 26 août 2001
Statut
Modérateur
Dernière intervention
24 avril 2024
3 289
26 janv. 2005 à 13:38
26 janv. 2005 à 13:38
Euh ben si, il a dit 'supprimer les blancs à droite'... ;-)
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
dois-tu supprimer tous les blancs ou pas?
'DE SEVRES" doit-il devenir "DESEVRES" ?
'DE SEVRES" doit-il devenir "DESEVRES" ?
blux
Messages postés
26001
Date d'inscription
dimanche 26 août 2001
Statut
Modérateur
Dernière intervention
24 avril 2024
3 289
26 janv. 2005 à 14:14
26 janv. 2005 à 14:14
Non, il ne veut que supprimer les blancs à droite...
il ne peut le faire que s'il connait par avance les mots (ou les longueurs) dont il doit supprimer les blancs!!
Bonjour,
je vous remercie tous pour votre aide très précieuse!
je vous remercie tous pour votre aide très précieuse!
claudius51
Messages postés
1
Date d'inscription
vendredi 2 mai 2008
Statut
Membre
Dernière intervention
2 mai 2008
2 mai 2008 à 11:48
2 mai 2008 à 11:48
bonjour
il faut je pense utiliser un occurs et tester la valeur caracteres par caracteres
mais ne pas faire la sup si val (I) = spaces et val (i + 1) not = spaces
cordialement
il faut je pense utiliser un occurs et tester la valeur caracteres par caracteres
mais ne pas faire la sup si val (I) = spaces et val (i + 1) not = spaces
cordialement
blux
Messages postés
26001
Date d'inscription
dimanche 26 août 2001
Statut
Modérateur
Dernière intervention
24 avril 2024
3 289
>
claudius51
Messages postés
1
Date d'inscription
vendredi 2 mai 2008
Statut
Membre
Dernière intervention
2 mai 2008
5 mai 2008 à 09:30
5 mai 2008 à 09:30
Ca fait 3 ans que le problème est résolu...
