declaration habituelle et pourtant ORA-06577

**hoaxpunk** · 24/04/2006, 09h46

bonjour,

voila, j'ai un package avec plusieurs fonctions et procédures, et j'ai rajoutée une procedure, j'ai fait les declarations identiques aux autres(qui elles fonctionnent) et pourtant j'ai une erreur :

ORA-06577: le paramètre de sortie n'est pas une variable de liaison

voila ma procedure :

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
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310

PROCEDUREp_pc_es_02_05(
in_cli_refbp INVARCHAR2,
in_pcr_cp INVARCHAR2,
in_pcr_type_logement INVARCHAR2,
in_pcr_statut_occupant INVARCHAR2,
in_pcr_altitude INVARCHAR2,
in_pcr_annee_construction INVARCHAR2,
in_pcr_nb_pieces_principales INVARCHAR2,
in_pcr_nb_sdb_sdeau INVARCHAR2,
in_pcr_nb_occupants_reguliers INVARCHAR2,
in_pcr_surface_habitable INVARCHAR2,
in_pcr_forme INVARCHAR2,
in_pcr_situation INVARCHAR2,
in_pcr_nb_niveaux INVARCHAR2,
in_pcr_type_plancher INVARCHAR2,
in_pcr_type_plafond INVARCHAR2,
in_pcr_type_ventilation INVARCHAR2,
in_pcr_type_isolation INVARCHAR2,
in_pcr_temp_amb_chauffage INVARCHAR2,
in_pcr_rythme_chauffage INVARCHAR2,
in_pcr_thermostat_ambiance INVARCHAR2,
in_pcr_eau_chaude_sanitaire INVARCHAR2,
in_pcr_client_civilite INVARCHAR2,
in_pcr_client_nom INVARCHAR2,
in_pcr_client_prenom INVARCHAR2,
in_pcr_client_adresse_postale INVARCHAR2,
in_pcr_client_ville INVARCHAR2,
in_pcr_client_cp INVARCHAR2,
out_code_retour OUTNUMBER
);
PROCEDURE p_pc_es_02_05 (
   in_cli_refbp                    IN       VARCHAR2,
   in_pcr_cp                       IN       VARCHAR2,
   in_pcr_type_logement            IN       VARCHAR2,
   in_pcr_statut_occupant          IN       VARCHAR2,
   in_pcr_altitude                 IN       VARCHAR2,
   in_pcr_annee_construction       IN       VARCHAR2,
   in_pcr_nb_pieces_principales    IN       VARCHAR2,
   in_pcr_nb_sdb_sdeau             IN       VARCHAR2,
   in_pcr_nb_occupants_reguliers   IN       VARCHAR2,
   in_pcr_surface_habitable        IN       VARCHAR2,
   in_pcr_forme                    IN       VARCHAR2,
   in_pcr_situation                IN       VARCHAR2,
   in_pcr_nb_niveaux               IN       VARCHAR2,
   in_pcr_type_plancher            IN       VARCHAR2,
   in_pcr_type_plafond             IN       VARCHAR2,
   in_pcr_type_ventilation         IN       VARCHAR2,
   in_pcr_type_isolation           IN       VARCHAR2,
   in_pcr_temp_amb_chauffage       IN       VARCHAR2,
   in_pcr_rythme_chauffage         IN       VARCHAR2,
   in_pcr_thermostat_ambiance      IN       VARCHAR2,
   in_pcr_eau_chaude_sanitaire     IN       VARCHAR2,
   in_pcr_client_civilite          IN       VARCHAR2,
   in_pcr_client_nom               IN       VARCHAR2,
   in_pcr_client_prenom            IN       VARCHAR2,
   in_pcr_client_adresse_postale   IN       VARCHAR2,
   in_pcr_client_ville             IN       VARCHAR2,
   in_pcr_client_cp                IN       VARCHAR2,
   out_code_retour                 OUT      NUMBER
)
IS
   pb_cli_refbp                    EXCEPTION;
   pb_pcr_cp                       EXCEPTION;
   pb_pcr_type_logement            EXCEPTION;
   pb_pcr_statut_occupant          EXCEPTION;
   pb_pcr_altitude                 EXCEPTION;
   pb_pcr_annee_construction       EXCEPTION;
   pb_pcr_nb_pieces_principales    EXCEPTION;
   pb_pcr_nb_sdb_sdeau             EXCEPTION;
   pb_pcr_nb_occupants_reguliers   EXCEPTION;
   pb_pcr_surface_habitable        EXCEPTION;
   pb_pcr_forme                    EXCEPTION;
   pb_pcr_situation                EXCEPTION;
   pb_pcr_nb_niveaux               EXCEPTION;
   pb_pcr_type_plancher            EXCEPTION;
   pb_pcr_type_plafond             EXCEPTION;
   pb_pcr_type_ventilation         EXCEPTION;
   pb_pcr_type_isolation           EXCEPTION;
   pb_pcr_temp_amb_chauffage       EXCEPTION;
   pb_pcr_rythme_chauffage         EXCEPTION;
   pb_pcr_thermostat_ambiance      EXCEPTION;
   pb_pcr_eau_chaude_sanitaire     EXCEPTION;
   pb_pcr_client_civilite          EXCEPTION;
   pb_pcr_client_nom               EXCEPTION;
   pb_pcr_client_prenom            EXCEPTION;
   pb_pcr_client_adresse_postale   EXCEPTION;
   pb_pcr_client_ville             EXCEPTION;
   pb_pcr_client_cp                EXCEPTION;
