Bonjour

J'ai une chaine de caractère composée par plusieurs parties séparées par un "-"
Je veux éclater cette chaine en plusieur colonne,et ça marche avec le array :code ci-dessous:

le sep_colll :me calcule le nombre de "-"

ex:
colonneA
droit-gauche-haut-bas

ça donne;

col1 col2 col3 col4 col5
droit gauche haut bas

je veux aussi qu'il flag chaque newvar en 1 et si il n'ya pas de valeur dans col il le flag à 0 .
résultat souhaité:
col1 newvar1 col2 newvar2 col3 newvar3 col4 newvar4 col5 newvar5
droit 1 gauche 1 haut 1 bas 1 . 0


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
data Q2 ;
set Q1;
 
array v_p(*) $50. col1-col%cmpres(%eval(&sep_colll+1));
 
do j=1 to (%eval(&sep_colll+1));
v_p(j)= scan (col,j);
	;
end;
output ;
Merci pour votre aide