Inverser l'ordre du Nom Prénom

Bonjour,

Sauriez vous comment inverser l'ordre du Nom Prénom en programmation SAS?

Ex :

GERARD TANGUY => TANGUY GERARD

Merci pour votre aide !

Cordialement,

Bonjour,

NB : Votre problème nécessite que les prénoms et les noms composés soient enregistrés comme tel, ce que vous pouvez vérifier en comptant le nombre de mots.

Code:

1
2
3
4
5
6
7
data test;
  input prenom_nom $20.;
  cards;
JEAN-MICHEL TANGUY
JEAN MICHEL TANGUY
;
run;

Code:

1
2
3
4
5
6
7
8
9
data test;
  set test;
  countw=countw(prenom_nom, " ");
  if countw=2 then do;
    prenom=scan(prenom_nom, 1, " ");
    nom=scan(prenom_nom, 2, " ");
    nom_prenom=catx(" ", nom, prenom);
  end;
run;

Code:

1
2
3
     prenom_nom        countw      prenom        nom          nom_prenom
 JEAN-MICHEL TANGUY       2      JEAN-MICHEL    TANGUY    TANGUY JEAN-MICHEL
 JEAN MICHEL TANGUY       3

Cordialement,

Bonjour,
Une deuxième solution envisageable :

Code:

1
2
3
4
5
6
7
8
9
data nom_prenom ;
input Prenom_Nom $20. ;
LN=length(scan(Prenom_Nom, -1,' ')) ;
LPN=length(Prenom_Nom) ;
Nom_Prenom=catx(' ', scan(Prenom_Nom, -1,' '), substr(Prenom_Nom, 1, LPN-LN)) ; 
cards ;
JEAN-MICHEL TANGY
JEAN MICHEL TANGY
; run ;

Cordialement Ward

Inverser l'ordre du Nom Prénom

NB : L'alternative gère l'absence de trait d'union dans le prénom mais pas dans le nom.

Code:

1
2
3
4
5
       Prenom_Nom           LN    LPN           Nom_Prenom
JEAN-MICHEL DUPONT-TANGY    12     24    DUPONT-TANGY JEAN-MICHEL
JEAN MICHEL DUPONT-TANGY    12     24    DUPONT-TANGY JEAN MICHEL
JEAN-MICHEL DUPONT TANGY     5     24    TANGY JEAN-MICHEL DUPONT
JEAN MICHEL DUPONT TANGY     5     24    TANGY JEAN MICHEL DUPONT

Cordialement,

Merci pour votre aide !
Citation:
Envoyé par hossward
Bonjour,
Une deuxième solution envisageable :
Code:

1 2 3 4 5 6 7 8 9 data nom_prenom ; input Prenom_Nom $20. ; LN=length(scan(Prenom_Nom, -1,' ')) ; LPN=length(Prenom_Nom) ; Nom_Prenom=catx(' ', scan(Prenom_Nom, -1,' '), substr(Prenom_Nom, 1, LPN-LN)) ; cards ; JEAN-MICHEL TANGY JEAN MICHEL TANGY ; run ;
Cordialement Ward

Merci, votre solution marche très bien !
Citation:
Envoyé par mgdondon
Bonjour,

NB : Votre problème nécessite que les prénoms et les noms composés soient enregistrés comme tel, ce que vous pouvez vérifier en comptant le nombre de mots.
Code:

1 2 3 4 5 6 7 data test; input prenom_nom $20.; cards; JEAN-MICHEL TANGUY JEAN MICHEL TANGUY ; run;
Code:

1 2 3 4 5 6 7 8 9 data test; set test; countw=countw(prenom_nom, " "); if countw=2 then do; prenom=scan(prenom_nom, 1, " "); nom=scan(prenom_nom, 2, " "); nom_prenom=catx(" ", nom, prenom); end; run;
Code:

1 2 3 prenom_nom countw prenom nom nom_prenom JEAN-MICHEL TANGUY 2 JEAN-MICHEL TANGUY TANGUY JEAN-MICHEL JEAN MICHEL TANGUY 3
Cordialement,