Discussion :

[UBT MSHT]

Salut à tous
Je développe un logiciel de gestion médical (windev 25) :

1) Analyse (Fichier Patient) avec rubrique date de naissance (clé avec doublons)
2) Fenêtre (Liste des patients) avec bouton (Dossier médical)
3) Fenêtre (Dossier médical) avec des fenêtres internes

Le logiciel fonctionne bien, mais le problème survient uniquement lorsque j’ai des enregistrements avec une même date de naissance

Lors de l'ajout d'un nouveau patient qui a une même date de naissance : si je veux ouvrir le dossier du (patient 01) sur la liste : la fenêtre (Dossier médical) s'ouvre avec le mauvais enregistrement (patient 03)

Comment résoudre ce problème, merci

[popoy]

Salut
Avant le hlitrecherchepremier
Comment tu fais pour récupérer l'id patient sélectionné ?
As tu fais un info de col id patient pour vérifier que s'était le bon id ?
As tu un champ caché dans ta table qui contient celui-ci ?
De plus, on n'a pas les détails de ta table de ta première image.

[Voroltinquo]

Bonjour,
Tu passe en paramètre une chaine alors qu'on attend un entier, ton HLitRecherchePremier se fait donc sur 0

[UBT MSHT]

Salut
Avant le hlitrecherchepremier
Comment tu fais pour récupérer l'id patient sélectionné ?
As tu fais un info de col id patient pour vérifier que s'était le bon id ?
As tu un champ caché dans ta table qui contient celui-ci ?
De plus, on n'a pas les détails de ta table de ta première image.

Voici la description du champ (Table Req recherche patient) qui affiche la liste des patients

[UBT MSHT]

Bonjour,
Tu passe en paramètre une chaine alors qu'on attend un entier, ton HLitRecherchePremier se fait donc sur 0

le code fonctionne très bien mais le problème survient uniquement lorsque les dates de naissance sont identiques

on dirait que hlitrecherche reste bloqué sur le dernier enregistrement (patient 03)

Probleme de doublon ?

[Voroltinquo]

le code fonctionne très bien

C'est un pur hasard. Dans ce cas, le cast se passe bien ce n'est malheureusement pas toujours le cas.

A priori tu n'exécute pas ta requête avant l'affichage de ton champ table.
Un truc du style

Code :

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

1
2
3
4
5
 
...
REQ_Patient.pPatient=Patient.PK_Patient
TableAffiche(TABLE_Patients,taRéExécuteRequête)
...

Par ailleurs, une chose m'étonne, c'est la position de ton TableAffiche. Il ne s'exécute qu'après la fermeture de ta fenêtre "FEN_DossierMédical".

Petites remarques
1-Tu utilises une colonne cachée COL_ID_Patient. Je suppose qu'elle te sers à récupérer la PK de ta table "Patient" via TABLE_Patients.COL_ID_Patient. Cette méthode est obsolète avec Windev. Il suffit de remplir correctement la combo "Rubrique mémorisée"
2-Tu utilises une colonne Age_P, elle est inutile dans la mesure où l'on trouve l'âge grâce à la date de naissance, qui plus est, cette donnée risque de ne pas être à jour le lendemain de l'anniversaire. Violation de 1FN, l'attribut n'est pas constant dans le temps.
3-Pourquoi utiliser HTrouve alors que tu utilises HLitRecherchePremier qui renvoie le même résultat.

