× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



QDLS? Really? That should not have anything to do with your issues, but
QDLS is the worst choice for storing stream files...

Jmo,
-Eric DeLong

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Chuck Eavers
Sent: Thursday, August 26, 2010 10:05 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: The XML document does not match the RPG variable error

I'm getting the following error when I try to run my XML-INTO statement,
the error is



The XML document does not match the RPG variable; reason code 1.



Below is the front end of my program and top of the XML, any clues would
be helpful since I'm on a tight deadline and this is my 1st adventure
into XML



H DFTACTGRP(*NO) OPTION(*NODEBUGIO : *SRCSTMT)



// This count is populated by XML-INTO whenever the INTO

// variable is an array

D progStatus SDS

D xmlElements 20i 0 Overlay(progStatus: 372)



D MySAXHandler Pr 10i 0

D commArea Like(dummyCommArea)

D event 10i 0 Value

D pstring * Value

D stringLen 20i 0 Value

D exceptionId 10i 0 Value



D RmvWhitespace pr 65535a Varying

D input 65535a Varying Const



D CheckOutRpt DS Qualified

D merchantname 100a

D reportid 9p 0

D reportstrdate 40a

D reportenddate 40a

D version 10a

D purchaselist LikeDs(buyerpurch) Dim(1)



D buyerpurch DS Qualified

D transinfo LikeDs(transinfo)

D ShipmentList LikeDs(Shipment) Dim(1)



D transinfo DS Qualified

D invoiceNbr 9p 0

D checkoutdate 40a

D totinvamt 7p 2

D paymnttype 50a

D paymntid 255a

D expdate 10a

D cvvnbr 16a

D paymnttranid 255a

D transrefout 255a

D totaltax 7p 2

D orderid 20a

D othercost 7p 2

D billtitle 20a

D billfname 50a

D billlname 50a

D billsuffix 20a

D billbuyrcmp 50a

D billbuyrtitle 50a

D billaddr1 80a

D billaddr2 80a

D billcity 50a

D billregion 50a

D billzip 30a

D billcountry 3a

D billdayphone 50a

D billevephone 50a

D promocode 20a

D promovalue 20a

D billreserved 255a

D mktplaceemail 80a

D buyremailopt 1a

D resellerid 80a

D customfield1 80a

D customfield2 80a

D customfield3 80a

D customfield4 80a

D customfield5 80a

D startmonth 2p 0

D startyear 4p 0

D discount 7p 2



D Shipment DS Qualified

D shipmentnbr 9p 0

D shiptitle 20a

D shipfname 50a

D shiplname 50a

D shipsuffix 20a

D shipbuyrcmp 50a

D shipbuyrtitle 50a

D shipaddr1 80a

D shipaddr2 80a

D shipcity 50a

D shipregion 50a

D shipzip 30a

D shipcountry 3a

D shipdayphone 50a

D shipevephone 50a

D shipinstruct 255a

D shipcarrier 50a

D shipclass 50a

D shipcharge 7p 2

D shipinsurance 7p 2

D shiptaxrate 7p 2

D shipmenttax 7p 2

D shipmentother 7p 2

D shipmntsubtot 7p 2

D distcenter 80a

D shipreserved1 255a

D shipreserved2 255a

D items LikeDs(Item) Dim(1)



D Item DS Qualified

D lottitle 255a

D sku 80a

D sitename 50a

D marketplace 80a

D siteauctionid 50a

D sitetransid 50a

D quantitywon 9p 0

D bid 7p 2

D closingtime 40a

D unitweight 9p 0

D whselocmbr 80a

D classifaction 35a

D supplier 50a

D vattaxamt 20a

D itemreserved2 255a





D XML_Source S 256a Varying

D
Inz('/qdls/LXB25CE/CFEXPORT.XML')



// Short version of Description for display purposes

D dispDescription...

D S 40a



D dummyCommArea S 1a

D i S 5i 0

D p S 5i 0



/Free



XML-INTO CheckOutRpt

