FUNCTION slec,name,debut,fin, nomexp, PARENT = parent, BOITE=boite, _EXTRA = ex
@common
;------------------------------------------------------------ 
   case n_params() of
      1:tab = nlec(name, PARENT = parent, BOITE=boite, _EXTRA = ex)
      2:tab = nlec(name,debut, PARENT = parent, BOITE=boite, _EXTRA = ex)
      3:tab = nlec(name,debut,fin, PARENT = parent, BOITE=boite, _EXTRA = ex)
      4:tab = nlec(name,debut,fin, nomexp, PARENT = parent, BOITE=boite, _EXTRA = ex)
   endcase
;
   return, {tab:tab, grille:vargrid, unite:varunit, experience:varexp, nom:varname}
end