Here is the information I have so far. I have not yet determined how to pull the attributes "Lease" and "Type" from the Transaction node.
I don't have a DTD. I've included my test program, the ext file and the xml file. Thanks, Steve PAGE 1 Uni/Basic Thu Mar 5 11:28:23 2009 TEST.PARSER 001 PROGRAM TEST.PARSER 002 * 003 $INCLUDE INCLUDE XML.H 004 xdata = '' 005 FILE.NAME = 'testextract.xml' 006 THE.PATH = "_XML_/" 007 THE.FULL.NAME = THE.PATH : FILE.NAME 008 * 009 STATUS = PREPAREXML(THE.FULL.NAME,INSUR_DATA) 010 IF STATUS = XML.SUCCESS THEN 011 DISPLAY 'STATUS ':STATUS 012 END ELSE 013 STOP 'COULD NOT OPEN THE FILE' 014 END 015 * 016 STATUS = OPENXMLDATA(INSUR_DATA, "_XML_/testextract.ext", INSUR_DATA_HANDLE) 017 IF STATUS = XML.ERROR THEN 018 STOP "ERROR WHEN OPENING THE XML DOCUMENT" 019 END 020 * 021 IF STATUS = XML.INVALID.HANDLE THEN 022 STOP "ERROR: INVALID PARAMETER PASSED" 023 END 024 * 025 EOR = 0 026 LOOP UNTIL EOR DO 027 STATUS = READXMLDATA(INSUR_DATA_HANDLE,xdata) 028 DISPLAY 'STATUS 2 ':STATUS 029 IF STATUS = XML.ERROR THEN 030 STOP "ERROR WHEN PREPARING THE XML DOCUMENT." 031 END ELSE IF STATUS = XML.EOF THEN 032 PRINT "NO MORE DATA" 033 EOR = 1 034 END ELSE 035 DISPLAY xdata 036 INPUT XXX 037 IF XXX='S' THEN EOR = 1 038 END 039 REPEAT 040 * 041 STATUS = CLOSEXMLDATA(INSUR_DATA_HANDLE) 042 * 043 STATUS = RELEASEXML(INSUR_DATA) 044 RETURN testextract.ext in _XML_ <U2XML_extraction> <file_extraction start = "/BDT_TRANSACTIONS/Transaction"/> <field_extraction field = "TRANSACTION_CODE" path = "Transaction/TRANSACTION_CODE/text()"/> <field_extraction field = "CLIENT_NUMBER" path = "Transaction/CLIENT_NUMBER/text()"/> <field_extraction field = "COMPANY_NUMBER" path = "Transaction/COMPANY_NUMBER/text()"/> <field_extraction field = "CUSTOMER_ID" path = "Transaction/CUSTOMER_ID/text()"/> <field_extraction field = "LEASE_NUMBER" path = "Transaction/LEASE_NUMBER/text()"/> <field_extraction field = "REASON_CODE" path = "Transaction/REASON_CODE/text()"/> </U2XML_extraction> The xml transaction file: <?xml version="1.0" encoding="UTF-8" ?> - <BDT_TRANSACTIONS> - <Transaction Lease="040815.01" Type="C"> <TRANSACTION_CODE>C</TRANSACTION_CODE> <CLIENT_NUMBER>2505</CLIENT_NUMBER> <COMPANY_NUMBER>01</COMPANY_NUMBER> <CUSTOMER_ID>040815</CUSTOMER_ID> <LEASE_NUMBER>040815.01</LEASE_NUMBER> <REASON_CODE>LC</REASON_CODE> <CLIENT_COVERAGE_EFFECTIVE_DATE>20080201</CLIENT_COVERAGE_EFFECTIVE_DATE> <CLIENT_COVERAGE_EXPIRATION_DATE>20090110</CLIENT_COVERAGE_EXPIRATION_DATE> <CLIENT_COVERAGE_CANCEL_DATE>20080805</CLIENT_COVERAGE_CANCEL_DATE> <INSURANCE_TERM>0</INSURANCE_TERM> <EQUIPMENT_VALUE>20818</EQUIPMENT_VALUE> <CHANGE_IN_EQUIP_VALUE>0</CHANGE_IN_EQUIP_VALUE> <LI_CLASS_CODE /> <INVOICE_METHOD /> <PROGRAM_CODE>PLLSL</PROGRAM_CODE> <REMAINING_INVOICES>10</REMAINING_INVOICES> <INVOICE_CREATE_DUE_DATE>20080310</INVOICE_CREATE_DUE_DATE> <FULL_TERM_CLIENT_INSURANCE_COST>-49.16</FULL_TERM_CLIENT_INSURANCE_COST> <FULL_TERM_FINANCE_CHARGE>-17.26</FULL_TERM_FINANCE_CHARGE> <FULL_TERM_LI_SERVICE_FEE>0.00</FULL_TERM_LI_SERVICE_FEE> <FULL_TERM_SUBCONTRACTOR_FEE>-33.28</FULL_TERM_SUBCONTRACTOR_FEE> <FULL_TERM_CUSTOMER_INSURANCE_CHARGE>-99.70</FULL_TERM_CUSTOMER_INSURANCE_CH ARGE> <CUSTOMER_INVOICE_FREQUENCY>M</CUSTOMER_INVOICE_FREQUENCY> <CUSTOMER_INSURANCE_CHARGE_PER_INVOICE>21.72</CUSTOMER_INSURANCE_CHARGE_PER_ INVOICE> <CHANGE_IN_CUSTOMER_INSURANCE_CHARGE_PER_INVOICE>-21.72</CHANGE_IN_CUSTOMER_ INSURANCE_CHARGE_PER_INVOICE> <PRIOR_AMOUNT>0.00</PRIOR_AMOUNT> <INSURANCE_COMPONENT>0.00</INSURANCE_COMPONENT> <FINANCE_COMPONENT>0.00</FINANCE_COMPONENT> <LI_SERVICE_FEE_COMPONENT>0.00</LI_SERVICE_FEE_COMPONENT> <SUBCONTRACTOR_FEE_COMPONENT>0.00</SUBCONTRACTOR_FEE_COMPONENT> <LI_CERTIFICATE_NUMBER>0029990118</LI_CERTIFICATE_NUMBER> </Transaction> - <Transaction Lease="044533.02" Type="C"> <TRANSACTION_CODE>C</TRANSACTION_CODE> <CLIENT_NUMBER>2505</CLIENT_NUMBER> <COMPANY_NUMBER>01</COMPANY_NUMBER> <CUSTOMER_ID>044533</CUSTOMER_ID> <LEASE_NUMBER>044533.02</LEASE_NUMBER> <REASON_CODE>OC</REASON_CODE> <CLIENT_COVERAGE_EFFECTIVE_DATE>20070910</CLIENT_COVERAGE_EFFECTIVE_DATE> <CLIENT_COVERAGE_EXPIRATION_DATE>20100910</CLIENT_COVERAGE_EXPIRATION_DATE> <CLIENT_COVERAGE_CANCEL_DATE>20070910</CLIENT_COVERAGE_CANCEL_DATE> <INSURANCE_TERM>0</INSURANCE_TERM> <EQUIPMENT_VALUE>81808</EQUIPMENT_VALUE> <CHANGE_IN_EQUIP_VALUE>0</CHANGE_IN_EQUIP_VALUE> <LI_CLASS_CODE /> <INVOICE_METHOD /> <PROGRAM_CODE>PLLSL</PROGRAM_CODE> <REMAINING_INVOICES>31</REMAINING_INVOICES> <INVOICE_CREATE_DUE_DATE>20080210</INVOICE_CREATE_DUE_DATE> <FULL_TERM_CLIENT_INSURANCE_COST>-108.59</FULL_TERM_CLIENT_INSURANCE_COST> <FULL_TERM_FINANCE_CHARGE>-27.99</FULL_TERM_FINANCE_CHARGE> <FULL_TERM_LI_SERVICE_FEE>0.00</FULL_TERM_LI_SERVICE_FEE> <FULL_TERM_SUBCONTRACTOR_FEE>-7.28</FULL_TERM_SUBCONTRACTOR_FEE> <FULL_TERM_CUSTOMER_INSURANCE_CHARGE>-143.86</FULL_TERM_CUSTOMER_INSURANCE_C HARGE> <CUSTOMER_INVOICE_FREQUENCY>M</CUSTOMER_INVOICE_FREQUENCY> <CUSTOMER_INSURANCE_CHARGE_PER_INVOICE>98.74</CUSTOMER_INSURANCE_CHARGE_PER_ INVOICE> <CHANGE_IN_CUSTOMER_INSURANCE_CHARGE_PER_INVOICE>-98.74</CHANGE_IN_CUSTOMER_ INSURANCE_CHARGE_PER_INVOICE> <PRIOR_AMOUNT>0.00</PRIOR_AMOUNT> <INSURANCE_COMPONENT>0.00</INSURANCE_COMPONENT> <FINANCE_COMPONENT>0.00</FINANCE_COMPONENT> <LI_SERVICE_FEE_COMPONENT>0.00</LI_SERVICE_FEE_COMPONENT> <SUBCONTRACTOR_FEE_COMPONENT>0.00</SUBCONTRACTOR_FEE_COMPONENT> <LI_CERTIFICATE_NUMBER>0020000011</LI_CERTIFICATE_NUMBER> </Transaction> - <Transaction Lease="050581.01" Type="C"> <TRANSACTION_CODE>C</TRANSACTION_CODE> <CLIENT_NUMBER>2505</CLIENT_NUMBER> <COMPANY_NUMBER>01</COMPANY_NUMBER> <CUSTOMER_ID>050581</CUSTOMER_ID> <LEASE_NUMBER>050581.01</LEASE_NUMBER> <REASON_CODE>LC</REASON_CODE> <CLIENT_COVERAGE_EFFECTIVE_DATE>20080201</CLIENT_COVERAGE_EFFECTIVE_DATE> <CLIENT_COVERAGE_EXPIRATION_DATE>20100220</CLIENT_COVERAGE_EXPIRATION_DATE> <CLIENT_COVERAGE_CANCEL_DATE>20080805</CLIENT_COVERAGE_CANCEL_DATE> <INSURANCE_TERM>0</INSURANCE_TERM> <EQUIPMENT_VALUE>44730</EQUIPMENT_VALUE> <CHANGE_IN_EQUIP_VALUE>0</CHANGE_IN_EQUIP_VALUE> <LI_CLASS_CODE /> <INVOICE_METHOD /> <PROGRAM_CODE>PLLSL</PROGRAM_CODE> <REMAINING_INVOICES>23</REMAINING_INVOICES> <INVOICE_CREATE_DUE_DATE>20080320</INVOICE_CREATE_DUE_DATE> <FULL_TERM_CLIENT_INSURANCE_COST>-409.74</FULL_TERM_CLIENT_INSURANCE_COST> <FULL_TERM_FINANCE_CHARGE>-110.52</FULL_TERM_FINANCE_CHARGE> <FULL_TERM_LI_SERVICE_FEE>0.00</FULL_TERM_LI_SERVICE_FEE> <FULL_TERM_SUBCONTRACTOR_FEE>-125.40</FULL_TERM_SUBCONTRACTOR_FEE> <FULL_TERM_CUSTOMER_INSURANCE_CHARGE>-645.66</FULL_TERM_CUSTOMER_INSURANCE_C HARGE> <CUSTOMER_INVOICE_FREQUENCY>M</CUSTOMER_INVOICE_FREQUENCY> <CUSTOMER_INSURANCE_CHARGE_PER_INVOICE>37.33</CUSTOMER_INSURANCE_CHARGE_PER_ INVOICE> <CHANGE_IN_CUSTOMER_INSURANCE_CHARGE_PER_INVOICE>-37.33</CHANGE_IN_CUSTOMER_ INSURANCE_CHARGE_PER_INVOICE> <PRIOR_AMOUNT>0.00</PRIOR_AMOUNT> <INSURANCE_COMPONENT>0.00</INSURANCE_COMPONENT> <FINANCE_COMPONENT>0.00</FINANCE_COMPONENT> <LI_SERVICE_FEE_COMPONENT>0.00</LI_SERVICE_FEE_COMPONENT> <SUBCONTRACTOR_FEE_COMPONENT>0.00</SUBCONTRACTOR_FEE_COMPONENT> <LI_CERTIFICATE_NUMBER>0029990191</LI_CERTIFICATE_NUMBER> </Transaction> - <Transaction Lease="052278.03" Type="C"> <TRANSACTION_CODE>C</TRANSACTION_CODE> <CLIENT_NUMBER>2505</CLIENT_NUMBER> <COMPANY_NUMBER>01</COMPANY_NUMBER> <CUSTOMER_ID>052278</CUSTOMER_ID> <LEASE_NUMBER>052278.03</LEASE_NUMBER> <REASON_CODE>LC</REASON_CODE> <CLIENT_COVERAGE_EFFECTIVE_DATE>20080201</CLIENT_COVERAGE_EFFECTIVE_DATE> <CLIENT_COVERAGE_EXPIRATION_DATE>20090120</CLIENT_COVERAGE_EXPIRATION_DATE> <CLIENT_COVERAGE_CANCEL_DATE>20080805</CLIENT_COVERAGE_CANCEL_DATE> <INSURANCE_TERM>0</INSURANCE_TERM> <EQUIPMENT_VALUE>6877</EQUIPMENT_VALUE> <CHANGE_IN_EQUIP_VALUE>0</CHANGE_IN_EQUIP_VALUE> <LI_CLASS_CODE /> <INVOICE_METHOD /> <PROGRAM_CODE>PLLSL</PROGRAM_CODE> <REMAINING_INVOICES>10</REMAINING_INVOICES> <INVOICE_CREATE_DUE_DATE>20080320</INVOICE_CREATE_DUE_DATE> <FULL_TERM_CLIENT_INSURANCE_COST>-40.80</FULL_TERM_CLIENT_INSURANCE_COST> <FULL_TERM_FINANCE_CHARGE>-3.13</FULL_TERM_FINANCE_CHARGE> <FULL_TERM_LI_SERVICE_FEE>0.00</FULL_TERM_LI_SERVICE_FEE> <FULL_TERM_SUBCONTRACTOR_FEE>-34.44</FULL_TERM_SUBCONTRACTOR_FEE> <FULL_TERM_CUSTOMER_INSURANCE_CHARGE>-78.37</FULL_TERM_CUSTOMER_INSURANCE_CH ARGE> <CUSTOMER_INVOICE_FREQUENCY>M</CUSTOMER_INVOICE_FREQUENCY> <CUSTOMER_INSURANCE_CHARGE_PER_INVOICE>16.50</CUSTOMER_INSURANCE_CHARGE_PER_ INVOICE> <CHANGE_IN_CUSTOMER_INSURANCE_CHARGE_PER_INVOICE>-16.50</CHANGE_IN_CUSTOMER_ INSURANCE_CHARGE_PER_INVOICE> <PRIOR_AMOUNT>0.00</PRIOR_AMOUNT> <INSURANCE_COMPONENT>0.00</INSURANCE_COMPONENT> <FINANCE_COMPONENT>0.00</FINANCE_COMPONENT> <LI_SERVICE_FEE_COMPONENT>0.00</LI_SERVICE_FEE_COMPONENT> <SUBCONTRACTOR_FEE_COMPONENT>0.00</SUBCONTRACTOR_FEE_COMPONENT> <LI_CERTIFICATE_NUMBER>0029990218</LI_CERTIFICATE_NUMBER> </Transaction> - <Transaction Lease="052279.01" Type="C"> <TRANSACTION_CODE>C</TRANSACTION_CODE> <CLIENT_NUMBER>2505</CLIENT_NUMBER> <COMPANY_NUMBER>01</COMPANY_NUMBER> <CUSTOMER_ID>052279</CUSTOMER_ID> <LEASE_NUMBER>052279.01</LEASE_NUMBER> <REASON_CODE>LC</REASON_CODE> <CLIENT_COVERAGE_EFFECTIVE_DATE>20080810</CLIENT_COVERAGE_EFFECTIVE_DATE> <CLIENT_COVERAGE_EXPIRATION_DATE>20100730</CLIENT_COVERAGE_EXPIRATION_DATE> <CLIENT_COVERAGE_CANCEL_DATE>20080810</CLIENT_COVERAGE_CANCEL_DATE> <INSURANCE_TERM>0</INSURANCE_TERM> <EQUIPMENT_VALUE>20012</EQUIPMENT_VALUE> <CHANGE_IN_EQUIP_VALUE>0</CHANGE_IN_EQUIP_VALUE> <LI_CLASS_CODE /> <INVOICE_METHOD /> <PROGRAM_CODE>PLLSL</PROGRAM_CODE> <REMAINING_INVOICES>21</REMAINING_INVOICES> <INVOICE_CREATE_DUE_DATE>20081030</INVOICE_CREATE_DUE_DATE> <FULL_TERM_CLIENT_INSURANCE_COST>-250.32</FULL_TERM_CLIENT_INSURANCE_COST> <FULL_TERM_FINANCE_CHARGE>-43.26</FULL_TERM_FINANCE_CHARGE> <FULL_TERM_LI_SERVICE_FEE>0.00</FULL_TERM_LI_SERVICE_FEE> <FULL_TERM_SUBCONTRACTOR_FEE>-105.00</FULL_TERM_SUBCONTRACTOR_FEE> <FULL_TERM_CUSTOMER_INSURANCE_CHARGE>-398.58</FULL_TERM_CUSTOMER_INSURANCE_C HARGE> <CUSTOMER_INVOICE_FREQUENCY>M</CUSTOMER_INVOICE_FREQUENCY> <CUSTOMER_INSURANCE_CHARGE_PER_INVOICE>18.98</CUSTOMER_INSURANCE_CHARGE_PER_ INVOICE> <CHANGE_IN_CUSTOMER_INSURANCE_CHARGE_PER_INVOICE>-18.98</CHANGE_IN_CUSTOMER_ INSURANCE_CHARGE_PER_INVOICE> <PRIOR_AMOUNT>0.00</PRIOR_AMOUNT> <INSURANCE_COMPONENT>0.00</INSURANCE_COMPONENT> <FINANCE_COMPONENT>0.00</FINANCE_COMPONENT> <LI_SERVICE_FEE_COMPONENT>0.00</LI_SERVICE_FEE_COMPONENT> <SUBCONTRACTOR_FEE_COMPONENT>0.00</SUBCONTRACTOR_FEE_COMPONENT> <LI_CERTIFICATE_NUMBER>0020001681</LI_CERTIFICATE_NUMBER> </Transaction> - <Transaction Lease="052279.03" Type="C"> <TRANSACTION_CODE>C</TRANSACTION_CODE> <CLIENT_NUMBER>2505</CLIENT_NUMBER> <COMPANY_NUMBER>01</COMPANY_NUMBER> <CUSTOMER_ID>052279</CUSTOMER_ID> <LEASE_NUMBER>052279.03</LEASE_NUMBER> <REASON_CODE>LC</REASON_CODE> <CLIENT_COVERAGE_EFFECTIVE_DATE>20080810</CLIENT_COVERAGE_EFFECTIVE_DATE> <CLIENT_COVERAGE_EXPIRATION_DATE>20100930</CLIENT_COVERAGE_EXPIRATION_DATE> <CLIENT_COVERAGE_CANCEL_DATE>20080810</CLIENT_COVERAGE_CANCEL_DATE> <INSURANCE_TERM>0</INSURANCE_TERM> <EQUIPMENT_VALUE>13691</EQUIPMENT_VALUE> <CHANGE_IN_EQUIP_VALUE>0</CHANGE_IN_EQUIP_VALUE> <LI_CLASS_CODE /> <INVOICE_METHOD /> <PROGRAM_CODE>PLLSL</PROGRAM_CODE> <REMAINING_INVOICES>23</REMAINING_INVOICES> <INVOICE_CREATE_DUE_DATE>20081030</INVOICE_CREATE_DUE_DATE> <FULL_TERM_CLIENT_INSURANCE_COST>-201.48</FULL_TERM_CLIENT_INSURANCE_COST> <FULL_TERM_FINANCE_CHARGE>-38.18</FULL_TERM_FINANCE_CHARGE> <FULL_TERM_LI_SERVICE_FEE>0.00</FULL_TERM_LI_SERVICE_FEE> <FULL_TERM_SUBCONTRACTOR_FEE>-115.00</FULL_TERM_SUBCONTRACTOR_FEE> <FULL_TERM_CUSTOMER_INSURANCE_CHARGE>-354.66</FULL_TERM_CUSTOMER_INSURANCE_C HARGE> <CUSTOMER_INVOICE_FREQUENCY>M</CUSTOMER_INVOICE_FREQUENCY> <CUSTOMER_INSURANCE_CHARGE_PER_INVOICE>15.42</CUSTOMER_INSURANCE_CHARGE_PER_ INVOICE> <CHANGE_IN_CUSTOMER_INSURANCE_CHARGE_PER_INVOICE>-15.42</CHANGE_IN_CUSTOMER_ INSURANCE_CHARGE_PER_INVOICE> <PRIOR_AMOUNT>0.00</PRIOR_AMOUNT> <INSURANCE_COMPONENT>0.00</INSURANCE_COMPONENT> <FINANCE_COMPONENT>0.00</FINANCE_COMPONENT> <LI_SERVICE_FEE_COMPONENT>0.00</LI_SERVICE_FEE_COMPONENT> <SUBCONTRACTOR_FEE_COMPONENT>0.00</SUBCONTRACTOR_FEE_COMPONENT> <LI_CERTIFICATE_NUMBER>0020001682</LI_CERTIFICATE_NUMBER> </Transaction> - <Transaction Batch="090208" Type="Z"> <TRANSACTION_CODE>Z</TRANSACTION_CODE> <FILE_NAME>POPBDT01LC20090207</FILE_NAME> <CLIENT_NUMBER>2505</CLIENT_NUMBER> <FILE_CREATION_DATE>20090207</FILE_CREATION_DATE> <COMPANY_NUMBER>01</COMPANY_NUMBER> <BATCH_NUMBER>090208</BATCH_NUMBER> <CANCEL_COUNT>52</CANCEL_COUNT> <NEW_COUNT>0</NEW_COUNT> <TOTAL_FULL_TERM_CLIENT_INSURANCE_COST>-73996.12</TOTAL_FULL_TERM_CLIENT_INS URANCE_COST> <TOTAL_FULL_TERM_FINANCE_CHARGE>-35466.50</TOTAL_FULL_TERM_FINANCE_CHARGE> <TOTAL_FULL_TERM_LI_SERVICE_FEE>0.00</TOTAL_FULL_TERM_LI_SERVICE_FEE> <TOTAL_FULL_TERM_SUBCONTRACTOR_FEE>-9412.17</TOTAL_FULL_TERM_SUBCONTRACTOR_F EE> <TOTAL_FULL_TERM_CUSTOMER_INSURANCE_CHARGE>-118874.79</TOTAL_FULL_TERM_CUSTO MER_INSURANCE_CHARGE> <TOTAL_CUSTOMER_INSURANCE_CHARGE_PER_INVOICE>3074.35</TOTAL_CUSTOMER_INSURAN CE_CHARGE_PER_INVOICE> <TOTAL_CHANGE_IN_CUSTOMER_INSURANCE_CHARGE_PER_INVOICE>-3074.35</TOTAL_CHANG E_IN_CUSTOMER_INSURANCE_CHARGE_PER_INVOICE> <TOTAL_INSURANCE_COMPONENT>0.00</TOTAL_INSURANCE_COMPONENT> <TOTAL_FINANCE_COMPONENT>0.00</TOTAL_FINANCE_COMPONENT> <TOTAL_LI_SERVICE_FEE_COMPONENT>0.00</TOTAL_LI_SERVICE_FEE_COMPONENT> <TOTAL_SUBCONTRACTOR_FEE_COMPONENT>0.00</TOTAL_SUBCONTRACTOR_FEE_COMPONENT> </Transaction> </BDT_TRANSACTIONS> ------- u2-users mailing list [email protected] To unsubscribe please visit http://listserver.u2ug.org/ ------- u2-users mailing list [email protected] To unsubscribe please visit http://listserver.u2ug.org/ ------- u2-users mailing list [email protected] To unsubscribe please visit http://listserver.u2ug.org/
