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

*** WSDL2RPG and V7.1 ***



Hi,

I am sorry to say that WSDL2RPG has a problem with V7R1. The problem is that IBM changed the compiler to no longer accept an asterisk (*) as a replacement for *OMIT. For details please refer to the following APAR:

http://www-912.ibm.com/n_dir/nas4apar.nsf/3ba9e01a478de3f4862573db0067acee/02014eb9627d597086257ba4003c6f19?OpenDocument&Highlight=2,rpg,compiler,omit

In order to fix the problem you need to change the rcvPgmMsg() statement in your web service stub like this:

   on-error;
      isUnexpectedError = cTrue;
   rcvm0200 = f_rcvPgmMsg(cMsg_Any: *omit: cMsg_Act_Same: 0
                                    +---- needs to be changed
                             : cMsg_Same: cMsg_ToMyself);
      http_DebugLog_appendRcvMsg(rcvm0200);
      msg = f_cvtRcvMsgToMsg(rcvm0200);
      g_errors.errType        = WSDL_HTTP_ERROR_UNEXPECTED;
      g_errors.httpError.no   = WSDL_HTTP_ERROR_UNEXPECTED;
      g_errors.httpError.text = f_rtvMsgText(msg);
      rc    = g_errors.httpError.no;
      o_msg = g_errors.httpError.text;
   endmon;

Just change the asterisk to *OMIT. Otherwise you will receive the following error message when compiling the source member:

RNF0203 - An asterisk cannot be passed as a parameter.

Also change the same statement in member WS_OPER. WS_OPER is the template source member that is used to generate the operation module of the web service stub.

Sorry for the inconveniences.

Regards,

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