let rec _Traitement_Sauvegarde liste_var =
  match liste_var with
    [] -> ""
  | (id, _)::liste_restante -> 
      "\t\tthis.EX."
      ^id^" = this."
      ^id^";\n"
      ^_Traitement_Sauvegarde liste_restante