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