Discussion :

[gbzmt]

Bonjour,

Je remplis et supprime plusieurs fois un fichier HF avec les mêmes données.
Je constate que la première fois les numéros d'enregistrements sont dans l'ordre croissant et la fois suivante dans le sens décroissant.
ceci est gênant dans l'utilisation de la fonction HLitcherchedernier.

Comment faire ?

Merci d'avance

[Jannus]

Il faudrait plus de précisions :

• sur ce que tu entends par "ordre"
• avec quel outil tu visualises le fichier
• les rubriques du fichier
• ton code
• etc.

plus on aura de rpécisions plus tu auras de chances d'avoir une réponse valide.

Sinon, je ne vois pas très bien le rapport entre l'ordre des enregistrements et la recherche ?

[gbzmt]

Voici mon code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
HLitPremier(TestPassages6)//efface fichier
TANTQUE PAS HEnDehors(TestPassages6)
	HSupprime(TestPassages6)
	HLitSuivant(TestPassages6)
FIN
x est un entier;h est un numérique;y est une chaîne
HLitPremier(Passages4)
ch est une chaîne
TANTQUE PAS HEnDehors(Passages4)
ch=Passages4.Passage
x=Position(ch,"$")
SI (Position(ch,RC)<>0 ET Gauche(ch,1)="0") OU Gauche(ch,1)="#" ALORS
// Fin du passage précédent	
SI Psg<>"" ALORS 
	y=Milieu(Psg,6,6)
	HLitRechercheDernier(TestPassages6,Transpondeur,Milieu(Psg,6,6))
		SI HTrouve ALORS
			h=TestPassages6.heuredéc
		FIN
TestPassages6.num=DerNum6+1;DerNum6=DerNum6+1
//Stocke le Num du passage précédent
		TestPassages6.Transpondeur=Milieu(Psg,6,6)
//Stocke le Transpondeur(hexa) du passage précédent
		TestPassages6.HeureHexa=Milieu(Psg,12,8)
 
		TestPassages6.Heuredéc=HexaVersEntier(Milieu(Psg,12,8))
	SI h<>0 ALORS
		TestPassages6.temps=HexaVersEntier(Milieu(Psg,12,8))-h
	SINON
		TestPassages6.temps=0
	FIN 
HAjoute(TestPassages6)
Psg=""
	FIN
	SI x<>0 ALORS 
//Nouveau passage
		Psg=Droite(ch,Taille(ch)-x+1)
	FIN
SINON
	Psg=Psg+ch
FIN
HLitSuivant(Passages4)
FIN

On lit le fichier la rubrique "Passage" du fichier "Passages4" , après sélection selon les conditions de Si(Position......), on concaténe plusieurs enregistrement de passage pour les inscrire dans le fichier "Testpassages6" dans les rubriques "Transpondeur" et "heureHexa"
La rubrique "HeureDéc" est renseignée par la fonction "HexaVersEntier"
La rubrique "num" est une numérotation automatique des enregistrements (c'est la seule clé du fichier "Testpassages6")
Avant de saisir ces informations dans le fichier, je lis le dernier enregistrement correspondant au "Transpondeur" contenu dans ces informations.
HlitRechercheDernier ne lit pas toujour le dernier entregistrement correspondant au tranpondeur en question.

Je continue mon explication:
En visualisant le fichier avec WDMap, j'ai constaté que les résultats de la recherche sont corrects lorsque les numéros d'enregistrement sont classés dans l'ordre croissant et faux lorsque les numéros d'enregistrements sont classé dans l'ordre décroissant (dans ce cas la fonction HLirRchercheDernier ne se positionne pas toujours dans le dernier enregistrement correspondant au critère du transpondeur) et dons la soustraction de l'heure précédente à l'heure actuelle est inexacte)

Merci pour votre patience

[mat__]

...
HLitRechercheDernier(TestPassages6,Transpondeur,Milieu(Psg,6,6))

...

La rubrique "num" est une numérotation automatique des enregistrements (c'est la seule clé du fichier "Testpassages6")
...
HlitRechercheDernier ne lit pas toujour le dernier entregistrement correspondant au tranpondeur en question.
...

Bonjour,

Si Transpondeur n'est pas une rubrique clé ce comportement n'est pas surprenant car HLitRechercheDernier utilise l'index. S'il n'en a pas, c'est une lecture séquencielle.

Salutations
Mat