Prototype for QsyAddServerEntry API

["Danforth, Ken" <kdanforth@xxxxxxxxxx>]

I want to use the QsyAddServerEntry API in an RPG program, but I'm
having a heck of a time getting it to work.  I suspect my prototype is
defined incorrectly.  I've created loads of prototypes for system APIs
but this one is stumping me.  The IBM documentation for the API looks
like this:

Add Server Authentication Entry (QsyAddServerEntry) API Syntax for
QsyAddServerEntry:

 #include <qsysvrfn.h>

 void QsyAddServerEntry
 (char User_profile[10],
  char *Server_name,
  int Length_of_server_name,
  char *User_ID,
  int Length_of_user_ID,
  char *Password,
  int Length_of_password,
  void *Error_code);


My prototype currently looks like this:

     DAddSvrAutE       PR                  ExtProc('QsyAddServerEntry')
     D User                          10a   Const
     D Server                       200a   Const Options(*Varsize)
     D ServerLen                     10i 0 Const
     D UserId                      1000a   Const Options(*Varsize)
     D UserIdLen                     10i 0 Const
     D Password                     696a   Const Options(*Varsize)
     D PasswordLen                   10i 0 Const
     D APIErr                       256a   Options(*Varsize)

I'm getting error code CPF3C1D stating that the length of parameter 3 is
invalid.

Can anyone tell me what the RPG prototype should look like for this API?

Ken Danforth
kdanforth@xxxxxxxxxx



IMPORTANT NOTICE: This message is intended only for the addressee and may contain confidential, privileged information. 
If you are not the intended recipient, you may not use, copy or disclose any information contained in the message. 
If you have received this message in error, please notify the sender by reply e-mail and delete the message.