Re: Gerer les doublon dans fichier HyperFile | Sujet: Re: Gerer les doublon dans fichier HyperFile par drcharly93 sur 16/6/2006 19:16:47
Bonjour,
Pour chaque produit à rentrer il faut d'abord tester si il n'existe pas. Mon fichier est composé de Nom Type Taille Cle ================================================== ar_IdArticle IdAuto CleUnique ar_CodeArticle Texte 20 Cle avec doublon ar_Designation Texte 50 Cle avec doublon
Dans la déclaration de ma fenetre, on déclare une structure
StructureArticle est une structure
Code est une chaine
Designation est une chaine
//Renseigner ici si d'autre membre
Fin
sFichier est une chaine = "Article"
sCleParcours est une chaine = "ar_CodeArticle"
sUneLigne est une chaine
st est un StructureArticle
BOUCLE
sUneLigne = GetLigne(st) //Proc pour récupérer chaque ligne
//Cette procedure rempli la structure st
Si sUneLigne = EOT alors Sortir
Si HlitRecherche(sFichier, sCleParcours, st:Code) Alors
//On traite ici en mode modification
// ....
//Mise a jour des reubrique du fichier
{sFichier + ".ar_Designation"} = st:Designation
//....
HModifie(sFichier)
Sinon
//en mode ajout d'article
// Faire les affectations
{sFichier + ".ar_CodeArticle"} = st:Code
{sFichier + ".ar_Designation"} = st:Designation
HAjoute(sFichier)
Fin
Fin
|
|
Connexion
Menu
Chercher WDForge
Chercher Web
Partenaires
|