%XML(XML_Source: 'case=any doc=file allowextra=yes +

allowmissing=yes');



XML below



<?xml version="1.0" encoding="iso-8859-1"?>

<CheckoutReport>

<MerchantName><![CDATA[Ideal Apparel, Inc.: House of
Trends]]></MerchantName>

<ReportId>1705249</ReportId>

<ReportPeriodStart>8/19/2010 12:00:00 PM (PT)</ReportPeriodStart>

<ReportPeriodEnd>8/19/2010 1:00:00 PM (PT)</ReportPeriodEnd>

<Version>2.0</Version>

<PurchaseList>

<BuyerPurchase>

<TransactionInfo>

<InvoiceNumber>4001538</InvoiceNumber>

<CheckoutDate>08/19/2010 12:05:21 PM</CheckoutDate>

<TotalInvoiceAmount>34.45</TotalInvoiceAmount>

<PaymentType>PP</PaymentType>

<PaymentId><![CDATA[**************.com]]></PaymentId>

<ExpDate>0/0</ExpDate>

<CVVNbr><![CDATA[]]></CVVNbr>

<PaymentTransID><![CDATA[7GB82908BC271444F]]></PaymentTransID>

<TransRefOut><![CDATA[7GB82908BC271444F]]></TransRefOut>

<TotalTax>0.00</TotalTax>

<OrderID><![CDATA[4001538]]></OrderID>

<OtherCost><![CDATA[0.00]]></OtherCost>

<BillingNameTitle></BillingNameTitle>

<BillingFirstName><![CDATA[]]></BillingFirstName>

<BillingLastName><![CDATA[]]></BillingLastName>

<BillingNameSuffix><![CDATA[]]></BillingNameSuffix>

<BillingBuyerCompany><![CDATA[]]></BillingBuyerCompany>

<BillingBuyerTitle><![CDATA[]]></BillingBuyerTitle>

<BillingAddress1><![CDATA[]]></BillingAddress1>

<BillingAddress2><![CDATA[]]></BillingAddress2>

<BillingCity><![CDATA[]]></BillingCity>

<BillingRegion></BillingRegion>

<BillingZip><![CDATA[]]></BillingZip>

<BillingCountry><![CDATA[]]></BillingCountry>

<BillingDayPhone><![CDATA[]]></BillingDayPhone>

<BillingEveningPhone><![CDATA[]]></BillingEveningPhone>

<PromotionCode><![CDATA[]]></PromotionCode>

<PromotionValue><![CDATA[0.00]]></PromotionValue>

<MarketplaceEmail><![CDATA[xapparel@xxxxxxxxx]]></MarketplaceEmail>

<BuyerEmailOptIn>0</BuyerEmailOptIn>

<ResellerID><![CDATA[]]></ResellerID>

<CustomField1><![CDATA[]]></CustomField1>

<CustomField2><![CDATA[]]></CustomField2>

<CustomField3><![CDATA[]]></CustomField3>

<CustomField4><![CDATA[]]></CustomField4>

<CustomField5><![CDATA[]]></CustomField5>

<StartMonth><![CDATA[]]></StartMonth>

<StartYear><![CDATA[]]></StartYear>

<OptInDiscount><![CDATA[0]]></OptInDiscount>

</TransactionInfo>

<ShipmentList>

<Shipment>

<ShipmentNumber>1</ShipmentNumber>

<ShipNameTitle></ShipNameTitle>

<ShipFirstName><![CDATA[ANTONIO]]></ShipFirstName>

<ShipLastName><![CDATA[JR LENOX]]></ShipLastName>

<ShipNameSuffix><![CDATA[]]></ShipNameSuffix>

<ShipBuyerCompany><![CDATA[]]></ShipBuyerCompany>

<ShipBuyerTitle><![CDATA[]]></ShipBuyerTitle>

<ShipAddress1><![CDATA[1414 Radcliffe St]]></ShipAddress1>

<ShipAddress2><![CDATA[]]></ShipAddress2>

<ShipCity><![CDATA[BRISTOL]]></ShipCity>

<ShipRegion>PA</ShipRegion>

<ShipZip><![CDATA[19007]]></ShipZip>

<ShipCountry><![CDATA[US]]></ShipCountry>

<ShipDayPhone><![CDATA[215-555-1212]]></ShipDayPhone>

<ShipEvePhone><![CDATA[]]></ShipEvePhone>

<ShipInstructions><![CDATA[]]></ShipInstructions>

<ShipCarrier><![CDATA[US Postal Service Priority Mail]]></ShipCarrier>

<ShipClass><![CDATA[(2-3 day delivery w/tracking
number)]]></ShipClass>

<ShipCharge>7.95</ShipCharge>

<ShipInsurance>0.00</ShipInsurance>

<ShipTaxRate></ShipTaxRate>

<ShipmentTax>0.00</ShipmentTax>

<ShipmentOther></ShipmentOther>

<ShipmentSubTotal>26.50</ShipmentSubTotal>

<DistributionCtr><![CDATA[Torrance]]></DistributionCtr>

<Items>

<Item>

<LotTitle><![CDATA[New Ed Hardy Christian Audigier Tiger Head Jeans
38x34]]>

<SKU><![CDATA[m-ehjeans117-38x34]]></SKU>

<SiteName><![CDATA[eBay Auction US]]></SiteName>

<MarketplaceUserID><![CDATA[occlothing]]></MarketplaceUserID>

<SiteAuctionID><![CDATA[230508563183]]></SiteAuctionID>

<SiteTransactionID><![CDATA[0]]></SiteTransactionID>

<QtyWon>1.00</QtyWon>

<Bid>26.50</Bid>

<ClosingTimeLTz>08/13/2010 4:12:36 PM</ClosingTimeLTz>

<UnitWeight>0.50</UnitWeight>

<WarehouseLocationNumber><![CDATA[]]></WarehouseLocationNumber>

<Classification><![CDATA[SC Mens Jeans]]></Classification>

<Supplier><![CDATA[]]></Supplier>

<VATTaxAmount><![CDATA[0.00]]></VATTaxAmount>

<IssueNbr><![CDATA[]]></IssueNbr>

</Item>

</Items>

</Shipment>

</ShipmentList>

</BuyerPurchase>

<BuyerPurchase>

<TransactionInfo>


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.