[Windev] Intégration de fichier texte venant d'un tab sage dans un HF
Intégration de fichier texte venant d'un tab sage dans un HF [Windev] - Divers - Programmation
Sujets relatifs:
Leave a Replay
Make sure you enter the(*)required information where indicate.HTML code is not allowed
Marsh Posté le 12-06-2008 à 10:33:59
Bonjour
Je n'ai pas trouvé de section windev alors je poste ici dans l'espoir que vous puissiez m'aider un petit peu
Alors voila, j'ai un fichier sage qui arrive toutes les semaines et pour pouvoir l'intégrer dans ma BDD HyperFile pour mon programme de gestion de stocks et de commandes , je dois l'enregistrer sous format .txt et ensuite l'intégrer dans un fichier "stock_article".
Tout semble marcher normalement, l'intégration se fait etc... CEPENDANT ! puisque j'intègre avec des ExtraitChaine(lignelue1,1,TAB), les quantitées par exemple ou bien les prix, qui se comptent en milliers, ne sont pas intégrés correctement !
je m'explique : si j'ai : 100 99 20
Alors je peux intégrer avec un ExtraitChaîne(lignelue1,1, TAB ou ESP)
Mais si j'ai : 1 704 3 600 42 000
Alors ma fonction n'integre que le 1 puis le 702 puis le 3 et donc tout est faux , et c'est là ou j'en suis...
Voici un pti bout de code pour montrer mon environnement :
TANTQUE lignelue1 <> EOT ET lignelue1 <> ""
// Lecture des lignes suivantes du fichier si c'est des entrées correctes :
SI ExtraitChaîne(lignelue1,1, TAB) <> ExtraitChaîne(lignelue1,3, TAB) ALORS
SI ExtraitChaîne(lignelue1,1, TAB) <> "" ALORS
Stock_article.Ref_famille=ExtraitChaîne(lignelue1,1, TAB)
reflocale = ExtraitChaîne(lignelue1,1, TAB)
SINON
Stock_article.Ref_famille = reflocale
FIN
// Stock_article.Ref_famille=reflocale
// Stock_categorie.Ref_famille=reflocale
Stock_article.Libellé_famille=ExtraitChaîne(lignelue1,2, TAB)
// Stock_categorie.Libellé_famille=ExtraitChaîne(lignelue1,2, TAB)
Stock_article.Num_article=ExtraitChaîne(lignelue1,3,TAB)
Stock_article.Libellé_article=ExtraitChaîne(lignelue1,4,TAB)
Stock_article.Ventes_semaine=ExtraitChaîne(lignelue1,5,TAB)
//Si ExtraitChaîne(lignelue1,1,TAB)
Stock_article.Ventes_semaine=Stock_article.Ventes_semaine+ ExtraitChaîne(lignelue1,1,ESP)
Stock_article.Prix_moyen=ExtraitChaîne(lignelue1,6,TAB)
Stock_article.Prix_moyen=Stock_article.Ventes_semaine+ ExtraitChaîne(lignelue1,2,ESP)
Stock_article.Chiffre_daffaire_TTC= ExtraitChaîne(lignelue1,7,TAB)
Stock_article.Chiffre_daffaire_TTC= Stock_article.Chiffre_daffaire_TTC + ExtraitChaîne(lignelue1,3,ESP)
Stock_article.Stock_semaine=ExtraitChaîne(lignelue1,8,TAB)
Stock_article.Stock_semaine= Stock_article.Stock_semaine+ ExtraitChaîne(lignelue1,4,ESP)
Stock_article.Date_début_semaine=var1
Stock_article.Date_fin_semaine=Var2
Stock_article.Num_semaine=DateVersNuméroDeSemaine(Var2)
Stock_article.Num_année=wannée
HAjoute(Stock_article)
SINON
lignelue1=fLitLigne(idfichier1)
lignelue1=fLitLigne(idfichier1)
FIN
lignelue1=fLitLigne(idfichier1)
FIN
voila, en ésperant que quelqu'un puisse m'aider merci beaucoup beaucoup d'avance
bonne journée,
SAxD
Message édité par sapphire adepte xd le 12-06-2008 à 14:45:22