× 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: mlazarus <mlazarus@xxxxxxxxxxxx>
  • Date: Thu, 31 Jan 2019 19:42:06 -0500
  • Arc-authentication-results: i=1; mx.google.com; spf=pass (google.com: domain of mlazarus@xxxxxxxxxxxx designates 216.222.148.102 as permitted sender) smtp.mailfrom=mlazarus@xxxxxxxxxxxx
  • Arc-message-signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=google.com; s=arc-20160816; h=content-transfer-encoding:in-reply-to:references:subject:to :mime-version:user-agent:from:date:message-id; bh=peYPVn5tNrWEkciLxy8Vzm8oYqrafE+io8Izsv2Flb0=; b=F1Ux1/bauPxu3QvVHr/+YvJrvGDbotNZSolNyEMqpDiKhBHylq16B4dIVkHYJaQ+TY HswdPkZ6V/6Z55gjmYLuePjd1oJ/JvAd3fQywHBctjEo9zRuQOaXOJ6YPnpPcyDOilv0 zRMdp6ymuCgjJ1oFUiQo4/gIMiVWSPATp3rQRh/xu1856P77JMLajYBf9BDiHs012G1t m75BG+WP2NHxBHTd+zzgt0D+ZJ+KmuMY98WFPf8lnSmXeUi6jmzcZSHUydTBWNAyOClE KsKGSnN8ERFdZBFz2ot0HJR1KgMSvn0pMWsNJrcSBx9m0bHRtizaXlcAnjJXnu85lXOl fHbA==
  • Arc-seal: i=1; a=rsa-sha256; t=1548981723; cv=none; d=google.com; s=arc-20160816; b=J0lIXmUAE0ZzFXwWbuKyYtrok0w3Zt901K5Gr+9Fbbqeq0hhn+GEaDCnrv9Q4QkQYl XVDJTcO7+QtDTa2E7f8KqX5eroDEIa7G9I67WWBtJmjrvBiRyUYUG1OYoxfWiJG02HHt f8W0i9MFdBsSXqGvduOEBdKcNJ3FVaeciOBGRYTQTvtovz0B1B17aTIkqoFOOlWEVI3N 0HrooJZI6LxUZNBmSyNxGI+CziNjaaaWsOL4No+1x4GcaR8CV9Q3pRhKYygdCGwfn1QS QCPPyKrpuZ9mY1bXYNW2WqRCUUCOKl+QUgS7/l0FJfkaCM9uNUXfZMveJLnBZE3L6+LN xP/g==
  • 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>

Hi Barbara,

That worked like a charm. I defined Data as an array, without the ds. I thought I had tried that; I guess not.

The ADDENVVAR QIBM_RPG_DATA_INTO_TRACE_PARSER VALUE('*STDOUT') tip is excellent!

Thanks.

-mark

On 1/31/2019 5:38 PM, Barbara Morris wrote:
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 ...

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.