question about writing request XML to IFS

[Donnie Barrow <ddbarrow@xxxxxxxxx>]

   Ok I calling out to a webservice with this xml
   <?xml version="1.0" encoding="UTF-8"?>��
   <ORD_LOCK_STAT_REQ>
   <INSTANCE>wmsdev02</INSTANCE>
   �<ORDNUM>120328600-003145237</ORDNUM>
   �<WH_ID>MA12</WH_ID>
   <CLIENT_ID>XPDEX</CLIENT_ID>
   </ORD_LOCK_STAT_REQ>��
   But when I look at it in the IFS this is what it looks like
   R<?xml version="1.0" encoding="UTF-8"?>��
   <ORD_LOCK_STAT_REQ>
   <INSTANCE>wmsdev02</INSTANCE>
   �<ORDNUM>120328600-003145237</ORDNUM>
   �<WH_ID>MA12</WH_ID>
   <CLIENT_ID>XPDEX</CLIENT_ID>
   </ORD_LOCK_STAT_REQ>��
   Whis is it writing the "R" in front of the xml in the IFS?????
   1 H BNDDIR('HTTPAPI':'QC2LE':'EXPAT')
   2 H CCSID(*UCS2:1200)
     // ----------------------------------------------
     //  Create SOAP document to tell server
     // ----------------------------------------------
    $xmlin='<?xml version="1.0" encoding="UTF-8"?>' +crlf
    +' <ORD_LOCK_STAT_REQ>' +crlf
    +'   <INSTANCE>'+%trim(instance)+'</INSTANCE>' +crlf
    +'   <ORDNUM>'+%trim(ordnum)+'</ORDNUM>' +crlf
    +'   <WH_ID>'+%trim(iwrpwh)+'</WH_ID>' +crlf
    +'   <CLIENT_ID>'+%trim(client_id)+'</CLIENT_ID>' +crlf
    +' </ORD_LOCK_STAT_REQ>' +crlf;
   soap = %trim(%trimr($xmlin));
   $Filename1 = embfile;
   length = %len(SOAP) + 2;
   fd = open(%trim($filename1)
           :O_WRONLY+O_CREAT+O_TRUNC+O_CCSID
           :S_IRGRP + S_IWGRP + S_IXGRP +
             S_IRUSR + S_IWUSR + S_IXUSR
           :819);
   callp close(fd);
    fd = open(%trim($filename1):O_WRONLY+O_TEXTDATA);
    callp write(fd:%addr(SOAP): length);
    callp close(fd);
   Donnie Barrow
   IT Consultant - DBarrow Consulting

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