Class wwXMLAdapter - West Wind Client Tools

Class wwXMLAdapter

A light wrapper class around the XMLAdapater class that provides easier access to cursors and XML content.

Remarks

Requires VFP 8.0 or later

Class Members

Member		Description
	GetCursor	Turns an existing XMLTable from the XMLAdapter into a cursor by name or index. o.GetCursor(lvCursor as Variant,llAppend as bool)
	GetDiffGram	Returns a DiffGram XML string for the cursor by name. This is merely a wrapper that encapsulates the process of creating a DiffGram. o.GetDiffGram(lcCursor as String)
	GetTable	Returns an XMLTable object by name which is not supported natively in the XML Adapter. o.GetTable(lcCursor as String)

Example

*** Create XML from 2 cursors
USE Guest
USE tt_cust IN 0

loXml = CREATEOBJECT("wwXmlAdapter")
loXml.AddTableSchema("TT_Cust")
loXml.AddTableSchema("Guest")
lcXml = ""
loXml.ToXML("lcXml")

*** This has your xml
? lcXml

Close data

*** Parse DataSet Xml back to cursors
loXml = CREATEOBJECT("wwXmlAdapter")
loXml.LoadXML(lcXml)

*** Retrieve guest cursor
loXml.GetCursor("Guest")
loXml.GetCursor("TT_Cust")

SELECT Guest
BROWSE NOWAIT
SELECT TT_CUST
BROWSE NOWAIT