Filtrage avec SQL

Version imprimable

Filtrage avec SQL

Salutations
bon voila , j'aimerais transformer ce code qui est en Delphi en langage sql
le problème c'est que je suis nouveau et débutant dans le langage sql
c'est un programme de recherche d'enregistrement "recherche d'une personne X qui est dans TABLE 1 dans la TABLE 2 et la mettre dans la TABLE 3"
et comme critère de recherche il y a le nom , le prénom, date de naissance ;et j'aimerais que vous m'aidiez

j'aimerais bien savoir comment mettre la commande "LIKE" comme critère de recherche
merci
voici le code :

Code:

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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
begin
         mdd.TABLE1.first;
         mdd.TABLE1.edit;
         while not mdd.TABLE1.Eof do
        {2} begin
 
 
                mdd.TABLE2.edit;
                mdd.TABLE2.first;
 
                while not mdd.TABLE2.Eof do
                {3}begin
                      //   mdd.TABLE3.Edit;
                         if ((mdd.TABLE2Date_naiss.Text=mdd.TABLE1date_naissance.Text)and
                          (mdd.TABLE2nom.Text=mdd.TABLE1nom.Text)and
                          (mdd.TABLE2Prenom.Text=mdd.TABLE1prenom.Text))
 
                           then
                            {4}begin
                                      mdd.TABLE3.Edit;
                                      mdd.TABLE3.Insert;
                                      mdd.TABLE3NUM.text:=(mdd.TABLE2NUM.text+mdd.TABLE2Code_DECISION.text);
 
                                      mdd.TABLE3nom.Text:=mdd.TABLE2nom.Text;
                                      mdd.TABLE3prenom.Text:=mdd.TABLE2Prenom.Text;
                                      mdd.TABLE3Date_naiss.Text:=mdd.TABLE2Date_naiss.Text;
                                      mdd.TABLE3prenom_pere.Text:=mdd.TABLE2prenom_pere.Text;
                                      mdd.TABLE3nom_mere.Text:=mdd.TABLE2Nom_mere.Text;
                                      mdd.TABLE3prenom_mere.Text:=mdd.TABLE2Prenom_mere.Text;
 
 
                                      mdd.TABLE3.Post;
                                      mdd.TABLE3.Next;
                            {4}end;
                                     mdd.TABLE2.Next;
                  {3}end;
             mdd.TABLE1.Next;
 
 
        {2}end ;
 
 
{1} end;

merci

10/04/2016, 12h54
al1_24

Tu connais mal le SQL mais la plupart des personnes qui développent en SQL comprennent mal (ou pas) Delphi ou Pascal.
Pourrais-tu donner la structure de tes tables, un exemple de données, le résultat attendu et les requêtes que tu as déjà essayées en précisant ce qui te bloque ?
10/04/2016, 16h42
wiski08000

mon problème c'est que je veux traduire le code Delphi en sql

je veux savoir les personnes enregistrer dans la TABLE 1 indiquées par leurs nom,prenom,date naissance se trouvent dans la TABLE 2, et si il en a je le met dans la table 3
10/04/2016, 17h24
al1_24

Quelle est la structure de la table 1 ?
Quelle est la structure de la table 2 ?
Quelle est la structure de la table 3 ?

Quelles sont les colonnes comparées entre la table 1 et la table 2 ?
Quelles sont les colonnes de la table 1 qui sont reprises dans la table 3 ?

D'après ce que j'ai compris de ton code Delphi, étant moi même Expert Delphi, ton code écrit en Pascal, traduisant un traitement procédurale itératif, peut aisément être réécrit en langage ensembliste SQL, comme indiqué ci-dessous :
Ceci dit , il reste beaucoup de questions en suspends et il faut absolument répondre aux interrogations et questions pertinentes ci-dessus posées par al1_24.
Sans cela, toute réponse ne peut être qu'à titre indicatif, voire même hasardeuse et erronée !
Code:

1 2 3 4 5 6 7 8 INSERT INTO dbo.TABLE3 (NUM, nom, prenom, Date_naiss, prenom_pere, nom_mere, prenom_mere) SELECT (TABLE2.NUM + TABLE2.Code_DECISION), TABLE2.nom, TABLE2.prenom, TABLE2.Date_naiss, TABLE2.prenom_pere, TABLE2.nom_mere, TABLE2.prenom_mere FROM dbo.TABLE1 INNER JOIN dbo.TABLE2 ON TABLE2.Date_naiss = TABLE1.date_naissance AND TABLE2.nom = TABLE1.nom AND TABLE2.prenom = TABLE1.prenom;
A+