Par ailleurs évite les copies écran de ton code utilise un Copier/Coller balisé (Bouton #.)

A tout hasard peut on avoir le code de ta requête

[frenchsting]

Bonjour,

Outre les remarques dans les réponses déjà fournies, j'ai 2 choses :
- As tu mis un point d'arrêt au niveau du Si Htrouve() et regardé sur quel enregistrement est positionné Patient ?
- Si tu ne trouves pas, tu mets un Info(). Ce qui veut dire que ce n'est pas "grave". Sauf que ce n'est pas normal de ne pas le trouver. Dans ce cas on met soit un Avertissement() soit un Erreur() et on traite le message d'erreur.

[UBT MSHT]

C'est un pur hasard. Dans ce cas, le cast se passe bien ce n'est malheureusement pas toujours le cas.

A priori tu n'exécute pas ta requête avant l'affichage de ton champ table.
Un truc du style

Code :

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

1
2
3
4
5
 
...
REQ_Patient.pPatient=Patient.PK_Patient
TableAffiche(TABLE_Patients,taRéExécuteRequête)
...

Par ailleurs, une chose m'étonne, c'est la position de ton TableAffiche. Il ne s'exécute qu'après la fermeture de ta fenêtre "FEN_DossierMédical".

Petites remarques
1-Tu utilises une colonne cachée COL_ID_Patient. Je suppose qu'elle te sers à récupérer la PK de ta table "Patient" via TABLE_Patients.COL_ID_Patient. Cette méthode est obsolète avec Windev. Il suffit de remplir correctement la combo "Rubrique mémorisée"
2-Tu utilises une colonne Age_P, elle est inutile dans la mesure où l'on trouve l'âge grâce à la date de naissance, qui plus est, cette donnée risque de ne pas être à jour le lendemain de l'anniversaire. Violation de 1FN, l'attribut n'est pas constant dans le temps.
3-Pourquoi utiliser HTrouve alors que tu utilises HLitRecherchePremier qui renvoie le même résultat.

Par ailleurs évite les copies écran de ton code utilise un Copier/Coller balisé (Bouton #.)

A tout hasard peut on avoir le code de ta requête

Bonsoir
Et merci pour vos conseils

J’ai fait quelques modifications sur les codes


FEN_Dossier_Medical

Code :

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

1
2
3
4
5
6
7
FEN_Dossier_Medical
 
Déclarations globales de FEN_Dossier_Medical
FichierVersEcran(FEN_Dossier_Medical)
 
Fin d’initialisation de FEN_Dossier_Medical
ChangeFenêtreSource(CFI_Dossier_Médical,FI_Consultation)

Bouton Dossier_Medical

Code :

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

1
2
3
4
5
6
7
8
Bouton Dossier_Medical
HLitRecherchePremier(Patient,ID_Patient,TABLE_REQ_Recherche_Patient)
 
SI HTrouve(Patient) = Vrai ALORS
	Ouvre(FEN_Dossier_Medical)
SINON
	Info("Patient non trouvé")
FIN

Requête (REQ Recherche patient)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
 requête (REQ Recherche patient)
SELECT 
	Patient.ID_Patient AS ID_Patient,	
	Patient.Numero_Dossier AS Numero_Dossier,	
	Patient.Patient AS Patient_Pa
FROM 
	Patient
WHERE 
	Patient.Numero_Dossier LIKE %{ParamNumero_Dossier}%
	OR	Patient.Patient LIKE %{ParamPatient_Pa}%
	OR	Patient.ID_Patient LIKE %{ParamID_Patient}%
ORDER BY 
	Patient_Pa ASC

[UBT MSHT]

Bonjour,

Outre les remarques dans les réponses déjà fournies, j'ai 2 choses :
- As tu mis un point d'arrêt au niveau du Si Htrouve() et regardé sur quel enregistrement est positionné Patient ?
- Si tu ne trouves pas, tu mets un Info(). Ce qui veut dire que ce n'est pas "grave". Sauf que ce n'est pas normal de ne pas le trouver. Dans ce cas on met soit un Avertissement() soit un Erreur() et on traite le message d'erreur.

le code semble fonctionner normalement

[UBT MSHT]

Lors des différentes essais et vérification de l’analyse, j’ai remarqué une sorte de BLOCAGE de l’ID patient

Par Exemple :si je manipule les boutons de la fenêtre dossier médical du patient 01 ( ID = 93 ) , l’enregistrement dans la base de données se fait avec l’ID du patient 03 ( ID = 95 )

[frenchsting]

le code semble fonctionner normalement

Oui, il trouve toujours quelque chose. Mais, tu ne traites pas le cas, où ça ne fonctionne pas. C'est un réflexe à avoir que de traiter les soucis qui peuvent se produire.

Je ne comprends pas ce code : HLitRecherchePremier(Patient,ID_Patient,TABLE_REQ_Recherche_Patient). Pour moi, la valeur de TABLE_REQ_Recherche_Patient est celle du numéro de ligne de la table sélectionnée, pas celui de l'id du patient.

Autre conseil : essaye de limiter l'utilisation des LIKE dans tes requêtes. Aujourd'hui, tu as 20 enregistrements. Si ta table (au sens fichier) en compte 1 million, ça va être lent.

[Voroltinquo]

Pour moi, la valeur de TABLE_REQ_Recherche_Patient est celle du numéro de ligne de la table sélectionnée, pas celui de l'id du patient.

Sauf si la valeur mémorisée est la PK du patient. cf ma "petite remarque" 1 supra, concernant la colonne cachée COL_ID

[frenchsting]

Ha, oui, je l'avais loupée celle là

En tout cas, je n'ai pas eu de réponse quant au contenu de PATIENT, après le HlitRecherchePremier().

[serendib]

Autre conseil : essaye de limiter l'utilisation des LIKE dans tes requêtes. Aujourd'hui, tu as 20 enregistrements. Si ta table (au sens fichier) en compte 1 million, ça va être lent.

Cabinet médical en Inde (à Delhi) ?
Parce que 1 million de patients il va falloir qu'ils le soient.

Bon, après cette intervention de mauvais aloi je vous souhaite la bonne journée.

PS :
@UBT MSHT, frenchsting a raison, bien entendu.

[tbc92]

WHERE
Patient.Numero_Dossier LIKE %{ParamNumero_Dossier}%
OR Patient.Patient LIKE %{ParamPatient_Pa}%
OR Patient.ID_Patient LIKE %{ParamID_Patient}%

Je déteste cette syntaxe avec les OR.
Peut-être que Windev accepte, et qu'il sait gérer cela. C'est à dire que si on donne seulement le paramètre 'N° dossier' par exemple, Windev transforme la requête, et fait bien le filtre uniquement sur N° dossier, sans prendre en compte les 2 OR qui suivent.
Peut-être, admettons.
Et donc, dans l'écran, selon que tu renseignes tel ou tel champ ... il va adapter la requête.
Mais si par exemple tu donne un nom de patient et un Id_Patient, le programme va faire un OR, il va récupérer les lignes qui ont Soit le bon nom de patient, soit le bon ID. Donc plusieurs lignes. Et comme tu récupères uniquement la 1ère ligne, tu récupères un patient au hasard parmi ceux qui ont le même nom.

Remplace les OR par des AND. Je pense que ça va marcher. Ca ne va toujours pas me plaire, mais c'est secondaire.

[Voroltinquo]

Par Exemple :si je manipule les boutons de la fenêtre dossier médical du patient 01 ( ID = 93 ) , l’enregistrement dans la base de données se fait avec l’ID du patient 03 ( ID = 95 )

Pourrait on avoir le code ?

[UBT MSHT]

Ha, oui, je l'avais loupée celle là

En tout cas, je n'ai pas eu de réponse quant au contenu de PATIENT, après le HlitRecherchePremier().

Merci pour vos réponses et vos conseils

j'ai modifier le code plusieurs fois :



Bouton Dossier_Medical

Code :

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

1
2
HLitRecherchePremier(Patient,Numero_Dossier,TABLE_REQ_Recherche_Patient)
Ouvre(FEN_Dossier_Medical)

Requête (REQ Recherche patient) : Jai retirer l'id patient de la requête

Code :

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

1
2
3
4
5
6
7
8
9
10
SELECT 
	Patient.Numero_Dossier AS Numero_Dossier,	
	Patient.Patient AS Patient_Pa
FROM 
	Patient
WHERE 
	Patient.Numero_Dossier LIKE %{ParamNumero_Dossier}%
	OR	Patient.Patient LIKE %{ParamPatient_Pa}%
ORDER BY 
	Patient_Pa ASC

mais le problème persiste toujours : la fenêtre (Dossier Médical) reste bloquée avec l'ID du patient 03 (ID= 95) , si je modifie la date de naissance la fenêtre fonctionne bien






je ne comprend pas le problème entre les 2 rubriques (ID patient) et (Naissance) ???

[frenchsting]

Bonjour,

Je viens de voir que tu as des fenêtres internes. N'aurais tu pas décoché la case "Contexte HSQL indépendant" (ongle détail de la description de la fenêtre interne en question) ?

[UBT MSHT]

WHERE
Patient.Numero_Dossier LIKE %{ParamNumero_Dossier}%
OR Patient.Patient LIKE %{ParamPatient_Pa}%
OR Patient.ID_Patient LIKE %{ParamID_Patient}%

Je déteste cette syntaxe avec les OR.
Peut-être que Windev accepte, et qu'il sait gérer cela. C'est à dire que si on donne seulement le paramètre 'N° dossier' par exemple, Windev transforme la requête, et fait bien le filtre uniquement sur N° dossier, sans prendre en compte les 2 OR qui suivent.
Peut-être, admettons.
Et donc, dans l'écran, selon que tu renseignes tel ou tel champ ... il va adapter la requête.
Mais si par exemple tu donne un nom de patient et un Id_Patient, le programme va faire un OR, il va récupérer les lignes qui ont Soit le bon nom de patient, soit le bon ID. Donc plusieurs lignes. Et comme tu récupères uniquement la 1ère ligne, tu récupères un patient au hasard parmi ceux qui ont le même nom.

Remplace les OR par des AND. Je pense que ça va marcher. Ca ne va toujours pas me plaire, mais c'est secondaire.

Bonjour

j'ai modifié la requête et j'ai retire (l'ID patient)

mais je doit laisser les autres paramètre (OR) : la recherche s'effectue sur la rubrique (Patient) ou (Numéro dossier) pour faciliter la tache de l'utilisateur




ce que je ne comprends pas , c'est le blocage de la fenêtre (Dossier Médical) avec l'ID du patient lorsque les dates de naissance sont identiques

si je modifie la date de naissance : la fenêtre fonctionne bien sans aucun problème

[UBT MSHT]

Pourrait on avoir le code ?

toutes les manipulations des boutons et les différents champ de la fenêtre (dossier médical) sont bloqués avec l'ID