FORUMS PROFESSIONNELS
WINDEV
,
WEBDEV
et
WINDEV Mobile
Accueil
|
Messages récents
|
Connexion
|
Déconnexion
|
Français
Accueil
→
WINDEV Mobile 2024
→
WS_Android_iOs_ReadXml - Read Xml in Android e iOS
WS_Android_iOs_ReadXml - Read Xml in Android e iOS
Débuté par adrianoboller, 03 jan. 2015 17:49 - 1 réponse
Connectez-vous…
adrianoboller
#1
Membre enregistré
3 651 messages
Popularité : +175 (223 votes)
Posté le 03 janvier 2015 - 17:49
Procedure
WS_Android_iOs_ReadXml
(
XML_Retorno is
string
,
Xml_Atributo is
string
)
//Exemplo de Uso:
// XML_Retorno is string = [
//<SOAP-ENV:Envelope xmlns:SOAP-ENV="http://schemas.xmlsoap.org/soap/envelope/"
//xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"
//xmlns:SOAP-ENC="http://schemas.xmlsoap.org/soap/encoding/">
//<SOAP-ENV:Body SOAP-ENV:encodingStyle="http://schemas.xmlsoap.org/soap/encoding/"
//xmlns:NS1="urn:act297_RtPlusSSDM-IRtPlusSSDM">
//<NS1:VerificarVersaoDeTabelasResponse xmlns:NS2="urn:act297_RtPlusSSDM">
//<NS2:TVersaoTabelas id="1" xsi:type="NS2:TVersaoTabelas">
//<datHoraMotivos xsi:type="xsd:string">2013-07-11T17:15:33</datHoraMotivos>
//<qtdMotivos xsi:type="xsd:int">3</qtdMotivos>
//<datHoraCartoes xsi:type="xsd:string">2013-07-01T12:00:00</datHoraCartoes>
//<qtdCartoes xsi:type="xsd:int">6</qtdCartoes>
//<datHoraPesquisa xsi:type="xsd:string">2013-07-10T12:14:42</datHoraPesquisa>
//<qtdPesquisa xsi:type="xsd:int">4</qtdPesquisa>
//</NS2:TVersaoTabelas>
//<return href="#1"/>
//</NS1:VerificarVersaoDeTabelasResponse>
//</SOAP-ENV:Body>
//</SOAP-ENV:Envelope>
// ]
//
// Uso da Funcao:
//arrTemp is array of strings = WS_Android_iOs_ReadXml(XML_Retorno,"NS2:TVersaoTabelas")
arr
Xml_TagResult is
array of strings
xposicaoinicial is
int
=
0
Xposicaofinal is
int
=
0
X is
int
=
0
arr
Xml_Tag is
array of strings
Inicial is
int
=
PositionOccurrence
(
XML_Retorno
,
"<"
+
Xml_Atributo
,
firstRank
,
FromBeginning
)
Final is
int
=
PositionOccurrence
(
XML_Retorno
,
"</"
+
Xml_Atributo
+
">"
,
lastRank
,
FromEnd
) +
Length
(
"</"
+
Xml_Atributo
+
">"
)
XML_Retorno
=
Middle
(
XML_Retorno
,
Inicial
,
Final
-
Inicial
)
XML_Retorno
=
Replace
(
XML_Retorno
,
Xml_Atributo
,
"NoXml"
)
XML_Retorno
=
"<Xml><Recorte>"
+
XML_Retorno
+
"</Recorte></Xml>"
n
Totalxml is
int
=
Length
(
XML_Retorno
)
LOOP
(
n
Totalxml
)
X
+
+
IFxposicaoinicial
=
0
AND
Xposicaofinal
=
0
AND
XML_Retorno
[
[X]
] =
"<"
THEN
X
+
+
IF
XML_Retorno
[
[X]
] =
"/"
THEN
xposicaoinicial
=
X
+
1
END
END
IF
xposicaoinicial
>
0
AND
XML_Retorno
[
[X]
] =
">"
THEN
Xposicaofinal
=
X
END
IF
Xposicaofinal
>
0
AND
xposicaoinicial
>
0
THEN
stag is
string
=
Middle
(
XML_Retorno
,
xposicaoinicial
,
Xposicaofinal
-
xposicaoinicial
)
IF
stag
=
"NoXml"
THEN
BREAK
END
Add
(
arr
Xml_Tag
,
stag
)
Xposicaofinal
=
0
xposicaoinicial
=
0
END
END
//iOS - Apple (iPhone / iPad / iPod)
IF
IniOSMode
(
) =
True
THEN
NoXml is
string
i is
int
=
1
NoXml
=
XMLExtractString
(
XML_Retorno
,
"NoXml"
,i)
FOR EACH stag OF
arr
Xml_Tag
temp is
string
=
XMLExtractString
(
NoXml
,
stag
)
Add
(
arr
Xml_TagResult
,
temp
)
END
//Android
ELSE IF
InAndroidMode
(
) =
True
XmlDoc is
XMLDocument
XmlDoc
=
XMLOpen
(
XML_Retorno
,
fromString
)
NoXml is
xmlNode
FOR EACH NoXml OF XmlDoc.Xml.Recorte on NoXml
FOR EACH
s
Tag OF
arr
Xml_Tag
Add
(
arr
Xml_TagResult
,
NoXml
..
ChildNode
[
s
Tag
]
)
END
END
END
RESULT
arr
Xml_TagResult
Signaler
0
0
adrianoboller
#2
Membre enregistré
3 651 messages
Popularité : +175 (223 votes)
Posté le 03 janvier 2015 - 17:49
Signaler
0
0
→ Revenir à WINDEV Mobile 2024
WINDEV 2024
WEBDEV 2024
WINDEV Mobile 2024
WINDEV (précédentes versions)
Français
English
Español
Portuguesa
Fermer cette fenêtre
Type de recherche
Uniquement les sujets
Tous les messages
Période de recherche
Date indifférente
Moins d'une heure
Moins de 24 heures
Moins d'une semaine
Moins d'un mois
Moins d'un an
Annuler
Aperçu de votre message
Ajouter une image
Importer une image depuis une URL
Envoyer une image depuis un fichier de votre disque
Déposez ici un fichier ou cliquez sur "Parcourir..."
ou
Annuler
0%
WLangage
SQL
XML, HTML
JAVA, Javascript
Texte