[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

RE: xml-sax issue



   EVAL RESULTS
   RESULTS.CLAIM = '8104550 '
   RESULTS.AMOUNT = '1995.83 '
   RESULTS.GROUPER = '7320 '
   RESULTS.DXG = '53 '
   RESULTS.MEANLOS2 = '2 '
   RESULTS.ERROR_CODE = '0 '
   The following works for me.
   D Results ds qualified
   D Claim 9a Varying
   D Amount 9a Varying
   D Grouper 5a Varying
   D Dxg 3a Varying
   D MEANLOS2 2a Varying
   D Error_Code 2a Varying
   **
   D xml s 256a Varying
   D $options s 128a Varying
   xml = '<MMMProcess>+
   <Results>+
   <Claim>8104550</Claim>+
   <Amount>1995.83</Amount>+
   <Grouper>7320</Grouper>+
   <Dxg>53</Dxg>+
   <MEANLOS2>2</MEANLOS2>+
   <Error_Code>0</Error_Code>+
   </Results>+
   </MMMProcess>';
   $options = 'doc=string +
   path=MMMProcess/Results +
   case=any +
   allowextra=yes +
   allowmissing=yes';
   xml-into Results %xml(xml: $options);
   *inLR = *on;
   -----Original Message-----
   From: RPG List [mailto:rpglist@xxxxxxxxxxx]
   Sent: Wednesday, September 09, 2015 3:44 PM
   To: HTTPAPI and FTPAPI Projects
   Subject: Re: xml-sax issue
   I just noticed that I cut off on the DS the Error_Code field, its there
   I
   just missed it when I copied it.
   > I tried using the xml-into as suggested by John Paris and I get
   > nothing in the data structure.
   >
   > Here is how I have it defined:
   >
   > DResults ds qualified
   > D Claim LikeDs(claim_t)
   >
   > D Claim_t ds qualified
   > D based(template)
   > D Claim 9a Varying
   > D Amount 9a Varying
   > D Group 5a Varying
   > D Dxg 3a Varying
   > D MEANLOS2 2a Varying
   >
   > I have the options variable set as:
   >
   > $options = 'doc=string +
   > path=MMMProcess/Results +
   > case=any +
   > allowextra=yes +
   > allowmissing=yes';
   >
   > and then the call:
   >
   > xml-into Results %xml(xml: $options);
   >
   >
   > when I check the values in debug after caling the xml-into all I see
   > is blanks or asteriks.
   >
   > Here is a visual of the xml as its coming in:
   >
   > ....5...10...15...20...25...30...35...40...45...50...55...60
   > 1 '<MMMProcess><Results><Claim>8104550</Claim><Amount>1995.83</'
   > 61 'Amount><Grouper>7320</Grouper><Dxg>53</Dxg><MEANLOS2>2</MEAN'
   > 121 'LOS2><Error_Code>0</Error_Code></Results></MMMProcess> '
   >
   >
   > Am I missing something?
   >
   > Dutch
   >
   >
   >
   ----------------------------------------------------------------------
   > - This is the FTPAPI mailing list. To unsubscribe, please go to:
   > [1]http://www.scottklement.com/mailman/listinfo/ftpapi
   >
   ----------------------------------------------------------------------
   > -
   >
   -----------------------------------------------------------------------
   This is the FTPAPI mailing list. To unsubscribe, please go to:
   [2]http://www.scottklement.com/mailman/listinfo/ftpapi
   -----------------------------------------------------------------------

   Disclaimer

   The information contained in this communication from the sender is
   confidential. It is intended solely for use by the recipient and others
   authorized to receive it. If you are not the recipient, you are hereby
   notified that any disclosure, copying, distribution or taking action in
   relation of the contents of this information is strictly prohibited and
   may be unlawful.
   This email has been scanned for viruses and malware, and may have been
   automatically archived by Mimecast Ltd, an innovator in Software as a
   Service (SaaS) for business. Providing a safer and more useful place
   for your human generated data. Specializing in; Security, archiving and
   compliance. To find out more [3]Click Here.

References

   1. http://www.scottklement.com/mailman/listinfo/ftpapi
   2. http://www.scottklement.com/mailman/listinfo/ftpapi
   3. http://www.mimecast.com/products/
-----------------------------------------------------------------------
This is the FTPAPI mailing list.  To unsubscribe, please go to:
http://www.scottklement.com/mailman/listinfo/ftpapi
-----------------------------------------------------------------------