Discussion :

[Deciprog]

Bonjour,

Je souhaiterai exécuter une macro lorsque une valeur de certains champs de ma table sont vides.
Je récupère le numéro de ligne + le nom du champ dont la valeur est vide.

J'ai écris le code suivant mais je n'arrive pas à récupérer correctement le numéro de ligne + le nom du champ puis exécuter la macro "verification" :

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
DATA table;
INPUT
champ1 	
champ2 	$
;
CARDS;
1 a
2 .
3 c
;
RUN;
 
%MACRO programme();
DATA _NULL_;
	SET table;
	IF champ1 = ' ' THEN %STR(%verification(_N_ , champ1)(_N_));
	IF champ2 = ' ' THEN CALL EXECUTE(%verification(_N_ , champ2)(_N_));
RUN;
%MEND;
 
%MACRO verification(ligne , champ);
	%PUT Champ &champ vide pour la donnée &donne à la ligne &ligne;
%MEND;
 
%programme();

Merci pour l'aide

[HS_2010]

c'est pas beau mais je pense que ça marche...
DATA TABLE;
INPUT
champ1
champ2 $
;
CARDS;
1 a
2 .
. c
4 .
5 b
6 .
7 m
;
RUN;
option nonotes;

%MACRO programme(quelchamp);
data _null_;
if 0 then set table nobs=nombre;
call symput('nombreobs',left(put(nombre,8.)));
stop;
run;
%do i=1 %to &nombreobs.;
%let maisoudonc=0;
DATA _null_;
SET TABLE;
if _n_=&i.;
IF &quelchamp. = "" THEN call symput("maisoudonc",_n_);
RUN;
%if &maisoudonc.>0 %then %do;
%PUT Champ &quelchamp. vide à la ligne &maisoudonc.;
%end;
%end;
%MEND;

%programme(champ1);
%programme(champ2);

[Deciprog]

Bonjour,

Parfait ! ce code répond parfaitement à ma question.

Merci beaucoup