Récupérer résultats requête SQL par un webservice

Bonsoir
J'ai développé un webservice avec webdev 17, et j'arrive pas a récuprer le resultat de ma requete sql:
Code de mon webservice:

Code:

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
 
Fiche est une structure
	cod_profil est une chaîne
	lib_profil est une chaîne
	ind_default est une chaîne
FIN
 
NumConnexion est un entier
sChaineSQL  est une chaîne 
bRes est un booléen
Profil est une Fiche
bufBuffer est un Buffer
tabResultat est un tableau dynamique de Fiche
//MonBuffer est un Buffer
 
NumConnexion = gPR_OuvrirBase()
 
SI NumConnexion = 0 ALORS
	// La connexion a échoué : affichage d'un message explicatif
	//	SQLInfoGene()
	RENVOYER Faux
	//RETOUR
FIN
 
sChaineSQL = "SELECT * FROM rep_tb_profil"
bRes = SQLExec(sChaineSQL, "REQ_GET_PROFIL")
SI bRes = Faux ALORS
	//Si l'execution de la requete ne se passe pas bien
	RENVOYER Faux
FIN
nNumChamp = 0
TANTQUE SQLAvance("REQ_GET_PROFIL") = 0 
 
	Profil:cod_profil = SQLLitCol("REQ_GET_PROFIL",1)
	Profil:lib_profil = SQLLitCol("REQ_GET_PROFIL",2)
	Profil:ind_default = SQLLitCol("REQ_GET_PROFIL",3)
	TableauAjoute(tabResultat,Profil)
 
FIN
Sérialise(tabResultat, bufBuffer, psdXML)
SQLFerme("REQ_GET_PROFIL")
SQLDéconnecte()
RENVOYER bufBuffer

Le code du coté client :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
Profil est une structure
	code_profil est une chaîne
	nom_profil est une chaîne
	ind_profil est une chaîne 
FIN
 
tabResultat est un tableau dynamique de Fiche
Resulttab est un tableau dynamique de Profil
 
 
monbuffer est un Buffer = gPR_Get_Profil()
//new_buffer est un buffer 
 
//Désérialise(new_buffer,monbuffer,psdXML)
SAI_Resultat = monbuffer
//info(monbuffer)
Désérialise(tabResultat, monbuffer, psdXML)
//Resulttab = monbuffer
//Désérialise(Resulttab,monbuffer,psdXML)
TableSupprimeTout(table1)
POUR TOUT x DE Resulttab
TableAjoute(table1,Resulttab[x].code_profil+TAB+Resulttab[x].nom_profil+TAB+Resulttab[x].ind_profil)
FIN

J'obtien l'erreur suivante :

Code:

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
 
Erreur à la ligne 18 du traitement Clic sur Bouton1.
Vous avez appelé la fonction Désérialise.
Format de sérialisation incorrect.
 
----- Informations techniques -----
 
Projet : Structure
 
Appel WL :
Traitement de 'Clic sur Bouton1' (Fenêtre1.Bouton1), ligne 18, thread 0
Fonction 'Désérialise', syntaxe 0
 
Que s'est-il passé ?
Format de sérialisation incorrect.
 
Code erreur : 2601
Niveau : erreur fatale (EL_FATAL)
 
Dump de l'erreur du module 'wd170vm.dll' (17.0.199.3).
Identifiant des informations détaillées (.err) : 2601
Informations de débogage :
Erreur interne
Fonction (0,124)
Informations supplémentaires :
EIT_PILEWL :
Clic sur Bouton1 (Fenêtre1.Bouton1), ligne 18
EIT_DATEHEURE : 11/10/2012 01:33:18
 
Assistance

Aidez moi s'il vous plait, merci d'avance