PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEVWEBDEV and WINDEV Mobile

Home → WINDEV 2024 → XMLVersJSON problema con la conversión
XMLVersJSON problema con la conversión
Started by Corina, Sep., 27 2022 1:27 PM - 3 replies
Posted on September, 27 2022 - 1:27 PM
J'utilise WINDEV v27 et j'essaie de convertir un XML obtenu à partir d'une requête vers un service Web vers un objet JSON.

xmlResponse est xmlDocument
wsResponse est wsResponse
wsResponse = RepLasPalmas.getPrescriptions(generateRequest())
xmlResponse =XMLOuvre(wsResponse.XMLSource,fromString)
reponse est JSON = XMLVersJSON(xmlResponse)

Tout fonctionne correctement à l'exception de quelques champs qui les transforment dans le mauvais sens.
Objet XML





Ce serait l'objet JSON une fois converti avec la fonction.





Les valeurs de idPrescripcion et idReceta sont celles qui ont été mal converties. Ces valeurs sont en fait des chaînes mais vous les convertissez en un entier court d'où la valeur 2147483647.

J'ai essayé d'utiliser dans la fonction XMLVersJSON une variable de type JSONXMLConvertisseur en la définissant de la manière suivante
convertisseur est JSONXMLConvertisseur
convertisseur.JSONTyping=false
la réponse est JSON = XMLVersJSON (xmlResponse, convertisseur)
Le résultat reste le même.

Est-ce que quelqu'un sait comment lui faire prendre les bonnes valeurs qui viennent dans le XML ?
Registered member
120 messages
Posted on September, 28 2022 - 8:08 AM
Bonjour,
Visiblement XMLVersJSON() ne peut pas convertir les entiers > 32 bits (dont la valeur maximum est 2147483647)
Il faut donc convertir les champs idPrescripcion et idReceta en chaine AVANT de faire le XMLVersJSON()
J'ai été confronté au même problème que toi. Pour faire simple (et gagner du temps), je n'ai pas trouvé d'autre solution que de rajouter un espace devant certains champs AVANT de faire le XMLVersJSON()
Dans ton cas :
xmlResponse est xmlDocument = XMLOuvre(wsResponse.XMLSource,fromString)
xmlResponse.idPrescripcion = " "+xmlResponse.idPrescripcion
xmlResponse.idReceta = " "+xmlResponse.idReceta
reponse est JSON = XMLVersJSON(xmlResponse)

Fabrice
Registered member
3,889 messages
Popularité : +227 (347 votes)
Posted on September, 28 2022 - 8:40 AM
Bonjour,
Compiles tu en 32 bits ou en 64 bits.
Si tu compile en 32 bits c'est logique. Sinon tu peux éventuellement tenter
1-Désérialiser ton XML
2-Sérialiser le résultat en JSON

--
Il y a peut être plus simple, mais, ça tourne
Posted on September, 28 2022 - 8:58 AM
Bonjour,
Merci à vous deux pour les réponses. Je vais essayer les deux solutions qu'ils proposent