salut mes amies
j'ai un problème de programme du SQL
j'ai un message ERREUR qui dit
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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49 procedure TFetat_operation.Button1Click(Sender: TObject); begin FEtat_sorti_op.query1.SQL.Clear; FEtat_sorti_op.Query1.SQL.Add('select*'); FEtat_sorti_op.Query1.SQL.Add('from avoir ,operation ,rubrique'); FEtat_sorti_op.Query1.SQL.Add(' where operation.Num_op ='+Edit1.Text+'and operation.Num_op=avoir.Num_op and rubrique.Num_reb=avoir.Num_reb and avoir.cout_ant=1 and avoir.cout_act=1 and rubrique.dési_rub=1'); FEtat_sorti_op.query2.SQL.Clear; FEtat_sorti_op.Query2.SQL.Add('select*'); FEtat_sorti_op.Query2.SQL.Add('from avoir ,operation , rubrique'); FEtat_sorti_op.Query2.SQL.Add(' where operation.Num_op ='+Edit1.Text +'and operation.Num_op=avoir.Num_op and rubrique.Num_reb=avoir.Num_reb and avoir.cout_ant=2 and avoir.cout_act=2 and rubrique.dési_rub=2'); FEtat_sorti_op.query3.SQL.Clear; FEtat_sorti_op.Query3.SQL.Add('select*'); FEtat_sorti_op.Query3.SQL.Add('from avoir ,operation , rubrique'); FEtat_sorti_op.Query3.SQL.Add(' where operation.Num_op ='+Edit1.Text +'and operation.Num_op=avoir.Num_op and rubrique.Num_reb=avoir.Num_reb and avoir.cout_ant=3 and avoir.cout_act=3 and rubrique.dési_rub=3'); FEtat_sorti_op.query4.SQL.Clear; FEtat_sorti_op.Query4.SQL.Add('select*'); FEtat_sorti_op.Query4.SQL.Add('from avoir ,operation , rubrique'); FEtat_sorti_op.Query4.SQL.Add(' where operation.Num_op ='+Edit1.Text +'and operation.Num_op=avoir.Num_op and rubrique.Num_reb=avoir.Num_reb and avoir.cout_ant=4 and avoir.cout_act=4 and rubrique.dési_rub=4'); FEtat_sorti_op.Query1.Active:=True; FEtat_sorti_op.Query2.Active:=true; FEtat_sorti_op.Query3.Active:=true; FEtat_sorti_op.Query4.Active:=true; FEtat_sorti_op.QuickRep1.Preview; end; procedure TFetat_operation.Button2Click(Sender: TObject); begin FEtat_sorti_op.query1.SQL.Clear; FEtat_sorti_op.Query1.SQL.Add ('select*'); FEtat_sorti_op.Query1.SQL.Add ('from avoir ,operation , rubrique'); FEtat_sorti_op.Query1.SQL.Add (' where operation.Num_op ='+Edit1.Text+'and operation.Num_op=avoir.Num_op and rubrique.Num_reb=avoir.Num_reb and avoir.cout_ant=1 and avoir.cout_act =1 and rubrique.dési_rub=1'); FEtat_sorti_op.query2.SQL.Clear; FEtat_sorti_op.Query2.SQL.Add ('select*'); FEtat_sorti_op.Query2.SQL.Add ('from avoir ,operation , rubrique'); FEtat_sorti_op.Query2.SQL.Add (' where operation.Num_op ='+Edit1.Text+'and operation.Num_op=avoir.Num_op and rubrique.Num_reb=avoir.Num_reb and avoir.cout_ant=2 and avoir.cout_act=2 and rubrique.dési_rub=2'); FEtat_sorti_op.query3.SQL.Clear; FEtat_sorti_op.Query3.SQL.Add ('select*'); FEtat_sorti_op.Query3.SQL.Add ('from avoir ,operation , rubrique'); FEtat_sorti_op.Query3.SQL.Add (' where operation.Num_op ='+Edit1.Text+'and operation.Num_op=avoir.Num_op and rubrique.Num_reb=avoir.Num_reb and avoir.cout_ant=3 and avoir.cout_act=3 and rubrique.dési_rub=3'); FEtat_sorti_op.query4.SQL.Clear; FEtat_sorti_op.Query4.SQL.Add ('select*'); FEtat_sorti_op.Query4.SQL.Add ('from avoir ,operation , rubrique'); FEtat_sorti_op.Query4.SQL.Add (' where operation.Num_op ='+Edit1.Text +'and operation.Num_op=avoir.Num_op and rubrique.Num_reb=avoir.Num_reb and avoir.cout_ant=4 and avoir.cout_act=4 and rubrique.dési_rub=4'); FEtat_sorti_op.Query1.Active:=True; FEtat_sorti_op.Query2.Active:=true; FEtat_sorti_op.Query3.Active:=true; FEtat_sorti_op.Query4.Active:=true; FEtat_sorti_op.QuickRep1.Print; end;
différence type dans une expression
remarque :
c'est un modèle Externe
Partager