PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEVWEBDEV and WINDEV Mobile

Home → WINDEV 2024 → Problème de rafraichissement sur une table (Fichier en réseau)
Problème de rafraichissement sur une table (Fichier en réseau)
Started by webmaster, Sep., 16 2004 5:32 PM - No answer
Posted on September, 16 2004 - 5:32 PM
Je m'explique,
J'ai une applic qui tourne en réseaux ... les personnes insère simultanément les données.... Pour facilier l'insertion, ils insèrement directement dans la table .. Mais j'ai un problème de rafraichissement. Si pendant que la personne (a) insère un enregistrement, des personnes (b),(c)... insèrent des enregistrement, ceux-ci s'affiche pour l'utilisateur (a) et son dernier enregistrement inséré ne correspondra pas au dernier enregistrement de la table. Comme faire pour empecher que la table soit rafraichi, et que l'utilisateur ne voit seulement les données de bases + celles qu'il a inséré lui ?
J'espère avoir été claire


Ok j'ai changé ce paramètre.
J'ai toujours un soucis
Lorsqu'il insère les infos, j'ai toujours les infos supplémentaires qui s'affichent en dessous ... suffit de juste bouger l'ascenceur "Haut" puis "Bas" et les infos sont de nouveaux Ok ...
Et dans mon code d'initialisation de la fenetre j'ai :

// Ouverture de la fenêtre de type Table
PROCEDURE TableRAD(ValeurFiltre="")
GLOBALE
gbRequeteLocal est un booléen = Faux // Est-ce que la requête a du être exécutée ?
gfnNumTimer est un entier // Numéro du timer de rafraichissement
gfnInterRaf est un entier = 1500 // Temps entre 2 rafraichissements en centièmes
gfbGererRafAuto est un booléen = Faux // Gestion du rafraîchissement
gnNumVersionFichier est un entier = HVersion(Clients) // Version du fichier (pour rafraîchissement)


// Gestion des erreurs d'accès à la base de données
// Les messages d'erreurs renvoyés par la base sont affichés
// Vous pouvez traiter ici les compte-rendu d'erreurs de votre base
QUAND EXCEPTION
Erreur("Une erreur est survenue dans la fenêtre",ExceptionInfo(errMessage))
// On réactive les exceptions
ExceptionActive()
// On reprend le traitement
RepriseSaisie()
FIN


// Spécification d'un filtre initial par défaut
FiltreInitial(ValeurFiltre)
// Activation du rafraichissement automatique
GererRafraichissement(Faux)


Et dans mon code, lorsque l'utilisateur sort de la ligne du tableau j'ai :

vNumCours est un entier
SI Table.Nom = "" OU Table.Prénom = "" OU Table.NoDossier = "" OU Table.NoDossier = "0" ALORS
vNumCours = IndiceEnCours()
SI Table.Nom = "" ET Table.Prénom = "" ET Table.NoDossier = "0" ALORS
SINON
Erreur("Attention !"+RC+"Les champs Nom / Prénom et No de dossier sont requis")
RepriseSaisie(Table)
FIN
SINON
TableTrie(MoiMême,"ClientID")
SI ccondition = 0 ALORS
TableInsèreLigne(MoiMême,99999999999)
SINON
RepriseSaisie(Table)
FIN
FIN

et j'ai une fonction d'erreur de doublons :


SI PAS HSurErreur(Clients,hErrDoublon,Fenêtre2) ALORS
ccondition = 1
FIN