Discussion :

[hoaxpunk]

bonjour,

voila, je debute en pl/sql, et je doit créer des procedures, mais j'ai des erreures que je ne comprend pas, 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
CREATE OR REPLACE Procedure verif_client(
vc_refbp IN NUMBER[9],
vc_mail IN CHAR[100],
vc_mailok IN SMALLINT,
vc_newsok IN SMALLINT,
vc_compteok IN SMALLINT
)
IS
BEGIN
IF (!EXIST(SELECT CLI_REFBP FROM CLIENT WHERE CLI_REFBP = vc_refbp;))
THEN (INSERT INTO CLIENT (CLI_REFBP,CLI_MAIL,CLI_MAILOK,CLI_COMPTEOK,CLI_NEWSOK) 
	VALUE (vc_refbp,vc_mail,vc_mailok,vc_compteok,vc_newsok))
	return "0"
ELSE
	IF ((SELECT CLI_REFBP FROM CLIENT WHERE CLI_REFBP = vc_refbp;)="0")
	THEN (UPDATE CLIENT SET CLI_COMPTEO;K = "1" WHERE CLI_REFBP = vc_refbp)
	return "0"
	ELSE
		IF ((SELECT CLI_REFBP FROM CLIENT WHERE CLI_REFBP = vc_refbp;) = "1")
		THEN RETURN "1"
		ENDIF
	ENDIF
ENDIF
END;

et l'erreur est la suivante:

Code :

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

(S2724) Expecting:    )    ,   :=  CHARACTER  DEFAULT

elle est sur la ligne :

Code :

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

vc_refbp IN NUMBER[9],

si quelqu'un pouvait m'aider a comprendre pourquoi c'est faux, et comment corriger se serait cool merci

hOAx punK

[Yorglaa]

Salut,
en PL/SQL les longueur/précisions de chaîne ou de nombre doivent être entre parenthèses et pas entre crochet...

[hoaxpunk]

j'ai modifier sa ce qui donne :

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
CREATE OR REPLACE Procedure verif_client
(vc_refbp IN NUMBER(9),
vc_mail IN CHAR(100),
vc_mailok IN SMALLINT,
vc_newsok IN SMALLINT,
vc_compteok IN SMALLINT)
IS
BEGIN
IF (!EXIST(SELECT CLI_REFBP FROM CLIENT WHERE CLI_REFBP = vc_refbp;))
THEN (INSERT INTO CLIENT (CLI_REFBP,CLI_MAIL,CLI_MAILOK,CLI_COMPTEOK,CLI_NEWSOK) 
	VALUE (vc_refbp,vc_mail,vc_mailok,vc_compteok,vc_newsok);)
	return "0";
ELSE
	IF ((SELECT CLI_REFBP FROM CLIENT WHERE CLI_REFBP = vc_refbp;)="0")
	THEN (UPDATE CLIENT SET CLI_COMPTEO;K = "1" WHERE CLI_REFBP = vc_refbp;)
	return "0";
	ELSE
		IF ((SELECT CLI_REFBP FROM CLIENT WHERE CLI_REFBP = vc_refbp;) = "1")
		THEN RETURN "1";
		ENDIF
	ENDIF
ENDIF
END;

et pourtant j'ai toujours la meme erreur au meme endroit...

[fdraven]

Il ne faut pas préciser la taille du nombre juste mettre number.

En espérant t'avoir aidé.

[bouyao]

Code :

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

UPDATE CLIENT SET CLI_COMPTEO;K = "1" WHERE CLI_REFBP = vc_refbp

après CLI_COMPTEO il y'a un point virgule, Pourquoi ?

[hoaxpunk]

bouyao -> j'ai corriger ce point virgule n'existe pas lol

j'ai modifier ainsi :

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
CREATE OR REPLACE Procedure verif_client
(vc_refbp IN NUMBER,
vc_mail IN CHAR(100),
vc_mailok IN SMALLINT,
vc_newsok IN SMALLINT,
vc_compteok IN SMALLINT)
IS
BEGIN
IF (!EXIST(SELECT CLI_REFBP FROM CLIENT WHERE CLI_REFBP = vc_refbp;))
THEN (INSERT INTO CLIENT (CLI_REFBP,CLI_MAIL,CLI_MAILOK,CLI_COMPTEOK,CLI_NEWSOK) 
	VALUE (vc_refbp,vc_mail,vc_mailok,vc_compteok,vc_newsok);)
	return "0";
ELSE
	IF ((SELECT CLI_REFBP FROM CLIENT WHERE CLI_REFBP = vc_refbp;)="0")
	THEN (UPDATE CLIENT SET CLI_COMPTEOK = "1" WHERE CLI_REFBP = vc_refbp;)
	return "0";
	ELSE
		IF ((SELECT CLI_REFBP FROM CLIENT WHERE CLI_REFBP = vc_refbp;) = "1")
		THEN RETURN "1";
		ENDIF
	ENDIF
ENDIF
END;

et maintenant l'erreur est :

Code :

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

(S1789) Expecting:    )    ,   :=  CHARACTER  DEFAULT  LARGE  VARYING

a la ligne :

Code :

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

vc_mail IN CHAR(100),

[hoaxpunk]

j'ai trouver, j'avance un peu mais c'est pas encore sa :

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
CREATE OR REPLACE Procedure verif_client
(vc_refbp IN NUMBER,
vc_mail IN CHAR,
vc_mailok IN SMALLINT,
vc_newsok IN SMALLINT,
vc_compteok IN SMALLINT)
IS
BEGIN
IF ((SELECT CLI_REFBP FROM CLIENT WHERE CLI_REFBP = vc_refbp;) IS NULL)
THEN (INSERT INTO CLIENT (CLI_REFBP,CLI_MAIL,CLI_MAILOK,CLI_COMPTEOK,CLI_NEWSOK) 
	VALUES (vc_refbp,vc_mail,vc_mailok,vc_compteok,vc_newsok);)
	return "0";
ELSE
	IF ((SELECT CLI_REFBP FROM CLIENT WHERE CLI_REFBP = vc_refbp;)="0")
	THEN (UPDATE CLIENT SET CLI_COMPTEOK = "1" WHERE CLI_REFBP = vc_refbp;)
	return "0";
	ELSE
		IF ((SELECT CLI_REFBP FROM CLIENT WHERE CLI_REFBP = vc_refbp;) = "1")
		THEN RETURN "1";
		ENDIF
	ENDIF
ENDIF
END;

erreur :

Code :

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

1
2
3
4
PLS-00103: Symbole "SELECT" rencontré à la place d'un des symboles suivants :
 
   ( - + case mod new not null others <an identifier>
   <a double-quoted delimited-identifier> <a bind variable> avg

ligne :

Code :

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

IF ((SELECT CLI_REFBP FROM CLIENT WHERE CLI_REFBP = vc_refbp;) IS NULL)