Discussion :

[matiasko]

Bonjour,

J'ai une application Windev avec une base HFSQL Serveur.
Certains utilise cette application en local (car il ne peuvent pas se connecter au serveur), et ont donc une base de données en local.
Grace à OneDrive je récupère chez eux les fichiers fic, mmo et ndx que je veux.
Je veux ensuite copier le contenu de ces fichiers dans mes fichiers présents sur le serveur.
J'ai essayé avec HDéclareExterne mais ensuite j'ai un probleme avec le .MMO
Il me dit qu'il n'est pas au format HFSQL.

Je vois pas comment je peux faire du coup pour pouvoir lire les fichiers FIC...

Avez-vous une idée?

Merci

[philouZ]

Je dirai que tu as un problème avec le fichier mmo qui doit être corrompu.

[matiasko]

D'accord.
Vous avez une idée de comment je pourrais récupérer les données alors?

[Voroltinquo]

Bonjour,
Tu peux faire une réindexation, soit via le CCHFSQL, soit via un hReéindexe avec l'option hVérifieMémo que tu place à la fin de ton code de récupération

[philouZ]

Regarder les fonctions Hxxxx de windev, tu trouveras la bonne.

[matiasko]

Que ce soit avec le CCHFSQL ou avec hReéindexe et hVérifieMémo, c'est pareil il me dit que le MMO n'est pas au format HFSQL.

