Re: WebService

[PReid@xxxxxxxxxxxx]

You are very welcome.

His mailing list has been extremely helpful to me. Plus there is a 
searchable archives. 
Many times the great Man himself has helped me out :)
___________________________________________________________
Paul Reid
Application Developer III
Erb Group of Companies | 290 Hamilton Road | New Hamburg, Ontario | N3A 
1A2
Phone: 519.662.6133 ext. 2363
Web: http://www.erbgroup.com/



From:   Connie Fuller <CFuller@xxxxxxxxxxx>
To:     "RPG programming on the IBM i (AS/400 and iSeries)" 
<rpg400-l@xxxxxxxxxxxx>
Date:   10/21/2015 01:22 PM
Subject:        Re: WebService
Sent by:        "RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx>



Thank you very much, your help is very much appreciated!! 



Sent from my iPhone

> On 21 Oct 2015, at 18:21, "PReid@xxxxxxxxxxxx" <PReid@xxxxxxxxxxxx> 
wrote:
> Scott's mailing list for HTTPAPI and FTPAPI can be found here:
>
> http://www.scottklement.com/mailman/listinfo/ftpapi
> ___________________________________________________________
> Paul Reid
> Application Developer III
> Erb Group of Companies | 290 Hamilton Road | New Hamburg, Ontario | N3A 
> 1A2
> Phone: 519.662.6133 ext. 2363
> Web: http://www.erbgroup.com/
>
>
>
> From:   Connie Fuller <CFuller@xxxxxxxxxxx>
> To:     "RPG programming on the IBM i (AS/400 and iSeries)" 
> <rpg400-l@xxxxxxxxxxxx>
> Date:   10/21/2015 01:17 PM
> Subject:        Re: WebService
> Sent by:        "RPG400-L" <rpg400-l-bounces@xxxxxxxxxxxx>
>
>
>
> Thank you Brad!! It would be great if Scott could help, its his copy 
> source we've used to validate the HTTP/HTML post and I can't get my head 

> around how to pull out error details from it.
>
> I will definitley try the debug option, that looks helpful and hoping 
that 
> can point me into the direction I need to get this right.
>
>
>
> Sent from my iPhone
>
> > On 21 Oct 2015, at 18:09, Bradley Stone <bvstone@xxxxxxxxx> wrote:
> >
> > I was just asking what I would ask for if someone was using my software
> > (GETURI, which is similar to HTTP API).
> >
> > The HTTP headers and HTML returned may lend a clue to what is wrong 
with
> > your request.  Maybe Scott will chime in on what info would be best. 
The
> > debug function mentioned before probably would be a good place to 
start.
> > I am not sure if there's another mailing list or forum for HTTP API
> > support... so I apologize for that.  :)
> >
> > Brad
> > www.bvstools.com
> >
> >
> >
> > > On Wed, Oct 21, 2015 at 9:26 AM, Connie Fuller <CFuller@xxxxxxxxxxx>
> wrote:
> > > Sorry Bradley, how do you mean???
> > >
> > >
> > >
> > > Sent from my iPhone
> > >
> > > > On 21 Oct 2015, at 15:01, Bradley Stone <bvstone@xxxxxxxxx> wrote:
> > > >
> > > > Any way to get the straight HTTP headers and response as is?
> > > >
> > > > > On Wed, Oct 21, 2015 at 8:20 AM, Connie Fuller <CFuller@xxxxxxxxxxx>
> > > wrote:
> > > > > Please bear with me, I think this is the information that you need:
> > > > >
> > > > > The command run I think is this:
> > > > >
> > > > > rc = %len(soap);
> > > > > rc = http_post_xml(
> > > > >           url + SOAPACTION
> > > > >         : %addr(SOAP) + 4
> > > > >         : %len(SOAP)
> > > > >         : *NULL
> > > > >         : %paddr(endElem)
> > > > >         : *null
> > > > >         : 600
> > > > >         : HTTP_USERAGENT
> > > > >         : 'text/xml');
> > > > >
> > > > > End element procedure looks like this:
> > > > >
> > > > > p endElem         b
> > > > > d endElem         pi
> > > > > d   UserData                      *   value
> > > > > d   depth                       10I 0 value
> > > > > d   name                      1024A   varying const
> > > > > d   path                     24576A   varying const
> > > > > d   value                    32767A   varying const
> > > > > d   attrs                         *   dim(32767)
> > > > > d                                     const options(*varsize)
> > > > > d   vv            s              7a
> > > > > /free
> > > > >  if (name = 'return');
> > > > >    result = value;
> > > > >      Else;
> > > > >       dump;
> > > > >  endif;
> > > > > /end-free
> > > > >
> > > > > It's all within an RPG program.
> > > > >
> > > > > The responses I get back consist of this when looking at the values
> in
> > > > > Value and Name parameter:
> > > > >
> > > > > 'title'
> > > > > 'html/head'
> > > > > 'runtime error'
> > > > > 'style'
> > > > > 'html/head'
> > > > >       body {font-family:"Verdana";font-weight:normal;font-size:
> > > > > .7em;color:bl
> > > > > ack;}          p
> > > > > {font-family:"Verdana";font-weight:normal;color:black;margin-to
> > > > > p: -5px}         b
> > > > > {font-family:"Verdana";font-weight:bold;color:black;margin-to
> > > > > p: -5px}         H1 {
> > > > > font-family:"Verdana";font-weight:normal;font-size:18pt;co
> > > > > lor:red }         H2 {
> > > > > font-family:"Verdana";font-weight:normal;font-size:14pt;c
> > > > > olor:maroon }         pre {font-family:"Lucida Console";font-size:
> .9em}
> > > > > .marker {font-weight: bold; color: black;text-decoration: none;}
> > > > > .versi
> > > > > on {color: gray;}         .error {margin-bottom: 10px;}
> > > > > .expandable { te
> > > > > xt-decoration:underline; font-weight:bold; color:navy; cursor:hand; 
}
> > > > > 'head'
> > > > > 'html'
> > > > >
> > > > > This I have been told looks like it's pulling in an HTML error page.
> > > > >
> > > > > I don't have a job log, but I've forced a dump in the EndElem
> procedure
> > > > > and I get the response data from that.
> > > > >
> > > > > Hope this is what you're looking for, sorry if it's too vague.
> > > > >
> > > > > Kind regards,
> > > > > Connie
> > -- 
> > This is the RPG programming on the IBM i (AS/400 and iSeries) 
(RPG400-L)
> mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at http://archive.midrange.com/rpg400-l.
> -- 
> This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) 

> mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.
>
>
> -- 
> This is the RPG programming on the IBM i (AS/400 and iSeries) (RPG400-L) 
mailing list
> To post a message email: RPG400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
> or email: RPG400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/rpg400-l.