→STRING NOM DELIMITED BY SIZE INTO NOM-COMPLET
→STRING " " DELIMITED BY SIZE INTO NOM-COMPLET WITH POINTER POS END-STRING.
→STRING PRENOM DELIMITED BY SIZE INTO NOM-COMPLET WITH POINTER POS END-STRING.
→DISPLAY "Nom complet : " NOM-COMPLET.
→UNSTRING NOM-COMPLET DELIMITED BY SPACE INTO CHAMP1, CHAMP2 END-UNSTRING.
→DISPLAY "CHAMP1 : " CHAMP1.
→DISPLAY "CHAMP2 : " CHAMP2.
→STOP RUN.
  

Cliquez sur « Suivant » pour exécuter chaque ligne et voir le résultat.

Valeurs en mémoire

Nom	Valeur
NOM	DUPONT
PRENOM	JEAN
NOM-COMPLET	-
CHAMP1	-
CHAMP2	-

📘 Ce que fait ce programme :

• 👤 Il part de deux variables contenant un nom (NOM) et un prénom (PRENOM).
• 🧵 Il utilise l’instruction STRING pour assembler ces deux chaînes en une seule variable appelée NOM-COMPLET.
• 🔍 Cette chaîne complète est ensuite affichée à l’écran avec DISPLAY.
• ✂️ Puis l’instruction UNSTRING est utilisée pour séparer à nouveau le nom et le prénom en deux nouvelles variables CHAMP1 et CHAMP2.
• 📤 Le programme affiche ensuite séparément les contenus de CHAMP1 et CHAMP2, qui devraient correspondre au nom et au prénom.

Ce programme est utile pour apprendre à manipuler des chaînes de caractères en COBOL, à les assembler ou à les découper de manière structurée.