Discussion :

[duelooser]

Bonjour,

J'ai des script sql que je creer et que je dois faire executer en production par les equipes de production. Le process stimule que je dois prevoir le nombre de modification que cela dois impliquer sur les table cible.

Je dois faire un script SQL qui dois afficher a l'utilisateur les nombre de modification faites et lui laissez le choix de faire un comit ou rollback.

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
 
DECLARE
  reponse VARCHAR2(1) := 'A';
BEGIN
  UPDATE parpostes
  SET parvan2=1
  WHERE partabl=1436
  AND parpost=1;
 
  -- On boucle en attente de reponse de commit ou rollback.
  WHILE (reponse <> 'C' AND reponse <> 'R')
  LOOP
    ACCEPT reponse PROMPT 'Validation de la requete : C =COMMIT R =ROLLBACK :'
  END LOOP;
 
  -- Une fois la boucle terminee, reponse a la valeur C ou R.
  IF (reponse = 'C')
  THEN
    COMMIT;
  ELSE
    ROLLBACK;
  END IF;
END;

Voila mais ca ne marche pas, cela me met des erreurs sur le ACCEPT.

Est ce que qq un aurai une solution a me proposer pour corriger le probleme ou me proposer une autre solution.

Merci

[orafrance]

ACCEPT est PROMPT sont des commandes SQL*Plus, en aucun cas du PL/SQL. Le PL/SQL n'est pas un langage interactif.

En SQL pure ça marcherait aussi bien

[duelooser]

Ok merci c est ce que je pensais mais a ce moment la je ne peux plus faire mon teste en boucle sur la condition.

[SheikYerbouti]

S'il s'agit vraiment d'un script SQL, il faut sortir la commande ACCEPT du code PL/SQL, et la placer après le bloc Declare/Begin/End;

[duelooser]

Donc finalement voici mon script.

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
 
UPDATE parpostes SET parvan2=0 WHERE partabl=1436 AND parpost=1; 
 
ACCEPT reponse PROMPT 'Validation de la requete : 1 = COMMIT  2 = ROLLBACK :' 
 
DECLARE
  valid INTEGER := &reponse;
BEGIN
  -- Une fois la boucle terminee, reponse a la valeur C ou R. 
  IF (valid = 1) 
  THEN 
    COMMIT; 
  ELSE 
    ROLLBACK; 
  END IF; 
END;
/

Voici son execution .

Code :

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

1
2
3
4
5
6
7
8
9
10
11
SQL> start update3.sql
 
2 rows updated.
 
Validation de la requete : 1 = COMMIT  2 = ROLLBACK :1
old   2:   valid INTEGER := &reponse;
new   2:   valid INTEGER := 1;
 
PL/SQL procedure successfully completed.
 
SQL>

Suite a cela il me reste une question. Comment supprimer les 2 lignes que j ai soulignées.

MErci

[fdraven]

Pour enlever

Code :

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

1
2
old 2: valid INTEGER := &reponse; 
new 2: valid INTEGER := 1;

il suffit de faire un

Code :

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

set verify off;

au début de ton script.

En espérant t'avoir aidé.

[plaineR]

Merci d'utiliser les balises code !

Je ne sais pas quelles lignes tu as soulignées, mais je suppose que

Code :

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

set ver off

doit répondre à ta question.

[duelooser]

magnifiquement aidé.

Merci

[orafrance]

Merci d'utiliser les balises code !

En effet, les balises sont QUOTE ou CODE et non LIST

[duelooser]

je prends note merci