BEGIN
   IF (   (LENGTH (in_cli_refbp) > 9)
       OR (LENGTH (in_cli_refbp) < 0)
       OR (in_cli_refbp IS NULL)
      )
   THEN
      RAISE pb_cli_refbp;
   END IF;
   IF (in_pcr_cp IS NULL)
   THEN
      RAISE pb_pcr_cp;
   END IF;
   IF (in_pcr_type_logement IS NULL)
   THEN
      RAISE pb_pcr_type_logement;
   END IF;
   IF (in_pcr_statut_occupant IS NULL)
   THEN
      RAISE pb_pcr_statut_occupant;
   END IF;
   IF (in_pcr_altitude IS NULL)
   THEN
      RAISE pb_pcr_altitude;
   END IF;
   IF (in_pcr_annee_construction IS NULL)
   THEN
      RAISE pb_pcr_annee_construction;
   END IF;
   IF (in_pcr_nb_pieces_principales IS NULL)
   THEN
      RAISE pb_pcr_nb_pieces_principales;
   END IF;
   IF (in_pcr_nb_sdb_sdeau IS NULL)
   THEN
      RAISE pb_pcr_nb_sdb_sdeau;
   END IF;
   IF (in_pcr_nb_occupants_reguliers IS NULL)
   THEN
      RAISE pb_pcr_nb_occupants_reguliers;
   END IF;
   IF (in_pcr_surface_habitable IS NULL)
   THEN
      RAISE pb_pcr_surface_habitable;
   END IF;
   IF (in_pcr_forme IS NULL)
   THEN
      RAISE pb_pcr_forme;
   END IF;
   IF (in_pcr_situation IS NULL)
   THEN
      RAISE pb_pcr_situation;
   END IF;
   IF (in_pcr_nb_niveaux IS NULL)
   THEN
      RAISE pb_pcr_nb_niveaux;
   END IF;
   IF (in_pcr_type_plancher IS NULL)
   THEN
      RAISE pb_pcr_type_plancher;
   END IF;
   IF (in_pcr_type_plafond IS NULL)
   THEN
      RAISE pb_pcr_type_plafond;
   END IF;
   IF (in_pcr_type_ventilation IS NULL)
   THEN
      RAISE pb_pcr_type_ventilation;
   END IF;
   IF (in_pcr_type_isolation IS NULL)
   THEN
      RAISE pb_pcr_type_isolation;
   END IF;
   IF (in_pcr_temp_amb_chauffage IS NULL)
   THEN
      RAISE pb_pcr_temp_amb_chauffage;
   END IF;
   IF (in_pcr_rythme_chauffage IS NULL)
   THEN
      RAISE pb_pcr_rythme_chauffage;
   END IF;
   IF (in_pcr_thermostat_ambiance IS NULL)
   THEN
      RAISE pb_pcr_thermostat_ambiance;
   END IF;
   IF (in_pcr_eau_chaude_sanitaire IS NULL)
   THEN
      RAISE pb_pcr_eau_chaude_sanitaire;
   END IF;
   IF (in_pcr_client_civilite IS NULL)
   THEN
      RAISE pb_pcr_client_civilite;
   END IF;
   IF (in_pcr_client_nom IS NULL)
   THEN
      RAISE pb_pcr_client_nom;
   END IF;
   IF (in_pcr_client_prenom IS NULL)
   THEN
      RAISE pb_pcr_client_prenom;
   END IF;
   IF (in_pcr_client_adresse_postale IS NULL)
   THEN
      RAISE pb_pcr_client_adresse_postale;
   END IF;
   IF (in_pcr_client_ville IS NULL)
   THEN
      RAISE pb_pcr_client_ville;
   END IF;
   IF (in_pcr_client_cp IS NULL)
   THEN
      RAISE pb_pcr_client_cp;
   END IF;
   INSERT INTO pointconso_results
               (cli_refbp, pcr_cp, pcr_type_logement,
                pcr_statut_occupant, pcr_altitude,
                pcr_annee_construction, pcr_nb_pieces_principales,
                pcr_nb_sdb_sdeau, pcr_nb_occupants_reguliers,
                pcr_surface_habitable, pcr_forme, pcr_situation,
                pcr_nb_niveaux, pcr_type_plancher, pcr_type_plafond,
                pcr_type_ventilation, pcr_type_isolation,
                pcr_temp_amb_chauffage, pcr_rythme_chauffage,
                pcr_thermostat_ambiance, pcr_eau_chaude_sanitaire,
                pcr_client_civilite, pcr_client_nom,
                pcr_client_prenom, pcr_client_adresse_postale,
                pcr_client_ville, pcr_client_cp, pcr_date_creation)
        VALUES (in_cli_refbp, in_pcr_cp, in_pcr_type_logement,
                in_pcr_statut_occupant, in_pcr_altitude,
                in_pcr_annee_construction, in_pcr_nb_pieces_principales,
                in_pcr_nb_sdb_sdeau, in_pcr_nb_occupants_reguliers,
                in_pcr_surface_habitable, in_pcr_forme, in_pcr_situation,
                in_pcr_nb_niveaux, in_pcr_type_plancher, in_pcr_type_plafond,
                in_pcr_type_ventilation, in_pcr_type_isolation,
                in_pcr_temp_amb_chauffage, in_pcr_rythme_chauffage,
                in_pcr_thermostat_ambiance, in_pcr_eau_chaude_sanitaire,
                in_pcr_client_civilite, in_pcr_client_nom,
                in_pcr_client_prenom, in_pcr_client_adresse_postale,
                in_pcr_client_ville, in_pcr_client_cp, sysdate);
    out_code_retour := code_ok_0;
