SI PAS HExécuteRequête(REQ_patienten_medar,hRequêteDéfaut,Param4) Alors
Erreur("Erreur d'initialisation de la requête"+RC+HErreurInfo())
RETOUR
FIN
FEN_search_patienten..CurseurSouris=curFlèche
HLitPremier(REQ_patienen_medar)
SI PAS HEndehors(REQ_patienen_medar) Alors
NbEnrClient est un numérique
NbEnrClient = HNbEnr(REQ_patienten_medar)
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=20&topic_id=6297&post_id=24975