WDForge.org - Forums

Re: Insertion de ligne dans une table fichier

Sujet: Re: Insertion de ligne dans une table fichier
par drcharly93 sur 12/11/2004 21:44:00

Bonjour Fred,

Je n'ai même pas lu ton post jusqu'à la fin tellement le début me parraît absurde comme procédé.

Bien que je comprenne que tu veuilles Insérer une ligne il faut savoir que le fichier ne peut et ne doit dans cette idée refleter ce procéder, surtout sur une rubrique Id Auto.

Une clé est affecté en incrémentation automatique à chaque enregistrement ajouté au fichier.
Cette enregistrement ne s'insère pas dans le fichier,mais s'ajoute.

Pour afficher des données dans un ordre spécifique il faut créer un index sur une rubrique du fichier

Dans votre cas NumLigne

Puisque vous savez quelle n° deligne vous désirez insérezil vous suffit simplement de parcourir apès avoir filtré les enregistrements sur Num_Acte_Item avec comme clé le n° de ligne

Idée de code

PROCEDURE Insertion(NumLigne)
Ind est un entier

HLitDernier(Item,Num_Acte_Item)
TANTQUE pas HEndehors()
 Si Item.Num_Acte_Item = NumLigne ALORS
  //Ajout de l'enregistrement
  RETOUR  // On sort de la procédure
 FIN
 Ind = Item.Num_Acte_Item  
 Item.Num_Acte_Item = ind+1  // Pour le décalage
 HModifie(Item)
 HLitPrecedent(Item,Num_ActeItem)
FIN