txtCle est une chaîne
// Lecture de la DataQueue
txtCle=HConstruitValClé(
HLitRecherche(DTAQ_KEY, DTAQ_KEY, txtCle)
// Affichage du résultat
SI H.EnDehors = Vrai ALORS
Info("DataQueue vide !")
SINON
// Affichage...
DATA = DT.DATA
FIN