Re: DATA-INTO where number of records not known

https://blog.faq400.com/en/programming/json-ibmi-faq-howto-2/


On Fri, 2020-12-11 at 23:19 +1000, Don Brown via MIDRANGE-L wrote:

Ok I have re-downloaded the YAJL save file and now I have the YAJLDTAGEN

program.


But I still can't find ane examples / doco on how to call using DATA-GEN


Any examples to generate the required data structure from a json string

would be appreciated.


Thanks


Don







From: "Don Brown via MIDRANGE-L" <

<mailto:midrange-l@xxxxxxxxxxxxxxxxxx>

midrange-l@xxxxxxxxxxxxxxxxxx

To: "Midrange Systems Technical Discussion"

<

<mailto:midrange-l@xxxxxxxxxxxxxxxxxx>

midrange-l@xxxxxxxxxxxxxxxxxx

Cc: "Don Brown" <

<mailto:DBrown@xxxxxxxxxx>

DBrown@xxxxxxxxxx

Date: 11/12/2020 10:56 PM

Subject: Re: DATA-INTO where number of records not known

Sent by: "MIDRANGE-L" <

<mailto:midrange-l-bounces@xxxxxxxxxxxxxxxxxx>

midrange-l-bounces@xxxxxxxxxxxxxxxxxx

I have the latest download of Scotts YAJL library


I am looking for an example of YAJLGEN


For that matter I do not seem to have a program YAJLGEN on the system

where do I get this download ?


Thanks


Don






From: "Charles Wilt" <

<mailto:charles.wilt@xxxxxxxxx>

charles.wilt@xxxxxxxxx

To: "Midrange Systems Technical Discussion"

<

<mailto:midrange-l@xxxxxxxxxxxxxxxxxx>

midrange-l@xxxxxxxxxxxxxxxxxx

Date: 11/12/2020 09:27 AM

Subject: Re: DATA-INTO where number of records not known

Sent by: "MIDRANGE-L" <

<mailto:midrange-l-bounces@xxxxxxxxxxxxxxxxxx>

midrange-l-bounces@xxxxxxxxxxxxxxxxxx

Have you looked at using YAJLGEN to generate the DS & DATA-INTO call you

need?


You can do it yourself or course, but YAJLGEN sure makes for an easy first

pass.


Basically, in the data-into you include "count prefix" like so:

countprefix=num_


then in your DS, you include a field

dcl-ds jsonDoc;

num_SOMEARRAY int(10);

SOMEARRY char(10) dim(9999);

end-ds;


YAJLINTO will load the array and the value in num_SOMEARRAY will be how

many entries were loaded to the array.


Now if your # of entries exceeds the max array size for RPG, then I think

%handler() is your solution.


I've only seen it used once, and that was for XML...but it only processes

part of the doc at a time before passing the data to your handler. A

quick

serach didn't turn up a good exmaple of using it for JSON.


Teraspace and a based pointer might be another option if you're dealing

with really large documents...just a thought.


Charles





On Thu, Dec 10, 2020 at 3:01 PM Don Brown via MIDRANGE-L <

<mailto:midrange-l@xxxxxxxxxxxxxxxxxx>

midrange-l@xxxxxxxxxxxxxxxxxx

wrote:

(Sorry, not sure if this is should be the RPG list only or the Midrange

list)


We are using data-into with YAJLINTO to process a json file we retrieve

from an external site using a web service.


The web service does not provide any options as to controlling the

number

of records to be returned.


The json returned does not have an element for the number of records

provided.


If I put a count at the highest level will this be set correctly if the

number of records retrieved exceeds the array size ? And if yes how do I

then process the records past that point ?


I don't think the %handler option helps - well the way I read the doco

it

wont.


How do I either check how many records have been returned or process a

json string that exceeds the number of elements in my receiving array ?


Thanks for all suggestions


Don



--

This email has been scanned for computer viruses. Although MSD has taken

reasonable precautions to ensure no viruses are present in this email,

MSD

cannot accept responsibility for any loss or damage arising from the use


of

this email or attachments..

--

This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list

To post a message email:

<mailto:MIDRANGE-L@xxxxxxxxxxxxxxxxxx>

MIDRANGE-L@xxxxxxxxxxxxxxxxxx


To subscribe, unsubscribe, or change list options,

visit:

<https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.com_mailman_listinfo_midrange-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=hirmV788fhJEaASEQO0FXq6jTKco9QvzBTWHslQpkqM&e=>

https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.com_mailman_listinfo_midrange-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=hirmV788fhJEaASEQO0FXq6jTKco9QvzBTWHslQpkqM&e=




or email:

<mailto:MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx>

MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx


Before posting, please take a moment to review the archives

at

