problème pour écrire un script conditionnel

**FABFAB125** · 30/11/2007, 17h55

Bonjour à tous,

je voudrais écrire un script que ne sera executé que dans une condition donnée, exemple :

Code :

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

1
2
3
4
5
6
7
 
     declare
     begin
         if condition then
           --Création d'une table
         end if;
     end;

j'ai essayé avec execute immediate : ça marche pour le script de petite taille mais pas le cas par exemple pour la création d'un package de 1000 lignes de code.

Avez vous une idée?

Merci d'avance

**orafrance** · 30/11/2007, 18h23

j'ai pas compris... entre IF et END IF tu peux mettre des milliers de ligne de code si tu veux

**FABFAB125** · 30/11/2007, 18h30

mes scripts je l'écrit de cette façon :

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
 
     -- le script sans condition qui tourne parfaitement :
      Creation d''une table par exemple
      /
     --le code de creation d'un package
       create or replace package PCK is
         procedure paddition(a integer, b integer);
       end pck;
       /
       create or replace package body PCK is 
         procedure paddition(a integer, b integer) is
            c integer;
         begin
           c:= a +b;
         end;    
       end pck;
       /
 
-- le script avec condition que ne tourne pas
 
  Creation d''une table par exemple
  /
  declare
  begin
    if condition then
      --le code de creation d'un package
       create or replace package PCK is
         procedure paddition(a integer, b integer)
       end pck;
       /
       create or replace package body PCK is 
         procedure paddition(a integer, b integer) is
            c integer;
         begin
           c:= a +b;
         end;    
       end pck;
       /
    end if;
  end;
   /

avec cette façon je ne peux pas éxecuter mes scripts.

Envoyé par orafrance

j'ai pas compris... entre IF et END IF tu peux mettre des milliers de ligne de code si tu veux

**orafrance** · 30/11/2007, 18h47

ha oui... en effet, il n'est pas possible de conditionner la création d'un script... ou alors avec exécute immediate mais j'avoue ne pas comprendre l'intérêt

conditionner la création de la table OK mais d'un pakage c'est plus qu'étrange

**FABFAB125** · 30/11/2007, 18h52

L'intêret que j'ai un pakcage que je voudrais l'excuter sous les bases de certains client et pas chez les autres. donc je dois ajouter un test sur le numero de client en cours sachant que j'ai un seul procedure de versionnage pour tous les clients.

j'ai essayé avec execute immediate: mais il n'accepte pas un paramètre clob en entrée.

sinon y-a-t-il une possibilité de catcher l'erreur parce si j'execute ce script sur l'un des clients non concernés, un message oracle se declenche vu que ce client n'a pas tous les champs necessaire dans sa base

Envoyé par orafrance

ha oui... en effet, il n'est pas possible de conditionner la création d'un script... ou alors avec exécute immediate mais j'avoue ne pas comprendre l'intérêt

conditionner la création de la table OK mais d'un pakage c'est plus qu'étrange

**orafrance** · 30/11/2007, 18h58

et pourquoi pas en batch + SQL*Plus ?

ou même un drop APRES avoir tout installé ? Parce qu'un execute immediate avec un DROP c'est bcp plus simple qu'avec un CREATE

**FABFAB125** · 30/11/2007, 19h01

desolé je n'ai pas trop compris

Envoyé par orafrance

et pourquoi pas en batch + SQL*Plus ?

ou même un drop APRES avoir tout installé ? Parce qu'un execute immediate avec un DROP c'est bcp plus simple qu'avec un CREATE

**orafrance** · 30/11/2007, 19h05

plutôt que n'installer que le strict nécessaire, tu installes tout et après tu supprimes ce qu'il y a en trop selon le client... enfin, les packages c'est pas ce qui prend le plus de place

**DAB.cz** · 01/12/2007, 15h26

Fichier a.sql:

Code :

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

1
2
prompt creating something
create table matab (a number);

Fichier x.sql:

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
variable n number
begin
  select count (1)
    into :n
    from user_tables
    where table_name = 'MATAB';
end;
/
set echo off
set heading off
set feedback off
spool tmp.sql
select decode (:n, '0', '@a.sql','-- rien') from dual;
spool off
@tmp.sql

SQL*Plus démarré dans le même répertoire:

Code :

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

1
2
3
4
5
6
7
SQL> @x
 
@a.sql
creating something
SQL> @x
 
-- rien

DAB

**DAB.cz** · 02/12/2007, 19h36

Envoyé par FABFAB125

j'ai essayé avec execute immediate: mais il n'accepte pas un paramètre clob en entrée.

La solution (sans CLOB):

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
declare
  v_cur pls_integer;
  v_sqltab dbms_sql.varchar2a;
  v_dummy number;
begin
  v_sqltab (1) := 'create or replace procedure proc_enorme is';
  v_sqltab (v_sqltab.count + 1) := 'begin';
  -- 50K .. 1000*50
  for v in 1 .. 1000 loop
    v_sqltab (v_sqltab.count + 1) := ' null; -- 1234567890123456789012345678901234567890';
  end loop;
  v_sqltab (v_sqltab.count + 1) := 'end;';
 
  v_cur := dbms_sql.open_cursor;
  dbms_sql.parse (v_cur, v_sqltab, 1, v_sqltab.count, true, dbms_sql.native);
  v_dummy := dbms_sql.execute (v_cur);
  dbms_sql.close_cursor(v_cur);
end;
/
 
exec proc_enorme

(testé sur 10g R1)

DAB

**laurentschneider** · 03/12/2007, 13h10

Envoyé par FABFAB125

j'ai essayé avec execute immediate: mais il n'accepte pas un paramètre clob en entrée.

http://download.oracle.com/docs/cd/B...htm#sthref1970
It must be of type CHAR, VARCHAR2, or CLOB.

Le CLOB devrait fonctionner, à moins que ta version soit trop ancienne. Merci de préciser ta version

**FABFAB125** · 03/12/2007, 15h03

la version de la base est 9.2.0.1.0

Envoyé par laurentschneider

http://download.oracle.com/docs/cd/B...htm#sthref1970
It must be of type CHAR, VARCHAR2, or CLOB.

Le CLOB devrait fonctionner, à moins que ta version soit trop ancienne. Merci de préciser ta version

**laurentschneider** · 03/12/2007, 15h08

oui, dans ce cas effectivement ça ne va pas marcher si le code fait plus de 32k. Bon, tu peux toujours migrer vers 11g

**DAB.cz** · 03/12/2007, 16h39

Envoyé par laurentschneider

...à moins que ta version soit trop ancienne...

10.2.0.3 n'est pas la version ancienne, j'espère

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Oracle Database 10g Release 10.2.0.3.0 - Production
 
SQL> declare
  2    x clob;
  3  begin
  4    x := 'begin null; end;';
  5    execute immediate x;
  6  end;
  7  /
 
ORA-06550: ...
PLS-00382: ...