CLOSE DATABASES all CLEAR SET MEMOWIDTH TO 150 CREATE CURSOR foo (cb c(1) NOCPTRANS) INSERT INTO foo VALUES (CHR(15)) LOCAL oXA as XMLAdapter, oXF as XMLField oXA=CREATEOBJECT("XMLAdapter") oXA.AddTableSchema("foo",.T.) oXF=oXA.Tables(1).Fields(1) oXF.XSDtype="" oXF.IsBinary=.T. oXF.DisableEncode=.F. oXA.ToXML("cXml",,.F.) ?cXml oXA=null oXF=null oXA=CREATEOBJECT("XMLAdapter") oXA.LoadXML(cXml,.F.) oXF=oXA.Tables(1).Fields(1) oXF.DataType="C" oXF.NoCpTrans= .T. oXF.DisableEncode=.F. oXA.Tables(1).ToCursor(.F.,"foo1") SELECT foo1 DISPLAY STRUCTURE GO top ?ASC(cb) returnDoes it solve the problem?