Filtre dynamique sous MUIBase

• 

  Polymere

  15 mai 2009 à 13h26 #7322

  Boujour,

  Je me suis remis à MUIBase après plusieurs années de pause en utilisant AmigaBase.

  Maintenant je suis bloqué au niveau des filtres dynamique.

  J’ai une Table avec un champ qui fait référence à une autre table avec plusieurs champs.

  Ce filtre manuel dans la Table marche:

  (LIKE Reference.Champ « *mot* »)

  J’ai essaye ceci dans la programmation d’un bouton:

  (DEFVAR variable « *mot* »)

  (SETFILTERSTR Table « (LIKE Reference.Champ variable) »)

  Mais cela échoue.

  Quelqu’un a un exemple complexe de filtrage dynamique ?

  Merci d’avance.

  

  Alex

  15 mai 2009 à 17h38 #115129

  Salut Poly,

  bon alors je me suis renseigné sur la ML de MUIbase pour avoir des exemples d’experts.

  Tout d’abord DEFVAR doit être utilisé que dans des programmes de projet et même là doit être placé au début du programme.

  Pascal Marcellin qui utilise de manière intensive MUIbase préconise lui d’utiliser la forme :

  (SETFILTERSTR Table

  (SPRINTF "LIKE %s.%s "%s""

  (ATTRNAME Table.Reference)

  (ATTRNAME ReferencedTable.Champ)

  "*mot*"

  )

  )

  Un exemple concret (et complexe) qu’il utilise dans un de ces projets :

  (SETFILTERSTR Utilisateurs

  (SPRINTF "(OR (GETADMINMODE) %s.%s.%s

  (LET ((projets (REST (SELECT %s FROM %s WHERE (= %s ::%s.%s)))))

  (FOR ALL %s WHERE (AND (= %s %s) (in (LIST %s) projets)) DO (EXIT TRUE))))"

  (TABLENAME Connexion)

  (ATTRNAME Connexion.Utilisateur)

  (ATTRNAME Connexion.Utilisateur.Responsable)

  (ATTRNAME Affaires.Projet)

  (TABLENAME Affaires)

  (ATTRNAME Affaires.Utilisateur)

  (TABLENAME Connexion)

  (ATTRNAME Connexion.Utilisateur)

  (TABLENAME Affaires)

  (ATTRNAME Affaires.Utilisateur)

  (TABLENAME Utilisateurs)

  (ATTRNAME Affaires.Projet)

  )

  )

  Voilà sinon pour la suite la liste MUIbase est ton amie, surtout quand on est polyglot

  

  Polymere

  15 mai 2009 à 19h37 #115130

  Salut Alex,

  Merci pour ta réponse rapide.

  Je me suis inscrit sur la ML MUIBase.

  Je n’ai pas encore réussis mais ca progresse.

  A+