Discussion :

[cantador]

Ce code fonctionne bien :

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
 
procedure TForm1.Button1Click(Sender: TObject);
begin
  try
    screen.Cursor := CrHourGlass;
    WITH IboQuery1.SQL do
    begin
      Clear;
      ADD('CREATE TABLE TEMPO ');
      ADD('(UN NUMERIC(15,2), ');
      ADD('DEUX NUMERIC(15,2), ');
      ADD('TROIS NUMERIC(15,2))');
      IboQuery1.ExecSQL;
      Clear;
      ADD('INSERT INTO TEMPO (UN, DEUX, TROIS)  VALUES(1000,2000,3000)  ');
      IboQuery1.ExecSQL;
    end;
  finally
    Screen.Cursor := CrDefault;
  end;
end;

Mais peut-on le simplifier ?

Cantador

[JP.NUAGE]

Sauf erreur de ma part, ce que tu as tapé est le code exact d'une requète.
Je vois mal comment tu pourrais faire plus simple, car à mon avis les abréviations style SMS n'existent pas en SQL

[cantador]

ah ah, pas mal..
celle-là je n'y avais pas pensé !

peut-on éviter les deux ExecSQL ?

Cantador

[Rayek]

peut-on éviter les deux ExecSQL ?

Non, c'est une requete par ExecSQL

Certaine base de données permettent le multi-requete, mais ce n'est qu'un leure, car le moteur de base de données parse les requêtes et les transmet une à une.

[cantador]

merci Rayec

[Franck SORIANO]

Mais peut-on le simplifier ?

Selon les SGBD, tu peux créer la table à la volée, en même temps que tu calcule les données à stocker à l'intérieur.
Par exemple sous Oracle :

Code sql :

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

1
2
3
4
5
6
7
 
create table TEMPO as
select 
  cast(1000 as numeric(15,2)) as UN,
  cast(2000 as numeric(15,2)) as DEUX,
  cast(3000 as numeric(15,2)) as TROIS
from dual;

Une seule requête, donc un seul ExecSQL.

La même chose pour SQL Server :

Code sql :

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

1
2
3
4
5
6
 
select 
  cast(1000 as decimal(15,2)) as UN,
  cast(2000 as decimal(15,2)) as DEUX,
  cast(3000 as decimal(15,2)) as TROIS
into TEMPO

Mais bon, ça ne présente pas vraiment d'intérêt dans le cas général. Ca sert surtout à enregistrer le résultat d'un SELECT dans une table temporaire.
Dans le cas général, on crée la table et on insère les données séparément.

Certaine base de données permettent le multi-requete, mais ce n'est qu'un leure, car le moteur de base de données parse les requêtes et les transmet une à une.

Je ne suis pas d'accord. Certains SGBD permettent en effet d'exécuter un batch contenant plusieurs statements en une seule fois.
Mais ça n'a rien d'un leure. Le batch est envoyé d'un seul bloc au SGBD, qui le décomposera pour l'exécuter.
Ca permet d'éviter d'envoyer de nombreuses petites requêtes au serveur et de se prendre le temps d'un PING à chaque requête.
En les regroupants dans un même batch, on améliore souvent les performances de manière significative.

Cependant, on ne peut pas tout mettre dans un même batch. Un create view par exemple doit toujours être la première instruction d'un lot.

[cantador]

J'ai également la possiblité de tout créer d'un seul coup avec un script
soit dans le ScriptEditor ou le SqlEditor de SQL manager.

Mais ce qui m'intéressait c'était de pouvoir le faire en delphi.

Cela dit ça marche très bien aussi avec les deux execSQL.

Cantador