RdLine with variable length field

I have the following code in which I encounter two problems. First when
viewing the Input_String variable in debug, only the last 54 bytes are
shown - the first two are truncated. (The string sent contains 56 bytes).
The debugger monitor says the field is 56 bytes, as does the dump listing.
Second the "If %Len(Input_String) < 1 Or %Len(Input_String) > 56;"
triggers an RNX0115 (Length of varying length variable is out of range).
Does Rdline not work with a variable length field? (The RdLine code is
from Scott Klements tutorial.)


D Input_String S 56A Varying

If RdLine(cli: %addr(Input_String):56:*On) < 0;
Callp Die('Error calling RdLine()');
Callp close(cli);
Return;
Endif;


If %Len(Input_String) < 1 Or %Len(Input_String) > 56;
Error = Yes;
Return_String = %Trim(Return_String) + Error00;
LeaveSr;
EndIf;

Thanks!

Regards, Jerry

Gerald Kern - MIS Project Leader
Lotus Notes/Domino Administrator
IBM Certified RPG IV Developer
The Toledo Clinic, Inc.
4235 Secor Road
Toledo, OH 43623-4299
Phone 419-479-5535
gkern@xxxxxxxxxxxxxxxx


This e-mail message, including any attachments, is for the sole use of the
intended recipient(s) and may contain confidential and privileged
information. Any unauthorized use, disclosure or distribution is
prohibited. If you are not the intended recipient, please inform the
sender by reply e-mail and destroy this and all copies of this message.