Discussion :

[argoet]

(Oracle 9i)
Bonjour à tous :

Savez vous s'il exitste une fonction "native" sous ORACLE qui convertit une chaine de caractère avec les accents en code HTML
exemple

Code :

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

"é" ==> é

ou

Code :

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

"è" ==> è

Merci de votre aide
@argoet

[philcero]

Tu as vu ça ?

http://helyos.developpez.com/htp/

Correctif (Pris dans la doc du package UTL_I18N) :

Code :

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

1
2
UTL_I18N.ESCAPE_REFERENCE('hello < '||chr(229),'us7ascii')
This returns 'hello &lt; &#xe5;'.

[argoet]

UTL_I18N semble etre avec Oracle 10g : je suis en 9i (comme préciser en début de Post)

Concernant le package sys.htp

Code :

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

1
2
3
4
5
6
7
8
9
BEGIN htp.print('<table>'); END;
 
*
ERROR at line 1:
ORA-06502: PL/SQL: numeric or value error
ORA-06512: at "SYS.OWA_UTIL", line 323
ORA-06512: at "SYS.HTP", line 860
ORA-06512: at "SYS.HTP", line 975
ORA-06512: at line 1

Donc pour l'instant : c'est pas gagné

[SheikYerbouti]

Sinon, vous ecrivez votre propre fonction.

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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
  FUNCTION Translate_Html( PC$Chaine IN VARCHAR2 )
  RETURN VARCHAR2
  IS
    LC$Chaine  VARCHAR2(32000) := PC$Chaine ;
  BEGIN
    LC$Chaine := REPLACE( LC$Chaine,'¡','¡');
    LC$Chaine := REPLACE( LC$Chaine,'¢','¢');
    LC$Chaine := REPLACE( LC$Chaine,'£','£');
    LC$Chaine := REPLACE( LC$Chaine,'¤','¤');
    LC$Chaine := REPLACE( LC$Chaine,'¥','¥');
    LC$Chaine := REPLACE( LC$Chaine,'¦','¦');
    LC$Chaine := REPLACE( LC$Chaine,'§','§');
    LC$Chaine := REPLACE( LC$Chaine,'¨','¨');
    LC$Chaine := REPLACE( LC$Chaine,'©','©');
    LC$Chaine := REPLACE( LC$Chaine,'ª','ª');
    LC$Chaine := REPLACE( LC$Chaine,'«','«');
    LC$Chaine := REPLACE( LC$Chaine,'¬','¬');
    LC$Chaine := REPLACE( LC$Chaine,'*','­');
    LC$Chaine := REPLACE( LC$Chaine,'®','®');
    LC$Chaine := REPLACE( LC$Chaine,'¯','¯');
    LC$Chaine := REPLACE( LC$Chaine,'°','°');
    LC$Chaine := REPLACE( LC$Chaine,'±','±');
    LC$Chaine := REPLACE( LC$Chaine,'²','²');
    LC$Chaine := REPLACE( LC$Chaine,'³','³');
    LC$Chaine := REPLACE( LC$Chaine,'´','´');
    LC$Chaine := REPLACE( LC$Chaine,'’','´');
    LC$Chaine := REPLACE( LC$Chaine,'µ','µ');
    LC$Chaine := REPLACE( LC$Chaine,'¶','¶');
    LC$Chaine := REPLACE( LC$Chaine,'·','·');
    LC$Chaine := REPLACE( LC$Chaine,'¸','¸');
    LC$Chaine := REPLACE( LC$Chaine,'¹','¹');
    LC$Chaine := REPLACE( LC$Chaine,'º','º');
    LC$Chaine := REPLACE( LC$Chaine,'»','»');
    LC$Chaine := REPLACE( LC$Chaine,'¼','¼');
    LC$Chaine := REPLACE( LC$Chaine,'½','½');
    LC$Chaine := REPLACE( LC$Chaine,'¾','¾');
    LC$Chaine := REPLACE( LC$Chaine,'¿','¿');
    LC$Chaine := REPLACE( LC$Chaine,'À','À');
    LC$Chaine := REPLACE( LC$Chaine,'Á','Á');
    LC$Chaine := REPLACE( LC$Chaine,'Â','Â');
    LC$Chaine := REPLACE( LC$Chaine,'Ã','Ã');
    LC$Chaine := REPLACE( LC$Chaine,'Ä','Ä');
    LC$Chaine := REPLACE( LC$Chaine,'Å','Å');
    LC$Chaine := REPLACE( LC$Chaine,'Æ','Æ');
    LC$Chaine := REPLACE( LC$Chaine,'Ç','Ç');
    LC$Chaine := REPLACE( LC$Chaine,'È','È');
    LC$Chaine := REPLACE( LC$Chaine,'É','É');
    LC$Chaine := REPLACE( LC$Chaine,'Ê','Ê');
    LC$Chaine := REPLACE( LC$Chaine,'Ë','Ë');
    LC$Chaine := REPLACE( LC$Chaine,'Ì','Ì');
    LC$Chaine := REPLACE( LC$Chaine,'Í','Í');
    LC$Chaine := REPLACE( LC$Chaine,'Î','Î');
    LC$Chaine := REPLACE( LC$Chaine,'Ï','Ï');
    LC$Chaine := REPLACE( LC$Chaine,'Ð','Ð');
    LC$Chaine := REPLACE( LC$Chaine,'Ñ','Ñ');
    LC$Chaine := REPLACE( LC$Chaine,'Ò','Ò');
    LC$Chaine := REPLACE( LC$Chaine,'Ó','Ó');
    LC$Chaine := REPLACE( LC$Chaine,'Ô','Ô');
    LC$Chaine := REPLACE( LC$Chaine,'Õ','Õ');
    LC$Chaine := REPLACE( LC$Chaine,'Ö','Ö');
    LC$Chaine := REPLACE( LC$Chaine,'Œ','Œ');
    LC$Chaine := REPLACE( LC$Chaine,'œ','œ');        
    LC$Chaine := REPLACE( LC$Chaine,'×','×');
    LC$Chaine := REPLACE( LC$Chaine,'Ø','Ø');
    LC$Chaine := REPLACE( LC$Chaine,'Ù','Ù');
    LC$Chaine := REPLACE( LC$Chaine,'Ú','Ú');
    LC$Chaine := REPLACE( LC$Chaine,'Û','Û');
    LC$Chaine := REPLACE( LC$Chaine,'Ü','Ü');
    LC$Chaine := REPLACE( LC$Chaine,'Ý','Ý');
    LC$Chaine := REPLACE( LC$Chaine,'Þ','Þ');
    LC$Chaine := REPLACE( LC$Chaine,'ß','ß');
    LC$Chaine := REPLACE( LC$Chaine,'à','à');
    LC$Chaine := REPLACE( LC$Chaine,'á','á');
    LC$Chaine := REPLACE( LC$Chaine,'â','â');
    LC$Chaine := REPLACE( LC$Chaine,'ã','ã');
    LC$Chaine := REPLACE( LC$Chaine,'ä','ä');
    LC$Chaine := REPLACE( LC$Chaine,'å','å');
    LC$Chaine := REPLACE( LC$Chaine,'æ','æ');
    LC$Chaine := REPLACE( LC$Chaine,'ç','ç');
    LC$Chaine := REPLACE( LC$Chaine,'è','è');
    LC$Chaine := REPLACE( LC$Chaine,'é','é');
    LC$Chaine := REPLACE( LC$Chaine,'ê','ê');
    LC$Chaine := REPLACE( LC$Chaine,'ë','ë');
    LC$Chaine := REPLACE( LC$Chaine,'ì','ì');
    LC$Chaine := REPLACE( LC$Chaine,'í','í');
    LC$Chaine := REPLACE( LC$Chaine,'î','î');
    LC$Chaine := REPLACE( LC$Chaine,'ï','ï');
    LC$Chaine := REPLACE( LC$Chaine,'ð','ð');
    LC$Chaine := REPLACE( LC$Chaine,'ñ','ñ');
    LC$Chaine := REPLACE( LC$Chaine,'ò','ò');
    LC$Chaine := REPLACE( LC$Chaine,'ó','ó');
    LC$Chaine := REPLACE( LC$Chaine,'ô','ô');
    LC$Chaine := REPLACE( LC$Chaine,'õ','õ');
    LC$Chaine := REPLACE( LC$Chaine,'ö','ö');
    LC$Chaine := REPLACE( LC$Chaine,'÷','÷');
    LC$Chaine := REPLACE( LC$Chaine,'ø','ø');
    LC$Chaine := REPLACE( LC$Chaine,'ù','ù');
    LC$Chaine := REPLACE( LC$Chaine,'ú','ú');
    LC$Chaine := REPLACE( LC$Chaine,'û','û');
    LC$Chaine := REPLACE( LC$Chaine,'ü','ü');
    LC$Chaine := REPLACE( LC$Chaine,'ý','ý');
    LC$Chaine := REPLACE( LC$Chaine,'þ','þ');
    LC$Chaine := REPLACE( LC$Chaine,'ÿ','ÿ');
  RETURN LC$Chaine ;
 END Translate_Html ;

[wilbe]

Je pense que ceci pourras t'aider : http://www.developpez.net/forums/new...te=1&p=3283530