"N" procédures stockées exécutées dans un seul code

**Just-Soft** · 09/11/2012, 13h49

Bonjour !

pour les valeurs nulles, le count(monchamp) me renvoie 0 comme résultat comment le forcer à me donner le nombre de lignes retournant null.

voici le code (sans pj

Serge)

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
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
BEGIN
   LIGNE = 'PERIODE DU : '  ||Extract(DAY FROM  date_debut)||'/'
            ||Extract(MONTH FROM date_debut)||'/'
            ||Extract(YEAR FROM date_debut)|| ' AU : '
            ||Extract(DAY FROM date_fin)||'/'
            ||Extract(MONTH FROM date_fin)||'/'
            ||Extract(YEAR FROM date_fin);
   SUSPEND;
 
   LIGNE = '';
   SUSPEND;
   /******* Indice de boue ***************/
   LIGNE = 'CALCUL DE L''INDICE_BOUE';
   SUSPEND;
   FOR 
       SELECT  coalesce(nom_step, 'Pas de nom de STEP'),
               coalesce(count(ib),0),
               coalesce(avg(ib),0),
               coalesce(interpretation_ib,' ')
       FROM "[10]PS_INDICE_BOUE"(:date_debut, :date_fin, :step, :code_point_prlv)
 
       GROUP BY nom_step, interpretation_ib
 
       ORDER BY count(ib) descending
 
       INTO :nom_step,
            :IB,
            :nbr_ib,
            :Interpretation_ib
 
   DO BEGIN
            LIGNE = 'STEP : ' || nom_Step || ' -- ' ||
                    'Fréq. IB : ' || nbr_ib || ' -- ' ||
                    'Val. IB : ' || IB || ' -- ' ||
                    'Interp. : ' || Interpretation_ib;
      SUSPEND;
   END
 
   LIGNE = '';
   SUSPEND;
   /******* Ratio DCO / DBO5 ***************/
   LIGNE = 'CALCUL DU RATIO DCO / DBO5';
   SUSPEND;
   FOR 
       SELECT  coalesce(nom_step, 'Pas de nom de STEP'),
               coalesce(count(ratio_dco_dbo5),0),
               coalesce(avg(ratio_dco_dbo5),0),
               coalesce(effluent, ' ')
 
       FROM "[10]PS_RATIO_DCO_DBO5"(:date_debut, :date_fin)
 
       WHERE (nom_step like upper(:nom_step) ||'%')
 
       GROUP BY nom_step, effluent
 
       ORDER BY count(ratio_dco_dbo5) descending
 
       INTO :nom_step,
            :nbr_,
            :dco_dbo5,
            :effluent
 
   DO BEGIN
            LIGNE = 'STEP :  ' || nom_Step || ' -- ' ||
                    'Fréq. Rx : ' || nbr_ || ' -- ' ||
                    'Val. Rx DCO/DBO5 : ' || cast(dco_dbo5 as decimal(15,2)) || ' -- ' ||
                    'Nat. : ' || effluent ;
      SUSPEND;
   END
 
   LIGNE = '';
   SUSPEND;
   /******* Production de boue ***************/
   LIGNE = 'PRODUCION DE BOUE';
   SUSPEND;
   FOR
       SELECT  coalesce(nom_step, 'Pas de nom de STEP'),
               coalesce(count(ratio_boue),0),
               coalesce(avg(ratio_boue),0),
               coalesce(consigne_boue, ' ')
 
       FROM "[10]_PS_RATIO_BOUE"(:date_debut, :date_fin)
 
       WHERE (nom_step like upper(:nom_step) ||'%')
 
       GROUP BY nom_step, consigne_boue
 
       ORDER BY count(ratio_boue) descending
 
       INTO :nom_step,
            :nbr_,
            :ratio_boue,
            :extration
 
   DO BEGIN
            LIGNE = 'STEP : ' || nom_Step || ' -- ' ||
                    'Fréq. Rx Boue : ' || nbr_ || ' -- ' ||
                    'Val. Rx Boue  : ' || cast(ratio_boue as decimal(15,2)) || ' -- ' ||
                    'Extraction : ' || extration ;
      SUSPEND;
   END