<https://urldefense.proofpoint.com/v2/url?u=https-3A__archive.midrange.com_midrange-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=tHYTxFLSSsI2yghAwIccJb9r99wY9LjByFQrBw79hLU&e=>

https://urldefense.proofpoint.com/v2/url?u=https-3A__archive.midrange.com_midrange-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=tHYTxFLSSsI2yghAwIccJb9r99wY9LjByFQrBw79hLU&e=



.


Please contact

<mailto:support@xxxxxxxxxxxxxxxxxxxx>

support@xxxxxxxxxxxxxxxxxxxx

for any subscription related

questions.


Help support

<https://urldefense.proofpoint.com/v2/url?u=http-3A__midrange.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=hmZ9UPlwomqZp3cZy6EnetB8jmwD9IgyHZcDE9DAYZY&e=>

https://urldefense.proofpoint.com/v2/url?u=http-3A__midrange.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=hmZ9UPlwomqZp3cZy6EnetB8jmwD9IgyHZcDE9DAYZY&e=




by shopping at

<https://urldefense.proofpoint.com/v2/url?u=http-3A__amazon.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=speJM2dL4e6S7th_1_Ly_et4cxHogMzTq9dguU0Lde8&e=>

https://urldefense.proofpoint.com/v2/url?u=http-3A__amazon.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=speJM2dL4e6S7th_1_Ly_et4cxHogMzTq9dguU0Lde8&e=




with our affiliate

link:

<https://urldefense.proofpoint.com/v2/url?u=https-3A__amazon.midrange.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=8RBI4zBnOjf4NTdgqoZgyuvbvA1Pv3x2v6XXe1i65Tg&e=>

https://urldefense.proofpoint.com/v2/url?u=https-3A__amazon.midrange.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=8RBI4zBnOjf4NTdgqoZgyuvbvA1Pv3x2v6XXe1i65Tg&e=





--

This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list

To post a message email:

<mailto:MIDRANGE-L@xxxxxxxxxxxxxxxxxx>

MIDRANGE-L@xxxxxxxxxxxxxxxxxx


To subscribe, unsubscribe, or change list options,

visit:

<https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.com_mailman_listinfo_midrange-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=hirmV788fhJEaASEQO0FXq6jTKco9QvzBTWHslQpkqM&e=>

https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.com_mailman_listinfo_midrange-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=hirmV788fhJEaASEQO0FXq6jTKco9QvzBTWHslQpkqM&e=




or email:

<mailto:MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx>

MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx


Before posting, please take a moment to review the archives

at

<https://urldefense.proofpoint.com/v2/url?u=https-3A__archive.midrange.com_midrange-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=tHYTxFLSSsI2yghAwIccJb9r99wY9LjByFQrBw79hLU&e=>

https://urldefense.proofpoint.com/v2/url?u=https-3A__archive.midrange.com_midrange-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=tHYTxFLSSsI2yghAwIccJb9r99wY9LjByFQrBw79hLU&e=



.


Please contact

<mailto:support@xxxxxxxxxxxxxxxxxxxx>

support@xxxxxxxxxxxxxxxxxxxx

for any subscription related

questions.


Help support

<https://urldefense.proofpoint.com/v2/url?u=http-3A__midrange.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=hmZ9UPlwomqZp3cZy6EnetB8jmwD9IgyHZcDE9DAYZY&e=>

https://urldefense.proofpoint.com/v2/url?u=http-3A__midrange.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=hmZ9UPlwomqZp3cZy6EnetB8jmwD9IgyHZcDE9DAYZY&e=




by shopping at

<https://urldefense.proofpoint.com/v2/url?u=http-3A__amazon.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=speJM2dL4e6S7th_1_Ly_et4cxHogMzTq9dguU0Lde8&e=>

https://urldefense.proofpoint.com/v2/url?u=http-3A__amazon.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=speJM2dL4e6S7th_1_Ly_et4cxHogMzTq9dguU0Lde8&e=




with our affiliate link:

<https://urldefense.proofpoint.com/v2/url?u=https-3A__amazon.midrange.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=8RBI4zBnOjf4NTdgqoZgyuvbvA1Pv3x2v6XXe1i65Tg&e=>

https://urldefense.proofpoint.com/v2/url?u=https-3A__amazon.midrange.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=-PWDCmLBxYYH13bcXYxWkNMenCdRQ8fUXqdj9htfCHI&s=8RBI4zBnOjf4NTdgqoZgyuvbvA1Pv3x2v6XXe1i65Tg&e=








--

This email has been scanned for computer viruses. Although MSD has taken

reasonable precautions to ensure no viruses are present in this email, MSD

cannot accept responsibility for any loss or damage arising from the use

of this email or attachments..

--

This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list

To post a message email:

<mailto:MIDRANGE-L@xxxxxxxxxxxxxxxxxx>

