Merci de m'aider en me corrigeant le prg suivant.
Merci de votre aide.
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 CREATE OR REPALCE Function Repdossier (w_dossier, w_soccible) return string; is resultat begin update ADMINISTRATIF set ACTID =w_soccible where dosid = w_dossier; update DOSSIER set ACTIDGESTION =w_soccible where dosid = w_dossier; update LKDOSRUBPOOACT set ACTID =w_soccible where dosid = w_dossier; update AROAGERELANCE set ACTID =w_soccible where dosid = w_dossier; update TVA set ACTID = w_soccible where dosid = w_dossier; update TVADETAIL set ACTID = w_soccible where dosid=w_dossier; update IMAADMINISTRATIF set ACTDIGESTION = w_soccible where dosid = w_dossier; update IMADOSSIER set ACTID = w_soccible where dosid = w_dossier; update IMALKDOSRUBPOOACT set ACTID =w_soccible where dosid=w_dossier; end; return resultat; end function Repdossier;
Message édité par Xo :
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 procedure Repdossier; is cursor c_repdossier repdossier (w_dossier, w_soccible); begin OPEN C_repdossier; Loop fetch C_repdossier Into resultat; Exit when C_repdossier%NOTFOUND; dbms_output.put_line ('Table mise à jour|| end loop; end; end procedure repdossier;
- Titre : les indicateurs d'urgence sont interdits !
- Balises codes
Partager