END

**dehorter olivier** · 09/11/2012, 14h00

tu parles de la variable ligne ?

si oui, met un compteur

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
nb_Ligne_Null = 0;
 
FOR 1ere procedure
    blabla
   DO 
   Begin
      LIGNE = 'STEP : ' || nom_Step || ' -- ' ||
                    'Fréq. IB : ' || nbr_ib || ' -- ' ||
                    'Val. IB : ' || IB || ' -- ' ||
                    'Interp. : ' || Interpretation_ib;
      IF (Ligne is NULL) THEN
          Nb_Ligne_Null = Nb_Ligne_Null + 1;
      SUSPEND;
   END

et ainsi de suite...

mais je ne vois pas où pourrait apparaitre de Ligne NULL !

**Just-Soft** · 09/11/2012, 14h31

merci dehorter olivier mais non je parle du count(monchamp) à l'intérieur de chaque procédure. comme vous devez le voir, j'ai des group by (champ_interpretation) et les résultats nulls sont traités comme un sous-ensemble mais j'ai pas le nombre de lignes exact à la sortir j'ai un 0 tandisque pour les autres sous-ensemble j'ai le bon compte.

voici un extrait du résultat d'exécution :

PERIODE DU : 30/4/2011 AU : 31/10/2012

CALCUL DE L'INDICE_BOUE
STEP : CHLEF -- Fréq. IB : 124 -- Val. IB : 19 -- Interp. : Condition acceptables de décantation des boues
STEP : CHLEF -- Fréq. IB : 60 -- Val. IB : 11 -- Interp. : Hors gamme
STEP : CHLEF -- Fréq. IB : 92 -- Val. IB : 4 -- Interp. : Les boues sont bien minéralisées et sédimentent facilement
STEP : CHLEF -- Fréq. IB : 46 -- Val. IB : 1 -- Interp. : Mauvaise décantation des boues, les flocs ne sont pas assez concentrés
STEP : CHLEF -- Fréq. IB : 156 -- Val. IB : 1 -- Interp. : Difficultés de décantation liées à un foisonement de bactéries filamenteuses "bulking"

CALCUL DU RATIO DCO / DBO5
STEP : CHLEF -- Fréq. Rx : 9 -- Val. Rx DCO/DBO5 : 1.89 -- Nat. : Effluent Industrie Agro-alimentaire
STEP : CHLEF -- Fréq. Rx : 7 -- Val. Rx DCO/DBO5 : 2.31 -- Nat. : Effluent Domestique
STEP : CHLEF -- Fréq. Rx : 0 -- Val. Rx DCO/DBO5 : 0.00 -- Nat. : /

PRODUCION DE BOUE
STEP : CHLEF -- Fréq. Rx Boue : 12 -- Val. Rx Boue : 1.92 -- Extraction : Sur extraction
STEP : CHLEF -- Fréq. Rx Boue : 3 -- Val. Rx Boue : 0.94 -- Extraction : Sous extraction
STEP : CHLEF -- Fréq. Rx Boue : 0 -- Val. Rx Boue : 0.00 -- Extraction : /

je parle des lignes en rouge, la fréquence qui est résultante de l'application du count(monchamp) est 0 alors qu'il existe au moins une ligne qui a provoqué le nulle donc j'aurais dû avoir 1 pas 0.

j'espère que je me suis fais comprendre cette fois-ci

**SergioMaster** · 09/11/2012, 14h50

ben non , je comprend pas où est ce count ?
[edit] finalement si je le vois mais je comprends pas
je reprend une de tes procédures après l'avoir (encore

) chargée

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
 
CREATE PROCEDURE "[10]PS_RATIO_DCO_DBO5" (
    date_debut date,
    date_fin date)
returns (
    nom_step varchar(20),
    effluent varchar(35),
    ratio_dco_dbo5 float)