MIDRANGE-L@xxxxxxxxxxxxxxxxxx


To subscribe, unsubscribe, or change list options,

visit:

<https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.com_mailman_listinfo_midrange-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=3rPwJ8pClfxb2VTcOERFy2VFdgXNZoxPrX236XsvEgE&s=-XfosgNT9bDtLDtPxm0PWGMYqkNTRTAFl-BPe67n0Mc&e=>

https://urldefense.proofpoint.com/v2/url?u=https-3A__lists.midrange.com_mailman_listinfo_midrange-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=3rPwJ8pClfxb2VTcOERFy2VFdgXNZoxPrX236XsvEgE&s=-XfosgNT9bDtLDtPxm0PWGMYqkNTRTAFl-BPe67n0Mc&e=



or email:

<mailto:MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx>

MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx


Before posting, please take a moment to review the archives

at

<https://urldefense.proofpoint.com/v2/url?u=https-3A__archive.midrange.com_midrange-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=3rPwJ8pClfxb2VTcOERFy2VFdgXNZoxPrX236XsvEgE&s=j5m3NgL8iPVnolHLlu4kqK-GDnM65QW3eeJHgC4eRgs&e=>

https://urldefense.proofpoint.com/v2/url?u=https-3A__archive.midrange.com_midrange-2Dl&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=3rPwJ8pClfxb2VTcOERFy2VFdgXNZoxPrX236XsvEgE&s=j5m3NgL8iPVnolHLlu4kqK-GDnM65QW3eeJHgC4eRgs&e=


.


Please contact

<mailto:support@xxxxxxxxxxxxxxxxxxxx>

support@xxxxxxxxxxxxxxxxxxxx

for any subscription related

questions.


Help support

<https://urldefense.proofpoint.com/v2/url?u=http-3A__midrange.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=3rPwJ8pClfxb2VTcOERFy2VFdgXNZoxPrX236XsvEgE&s=-qSqyRvV0w0LZ5BNvfZnyox684VgkILtzchISMZ7uao&e=>

https://urldefense.proofpoint.com/v2/url?u=http-3A__midrange.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=3rPwJ8pClfxb2VTcOERFy2VFdgXNZoxPrX236XsvEgE&s=-qSqyRvV0w0LZ5BNvfZnyox684VgkILtzchISMZ7uao&e=



by shopping at

<https://urldefense.proofpoint.com/v2/url?u=http-3A__amazon.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=3rPwJ8pClfxb2VTcOERFy2VFdgXNZoxPrX236XsvEgE&s=oFe6XBAcOwR33o4Fh6r6UxBZqHhProbNfEBG3jOwEnE&e=>

https://urldefense.proofpoint.com/v2/url?u=http-3A__amazon.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=3rPwJ8pClfxb2VTcOERFy2VFdgXNZoxPrX236XsvEgE&s=oFe6XBAcOwR33o4Fh6r6UxBZqHhProbNfEBG3jOwEnE&e=



with our affiliate link:

<https://urldefense.proofpoint.com/v2/url?u=https-3A__amazon.midrange.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=3rPwJ8pClfxb2VTcOERFy2VFdgXNZoxPrX236XsvEgE&s=8BYs61ams2gHGQZMq00zhbA0NZ2ohT45NsuFp5qoUDM&e=>

https://urldefense.proofpoint.com/v2/url?u=https-3A__amazon.midrange.com&d=DwICAg&c=euGZstcaTDllvimEN8b7jXrwqOf-v5A_CdpgnVfiiMM&r=Kys-lxRCMpPr7up01Pp1FRjOe49ne6imWwi1b-ue8yQ&m=3rPwJ8pClfxb2VTcOERFy2VFdgXNZoxPrX236XsvEgE&s=8BYs61ams2gHGQZMq00zhbA0NZ2ohT45NsuFp5qoUDM&e=









[https://www.medtronsoftware.com/img/MedtronMinilogo.bmp] Kevin Bucknum
Senior Programmer Analyst
MEDDATA / MEDTRON
120 Innwood Drive
Covington LA 70433
Local: 985-893-2550
Toll Free: 877-893-2550
https://www.medtronsoftware.com



CONFIDENTIALITY NOTICE

This document and any accompanying this email transmission contain confidential information, belonging to the sender that is legally privileged. This information is intended only for the use of the individual or entity named above. The authorized recipient of this information is prohibited from disclosing this information to any other party and is required to destroy the information after its stated need has been fulfilled. If you are not the intended recipient, or the employee of agent responsible to deliver it to the intended recipient, you are hereby notified that any disclosure, copying, distribution or action taken in reliance on the contents of these documents is STRICTLY PROHIBITED. If you have received this email in error, please notify the sender immediately to arrange for return or destruction of these documents.