Discussion :

[medreg]

bonjour je suis un debeteur au programation
j'ai utilisé la version de delphi7 et base de donnée absolute database
j'ai deux tables qui je besoin le filtrage de deux champ entre les deux tables

champs :
1er champ = cde type smallint
2eme champ = scde type smallint

J'ai besoin d'apporter des champs de données d'une table à l'autre selon la condition suivante
Si le champ est (a) et le ِChamp (b) de la table1 avec la même valeur dans le Champ(a) et le champ(b) de la table2
Les données doivent être préparés pour enregistrer ses filiales dans les domaines suivants en plus des autres conditions existent CODE
J'ai utilisé ce code pour récupérer les données de la table1 et le mettre dans le table2
Par le filtre

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
with DM do begin
ABSTable2.edit;
ABSTable1.Filtered:=true;
ABSTable1.Filter:='Cde='+inttostr(ABSTable2Cde.value)+'and SCDE='+Inttostr(ABSTable2SCDE.value);
ABSTable2.edit;
        if (ABSTable2Pde.value='T')and(ABSTable2Mde.value='M')then
        begin
        ABSTable2Nbre_Jrs.value:=ABSTable1TOJ.Value;
        ABSTable2JR_RET.value:=ABSTable1TRETJ.Value;
        end;
        if (ABSTable2Pde.value='T')and(ABSTable2Mde.value='J')then
        begin
        ABSTable2Nbre_Jrs.value:=ABSTable1TOJ.Value;
        ABSTable2JR_RET.value:=ABSTable1TRETJ.Value;
        end;
        if (ABSTable2Pde.value='T')and(ABSTable2Mde.value='H')then
        begin
        ABSTable2Nbre_Jrs.value:=ABSTable1TOH.Value;
        ABSTable2JR_RET.value:=ABSTable1TRETH.Value;
        end;
        ABSTable2.Next;
 
end;

Réaliser le programme après je reçois un message d'erreur:

Le projet tprg.exe a provoqué une classe d'exception EABSException avec le message 'invalid numeric symbol'''
At line 1, column 25 – Native error: 30062'. Processus stoppé. Utilisez Pas-à-pas ou Exécuter pour continuer.

NB: S'il y avait une autre façon mieux que cela donc je vous demande de me la donner.

[ShaiLeTroll]

Tu as une erreur dans le filtre, l'erreur est typiquement une erreur SQL

Utilise un TABSQuery (si ça existe) pour la lecture de la table

Tu fais un Edit, pas de Post, tu devrais lire les Tutoriels SGBD présent sur le Site

[redoran]

salut ;

Code :

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

1
2
3
4
5
with DM do begin
ABSTable2.edit;// pourqoi avant le filtre c'est a enlevé
ABSTable1.Filtered:=true;// le filtre doit être activé après l'affectation de la valeur qui suit 
ABSTable1.Filter:='Cde='+inttostr(ABSTable2Cde.value)+'and SCDE='+Inttostr(ABSTable2SCDE.value);//
ABSTable2.edit;

[medreg]

salut ;

Code :

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

1
2
3
4
5
with DM do begin
ABSTable2.edit;// pourqoi avant le filtre c'est a enlevé
ABSTable1.Filtered:=true;// le filtre doit être activé après l'affectation de la valeur qui suit 
ABSTable1.Filter:='Cde='+inttostr(ABSTable2Cde.value)+'and SCDE='+Inttostr(ABSTable2SCDE.value);//
ABSTable2.edit;

Merçi bcp a tous