as
BEGIN
  /* test sur la date */
  IF (:date_debut > :date_fin) THEN EXCEPTION ERREUR_DATE;
  FOR
    a.nom_step,
    avg(b.dco_entree/b.dbo5_entree) ratio_dco_dbo5,
 
    case
      when (avg(b.dco_entree/b.dbo5_entree) between 1.5 and 2) then 'éffluent industrie agro-alimentaire'
      when (avg(b.dco_entree/b.dbo5_entree) between 2 and 3) then 'éffluent domestique'
      when (avg(b.dco_entree/b.dbo5_entree) > 3) then 'éffluent industriel'
      else 'hors gamme'
    end Effluent
 
    from tb_process b
        inner join tb_step a on (a.code_step = b.code_step)
 
    where (b.date_bilan between :date_debut and :date_fin)
 
    group by a.nom_step
 
    INTO :NOM_STEP,
         :Ratio_dco_dbo5,
         :Effluent
  DO
  BEGIN
    SUSPEND;
  END
END

1- je ne vois aucun count

2- par contre je vois des trucs qui peuvent planter :
dbo5_entree=0 donnera un division par Zéro (pas bon ça)
et je ne suis pas sur que la Jointure soit bonne ?
apparemment cette jointure est pour obtenir le nom du Step ? j'aurais plutôt fait un

Code :

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

1
2
3
 
    from tb_Step a 
        left join tb_process b on (a.code_step = b.code_step)

et j'aurais fait un Group sur a.Code_step
[edit]

si je lis bien , je vais avoir un résultat par code_step donc , je comprends pas bien le Avg (on récupère déjà une moyenne) et le Count demandé et le résultat montré me parais donc bizarre

Quant à la valeur 0 du count , il vient certainement de

Code :

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

             coalesce(count(ib),0),

mettre coalesce(count(ib),1) et le tour est joué
par contre la cohérence des résultats

**dehorter olivier** · 09/11/2012, 14h54

Pour les coalescesur les variables numériques, met quelque d'incohérent coalesce(count(ib),-1),.

Je ne vois pas de pb dans cette PS, mais la PS "source" renvoi des NULLs
peux tu fournir son écriture ("[10]PS_RATIO_DCO_DBO5") ?

**Just-Soft** · 09/11/2012, 21h13

Comme à l'accoutume je me suis mal exprimé. Bon je parlais de la procédure EXECUTE_TOUT, je prends comme exemple ce bout de code :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
SELECT  coalesce(nom_step, 'Pas de nom de STEP'),
               coalesce(count(ib),0),
               coalesce(avg(ib),0),
               coalesce(interpretation_ib,' ')
       FROM "[10]PS_INDICE_BOUE"(:date_debut, :date_fin, :step, :code_point_prlv)

       GROUP BY nom_step, interpretation_ib

       ORDER BY count(ib) descending

       INTO :nom_step,
            :IB,
            :nbr_,
            :Interpretation_ib

je parlais de la ligne en rouge .... hein que suis-je bête, je le forçais à retourner ce fameux 0.

En supprimant le coalesce j'ai cru que le count allait me donné le bon compte mais hélas j'obtiens toujours pas le nombre de lignes avec des nulles.

**SergioMaster** · 10/11/2012, 07h25

Et , comme à l'accoutumé, tu ne fais pas attention

la procédure que tu nous indiques dans ce dernier post est la seule qui dans ton résultat test n'a pas d'erreurs

je te suggère une nouvelle fois de lire la doc sur les valeurs NULL ainsi que
CECI

d'où je tire ceci :

Envoyé par Aggregate fonctions

There is one exception to this rule: COUNT(*) returns the count of all rows, even rows whose fields are all NULL. But COUNT(FieldName) behaves like the other aggregate functions in that it only counts rows where the specified field is not NULL.

Another thing worth knowing is that COUNT(*) and COUNT(FieldName) never return NULL

donc, déjà : corriger le count(ib) en count(*)
enlever le coalesce inutile puisque ne retourne JAMAIS Null
idem pour AVG d'ailleurs

Remettre en question les procédures "[10]PS_RATIO_DCO_DBO5" et "[10]_PS_RATIO_BOUE"

nb. corriger les fautes d'orthographe aussi

ligne 74 : LIGNE = 'PRODUCTION DE BOUE';
effluent , n'a jamais pris d'accent

en plus nous donner le code à jour je remarque (en indiquant la faute sur effluent) que dans ton résultat on retrouve Effluent ! j'ai téléchargé la pièce jointe pour rien !?

