Re: YAJL procedures

[Jon Paris <jon.paris@xxxxxxxxxxxxxx>]

"Jon - so you just define a variable "based-on" the pointer?"

Yup.  Just that simple.


> On Feb 20, 2020, at 11:11 AM, Greg Wilburn <gwilburn@xxxxxxxxxxxxxxxxxxxxxxx> wrote:
>
> Rob,
>
> Yes... a web service that uses JSON payload.
>
> http_post() requires only 4 parameters.  I'm passing 7 (including the peResponse, peTimeoute, peUserAgent, and peContentType)
>
> The 8th parameter is SoapAction.  This is not a SOAP webservice.
>
> Thanks.
>
> Jon - so you just define a variable "based-on" the pointer?
>
> Greg
>
> -----Original Message-----
> From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx] On Behalf Of Robert Rogerson
> Sent: Thursday, February 20, 2020 10:38 AM
> To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
> Subject: Re: YAJL procedures
>
> Greg, I think you're missing a parameter.  http_post accepts 8 parameters
> but you only show 7.  Check after jsonLen.  There should be peFilename and
> peTimeout.  In your example response may represent one of these.
>
> Also, I'm not sure what you mean by a json web service but I have to call a
> web service and pass a json body (this may be what you mean).  I use
> http_url_post_raw().  So my call looks like
>
> rc = http_url_post_raw(url: %Addr(jsonStr): %Len(%Trim(jsonStr)) :1
> :%paddr('INCOMING')
>                                      :HTTP_TIMEOUT :HTTP_USERAGENT
> :'application/json');.
>
> Rob
>
> On Thu, Feb 20, 2020 at 9:09 AM Greg Wilburn <
> gwilburn@xxxxxxxxxxxxxxxxxxxxxxx> wrote:
>
> > Thanks for the suggestions.  I should have indicated that I'm working with
> > a JSON web service.
> >
> > Since I'm going to use this with http_post() (which uses a pointer).  So I
> > might as well do this and forgo the string?  I just like to "see" stuff in
> > debug.
> >
> >    yajl_endObj();
> >    rc = yajl_getBuf(jsonPtr:jsonLen);
> >    rc = http_post( URL
> >                  : jsonPtr
> >                  : jsonLen
> >                  : response
> >                  : HTTP_TIMEOUT
> >                  : HTTP_USERAGENT
> >                  : 'application/json');
> >    yajl_genClose();
> >
> >
> > -----Original Message-----
> > From: RPG400-L [mailto:rpg400-l-bounces@xxxxxxxxxxxxxxxxxx] On Behalf Of
> > Greg Wilburn
> > Sent: Wednesday, February 19, 2020 5:01 PM
> > To: RPG programming on IBM i <rpg400-l@xxxxxxxxxxxxxxxxxx>
> > Subject: YAJL procedures
> >
> > I need to get a very small JSON data set into varchar(1024) variable...
> >
> > Just wondering which YAJL procedure is the easiest to use?
> >
> > yajl_getBuf()
> > yajl_copyBuf()
> > yajl_copyBufStr()
> >
> > For whatever reason, I've always just written it to the IFS before posting.
> >
> >
> > --
> > This is the RPG programming on IBM i (RPG400-L) mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at https://archive.midrange.com/rpg400-l.
> >
> > Please contact support@xxxxxxxxxxxx for any subscription related
> > questions.
> >
> > Help support midrange.com by shopping at amazon.com with our affiliate
> > link: https://amazon.midrange.com
> > --
> > This is the RPG programming on IBM i (RPG400-L) mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at https://archive.midrange.com/rpg400-l.
> >
> > Please contact support@xxxxxxxxxxxx for any subscription related
> > questions.
> >
> > Help support midrange.com by shopping at amazon.com with our affiliate
> > link: https://amazon.midrange.com
> -- 
> This is the RPG programming on IBM i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxx for any subscription related questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com
> -- 
> This is the RPG programming on IBM i (RPG400-L) mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at https://archive.midrange.com/rpg400-l.
>
> Please contact support@xxxxxxxxxxxx for any subscription related questions.
>
> Help support midrange.com by shopping at amazon.com with our affiliate link: https://amazon.midrange.com