PUBLIC TPATH, cFileString, CSCTR, CECTR, cStartTag, cEndTag, cXMLData
cFileString=filetostr("EGP000.XML")
cStartTag = "<Bol_reference>"
cEndTag = "</Bol_reference>"
CSCTR = "<Reference>"
CECTR = "</Reference>"
TPATH='D:\XML\'
sele 1
use gen
dele all
pack
sele 2
use bol
dele all
pack
sele 3
use...