EXCEPTION
   WHEN pb_cli_refbp
   THEN
      out_code_retour := code_erreur_150;
   WHEN pb_pcr_cp
   THEN
      out_code_retour := code_erreur_151;
   WHEN pb_pcr_type_logement
   THEN
      out_code_retour := code_erreur_152;
   WHEN pb_pcr_statut_occupant
   THEN
      out_code_retour := code_erreur_153;
   WHEN pb_pcr_altitude
   THEN
      out_code_retour := code_erreur_154;
   WHEN pb_pcr_annee_construction
   THEN
      out_code_retour := code_erreur_155;
   WHEN pb_pcr_nb_pieces_principales
   THEN
      out_code_retour := code_erreur_156;
   WHEN pb_pcr_nb_sdb_sdeau
   THEN
      out_code_retour := code_erreur_157;
   WHEN pb_pcr_nb_occupants_reguliers
   THEN
      out_code_retour := code_erreur_158;
   WHEN pb_pcr_surface_habitable
   THEN
      out_code_retour := code_erreur_159;
   WHEN pb_pcr_forme
   THEN
      out_code_retour := code_erreur_160;
   WHEN pb_pcr_situation
   THEN
      out_code_retour := code_erreur_161;
   WHEN pb_pcr_nb_niveaux
   THEN
      out_code_retour := code_erreur_162;
   WHEN pb_pcr_type_plancher
   THEN
      out_code_retour := code_erreur_163;
   WHEN pb_pcr_type_plafond
   THEN
      out_code_retour := code_erreur_164;
   WHEN pb_pcr_type_ventilation
   THEN
      out_code_retour := code_erreur_165;
   WHEN pb_pcr_type_isolation
   THEN
      out_code_retour := code_erreur_166;
   WHEN pb_pcr_temp_amb_chauffage
   THEN
      out_code_retour := code_erreur_167;
   WHEN pb_pcr_rythme_chauffage
   THEN
      out_code_retour := code_erreur_168;
   WHEN pb_pcr_thermostat_ambiance
   THEN
      out_code_retour := code_erreur_169;
   WHEN pb_pcr_eau_chaude_sanitaire
   THEN
      out_code_retour := code_erreur_170;
   WHEN pb_pcr_client_civilite
   THEN
      out_code_retour := code_erreur_171;
   WHEN pb_pcr_client_nom
   THEN
      out_code_retour := code_erreur_172;
   WHEN pb_pcr_client_prenom
   THEN
      out_code_retour := code_erreur_173;
   WHEN pb_pcr_client_adresse_postale
   THEN
      out_code_retour := code_erreur_174;
   WHEN pb_pcr_client_ville
   THEN
      out_code_retour := code_erreur_175;
   WHEN pb_pcr_client_cp
   THEN
      out_code_retour := code_erreur_176;
