Clarion - Xml - IqXml - Como Fazer

!After Global Includes
INCLUDE('iQXML.inc','Equates')
--
!Before File Declarations
SOFTBALL FILE,DRIVER('TOPSPEED'),PRE(TEA),CREATE,BINDABLE,THREAD
LastNameKey KEY(TEA:LastName),DUP,NOCASE
Record RECORD,PRE()
Id LONG
FirstName STRING(30)
LastName STRING(30)
Hits SHORT
END
END

ASC2:ASCIIFile FILE,PRE(ASC2),DRIVER('ASCII'),NAME(ASCIIFileName),create
RECORD RECORD,PRE()
STRING STRING(5000)
END
END
----
!Inside the Global Map
INCLUDE('iQXML.inc','Modules')

Clarion - xml

set, loop...
instring, sub

Clarion - Xml - IqXml - Links

http://translate.google.com.br/translate?hl=pt-BR&sl=en&u=http://news.clarionlife.net/archives/tag/iq-xml&ei=z2j4Saw9yMe2B9HN5bYP&sa=X&oi=translate&resnum=5&ct=result&prev=/search%3Fq%3DiQ-XML%26hl%3Dpt-BR%26lr%3D%26sa%3DG

Xml - Template iqxml - Matos

Site:
http://www.paresi.net/clarion/index.html

---

!after global includes
INCLUDE('iQXML.inc','Equates')
!Inside The global map
INCLUDE('iQXML.inc','Modules')

---

! Load the XML file to process it

! ------------------------------- If ~Xml:LoadFromFile('InvoiceExample.xml') If ~xml:FindNextNode('Customers','Customer') Xml:PrimaryKeyCascade('CustomerName') Xml:PrimaryKeyCascade('CustomerID') IRecs = XML:LoadQueue(InvoicesQueue,True,True) End XML:Free() XML:DebugMyQueue(InvoicesQueue,'The Invoice Queue') End

Clarion - Xml - Ver dados

xmlDoc3 &= XMLFileToDOM(VAR:Nfe_FdNome_xml_erro)
ViewXML( xmlDoc3 )
xmlDoc3.Release()