**Just-Soft** · 10/11/2012, 08h26

Envoyé par SergioMaster

Et , comme à l'accoutumé, tu ne fais pas attention

la procédure que tu nous indiques dans ce dernier post est la seule qui dans ton résultat test n'a pas d'erreurs

car j'avais corriger le source suite à vos différentes suggestions

donc rien d'étonnant de ne pas avoir trouver les anciennes erreurs

Envoyé par SergioMaster

je te suggère une nouvelle fois de lire la doc sur les valeurs NULL ainsi que
CECI

d'où je tire ceci :

donc, déjà : corriger le count(ib) en count(*)

ok maitre je ferais

Envoyé par SergioMaster

enlever le coalesce inutile puisque ne retourne JAMAIS Null
idem pour AVG d'ailleurs

ça était déjà fait

Envoyé par SergioMaster

Remettre en question les procédures "[10]PS_RATIO_DCO_DBO5" et "[10]_PS_RATIO_BOUE"

c'était un extrait pour me faire comprendre

Envoyé par SergioMaster

nb. corriger les fautes d'orthographe aussi

ligne 74 : LIGNE = 'PRODUCTION DE BOUE';
effluent , n'a jamais pris d'accent

exact, je suis nul mais j'avais corrigé éffluent mais pas "producion"

Envoyé par SergioMaster

en plus nous donner le code à jour je remarque (en indiquant la faute sur effluent) que dans ton résultat on retrouve Effluent ! j'ai téléchargé la pièce jointe pour rien !?

voilà voilà

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
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
BEGIN
   LIGNE = 'PERIODE DU '  ||Extract(DAY FROM  date_debut)||'/'
            ||Extract(MONTH FROM date_debut)||'/'
            ||Extract(YEAR FROM date_debut)|| ' AU '
            ||Extract(DAY FROM date_fin)||'/'
            ||Extract(MONTH FROM date_fin)||'/'
            ||Extract(YEAR FROM date_fin);
   SUSPEND;
 
   LIGNE = '';
   SUSPEND;
   /******* Indice de boue ***************/
   LIGNE = 'CALCUL DE L''INDICE_BOUE';
   SUSPEND;
   FOR 
       SELECT  nom_step,
               count(*),
               avg(ib),
               interpretation_ib
       FROM "[10]PS_INDICE_BOUE"(:date_debut, :date_fin, :step, :code_point_prlv)
 
       GROUP BY nom_step, interpretation_ib
 
       ORDER BY count(ib) descending
 
       INTO :nom_step,
            :IB,
            :nbr_,
            :Interpretation_ib
 
   DO BEGIN
            LIGNE = 'STEP : ' || coalesce(nom_Step, 'Pas de nom de STEP') || ' -- ' ||
                    'Fréq. IB : ' || nbr_ || ' -- ' ||
                    'Val. IB : ' || coalesce(IB,-1) || ' -- ' ||
                    'Interp. : ' || coalesce(Interpretation_ib,' ');
      SUSPEND;
   END
 
   LIGNE = '';
   SUSPEND;
   /******* Ratio DCO / DBO5 ***************/
   LIGNE = 'CALCUL DU RATIO DCO / DBO5';
   SUSPEND;
   FOR 
       SELECT  nom_step,
               count(*),
               avg(ratio_dco_dbo5),
               effluent
 
       FROM "[10]PS_RATIO_DCO_DBO5"(:date_debut, :date_fin)
 
       WHERE (nom_step like upper(:nom_step) ||'%')
 
       GROUP BY nom_step, effluent
 
       ORDER BY count(ratio_dco_dbo5) descending
 
       INTO :nom_step,
            :nbr_,
            :dco_dbo5,
            :effluent
 
   DO BEGIN
            LIGNE = 'STEP :  ' || coalesce(nom_Step, 'Pas de nom de STEP') || ' -- ' ||
                    'Fréq. Rx : ' || nbr_ || ' -- ' ||
                    'Val. Rx DCO/DBO5 : ' || cast(coalesce(dco_dbo5,-1) as decimal(15,2)) || ' -- ' ||
                    'Nat. : ' || coalesce(effluent, ' ') ;
      SUSPEND;
   END
 
   LIGNE = '';
   SUSPEND;
   /******* Production de boue ***************/
   LIGNE = 'PRODUCTION DE BOUE';
   SUSPEND;
   FOR
       SELECT  nom_step,
               count(*),
               avg(ratio_boue),
               consigne_boue
 
       FROM "[10]_PS_RATIO_BOUE"(:date_debut, :date_fin)
 
       WHERE (nom_step like upper(:nom_step) ||'%')
 
       GROUP BY nom_step, consigne_boue
 
       ORDER BY count(ratio_boue) descending
 
       INTO :nom_step,
            :nbr_,
            :ratio_boue,
            :extration
 
   DO BEGIN
            LIGNE = 'STEP : ' || coalesce(nom_Step, 'Pas de nom de STEP') || ' -- ' ||
                    'Fréq. Rx Boue : ' || nbr_ || ' -- ' ||
                    'Val. Rx Boue  : ' || cast(coalesce(ratio_boue ,-1) as decimal(15,2)) || ' -- ' ||
                    'Extraction : ' || coalesce(extration,' ') ;
      SUSPEND;
   END
