Here's a snippet of the source. The program seems to simply get the xml
data, call a program and set the xml data. But where is the data?
<file version="1.0" encoding="UTF-8" wss="yes" soap="yes">
<headers>
<header keyword="datedit(*ymd)"/>
</headers>
<definitions>
<parameters>
<param name="FILEXMLIN" type="A" length="640"/>
<param name="FILEXMLOUT" type="A" length="640"/>
</parameters>
<files>
<diskfile key="yes" name="FILEP1" usage="U"/>
<diskfile key="yes" name="FILEP2" usage="U"/>
</files>
<fields>
<field name="MYFIELD1" type="A" length="3"/>
<field name="MYFIELD2" type="S" length="9" decimal="0"/>
</fields>
<klists>
<klist name="key1">
<kfld name="keyfield1"/>
</klist>
</klists>
<prototype/>
</definitions>
<treatment>
<getelementblock name="soapenv:Envelope">
<getelementblock name="soapenv:Body">
<getelementblock name="GenericWebMethod">
<getelementblock name="astr_FunctionName">
<getelementvalue fieldvalue="WTYPFLUX"/>
</getelementblock>
<getelementblock name="astr_XmlData">
<if condition="WFLUX='xyz'">
<getelementblock name="dataXYZ">
<eval field="MYFIELD1" value="0"/>
<getelementblock name="Version">
<getelementvalue fieldvalue="àversion"/>
</getelementblock>
<call pgm="MYPGM">
<paramcall name="MYPARM"/>
</call>
<setelementblock name="soapenv:Envelope">
<setattribute trimr="yes" name="xmlns:soapenv" value="'
http://schemas.xmlsoap.org/soap/envelope/'"/>
<setattribute trimr="yes" name="xmlns:xsd" value="'
http://www.w3.org/2001/XMLSchema'"/>
<setattribute trimr="yes" name="xmlns:xsi" value="'
http://www.w3.org/2001/XMLSchema-instance'"/>
<setelementblock name="soapenv:Body">
As an Amazon Associate we earn from qualifying purchases.