Je récupère les FIC, NDX et MMO en faisant un fCopieFichier (d'abord le fic, après le mmo et enfin le ndx).
Vous pensez que c'est ça qui rend mon MMO illisible?

[frenchsting]

Bonjour,

Je n'ai pas le détail de ton fonctionnement, mais pourquoi n'utilises tu pas HcopieFichier ?

[matiasko]

Bonjour,

J'ai essayé mais ça me dit que HCopieFichier ne fonctionne que en serveur HFSQL.

Dans mon cas c'est une base en Classic. Je veux copier le fichier de données dans un dossier OneDrive

[frenchsting]

OK

Est-ce que tu fais un Hferme(MonFichier) avant de faire la copie de tes trois fichiers ?

Autre piste : utiliser un alias (HAlias), copier le contenu du fichier dans cet alias, le fermer et copier les fichiers créés.

[matiasko]

Bonsoir,

Voici mon code.
Dans mon analyse j'ai un fichier TACHE.
Dans un dossier j'ai le fichier TACHE166.fic. Je voudrais inclure les enregistrements de ce fichier dans TACHE.
Avec ce code je n'arrive pas à récuperer le contenu de TACHE166, il me créer un autre fichier _SOURCE_TACHE166_1.fic
Du coup ensuite il fait le reste des traitement avec ce fichier qui est vide...

Pouvez-vous m'aider s'il vous plait?

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
TACHE166 est une Source de Données <description=TACHE>
SI HAlias(TACHE, TACHE166) = Vrai ALORS
    HChangeRep(TACHE166, "Bases_Terrain\166")
    HOuvre(TACHE166)
    HLitPremier(TACHE166, "IDTACHE")
    TANTQUE PAS HEnDehors(TACHE166)
        SI HCopieEnreg(TACHE, TACHE166) = Vrai ALORS
            HAjoute(TACHE166)
            SI HErreurDoublon() = Vrai OU ...
                HErreurIntégrité() = Vrai ALORS
                SI OuiNon("Erreur de doublon " + ...
                    "ou d'intégrité " + ...
                    "pendant l'ajout " + ...
                    "Continuer ?") = Faux ALORS
                    SORTIR
                FIN
            FIN
        SINON
            Erreur("Copie d'enregistrement impossible")
            SORTIR
        FIN
        HLitSuivant(TACHE166, "IDTACHE")
    FIN
SINON
    Erreur("Détail du Problème" + HErreurInfo())
FIN

[pacodiasse]

Bonjour ,
Dans ton code je vois une chose bizarre
HAjoute(TACHE166) pourquoi pas HAjoute(TACHE) puisque tu souhaites copier les enregistrements du fichier TACHE166 VERS HAjoute(TACHE).

cdlt


Développeur freelance en PHP laravel et produit PCSOFT. En cas de besoin veuillez me contacter (senitdev@gmail.com).

[matiasko]

Bonjour,

Oui en effet je me suis trompé.
Mais j'ai le soucis avant. Il entre pas dans le TANTQUE parce qu'il récupères pas le TACHE166.FIC. Il me crée un autre fic.
Pourtant j'ai suivi la procédure d'utilisation du HAlias() sur le site de pcsoft.

[pacodiasse]

Bonjour,
Je vais simple après tu adaptes :

Code :

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

1
2
3
4
5
HChangeRep(TACHE166, "Bases_Terrain\166")
POUR TOUT TACHE166
    HcopieEnreg(TACHE,TACHE166)
    Hajoute(TACHE)
FIN

Cdlt


--
Développeur freelance en PHP laravel et produit PCSOFT. En cas de besoin veuillez me contacter (senitdev@gmail.com).

[matiasko]

Je pense que ton code fonctionne mais le soucis, c'est qu'il ne me récupère pas le TACHE166.FIC (alors qu'il est bien la) et il me crée un autre fic, _SOURCE_TACHE166_1.FIC, qui est donc vide.
Donc du coup le code continue avec ce FIC qui est vide.

Je pense que le soucis vient des premières lignes du code mais je vois pas ce qui coince....

[pacodiasse]

Je pense que ton code fonctionne mais le soucis, c'est qu'il ne me récupère pas le TACHE166.FIC (alors qu'il est bien la) et il me crée un autre fic, _SOURCE_TACHE166_1.FIC, qui est donc vide.
Donc du coup le code continue avec ce FIC qui est vide.

Je pense que le soucis vient des premières lignes du code mais je vois pas ce qui coince....

Par assurance est ce que vous avez bien mis le fichier TACHE166 dans le répertoire 166?
Parce que bizarrement j'ai testé mais ca fonctionne chez moi
cdlt

--
--
Développeur freelance en PHP laravel et produit PCSOFT.En cas de besoin veuillez me contacter (senitdev@gmail.com).

[matiasko]

Le fichier TACHE166 est bien dans le répertoire 166.
Mais peut-être que j'ai fais une erreur dans le chemin.

J'ai la base dans ce dossier \\vm-data\f$\LGA\LGA\BD\LGA

TACHE166 est dans ce dossier \\vm-data\f$\LGA\LGA\BD\LGA\Bases_Terrain\166

C'est bon si je mets HChangeRep(TACHE166, "Bases_Terrain\166") ?

[pacodiasse]

Le fichier TACHE166 est bien dans le répertoire 166.
Mais peut-être que j'ai fais une erreur dans le chemin.

J'ai la base dans ce dossier \\vm-data\f$\LGA\LGA\BD\LGA

TACHE166 est dans ce dossier \\vm-data\f$\LGA\LGA\BD\LGA\Bases_Terrain\166

C'est bon si je met HChangeRep(TACHE166, "Bases_Terrain\166") ?

Bonjour,
POUR TESTER Fait un Trace(TACHE166)
Si les données s'affichent correctement il faut faire la liaison manuelle pour copier totalement le fichier à cause des format de fichier qui sont différent
cdtl
--
Développeur freelance en PHP laravel et produit PCSOFT.En cas de besoin veuillez me contacter (senitdev@gmail.com).

[matiasko]

Le Trace(TACHE166) ne donne rien, j'ai toujours TACHE166 = _SOURCE_TACHE166_1 (qui se créé tous seul et qui est donc vide)

[tbc92]

Je suis vieille école. Dans hChangeRep() , je mets toujours un chemin COMPLET et pas un chemin relatif.
Donc un truc du genre "c:\users\data\..."

Avant ta boucle, tu peux ajouter un info( hnbEnr(tache166) , tache166.Repertoire, Tache166.NomPhysique ) pour vérifier ce que le programme va lire.

[matiasko]

Bonjour,
Il aime pas le chemin complet:

L'utilisation d'un chemin absolu est interdit. Vous devez spécifier un chemin relatif à la base de données

et la commande info me donne _SOURCE_TACHE166_1

Vraiment je comprends pas, j'ai bien dans mon dossier 166 les fichiers TACHE166.FIC, TACHE166.mmo et TACHE166.ndx