[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

RE: Ftpapi Digest, Vol 78, Issue 2



Thank You all, I thought I had to post it on a web site, I did not know it was through emails. Sorry for the inconvenience.


-----Original Message-----
From: ftpapi-bounces@xxxxxxxxxxxxxxxxxxxxxx [mailto:ftpapi-bounces@xxxxxxxxxxxxxxxxxxxxxx] On Behalf Of ftpapi-request@xxxxxxxxxxxxxxxxxxxxxx
Sent: Monday, April 01, 2013 2:09 PM
To: ftpapi@xxxxxxxxxxxxxxxxxxxxxx
Subject: Ftpapi Digest, Vol 78, Issue 2

Send Ftpapi mailing list submissions to
        ftpapi@xxxxxxxxxxxxxxxxxxxxxx

To subscribe or unsubscribe via the World Wide Web, visit
        http://scottklement.com/mailman/listinfo/ftpapi
or, via email, send a message with subject or body 'help' to
        ftpapi-request@xxxxxxxxxxxxxxxxxxxxxx

You can reach the person managing the list at
        ftpapi-owner@xxxxxxxxxxxxxxxxxxxxxx

When replying, please edit your Subject line so it is more specific than "Re: Contents of Ftpapi digest..."


Today's Topics:

   1. Post (Mauricio Diaz-Lapham)
   2. Re: Post (Michael Ryan)
   3. Re: Post (John McKee)
   4. Re: Post (Mike Wills)
   5. Re: Post (Maria Guillen)
   6. HTTP/1.1 400 Bad Request (Mauricio Diaz-Lapham)
   7. RE: Post (Ron Koontz)


----------------------------------------------------------------------

Message: 1
Date: Mon, 1 Apr 2013 12:09:46 -0500
From: Mauricio Diaz-Lapham <MDiaz-Lapham@xxxxxxxxxxx>
To: "'ftpapi@xxxxxxxxxxxxxxxxxxxxxx'" <ftpapi@xxxxxxxxxxxxxxxxxxxxxx>
Subject: Post
Message-ID:
        <C57EB3C22F3F2F448117320F4CD46C9236431C1FB8@xxxxxxxxxxxxxxxxxxxxxxxx>
Content-Type: text/plain; charset="us-ascii"

How do I post a message to all members for assistance?


-------------- next part --------------
   How do I post a message to all members for assistance?



------------------------------

Message: 2
Date: Mon, 1 Apr 2013 13:41:59 -0400
From: Michael Ryan <michaelrtr@xxxxxxxxx>
To: HTTPAPI and FTPAPI Projects <ftpapi@xxxxxxxxxxxxxxxxxxxxxx>
Subject: Re: Post
Message-ID:
        <CACjuy37SBPOYOJHnCRabhQh7aNLWXXJhmUJnSkvBK+jigGrGvQ@xxxxxxxxxxxxxx>
Content-Type: text/plain; charset="iso-8859-1"

You just did.


On Mon, Apr 1, 2013 at 1:09 PM, Mauricio Diaz-Lapham < MDiaz-Lapham@xxxxxxxxxxx> wrote:

>    How do I post a message to all members for assistance?
>
>
>
> ----------------------------------------------------------------------
> - This is the FTPAPI mailing list.  To unsubscribe, please go to:
> http://www.scottklement.com/mailman/listinfo/ftpapi
> ----------------------------------------------------------------------
> -
>
>
-------------- next part --------------
   You just did.

   On Mon, Apr 1, 2013 at 1:09 PM, Mauricio Diaz-Lapham
   <[1]MDiaz-Lapham@xxxxxxxxxxx> wrote:

        How do I post a message to all members for assistance?
     --------------------------------------------------------------------
     ---
     This is the FTPAPI mailing list.  To unsubscribe, please go to:
     [2]http://www.scottklement.com/mailman/listinfo/ftpapi
     --------------------------------------------------------------------
     ---

References

   1. mailto:MDiaz-Lapham@xxxxxxxxxxx
   2. http://www.scottklement.com/mailman/listinfo/ftpapi

------------------------------

Message: 3
Date: Mon, 1 Apr 2013 12:42:09 -0500
From: John McKee <jmmckee@xxxxxxxxxxxxxx>
To: HTTPAPI and FTPAPI Projects <ftpapi@xxxxxxxxxxxxxxxxxxxxxx>
Subject: Re: Post
Message-ID:
        <CAKS3sXWp1BFm1zTQO6xnB53hHnjjsnWCKrGOC8p-rAriHssynw@xxxxxxxxxxxxxx>
Content-Type: text/plain; charset=ISO-8859-1

You just did.

John McKee

On Mon, Apr 1, 2013 at 12:09 PM, Mauricio Diaz-Lapham <MDiaz-Lapham@xxxxxxxxxxx> wrote:
>    How do I post a message to all members for assistance?
>
>
>
> ----------------------------------------------------------------------
> - This is the FTPAPI mailing list.  To unsubscribe, please go to:
> http://www.scottklement.com/mailman/listinfo/ftpapi
> ----------------------------------------------------------------------
> -
>


------------------------------

Message: 4
Date: Mon, 1 Apr 2013 12:54:15 -0500
From: Mike Wills <mike@xxxxxxxxxxxx>
To: HTTPAPI and FTPAPI Projects <ftpapi@xxxxxxxxxxxxxxxxxxxxxx>
Subject: Re: Post
Message-ID: <BDFED0D6-C177-41F2-851D-68AA56CCF625@xxxxxxxxxxxx>
Content-Type: text/plain; charset=windows-1252

?. you just did.

--
Mike Wills
http://mikewills.me
P: (507) 933-0880 | Skype: Koldark

On Apr 1, 2013, at 12:09 PM, Mauricio Diaz-Lapham <MDiaz-Lapham@xxxxxxxxxxx> wrote:

>   How do I post a message to all members for assistance?
>
>
> ----------------------------------------------------------------------
> - This is the FTPAPI mailing list.  To unsubscribe, please go to:
> http://www.scottklement.com/mailman/listinfo/ftpapi
> ----------------------------------------------------------------------
> -



------------------------------

Message: 5
Date: Mon, 1 Apr 2013 12:00:53 -0600
From: Maria Guillen <guillensabe@xxxxxxxxx>
To: HTTPAPI and FTPAPI Projects <ftpapi@xxxxxxxxxxxxxxxxxxxxxx>
Subject: Re: Post
Message-ID:
        <CAJ_O41ayzervjC1gDajT9wCOFEU2uo+hqcFzhSpmeTHV16McRw@xxxxxxxxxxxxxx>
Content-Type: text/plain; charset="iso-8859-1"

You just did, that is how you do it.


On Mon, Apr 1, 2013 at 11:09 AM, Mauricio Diaz-Lapham < MDiaz-Lapham@xxxxxxxxxxx> wrote:

>    How do I post a message to all members for assistance?
>
>
>
> ----------------------------------------------------------------------
> - This is the FTPAPI mailing list.  To unsubscribe, please go to:
> http://www.scottklement.com/mailman/listinfo/ftpapi
> ----------------------------------------------------------------------
> -
>
>
-------------- next part --------------
   You just did, that is how you do it.

   On Mon, Apr 1, 2013 at 11:09 AM, Mauricio Diaz-Lapham
   <[1]MDiaz-Lapham@xxxxxxxxxxx> wrote:

        How do I post a message to all members for assistance?
     --------------------------------------------------------------------
     ---
     This is the FTPAPI mailing list.  To unsubscribe, please go to:
     [2]http://www.scottklement.com/mailman/listinfo/ftpapi
     --------------------------------------------------------------------
     ---

References

   1. mailto:MDiaz-Lapham@xxxxxxxxxxx
   2. http://www.scottklement.com/mailman/listinfo/ftpapi

------------------------------

Message: 6
Date: Mon, 1 Apr 2013 13:27:35 -0500
From: Mauricio Diaz-Lapham <MDiaz-Lapham@xxxxxxxxxxx>
To: "'ftpapi@xxxxxxxxxxxxxxxxxxxxxx'" <ftpapi@xxxxxxxxxxxxxxxxxxxxxx>
Subject: HTTP/1.1 400 Bad Request
Message-ID:
        <C57EB3C22F3F2F448117320F4CD46C9236431C1FBA@xxxxxxxxxxxxxxxxxxxxxxxx>
Content-Type: text/plain; charset="us-ascii"

Hello, Can someone help me! I keep getting this error and I have no clue as to what is causing it. Below is my code.

H DFTACTGRP(*NO) BNDDIR('HTTPAPI':'QC2LE')

d Setup           pr

d WebService      pr            10i 0

D Incoming        PR
d   ProcessJrn                 100A
D   depth                       10I 0 value
D   name                      1024A   varying const
D   path                     24576A   varying const
D   value                    65535A   varying const
D   attrs                         *   dim(32767)
D                                     const options(*varsize)

d ARWBSRV01       pi
d  ErrMsg                     1024a   varying
 *=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=
c*====================================================================
c* Copybooks
c*====================================================================

 /copy config_h
 /copy httpapi_h

d Soap            s          32767a
d ProcessJrn      s            100a
d ReturnCode      s             10i 0
d WebSite         s            100a
D soapfile        s             50a   varying

dVariableRecords...
d                 ds                  Qualified
d Number                        10i 0

c*====================================================================
c* Main
c*====================================================================
 /free

     Setup();

/end-free

**********************************************************************
* Main processing - Call the Webservice to update CMA
**********************************************************************

/Free

     // Call the web service that will update the client smart file.
     ReturnCode = WebService();
     If ReturnCode <> 1;
        ErrMsg = http_error();
        ReturnCode = -1;
     EndIf;

  /end-free
c*====================================================================
c* Setup();
c*
c* General setup.
c*====================================================================

p Setup           b
 /free

  VariableRecords.Number = 4; // Number of keys.

  // Turn HTTP debug on or off
  http_debug(*ON);

  // Set the correct CCSID.
  http_setCCSIDs(1208:0);

  // Strip off back end CRLFs on the returned XMLs.
  http_XmlStripCRLF(*ON);

 /end-free
p Setup           e

c*====================================================================
c* WebService(); Call The Web Service.
c*====================================================================

p WebService      b
d WebService      pi            10i 0
 /free

   Soap =
   '<?xml version="1.0" encoding="iso-8859-1" standalone="no"?>'
      +' <soapenv:Envelope '
      +  ' xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/"; '
      +  ' xmlns:upd="http://webservices.vonmaur.vmc/UpdateCMA.asmx";>'
      +   '   <soapenv:Header/>'
      +   '   <soapenv:Body>'
      +   '      <upd:ProcessJournal/>'
      +   '   </soapenv:Body>'
      + '</soapenv:Envelope>';

  // Consume the web service.
  ReturnCode = http_url_post_xml(
    'http://webservices.vonmaur.vmc/UpdateCMA.asmx'
    : %addr(SOAP) + 2
    : %len(SOAP)
    : *NULL
    : %paddr(Incoming)
    : %addr(ProcessJrn)
    : HTTP_TIMEOUT
    : HTTP_USERAGENT
    : 'text/xml'
    : 'http://webservices.vonmaur.vmc/UpdateCMA/ProcessJournal');

  return ReturnCode;

 /end-free
p WebService      e
c*====================================================================
c* Incoming1();
c* Parse the XML coming in to see what the client ID we received is.
c*====================================================================

p Incoming        B
d Incoming        PI
d   ProcessJrn                 100a
d   depth                       10i 0 value
d   name                      1024a   varying const
d   path                     24576a   varying const
d   value                    65535a   varying const
d   attrs                         *   dim(32767)
d                                     const options(*varsize)

D atof            PR             8F   extproc('atof')
D   string                        *   value options(*string)
 /free

  if (name = 'ProcessJournal');
   ProcessJrn = value;
  endif;

 /end-free
p Incoming        E




-------------- next part --------------
   Hello, Can someone help me! I keep getting this error and I have no
   clue as to what is causing it. Below is my code.


   H DFTACTGRP(*NO) BNDDIR('HTTPAPI':'QC2LE')


   d Setup           pr


   d WebService      pr            10i 0


   D Incoming        PR

   d   ProcessJrn                 100A

   D   depth                       10I 0 value

   D   name                      1024A   varying const

   D   path                     24576A   varying const

   D   value                    65535A   varying const

   D   attrs                         *   dim(32767)

   D                                     const options(*varsize)


   d ARWBSRV01       pi

   d  ErrMsg                     1024a   varying

    *=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=

   c*====================================================================

   c* Copybooks

   c*====================================================================



    /copy config_h

    /copy httpapi_h


   d Soap            s
   32767a

   d ProcessJrn      s            100a

   d ReturnCode      s             10i 0

   d WebSite         s            100a

   D soapfile        s             50a   varying



   dVariableRecords...

   d                 ds                  Qualified

   d Number                        10i 0



   c*====================================================================

   c* Main

   c*====================================================================

    /free



        Setup();


   /end-free


   **********************************************************************

   * Main processing - Call the Webservice to update CMA

   **********************************************************************


   /Free


        // Call the web service that will update the client smart file.

        ReturnCode = WebService();

        If ReturnCode <> 1;

           ErrMsg = http_error();

           ReturnCode = -1;

        EndIf;


     /end-free

   c*====================================================================

   c* Setup();

   c*

   c* General setup.

   c*====================================================================



   p Setup           b

    /free



     VariableRecords.Number = 4; // Number of keys.



     // Turn HTTP debug on or off

     http_debug(*ON);



     // Set the correct CCSID.

     http_setCCSIDs(1208:0);


     // Strip off back end CRLFs on the returned XMLs.

     http_XmlStripCRLF(*ON);



    /end-free

   p Setup           e



   c*====================================================================

   c* WebService(); Call The Web Service.

   c*====================================================================



   p WebService      b

   d WebService      pi            10i 0

    /free



      Soap =

      '<?xml version="1.0" encoding="iso-8859-1" standalone="no"?>'

         +' <soapenv:Envelope '

         +  ' xmlns:soapenv="http://schemas.xmlsoap.org/soap/envelope/"; '

         +  ' xmlns:upd="http://webservices.vonmaur.vmc/UpdateCMA.asmx";>'

         +   '   <soapenv:Header/>'

         +   '   <soapenv:Body>'

         +   '      <upd:ProcessJournal/>'

         +   '   </soapenv:Body>'

         + '</soapenv:Envelope>';



     // Consume the web service.

     ReturnCode = http_url_post_xml(

       'http://webservices.vonmaur.vmc/UpdateCMA.asmx'

       : %addr(SOAP) + 2

       : %len(SOAP)

       : *NULL

       : %paddr(Incoming)

       : %addr(ProcessJrn)

       :
   HTTP_TIMEOUT

       : HTTP_USERAGENT

       : 'text/xml'

       : 'http://webservices.vonmaur.vmc/UpdateCMA/ProcessJournal');



     return ReturnCode;



    /end-free

   p WebService      e

   c*====================================================================

   c* Incoming1();

   c* Parse the XML coming in to see what the client ID we received is.

   c*====================================================================



   p Incoming        B

   d Incoming        PI

   d   ProcessJrn                 100a

   d   depth                       10i 0 value

   d   name                      1024a   varying const

   d   path                     24576a   varying const

   d   value                    65535a   varying const

   d   attrs                         *   dim(32767)

   d                                     const options(*varsize)



   D atof            PR             8F   extproc('atof')

   D   string                        *   value options(*string)

    /free



     if (name = 'ProcessJournal');

      ProcessJrn = value;

     endif;



    /end-free

   p Incoming        E

------------------------------

Message: 7
Date: Mon, 1 Apr 2013 15:08:58 -0400
From: Ron Koontz <rkoontz@xxxxxxxxx>
To: HTTPAPI and FTPAPI Projects <ftpapi@xxxxxxxxxxxxxxxxxxxxxx>
Subject: RE: Post
Message-ID: <48B86101FC60454F8DC517FDAB750CBB3736EA70@ceiexch2>
Content-Type: text/plain; charset="us-ascii"

Well I don't want to be the odd ball and not send a status " you just did" too...lol


-----Original Message-----
From: ftpapi-bounces@xxxxxxxxxxxxxxxxxxxxxx [mailto:ftpapi-bounces@xxxxxxxxxxxxxxxxxxxxxx] On Behalf Of Maria Guillen
Sent: Monday, April 01, 2013 2:01 PM
To: HTTPAPI and FTPAPI Projects
Subject: Re: Post

You just did, that is how you do it.


On Mon, Apr 1, 2013 at 11:09 AM, Mauricio Diaz-Lapham < MDiaz-Lapham@xxxxxxxxxxx> wrote:

>    How do I post a message to all members for assistance?
>
>
>
> ----------------------------------------------------------------------
> - This is the FTPAPI mailing list.  To unsubscribe, please go to:
> http://www.scottklement.com/mailman/listinfo/ftpapi
> ----------------------------------------------------------------------
> -
>
>

The information contained in this e-mail is intended only for the individual or entity to whom it is addressed.  Its contents (including any attachments) may contain confidential and/or privileged information.  If you are not an intended recipient you shall not use, disclose, disseminate, copy or print its contents.  If you receive this e-mail in error, please notify the sender by reply e-mail and delete and destroy the message.  Continental Express, Inc. and its subsidiaries and affiliates will not be held liable for the unintended or unauthorized use of any information contained in this email or as a result of any additions or deletions of information originally contained in this email.


------------------------------

-----------------------------------------------------------------------
This is the FTPAPI mailing list digest.  To unsubscribe, go to:
http://www.scottklement.com/mailman/listinfo/ftpapi
-----------------------------------------------------------------------


End of Ftpapi Digest, Vol 78, Issue 2
*************************************
-----------------------------------------------------------------------
This is the FTPAPI mailing list.  To unsubscribe, please go to:
http://www.scottklement.com/mailman/listinfo/ftpapi
-----------------------------------------------------------------------