SI ElementRequete=Vrai ALORS
SI cCondition<>"" ALORS cCondition+= " AND "
cCondition+="T_MANIF.id_manif=T_COMMUNE.code_insee_commune AND T_MANIF.id_resp_manif=T_RESPONSABLE.raison_social_resp"
SI PAS HExécuteRequêteSQL (ReqRechercheManif,cCondition) ALORS
Erreur ( "Erreur d' initialisation de la requête" + RC + HErreurInfo ())
FIN
Info(cCondition)
RETOUR
// lecture du premier enregistrement de la requête
HLitPremier (ReqRechercheManif)
TANTQUE PAS HEnDehors ()
TableAjouteLigne(TableManif,ReqRechercheManif.code_postal,ReqRechercheManif.ville,ReqRechercheManif.raison_social,ReqRechercheManif.jour_debut,ReqRechercheManif.jour_fin,ReqRechercheManif.tel_resp,ReqRechercheManif.tel_commune,ReqRechercheManif.type_exposant,ReqRechercheManif.date_ante)
HLitSuivant (ReqRechercheManif )
FIN
HAnnuleDéclaration(ReqRechercheManif)
ElementRequete=Faux
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=14&topic_id=3030&post_id=12840