Discussion :

[crouba]

Bonjour

Voici mon problème

Dans une table t1 j'ai un champ texte appelé DIV

Afin de l'utiliser comme comparateur dans l'UPDATE d'une autre table, il me faut changer la valeur de ce champ sachant que :

si champ = RFRV alors champ doit être égal à RFRM
si champ = RFRM alors champ doit être égal à RFRV
si champ autre alors champ = champ

j'ai essayé de créer une fonction à l'aide de MySql Query Brother

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
DELIMITER $$
 
DROP PROCEDURE IF EXISTS `suivi_transfert_retour`.`versusdiv` $$
CREATE PROCEDURE `suivi_transfert_retour`.`versusdiv`(TOTO)
 
BEGIN
SELECT CASE TOTO
  WHEN 'rfrv' THEN 'rfrm'
  WHEN 'rfrm' THEN 'rfrv' ELSE `TOTO`
END
END $$
 
DELIMITER ;

qui me renvoie une erreur de syntaxe 1064 "...to use near ')
BEGIN
SELECT CASE TOTO
WHEN 'rfrv' THEN 'rfrm'
WHEN 'rfrm' THEN 'rfr at line 1

C'est ma première création de fonction et je suis un peu perdu.

Quelqu'un peut il m'aider ?

Merci d'avance

Précision : j'ai ouvert tous les droits sur la base

[Alain Defrance]

Bonjour,

Je pense que de cette forme ça sera mieux.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
DELIMITER $$
 
DROP PROCEDURE IF EXISTS `suivi_transfert_retour`.`versusdiv` $$
CREATE PROCEDURE `suivi_transfert_retour`.`versusdiv`(TOTO VARCHAR)
 
BEGIN
SELECT CASE TOTO
  WHEN 'rfrv' THEN 'rfrm'
  WHEN 'rfrm' THEN 'rfrv'
  ELSE `TOTO`
END;
END $$
 
DELIMITER ;

Peut être avec un code réel il serait plus simple de t'aider.

[crouba]

en fait je suis en train de migrer une appli que j'ai développée en Visual Basic et Access.
aujourd'hui je conserve mon support Visual Basic comme interface, mais je me sert de MySql comme BDD.

dans mon traitement, je mets à jour une table, (tbl_suivi), à partir d'une autre table, (tbl_me80fn), dans lesquelles j'ai un champ commun "Division".

le hic est que dans l'une tbl_me80fn, lorsque mon champ contient rfrv en fait dans l'autre mon champ contient rfrm et inversement (pb d'extraction d'un ERP)

je procède donc en préalable de la mise à jour de tbl_suivi, où j'ai une jointure des deux tables sur l'égalité du champ division,à l'inversion de la valeur des champs dans tbl_me80fn avec en SQL VB:

Code :

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

"UPDATE tbl_me80fn set Division = versusdiv([Div])"

versusdiv étant une fonction VB

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
public sub versusdiv(div)
 
select case div
case "rfrv"
versusdiv="rfrm"
case "rfrm" 
versusdiv = "rfrv"
case else
versusdiv = div
end select
 
end sub

tu vois que il n'y a rien de vraiment compliqué dans mon histoire

je vais essayer ta solution demain au bureau et te dirais quoi

en tout cas merci de t'y être interressé si rapidement

claude

[crouba]

Script line: 4 You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near ')

BEGIN
SELECT CASE TOTO
WHEN 'rfrv' THEN 'rfrm'
WHEN 'rfrm' THEN 'rf' at line 1

est ce que cela vous parle ?
le code complet est la copie de la suggestion de kazou

[Alain Defrance]

Bonjour,

Avant de continuer de se perdre un peu, pourrait tu nous donner le script de création de ta base de données ?

[crouba]

volontier mais je fais comment ?

claude