>Hi Gang!
>
>In doing the following on a FREE table....
>
>

>cFile = "d:\test\EmployeeXML.xml"
>SELECT lookuptype as LookupType, lookupvalu as LookupValue, nabp as NABP ;
>FROM loyalty ;
>INTO CURSOR LoyaltyLookup
>adapter = CREATEOBJECT("XMLAdapter")
>adapter.AddTableSchema("LoyaltyLookup")
>adapter.ToXML(cFile,,.T.)
>

>
>I get the following XML.....
>
>

>LoyaltyLookup
>     lookuptype PHONE /lookuptype 
>     lookupvalue 8885551234 /lookupvalue 
>     nabp 1234567 /nabp 
>/LoyaltyLookup
>LoyaltyLookup
>     lookuptype LOYALTY /lookuptype
>     lookupvalue 123456789012 /lookupvalue 
>     nabp 2222222 /nabp 
>/LoyaltyLookup
>LoyaltyLookup
>     lookuptype LOYALTY_OLD /lookuptype 
>     lookupvalue 987654321012 /lookupvalue 
>     nabp 3333333 /nabp 
>/LoyaltyLookup
>

>How come does the LookupType, LookupValue, and NABP come out as lower case every time?
>
>How can I overcome this and force it to be like how I want it to be?

lcData = FILETOSTR(lcFile)
lcData = STRTRAN(lcData, "lookuptype>", "LookupType>")
lcData = STRTRAN(lcData, "lookupvalue>", "LookupValue>")
lcData = STRTRAN(lcData, "nabp>", "NABP>")
STRTOFILE(lcData, lcFile)

:-)

>Thanks!