RE: Help wanted for the use of HTTPAPIR4

[Rene Sauve <Rene.Sauve@xxxxxx>]

hello,

I am using the version 1.13 of the LIBHTTP
and now i got a problem with sending a Url with the following data:

EVAL urlparm        
                     
                     
      
URLPARM =          
                     
                     
       
          ....5...10...15...20...25...30...35...40...45...50...55...60

     1   'dataXML=<?xml
version="1.0" encoding="ISO-8859-1" ?><Generic'
    61   'Invoice><Request>Open</Request><Orignator>FIS2000</Orignator'
   121   '><CompanyId>Bedrijf
3</CompanyId></GenericInvoice>&dataHandl'
   181   'er=nl.ibs.fac.external.GenericInvoiceHandler
               '

When i am debuging the underlaying programs
I find the followwing call
 
eval      rc = http_persist_post(
wwComm     
           
                    :
peURL      
           
                    :
0          
           
                    :
*NULL      
           
                    :
pePostData 
           
                    :
pePostDataL
           
                    :
peFD       
           
                    :
peProc )   

EVAL pePostData:c 250    
                     
                     
 
PEPOSTDATA:C 250 =      
                     
                     
  
          ....5...10...15...20...25...30...35...40...45...50...55...60

     1   'dataXML=<?xml
version="1.0" encoding="ISO-8859-1" ?><Generic'
    61   'Invoice><Request>Open</Request><Orignator>FIS2000</Orignator'
   121   '><CompanyId>Bedrijf
3</CompanyId></GenericInvoice>&dataHandl'
   181   'er=nl.ibs.fac.external.GenericInvoiceHandler
               '
   241   '    
     '              
                     
             
I am making the call to http_url_post_raw with the following values:
EVAL url          
                     
     
URL = ""        
                     
        
          ....5...10...15...20...25...30...35.
     1   'http://showcase:7080/fac-fis/reader

    61   '    


EVAL urlparm            
                     
                     
 
URLPARM =            
                     
                     
    
          ....5...10...15...20...25...30...35...40...45...50...55...60
     1   'dataXML=<?xml version="1.0"
encoding="ISO-8859-1" ?><Generic
    61   'Invoice><Request>Open</Request><Orignator>FIS2000</Orignator
   121   '><CompanyId>Bedrijf
3</CompanyId></GenericInvoice>&dataHandl
   181   'er=nl.ibs.fac.external.GenericInvoiceHandler
               

 
                     
       
 *
 Make call to URL              
                     
        
C            
      eval      rc = http_url_post_raw(%trimr(url):
C            
                %addr(urlparm):
%len(%trimr(urlparm
C            
                1:%pAddr('INCOMING'))
             

D incoming        PR
           10I 0        
         
D   descriptor      
           10I 0 value      
     
D   Data        
             8192A   options(*varsize)
D   Datalen        
            10I 0 value      
     

P incoming        B
                     
              
D incoming        PI
           10I 0        
          
D   descriptor      
           10I 0 value      
      
D   Data        
             8192A   options(*varsize)

D   Datalen        
            10I 0 value      
      
           
                     
                     

C            
      eval      RecvDataLen = Datalen  
  
           
                     
                     

 * If there is nothing to write, return
0               
C            
      if        Datalen < 1  
            
C            
      return    0        
                
C            
      endif              
                
           
                     
                     

C            
      eval      RecvData = Data    
      
C            
      return    Datalen     
P            
    E                
      

The problems is that my receiving program
is not recieving the complet information i have send to him with the http_url_post_raw
somehowe i am missing the dataXML
information.

I find out that the CONFIG_H source member
contains some information so as:

D HTTP_CONTTYPE   C        
          CONST('text/xml') 
I comment out the line above and inserted the line
below
D HTTP_CONTTYPE   C        
          CONST('application/+   
D              
                     
x-www-form-urlencoded')

I am wondering if there are some values that
are in conflict of the settings of my system (CCSID or code tables)?

Please can some one give me a light in this
dark world 
Best Regards / Met vriendelijke groet, 

Rene Sauve 
Software engineer

IBS NEDERLAND B.V.
Postbus 500 3430 AM Nieuwegein, The Netherlands
Nevelgaarde 20 Nieuwegein, The Netherlands
Phone: +31 (0)30 6026666      Direct: + 31 (0)30 - 6026835
Fax: + 31 (0)30 - 6026625      Mobile: + 31 (0)6 - 21897015
http://www.ibs.nl