Obtenir la longueur maximale d'une ligne [Résolu]

[Jack_nicholson]

Bonjour tout le monde!!

J'ai un fichier texte que j'aimerais importer sous sas et qui contient des lignes de longueurs variables.
Est-ce que quelqu'un sait comment on fait pour obtenir la longueur de la ligne la plus grande??!!

[s_a_m]

Bonjour,
essaies ce code :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
 
DATA _null_;
	length ligne $10000;
	retain minlrecl 0
		maxlrecl 0;
	INFILE 'c:\mon_fic.txt' length=lenvar end=fin;
	input @1 ligne $varying. lenvar;
	minlrecl = min(minlrecl,length(ligne));
	maxlrecl = max(maxlrecl,length(ligne));
 
	IF fin then
		put minlrecl= maxlrecl=;
run;

[olivier.decourt]

Si je peux me permettre de simplifier légèrement le code de S A M :

Code :

1
2
3
4
5
6
7
8
9
10
11
DATA _null_;
	retain minlrecl 0
		maxlrecl 0;
	INFILE 'c:\mon_fic.txt' LRECL=10000 end=fin;
	input ;
	minlrecl = min(minlrecl,length(_infile_));
	maxlrecl = max(maxlrecl,length(_infile_));
 
	IF fin then
		put minlrecl= maxlrecl=;
run;

[Jack_nicholson]

Ok merci les gars, c'est nickel!!!