×
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
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.