Discussion :

[CélineM]

Bonjour, j'ai un petit soucis avec la synthaxe lorsqu'il faut combiner plusieurs si. Voici mon code et il me retourne une erreur du type :PAS DE CLAUSE IF-THEN ASSORTIE Cette erreur se trouve au niveau de la ligne en gras.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
data fichier_global_ter;
set fichier_global_bis;
IF evolution_aff_pap*prec_evol_aff_pap<0 then do ; 
	diff_aff=evolution_aff_pap-prec_evol_aff_pap;
	if diff_aff>diff then note_aff=0;else note_aff=1;
	else IF evolution_aff_pap*prec_evol_aff_pap>0 then do;
	if evolution_aff_pap>0 then do;			p_aff=((somme_aff_region*evolution_aff_region)+(somme_aff_pap*evolution_aff_pap))/(somme_aff_region+somme_aff_pap);
			z_aff=abs(evolution_aff_region-evolution_aff_pap);
			r_aff=sqrt(p_aff*(1-p_aff)*((1/somme_aff_region)+(1/somme_aff_pap)));
			res_aff=z_aff/r_aff;
			if res_aff<1.644 then note_aff=1;
			else note_aff=0;
			if note_aff=0 then if evolution_aff_pap>evolution_aff_region then note_aff=2;else note_aff=0;
	end;
	else do evolution_aff_pap=evolution_aff_pap*-1 ;
		 	prec_evol_aff_pap=prec_evol_aff_pap*-1;
			p_aff=((somme_aff_region*evolution_aff_region)+(somme_aff_pap*evolution_aff_pap))/(somme_aff_region+somme_aff_pap);
			z_aff=abs(evolution_aff_region-evolution_aff_pap);
			r_aff=sqrt(p_aff*(1-p_aff)*((1/somme_aff_region)+(1/somme_aff_pap)));
			res_aff=z_aff/r_aff;
			if res_aff<1.644 then note_aff=1;
			else note_aff=0;
			if note_aff=0 then if evolution_aff_pap>evolution_aff_region then note_aff=2;else note_aff=0;
	end;
end;
end;
run;

J'éspère que quelqu'un peux m'aider car j'ai vraiment besoin de cette requête.
Merci d'avance

[steelspirit]

Mais quel usine à gaz ce code !!!!!!!
Pourquoi faire simple quand on peut faire compliqué

Par pitié, respecte les espacements !!!!!!

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
 
data fichier_global_ter;
	set fichier_global_bis;
	IF evolution_aff_pap*prec_evol_aff_pap<0 then do ; 
		diff_aff=evolution_aff_pap-prec_evol_aff_pap;
		if diff_aff>diff then note_aff=0;else note_aff=1;
		else IF evolution_aff_pap*prec_evol_aff_pap>0 then do;
			if evolution_aff_pap>0 then do;			
				p_aff=((somme_aff_region*evolution_aff_region)+(somme_aff_pap*evolution_aff_pap))/(somme_aff_region+somme_aff_pap);
				z_aff=abs(evolution_aff_region-evolution_aff_pap);
				r_aff=sqrt(p_aff*(1-p_aff)*((1/somme_aff_region)+(1/somme_aff_pap)));
				res_aff=z_aff/r_aff;
				if res_aff<1.644 then note_aff=1;
				else note_aff=0;
				if note_aff=0 then do;
					if evolution_aff_pap>evolution_aff_region then note_aff=2;
					else note_aff=0;
				end;
			end;
		end;
		else do evolution_aff_pap=evolution_aff_pap*-1 ;
		 	prec_evol_aff_pap=prec_evol_aff_pap*-1;
			p_aff=((somme_aff_region*evolution_aff_region)+(somme_aff_pap*evolution_aff_pap))/(somme_aff_region+somme_aff_pap);
			z_aff=abs(evolution_aff_region-evolution_aff_pap);
			r_aff=sqrt(p_aff*(1-p_aff)*((1/somme_aff_region)+(1/somme_aff_pap)));
			res_aff=z_aff/r_aff;
			if res_aff<1.644 then note_aff=1;
			else note_aff=0;
			if note_aff=0 then do;
				if evolution_aff_pap>evolution_aff_region then note_aff=2;else note_aff=0;
			end;
		end;
	end;
run;

Petite astuce : tu dois avoir autant de DO que de END
Sinon on écrit pas IF condition then IF condition mais
If condition then do;
if condition ...
end;