11/04/2016, 12h45
wiski08000

table 1 = nom,prenom,date naissance,prénom_père, nom_mère, prénom_mère
table 2 = nom,prenom,date naissance
table 3 = nom,prenom,date naissance

je vous explique:

les colonnes comparées entre la table 1 et la table 2 sont : nom,prénom,date naissance ( critère de recherche)
les colonnes de la table 1 qui sont reprises dans la table 3 sont : nom, prénom, Date naissance, prénom_père, nom_mère, prénom_mère

le but on filtre la TABLE 1 dans la TABLE 2

on prend le premier enregistrement (personne)de la TABLE 1 et on le filtre dans la TABLE 2
si cet enregistrement se trouve dans LA TABLE 2 c.a.d, il y a une personne qui porte le même nom et prénom et date naissance ou bien presque (la commande LIKE %) dans la TABLE 2 alors on le met dans la TABLE 3 et cela pour
tout les enregistrements (personnes ) saisies dans la TABLE 1

merci et merci pour vos efforts

bonjour,

si je comprend bien vous voulez faire ça :

Code:

1
2
3
4
5
6
7
8
9
 
INSERT INTO TABLE 3 (nom,prenom,date de naissance) 
SELECT T1.nom,T1.prenom,T1.date de naissance 
FROM TABLE 1  T1 
WHERE EXISTS ( SELECT * 
                        FROM TABLE 2 T2
                        WHERE T1.nom = T2.nom
                        AND T1.prenom = T2.prenom
                        AND T1.date de naissance = T3.date de naissance)

Julien

11/04/2016, 16h40
wiski08000

merci julien c'était ça sauf que je veux utiliser la commande (LIKE%) avec votre code
comme exemple : je peux trouver des personnes avec le même nom et même date de naissance sauf que pour le prénom il sera différent ou bien erreur de frappe
même chose pour le nom et la date de naissance qui peut avoir une erreur de frappe,

LIKE% nom
LIKE% prenom
LIKE% date naissance

merci a tous

Et ça ? ça va mieux ?

Code:

1
2
3
4
5
6
 
INSERT INTO TABLE3 (nom,prenom,date de naissance) 
SELECT T1.nom,T1.prenom,T1.date de naissance 
FROM TABLE1  T1 
INNER JOIN  TABLE2 T2 on T2.nom = T1.nom and T1.date de naissance = T2.date de naissance
WHERE T1.prenom like '%'+RTRIM(T2.prenom)+'%'

A+

Par curiosité

Par curiosité, je suis pas un spécialiste Delphi (ni SQL)
Mais
Pourquoi le Table1.edit en début de boucle
alors que le but est de parcourir tous les enregistrements
d'ailleurs l'instruction next réalise un cancel de cet mise en édition
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 begin mdd.TABLE1.first; mdd.TABLE1.edit; while not mdd.TABLE1.Eof do {2} begin //traitement mdd.TABLE1.Next; {2}end ; {1} end;
merci[/QUOTE]

Citation:
Envoyé par julien94320
Et ça ? ça va mieux ?
Code:

1 2 3 4 5 6 INSERT INTO TABLE3 (nom,prenom,date de naissance) SELECT T1.nom,T1.prenom,T1.date de naissance FROM TABLE1 T1 INNER JOIN TABLE2 T2 on T2.nom = T1.nom and T1.date de naissance = T2.date de naissance WHERE T1.prenom like '%'+RTRIM(T2.prenom)+'%'
A+
merci pour votre aide
si vous pouvez me traduire votre code (débutant désolé)

SI J'AI BIEN COMPRIS : même nom, même date de naissance, pour le prénom ceux qui ont presque le même prénom c'est ça ce que vous vouliez me dire

13/04/2016, 15h54
julien94320

Citation:

Envoyé par wiski08000

SI J'AI BIEN COMPRIS : même nom, même date de naissance, pour le prénom ceux qui ont presque le même prénom c'est ça ce que vous vouliez me dire

Bonjour, oui exactement c'est ça (ceux qui ont le même prénom ou un prénom se rapprochant) ...