input cards boucle incrémenter [Résolu]

[docteurdorian]

Bonjour le code suivant ne marche pas mais je ne trouve pas le bug.

Code :

1
2
3
4
5
6
7
8
9
10
11
%macro fu;
DATA rr ;
INPUT OPCINT $ NUM MT;
CARDS ;
%do i=1 %TO 5;
AMJ08 &i 0
;
%end;
RUN;
%mend fu;
%fu;

en gros je veux le resultat suivant

Code :

1
2
3
4
5
6
 
AMJ08 1 0
AMJ08 2 0
AMJ08 3 0
AMJ08 4 0
AMJ08 5 0

j'obtiens le message d'erreur suivant :

Code :

1
2
3
ERROR: The macro FU generated CARDS (DATA LINES) FOR the DATA step, which could 
       cause incorrect results.  The DATA step AND the macro will stop 
       executing.

merci !

[bab22]

Bonjour,

Tu trouveras la réponse à ton problème dans le message suivant.

http://www.developpez.net/forums/d61...acro-sous-mvs/

[docteurdorian]

ok merci beaucoup isabelle.

voici le bon code :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
%macro rr2;
DATA liste2bis ;
ATTRIB opcint
FORMAT = $6.;
ATTRIB numm
FORMAT = $2.;
%do i=1 %TO 5;
opcint = "AMJ08";
numm = &i;
output;
%end;
RUN;
%mend;
%rr2;

[Manoutz]

de toute facon tu n'as pas besoin du language macro dans ton cas(ni du cards d'ailleurs):

Code :

1
2
3
4
5
6
7
8
DATA RR;
format opcint $8. num mt best12.;
do num=1 TO 5;
opcint="amj08";
mt=0;
output;
end;
run;

[docteurdorian]

oui en effet.

j'ai voulu faire trop compliqué.

merci