<?xml version="1.0"?><program><procedure pos="1:1"><name text="Exch2410_ExchangeField_PURPOSEFULGRANT_ID" pos="1:52"/><parameters pos="1:52"><varparams pos="2:31"/><var pos="2:35"><ident text="aDopDocLine" pos="2:46"/><type text="Variant" pos="2:55"/></var><var pos="3:31"><ident text="aFieldName_PurposegrantID" pos="3:56"/><type text="string" pos="3:64"/></var><var pos="4:31"><ident text="aValue" pos="4:37"/><type text="string" pos="4:45"/></var></parameters><compoundstmt pos="5:1"><trystmt pos="7:5"><ifstmt pos="8:7"><expr pos="8:10" pos1="8:61"><op text="(" pos="8:11"/><expr pos="8:11" pos1="8:60"><dsgn pos="8:11"><node text="aFieldName_PurposegrantID" pos="8:36"/></dsgn><op text="&#60;&#62;" pos="8:39"/><string text="'PURPOSEFULGRANT_ID'" pos="8:60"/></expr><op text=")" pos="8:61"/></expr><thenstmt pos="9:9"><ifstmt pos="9:9"><expr pos="9:12" pos1="9:70"><op text="not" pos="9:15"/><dsgn pos="9:16"><node text="XmlAttrExists" pos="9:29"/><expr pos="9:31" pos1="9:42"><dsgn pos="9:31"><node text="aDopDocLine" pos="9:42"/></dsgn></expr><expr pos="9:44" pos1="9:69"><dsgn pos="9:44"><node text="aFieldName_PurposegrantID" pos="9:69"/></dsgn></expr></dsgn></expr><thenstmt pos="10:11"><ifstmt pos="10:11"><expr pos="10:14" pos1="10:63"><dsgn pos="10:14"><node text="XmlAttrExists" pos="10:27"/><expr pos="10:29" pos1="10:40"><dsgn pos="10:29"><node text="aDopDocLine" pos="10:40"/></dsgn></expr><expr pos="10:42" pos1="10:62"><string text="'PURPOSEFULGRANT_ID'" pos="10:62"/></expr></dsgn></expr><thenstmt pos="10:69"><compoundstmt pos="10:69"><callstmt pos="11:13"><dsgn pos="11:13"><node text="aDopDocLine" pos="11:24"/><node text="SetAttribute" pos="11:37"/><expr pos="12:31" pos1="12:56"><dsgn pos="12:31"><node text="aFieldName_PurposegrantID" pos="12:56"/></dsgn></expr><expr pos="13:31" pos1="13:78"><dsgn pos="13:31"><node text="aDopDocLine" pos="13:42"/><node text="GetAttribute" pos="13:55"/><expr pos="13:57" pos1="13:77"><string text="'PURPOSEFULGRANT_ID'" pos="13:77"/></expr></dsgn></expr></dsgn></callstmt><callstmt pos="14:13"><dsgn pos="14:13"><node text="aDopDocLine" pos="14:24"/><node text="SetAttribute" pos="14:37"/><expr pos="15:31" pos1="15:51"><string text="'PURPOSEFULGRANT_ID'" pos="15:51"/></expr><expr pos="16:31" pos1="16:37"><dsgn pos="16:31"><node text="aValue" pos="16:37"/></dsgn></expr></dsgn></callstmt></compoundstmt></thenstmt></ifstmt></thenstmt></ifstmt></thenstmt></ifstmt><exceptstmt pos="20:9"><callstmt pos="20:9"><dsgn pos="20:9"><node text="ExceptionLog" pos="20:21"/><expr pos="20:23" pos1="20:83"><string text="'Ραξι Un_Exch2410.Exch2410_ExchangeField_PURPOSEFULGRANT_ID'" pos="20:83"/></expr></dsgn></callstmt></exceptstmt></trystmt></compoundstmt></procedure><function pos="38:1"><name text="Exch2410_FieldName_PURPOSEFULGRANT_ID" pos="38:47"/><parameters pos="38:47"><var pos="39:35"><ident text="aKBKType" pos="39:43"/><type text="string" pos="39:51"/></var></parameters><type text="string" pos="40:78"/><compoundstmt pos="41:1"><trystmt pos="43:5"><casestmt pos="44:7"><expr pos="44:12" pos1="44:20"><dsgn pos="44:12"><node text="aKBKType" pos="44:20"/></dsgn></expr><caseselector pos="46:9"><set pos="46:9"><expr pos="46:9" pos1="46:13"><string text="'10'" pos="46:13"/></expr></set><assignstmt pos="46:15"><dsgn pos="46:15"><node text="Result" pos="46:21"/></dsgn><expr pos="46:25" pos1="46:45"><string text="'PURPOSEFULGRANT_ID'" pos="46:45"/></expr></assignstmt></caseselector><caseselector pos="48:9"><set pos="48:9"><expr pos="48:9" pos1="48:13"><string text="'31'" pos="48:13"/></expr><expr pos="48:14" pos1="48:18"><string text="'32'" pos="48:18"/></expr></set><assignstmt pos="48:20"><dsgn pos="48:20"><node text="Result" pos="48:26"/></dsgn><expr pos="48:30" pos1="48:51"><string text="'PURPOSEFULGRANTI_ID'" pos="48:51"/></expr></assignstmt></caseselector><caseselector pos="50:9"><set pos="50:9"><expr pos="50:9" pos1="50:13"><string text="'20'" pos="50:13"/></expr></set><assignstmt pos="50:15"><dsgn pos="50:15"><node text="Result" pos="50:21"/></dsgn><expr pos="50:25" pos1="50:46"><string text="'PURPOSEFULGRANTD_ID'" pos="50:46"/></expr></assignstmt></caseselector><assignstmt pos="52:14"><dsgn pos="52:14"><node text="Result" pos="52:20"/></dsgn><expr pos="52:24" pos1="52:44"><string text="'PURPOSEFULGRANT_ID'" pos="52:44"/></expr></assignstmt></casestmt><exceptstmt pos="56:9"><callstmt pos="56:9"><dsgn pos="56:9"><node text="ExceptionLog" pos="56:21"/><expr pos="56:23" pos1="56:79"><string text="'Ραξι Un_Exch2410.Exch2410_FieldName_PURPOSEFULGRANT_ID'" pos="56:79"/></expr></dsgn></callstmt></exceptstmt></trystmt></compoundstmt></function><compoundstmt pos="61:1"/><types/></program>