END p_pc_es_02_05;

et lorsque j'execute :
call pk_portail_clients.P_Pc_ES_02_05('123456789','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','');

j'ai l'erreur.

merci de votre aide

**orafrance** · 24/04/2006, 09h53

Le paramètre de sortie doit être une bind variable

Essaye :

Code :

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

1
2
3
4
5
6
7
8
9
 
SET SERVEROUTPUT ON;
DECLARE 
code_retour NUMBER;
BEGIN
pk_portail_clients.P_Pc_ES_02_05('123456789','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1',code_retour);
dbms_output.put_line('Code retour : ' || code_retour);
END;
/

**hoaxpunk** · 24/04/2006, 10h10

désolé mais sa ne fonctionne pas mieu

j'ai declarer d'autre proc ainsi et elle fonctionnent :

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
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138

/* Procedure utilisée dans wliProcessesPcCl0101 pour la creation du compte en ligne */
PROCEDURE p_pc_cl_01_01 (
in_refbp INVARCHAR2,
in_mail INVARCHAR2,
in_mailok INNUMBER,
in_newsok INNUMBER,
in_nom INVARCHAR2,
in_civilite INVARCHAR2,
in_statut INCHAR,
out_code_retour OUTNUMBER
);
/* Procedure utilisée dans wliProcessesPcCl0101 pour la creation du compte en ligne */
   PROCEDURE p_pc_cl_01_01 (
      in_refbp          IN       VARCHAR2,
      in_mail           IN       VARCHAR2,
      in_mailok         IN       NUMBER,
      in_newsok         IN       NUMBER,
      in_nom            IN       VARCHAR2,
      in_civilite       IN       VARCHAR2,
      /* Traitement des clients AEL DEBUT*/
      in_statut         IN       CHAR,
      /* Traitement des clients AEL FIN*/
      out_code_retour   OUT      NUMBER
   )
   IS
      vc_refbp      VARCHAR2 (9);
      vc_flagcel    CHAR;
      vc_mail       VARCHAR2 (100);
      vc_result     NUMBER;
      /* Traitement des clients AEL DEBUT*/
      vc_statut     CHAR (1);
      /* Traitement des clients AEL FIN*/
      pb_ok         EXCEPTION;
      pb_lenght     EXCEPTION;
      pb_null       EXCEPTION;
      pb_mail       EXCEPTION;
      pb_civilite   EXCEPTION;
   BEGIN
      /* Test sur la validité de la reference BP en entrée */
      IF ((LENGTH (in_refbp) > 9) OR (LENGTH (in_refbp) < 9))
      THEN
         RAISE pb_lenght;
      END IF;
     /* Test sur la nullité de la reference BP en entrée*/
      IF (in_refbp IS NULL)
      THEN
         RAISE pb_null;
      END IF;
     /* Test sur la nullité de l'adresse mail en entrée*/
      IF (in_mail IS NULL)
      THEN
         RAISE pb_mail;
      END IF;
     /* Test sur le flag spam et le flag newsletter en entré*/
      IF (   ((in_mailok != 0) AND (in_mailok != 1))
          OR ((in_newsok != 0) AND (in_newsok != 1))
         )
      THEN
         RAISE pb_ok;
      END IF;
     /* Traitement des clients AEL DEBUT */
      IF (in_statut IS NULL)
      THEN
         vc_statut := 'd';
      ELSE
         vc_statut := in_statut;
      END IF;
     /* Traitement des clients AEL FIN*/
      SELECT   COUNT (cli_refbp), cli_flagcel
          INTO vc_refbp, vc_flagcel
          FROM client
         WHERE cli_refbp = in_refbp
      GROUP BY cli_flagcel;
     /* Si le flag du compte en ligne est a 'valider'*/
      IF (vc_flagcel = 'v')
      THEN
         /* On retourne le code retour 1*/
         out_code_retour := code_ok_1;
      ELSE
         /* Sinon on met a jour le compte en ligne */
         /* et on renvoi le code retour 2 */
         out_code_retour := code_ok_2;
  IF (vc_statut = 'r')
   THEN
   UPDATE client
            SET cli_mail = in_mail,
                cli_mailok = in_mailok,
                cli_newsok = in_newsok,
                cli_flagcel = vc_statut
            WHERE  cli_refbp = in_refbp;
  ELSE
          UPDATE client
            SET cli_date_creation = SYSDATE,
                cli_mail = in_mail,
                cli_mailok = in_mailok,
                cli_newsok = in_newsok
                                      /* Traitement des clients AEL DEBUT*/
             ,
                cli_flagcel = vc_statut
            /* Traitement des clients AEL FIN*/
            WHERE  cli_refbp = in_refbp;
  END IF;
      END IF;
   EXCEPTION
      /* Lors de la requete, si il n'y a aucun retour du coté oracle, on insert le nouveau compte en ligne */
      WHEN NO_DATA_FOUND
      THEN
         INSERT INTO client
                     (cli_refbp, cli_mail, cli_mailok, cli_newsok,
                      cli_date_creation, cli_flagcel, cli_date_validation,
                      cli_nom, cli_civilite
                     )
              VALUES (in_refbp, in_mail, in_mailok, in_newsok,
                      SYSDATE
                             /* Traitement des clients AEL FIN*/
                             /* , 'd'*/
         ,            vc_statut
                               /* Traitement des clients AEL FIN*/
         ,            '',
                      in_nom, in_civilite
                     );
        /* et on renvoi le code retour 0 */
         out_code_retour := code_ok_0;
      WHEN pb_ok
      THEN
         out_code_retour := code_erreur_109;
      WHEN pb_lenght
      THEN
         out_code_retour := code_erreur_106;
      WHEN pb_null
      THEN
         out_code_retour := code_erreur_108;
      WHEN pb_mail
      THEN
         out_code_retour := code_erreur_105;
   END p_pc_cl_01_01;

donc pourquoi d'un coup sa ne fonctionne plus???

**Karim.1** · 24/04/2006, 10h13

l_code_number NUMBER

call pk_portail_clients.P_Pc_ES_02_05('123456789','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1','1',l_code_number);

**hoaxpunk** · 24/04/2006, 10h23

desolé mais je ne peut pas utiliser cette syntaxe, j'appel ma fonction dans du java.

mais la n'est pas le probleme, pourquoi devrais-je changer l'appel, alors que sa a toujours marché?

**Karim.1** · 24/04/2006, 10h32

Qu'est ce qui a toujours marché ?

Ton problème ne se trouve pas au niveau de la procedure mais au niveau de l'appel. Si pour les autres fois l'appel a été bien fait c'est normal que ça marche.

Tu as un parametre out qui est du type numérique et tu lappelle ainsi '' : ça ne peut pas marcher

**hoaxpunk** · 24/04/2006, 10h34

ok je vais faire d'autre test mon colegue est arrivé, je vais pouvoir tester directement l'apel

declaration habituelle et pourtant ORA-06577

Oracle

Discussions similaires

Partager

Partager