Interprétation macro variable date [Résolu]

[ash_rmy]

Bonjour tout le monde,

j'ai crée une macro variable date en globale.

Code :

%global DTINV1;

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
 DATA _NULL_;
  IF &MM = 1 THEN DO;
  JJ = 31; MM = 12;
  AA = &AA - 1;
  DTINV1 = MDY(MM,JJ,AA);
  CALL SYMPUT('DTINV1',DTINV1);
  PUT DTINV1 DDMMYYS10.;
  END;
  ELSE DO;
   MM = &MM - 1; AA = &AA;
   IF MM = 3 THEN JJ = 31; ELSE JJ = 30;
   IF MM = 1 THEN AA = AA - 1; DTINV1 = MDY(MM,JJ,AA);
   CALL SYMPUT('DTINV1',DTINV1);
   PUT DTINV1 DDMMYYS10.;
   END;
RUN;

Code :

%put &DTINV1;

le problème est qu'ensuite je dois utiliser cette macro variable dans d'autres programmes et là ça ne marche pas - je ne sais pas pourquoi...

Code :

1
2
3
4
DATA _null_;
  format dat = &DTINV1 ddmmyys10.;
  put dat =;
run;

Code :

1
2
3
4
5
6
7
DATA EXTRA (WHERE = (HISTO = '1'));
  SET SAN.AXNEWC 
(
KEEP = NUMCNT AGENTS DTEMIAN DTEMIRES CLGENC1 CLGENC2 HISTO REGIONA 
WHERE = ((DTEMIAN < "&DTINV1") AND (REGIONA = 67))
);
RUN;

merci de votre aide.

ash_rmy.

[fafabzh6]

Bonjour,
Qu'est ce que t'affiche:

Code :

%put &DTINV1;

Juste une remarque : les macro-variables ne peuvent prendre qu'une seule valeur ... dans ton code j'ai l'impression que tu affectes une variable à ta macro ... est-ce normal?

[ash_rmy]

salut,

dans ma log DTINV1 = 17805.

merci.

[fafabzh6]

Bonjour,
Ton erreur apparaît à quel endroit?

[ash_rmy]

l'erreur apparait à l'éxécution du code :

Code :

1
2
3
4
DATA _null_;
  format dat = &DTINV1 ddmmyys10.;
  put dat =;
run;

et du code :

Code :

1
2
3
4
5
6
7
DATA EXTRA (WHERE = (HISTO = '1'));
  SET SAN.AXNEWC 
(
KEEP = NUMCNT AGENTS DTEMIAN DTEMIRES CLGENC1 CLGENC2 HISTO REGIONA 
WHERE = ((DTEMIAN < "&DTINV1") AND (REGIONA = 67))
);
RUN;

[bahraoui]

Code :

1
2
3
4
DATA _null_;
  format dat = &DTINV1 ddmmyys10.;
  put dat =;
run;

ce code est faux syntaxiquement.
la macro variable prend la bonne valeur.

pour vérifier le contenu de ta macro variable utilise le %put

ou

Code :

1
2
3
4
5
 
DATA _t_;
  format dat ddmmyys10.;
   dat =&DTINV1;
run;

[ash_rmy]

merci ça marche !

[green_fr]

Envoyé par ash_rmy

skip...

Code :

Comme tu as dis, DTINV1 = 17805. I.e. tu exécute le code suivant :

Code :

1
2
3
4
5
6
7
DATA EXTRA (WHERE = (HISTO = '1'));
  SET SAN.AXNEWC 
(
KEEP = NUMCNT AGENTS DTEMIAN DTEMIRES CLGENC1 CLGENC2 HISTO REGIONA 
WHERE = ((DTEMIAN < "17805") AND (REGIONA = 67))
);
RUN;

Tu vois le problème ?