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


  • Subject: Re: DATA-INTO error using YAJLINTO
  • From: Barbara Morris <bmorris@xxxxxxxxxx>
  • Date: Thu, 31 Jan 2019 17:38:54 -0500
  • Arc-authentication-results: i=1; mx.google.com; spf=neutral (google.com: 195.159.176.226 is neither permitted nor denied by best guess record for domain of rpg400@xxxxxxxxxxx) smtp.mailfrom=rpg400@xxxxxxxxxxx; dmarc=fail (p=NONE sp=NONE dis=NONE) header.from=ibm.com
  • Arc-message-signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=google.com; s=arc-20160816; h=content-language:in-reply-to:user-agent:content-transfer-encoding :mime-version:reply-to:references:message-id:organization:date :subject:from:to; bh=Iz5fL0x0MfWkR2g3ssvYzjbJ0+RG/c+w08qZdkRF6Es=; b=VUqg7rw8CUxaDJpvBk6KQszxxdi4gwnWkZ9qmS4omCs9aSEQT+n4j3kmdyyuqNY404 H3Dv0/qbbEQij5Ri/OikcHY0w/Gm6RDUt58Q7VxxiIpLNHHemfDAgZ+z+FcrzAl/YVb/ mCp8vSFcjkF18WGcGlT9ZeZYnzHi0R+u7/MjJpr4KHTPeHiNEnZ9TmSqbmRrzE1FBcmW KNgtspqUvrhJUHC8+CzrWZG27dBlsoOfQqmjQReKWlE2zGqslHgGTDwQMvLJwHjMnHl9 7rdyGVgNn0UMd4o3Tuh6dWHrWVkI9YHWerI+QrjPSGFVU5SPbKVecIeTvw/LfAFSmxuf Vm0Q==
  • Arc-seal: i=1; a=rsa-sha256; t=1548974345; cv=none; d=google.com; s=arc-20160816; b=k/WLLpnJiiX6KqWNacT9n53JWJALFK5n1u7grFdf+v+A+2gr5k39F2XylzjL8Bcvoh oC0KXQUftwb1VTwOgqI68fTAqKooBxBXiMxSZXfNgpP/7cQ3eyWA+UnLr3B47UC0baEj Ws2NNJRl8ItbqgXOZnbPvCUY8+tYe42MoNVFR7jKU4Pj2xNrbts7sdbp+/R1NfXPE5ca u9NuwJZbGu6MHoItJa3c8w6mzy9wzVNLM8BfTdmwDsz54dVjfzC7quvuGMLYz9zz9ktm 5hjkMT+rjfXaCa/NJG7EdEWkrM2NyZTxTWIEuCISPPIqXv++4TzovcFFhfbmnOtK2nDp lqYQ==
  • List-archive: <https://archive.midrange.com/rpg400-l/>
  • List-help: <mailto:rpg400-l-request@lists.midrange.com?subject=help>
  • List-id: "RPG programming on the IBM i \(AS/400 and iSeries\)" <rpg400-l.lists.midrange.com>
  • List-post: <mailto:rpg400-l@lists.midrange.com>
  • List-subscribe: <https://lists.midrange.com/mailman/listinfo/rpg400-l>, <mailto:rpg400-l-request@lists.midrange.com?subject=subscribe>
  • List-unsubscribe: <https://lists.midrange.com/mailman/options/rpg400-l>, <mailto:rpg400-l-request@lists.midrange.com?subject=unsubscribe>

On 2019-01-31 4:31 PM, mlazarus wrote:
 I'm trying to use DATA-INTO using YAJLINTO.  It's based on one of Scott's examples.
...

Sometimes it's useful to get a trace from DATA-INTO.

https://www.ibm.com/support/knowledgecenter/en/ssw_ibm_i_73/rzasm/roaDataIntoTrace.htm

In this case, the problem is that you have your Data subfield defined as a data structure, but the JSON array is an array of strings.

Try defining the Data subfield as just a CHAR(50) array instead of a data structure array with a CHAR(50) subfield.

dcl-ds MyData qualified;
Code varchar( 5 ) ;
Message varchar( 50 ) ;
num_Data int( 10 ) ;

Data char( 50 ) ;
end-ds;


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
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.