>><?xml version="1.0" encoding="utf-8" ?> >>- <Report p1:schemaLocation="PayRegExtract http://99.99.9.999/ReportServer?%2fTotalCompensation%2fPayRegExtract&rs% >>3aCommand=Render&rs%3aFormat=XML&rs%3aSessionID=eo4karztrbozd545bjfj0orz&rc%3aSchema=True" >>Name="PayRegExtract" xmlns:p1="http://www.w3.org/2001/XMLSchema-instance" xmlns="PayRegExtract"> >>- <table1> >>- <Detail_Collection> >> <Detail PP ...... >> <Detail PP ...... >> <Detail PP ...... >> </Detail_Collection> >> </table1> >></Report> >>>>
>>- <Report p1:schemaLocation="PayRegExtract http://99.99.9.999/ReportServer?%2fTotalCompensation%2fPayRegExtract&rs% >>3aCommand=Render&rs%3aFormat=XML&rs%3aSessionID=eo4karztrbozd545bjfj0orz&rc%3aSchema=True" >>Name="PayRegExtract" xmlns:p1="http://www.w3.org/2001/XMLSchema-instance" xmlns="PayRegExtract"> >>>>
>></Report>
>>
>>>ln_xml = FOPEN('xmlfile.xml') >ln_newxml = FCREATE('newxml.xml') > >DO WHILE .NOT. FEOF(ln_xml) > lc_string = FGETS(ln_xml, 500) > IF UPPER(LEFT(LTRIM(lc_string), 8)) = "<REPORT " > lc_string = "<Report>" > ENDIF > =FPUTS(ln_newxml, lc_string) >ENDDO >=FCLOSE(ln_xml) >=FCLOSE(ln_newxml) >