clause where current of

Version imprimable

26/11/2007, 12h45
new_wave

clause where current of

Bonjour,

D'après ce que j'ai compris de cette clause, elle permet de mettre à jour ou de supprimer l'enregistrement courant.
Mais en quoi est elle vraiement utile, car si j'ai bien compris, le traitement au niveau d'un curseur se fait toujours ligne par ligne, donc l'instruction update ou DELETE utilisée aurait de toute manière concerné l'enresgitrement courant.

Merci de votre aide.
Cordialement.
Nathamlie

Il doit y avoir une gestion particulière de la mise à jour :
exemple Table TCLIENT pk (ste, client)
Code:

1 2 3 4 5 6 7 8 9 cursor c is select rowid, ste, client, nom from TCLIENT for update; BEGIN FOR r IN c LOOP update TCLIENT set nom = 'A' WHERE ste = r.ste AND client = r.client; update TCLIENT set nom = 'A' WHERE rowid = r.rowid; update TCLIENT set nom = 'A' WHERE current of c; END LOOP; END;
Ces 3 updates ont le même résultat, mais dans les 2 premiers, je pense qu'Oracle doit refaire une recherche contrairement au current of.

26/11/2007, 14h09
mnitu

Les différences sont liées plutôt à la gestion des verrous et des transactions. Pour utiliser « current of » le curseur doit être ouverte avec la clause « for update » ce qui va entraîner le verrouillage des enregistrements de l’ouverture du curseur. Après commit il n’est plus possible de faire le fetch sauf à re ouvrir le curseur. Par contre les versions avec clé primaire/unique ou rowid peuvent être employés après commit. La mise à jour avec rowid ou current of doit avoir des performances similaires.

J'étais curieux de savoir, ce qui serait arrivé avec deux tables dans FROM:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
declare
  cursor c IS SELECT ta.a, ta.b FROM ta, tb where ta.a = tb.a  FOR UPDATE;
BEGIN
  FOR r IN c LOOP
   UPDATE ta SET b = 1 WHERE current of c;
   dbms_output.put_line (to_char (sql%rowcount));
  END LOOP;
END;
/
 
0
0

Aucune erreur (ORA-xxxxx), pourquoi?

Ca marche bien:

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
declare
  cursor c IS SELECT ta.a, ta.b FROM ta
    where exists (select 1 from tb where ta.a = tb.a)  FOR UPDATE;
BEGIN
  FOR r IN c LOOP
   UPDATE ta SET b = 1 WHERE current of c;
   dbms_output.put_line (to_char (sql%rowcount));
  END LOOP;
END;
/
 
1
1

DAB

Pas de mise à jour

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
declare
  cursor c is select ename, dname from scott.emp e, scott.dept d where e.deptno = d.deptno for update;
  l_ename  scott.emp.ename%type;
  l_dname  scott.dept.dname%type;
begin
  open c;
  fetch c into l_ename, l_dname;
  update scott.emp set ename = l_ename where current of c;
  dbms_output.put_line('EMP -> '||To_Char(sql%rowcount));
  update scott.dept set dname = l_dname where current of c;
  dbms_output.put_line('DEPT -> '||To_Char(sql%rowcount));
  rollback;
end;
/
EMP -> 0
DEPT -> 0

mais les deux tables dont verrouillés.

Par contre il y a erreur

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
 
declare
  cursor c is select ename, dname from scott.emp e, scott.dept d where e.deptno = d.deptno for update of e.ename;
  l_ename  scott.emp.ename%type;
  l_dname  scott.dept.dname%type;
begin
  open c;
  fetch c into l_ename, l_dname;
  update scott.emp set ename = l_ename where current of c;
  dbms_output.put_line('EMP -> '||To_Char(sql%rowcount));
  update scott.dept set dname = l_dname where current of c;
  dbms_output.put_line('DEPT -> '||To_Char(sql%rowcount));
  rollback;
end;
/
EMP -> 1
declare
*
ERREUR Ó la ligne 1 :
ORA-01410: ROWID non valide
ORA-06512: Ó ligne 10

Sinon la bière est-il toujours aussi bonne DAB.cz :chin:?

27/11/2007, 08h41
DAB.cz

:merci: toujours les nouveautés pour moi: Ora docs.

Citation:

Envoyé par mnitu

Sinon la bière est-il toujours aussi bonne DAB.cz :chin:?

Même meilleur q'autrefois.