segunda-feira, 4 de maio de 2009

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')