END

**SergioMaster** · 10/11/2012, 09h50

je parlais des procédures 'appelées' "[10]PS_RATIO_DCO_DBO5" et "[10]_PS_RATIO_BOUE"

**Just-Soft** · 10/11/2012, 14h35

Salut

je voudrais en ce moment gérer les exceptions, la plus fréquente et le cas de non renseignement des paramètres d'entrée (date_debut, date_fin, step, code_point_prlv). Les deux premiers paramètres sont prépondérant, l'absence d'un deux doit arrêter l'exécution de la procédure toute entière et sortir avec un message genre

(Ligne = 'Aucune exécution, veuillez renseigner la date début et la date fin)

La seconde exception est relative au thème dont on traite; s'agissant du code de la 1ière procédure, les 4 paramètres sont indispensables, pour les deux autres restants seul la date début et la date fin sont à renseigner obligatoirement.

J'ai tenté ce bout de code au début de la procédure :

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
BEGIN
   if ( (:date_debut is null) or (:date_fin is null)
            or (:step is null) or (:code_point_prlv is null)
       ) then
   begin
     exception erreur_champ_vide;
     leave;
   end
 
   LIGNE = 'PERIODE DU '  ||Extract(DAY FROM  date_debut)||'/'
            ||Extract(MONTH FROM date_debut)||'/'
            ||Extract(YEAR FROM date_debut)|| ' AU '
            ||Extract(DAY FROM date_fin)||'/'
            ||Extract(MONTH FROM date_fin)||'/'
            ||Extract(YEAR FROM date_fin);
   SUSPEND;

mais, parait-il que leave ou break ne sont acceptés que dans des boucles, comment s'en sortir avec des messages clairs pour l'utilisateur ?

**Just-Soft** · 17/11/2012, 06h54

Salut !
puisque la finalité de mon travail était un résultat sous forme de texte alors j'ai changé le type de LIGNE en blob :

ligne blob sub_type 1 segment size 80 character set unicode_fss

Qui est mieux adapté à ce genre de situation.

Je laisse ce post ouvert car j'ai pas trouvé, jusqu'à maintenant, comment faire exécuter la suite du code suite à une erreur d'exécution en amont ? car même si les bouts de codes sont dans le même source mais elles n'ont pas une dépendance entre elles.

**SergioMaster** · 17/11/2012, 07h41

Je ne comprends pas

- La "gestion des exceptions" , il est toujours possible de de faire un IF THEN ELSE ( ce n'est pas LEAVE ou BREAK mais EXIT qu'il fallait utiliser)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
BEGIN
  IF ( (:date_debut IS NULL) OR (:date_fin IS NULL)
            OR (:step IS NULL) OR (:code_point_prlv IS NULL)
       ) then
   begin
     Ligne = 'Aucune exécution, veuillez renseigner la date début et la date fin';
     SUSPEND;
   end
ELSE BEGIN  --- Traitement "normal" 
---
END

ou encore utiliser un gestionnaire d'exception

Code :

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

1
2
3
4
5
6
7
 
when any do
begin
  Ligne = 'Aucune exécution';
  SUSPEND;
  EXIT;
end

- l'utilisation de blob , à mon avis inutile dans ce contexte , de toute façon le blob sera traité comme un VARCHAR

-le fait que l'utilisateur utilise directement le SQL

il n'y a pas d'interface IHM (Delphi,C++ ....) qui permet de contrôler la saisie des paramètres et qui fait un joli petit état (rave,fastreport ....) ?

**Just-Soft** · 17/11/2012, 08h07

Envoyé par SergioMaster

Je ne comprends pas

- La "gestion des exceptions" , il est toujours possible de de faire un IF THEN ELSE ( ce n'est pas LEAVE ou BREAK mais EXIT qu'il fallait utiliser)

Exact, j'ai corrigé mais ça n'aboutit pas à tout les coups en plus "Exit" me fait sortir de la PS alors que dans mon cas je voudrais retrouver la trace de l'échoue de cette exécution, p.e :

Indice de boue :
Echoue de l'exécution du traitement de l'indice de boue
Production de boue
Résultats
Ration DCO/DBO5
etc..

Envoyé par SergioMaster

le fait que l'utilisateur utilise directement le SQL

il n'y a pas d'interface IHM (Delphi,C++ ....) qui permet de contrôler la saisie des paramètres et qui fait un joli petit état (rave,fastreport ....) ?

je suis sous IB et ça permet justement de réaliser les états en format FR ce qui me fera gagner un temps appréciable sous delphi c'est pourquoi j'essaye de réaliser le maximum de choses en mode SQL

**Just-Soft** · 16/12/2012, 10h35

Salut
à priori la réponse est nulle ! peut-être que j'ai pas su exploiter le résultat

bref, j'ai une PS qui retourne bien ce que je veux ... à un moment donné les paramètres d'entrée fournissent un résultat nul, dans tout les cas de figures je teste sur le nombre de lignes retournées pour afficher un message mais je me suis aperçu que pour nul le teste n'exécute jamais la portion du code qui lui est destinée.

pour mieux comprendre voici le bout de programme qui teste le résultat retourné de la PS :

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
/******* Analyse des dépassements  ***************/
   STEP_ = '';
   NBR_ = 0;
   RATIO_ = -1;
   NUM = 1;
   LIGNE = LIGNE || ascii_char(13) || ascii_char(10);
   LIGNE = LIGNE || 'III - ANALYSE DES DEPASSEMENTS PMA / PMD'
                 || ascii_char(13) || ascii_char(10);
   FOR
       SELECT NOM_STEP,
              count(NBR_DEP),
              max(PMD)
 
       FROM "[8]PS_DEPASS_PMAPMD"(:DATE_DEBUT, :DATE_FIN)
 
       WHERE (NOM_STEP like upper(:N_STEP))
 
       GROUP BY NOM_STEP
 
       INTO :STEP_,
            :NBR_,
            :RATIO_
 
   DO BEGIN
        if (NBR_ = 0) then -- j'ai aussi testé avec NBR_ is null mais ça passe pas ... cette ligne n'est jamais exécutée 
            LIGNE = LIGNE || LPAD(' ',4, ' ') || 'Cette STEP n''enregistre aucun dépassement de la PMD. ';
        else
        LIGNE = LIGNE || LPAD(' ',4, ' ') || 'PMD (kw): '
                      || coalesce(cast(ratio_ as integer), ' ')
                      || ascii_char(13) || ascii_char(10)
                      || LPAD(' ',4, ' ') || 'Dépassement en PMA '
                      || coalesce(NBR_,'') || ' fois '
                      || 'du ' || :date_debut || ' au ' || :date_fin
                      || ascii_char(13) || ascii_char(10);
   END

en simple, je veux exploiter le résultat fourni par la PS, si le nombre de lignes est différent de 0 il m'affiche un message sinon c'est un autre message qui est affiché.

Merci par avance pour tout éclaircissement.

**Ph. B.** · 16/12/2012, 15h32

Bonjour,

Envoyé par Just-Soft

à un moment donné les paramètres d'entrée fournissent un résultat nul

Dans ce cas, le bloc de code dans la boucle FOR ne sera jamais exécuté, de même que le test que vous vouliez contrôler.
Pour le vérifier, mettez un compteur d'itération à 0 à l'extérieur de la boucle FOR, incrémentez le dans le bloc BEGIN END pour chaque itération et renvoyez le résultat. Vous verrez qu'il vaudra 0...

**Just-Soft** · 16/12/2012, 15h41

Envoyé par Ph. B.

Bonjour,
Dans ce cas, le bloc de code dans la boucle FOR ne sera jamais exécuté, de même que le test que vous vouliez contrôler.
Pour le vérifier, mettez un compteur d'itération à 0 à l'extérieur de la boucle FOR, incrémentez le dans le bloc BEGIN END pour chaque itération et renvoyez le résultat. Vous verrez qu'il vaudra 0...

Merci mais c'est ce que j'ai fais avec la variable NBR_ qui est initialisé à 0 mais quand je teste sur cette variable rien n'est fait comme si le résultat retourné force la PS a ne pas exécuter le bloc de code !!!!

**Ph. B.** · 16/12/2012, 16h43

Envoyé par Just-Soft

Merci mais c'est ce que j'ai fais avec la variable NBR_ qui est initialisé à 0 mais quand je teste sur cette variable rien n'est fait comme si le résultat retourné force la PS a ne pas exécuter le bloc de code !!!!

Vous n'avez absolument pas compris ce que j'ai dit !!! relisez moi !
Le select de la boucle for ne renvoyant aucun résultat, aucune instruction du bloc begin ... end de cette boucle for ne sera exécuté, donc votre test if (nbr_ = 0) then ... else ne le sera pas non plus !
Ce dont je parle :

Code sql :

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

1
2
3
4
5
6
7
8
9
10
ITERATION = 0;
FOR SELECT ...
DO
BEGIN
  ITERATION = ITERATION + 1;
  -- Votre instruction
END
-- si ITERATION = 0, alors le code dans le BEGIN END n'a jamais été exécuté !
-- ce qui se produit si le select fournit un résultat nul comme vous le dites !
LIGNE = ITERATION || ' itération(s)  '  || LIGNE;

**Just-Soft** · 16/12/2012, 16h59

Envoyé par Ph. B.

Vous n'avez absolument pas compris ce que j'ai dit !!! relisez moi !

Re,

je crains fort que c'est vous qui ne lisez pas bien !!!
car mon NBR_ est initialisé avant le Select mais malgré ça j'ai ce petit problème qui me dépasse hélas

**Just-Soft** · 16/12/2012, 17h06

Vous parlez du BEGIN END final !!! non, je ne crois pas que se soit la bonne solution car j'exécute plusieurs PS au sein du cette PS globale.. donc le mieux serait de gérer ça au niveau du BEGIN END de la dite PS.

Je suis d'accord avec vous sur le faite que si le select ne parvient pas à retourner de valeur alors la variable reste à 0 mais pourquoi le BEGIN END ne s'exécute pas dans ce cas ça me parait pas normal sauf si les concepteurs ont décidé ainsi.

**Ph. B.** · 16/12/2012, 17h17

Envoyé par Just-Soft

Vous parlez du BEGIN END final !!! non, je ne crois pas que se soit la bonne solution car j'exécute plusieurs PS au sein du cette PS globale.. donc le mieux serait de gérer ça au niveau du BEGIN END de la dite PS.

Ce que vous appelez le begin end final est celui que j'associe depuis le début à la boucle for !

Envoyé par Just-Soft

Je suis d'accord avec vous sur le faite que si le select ne parvient pas à retourner de valeur alors la variable reste à 0 mais pourquoi le BEGIN END ne s'exécute pas dans ce cas ça me parait pas normal sauf si les concepteurs ont décidé ainsi.

Je vous rappelle qu'avec SQL on raisonne en terme d'ensemble. L'ensemble résultant du select de la boucle for étant vide, il n'y a aucune raison d'exécuter le code du bloc begin end associé. C'est donc le traitement normal et attendu...

"N" procédures stockées exécutées dans un seul code

SQL Firebird

Discussions similaires

Partager

Partager