Re: Help with LotusScript for a text box. Please. -- DOMINO400

OK,

Had another project go on hold so had time to dig in the docs.

First I see it is Formula not LotusScript. Quick typo.

The underlying form has WTEXT as a multiple value text. If I change the form invoked by @DIALOGBOX so that WTEXT has:

NewList := WTEXTOLD;

@While(
@Length(WTEXTNEW) > 70;
NewList := NewList + "~" + @Left(WTEXTNEW;70);
WTEXTNEW := @right(WTEXTNEW;@Length(WTEXTNEW) -70)
);

@if(
WTEXTNEW <> "";
NewList := NewList +"~" + WTEXTNEW;
""
);

@If(
@Left(NewList; 1) = "~";
NewList := @Right(NewList; @Length(NewList) - 1);
""
);

@Explode(NewList;"~");

will this append the new text from WTEXTNEW broken into 70 character lines?

Thanks.

Roger

On 12/30/2003 9:56 AM, Roger Vicker, CCP wrote:

Hello,

I have an application that I inherited from a custom house. This application is a Notes face on an existing iSeries database application. Therefore things like the comments field directly correspond to a file that has one record for each line and each line can only be 70 characters long to work with sub-file displays. The custom house appends these lines using the implode function into a multi-value text field when they update the Notes application and then use explode when they update the native database.

The problem I am having is when the Notes user needs to create/add to the comments field the custom house used @DIALOGBOX and a form with 2 hidden fields and one input field. The first hidden field (WTEXT) has the following LotusScript:

NewList := WTEXTOLD + "~" + @Left(WTEXTNEW; 70);
@If(WTEXTOLD = "";
   @Left(WTEXTNEW; 70);
   @Explode(NewList; "~")
)
The second hidden field (WTEXTOLD) has:

@Implode(WTEXT; "~")

The editable field (WTEXTNEW) has a notation to the user that they can only input 70 characters and that they have to re-execute this form to add each line. This field is not multi-value and the display does not allow multiple lines. Two settings that I believe will have to be changed for the following.

What the users want is to be able to type as much as they want at once, and have the application automatically split lines at 70 characters (splitting words is OK, word wrap is not needed but would be nice) or where ever they pressed enter.

Not having gotten into LotusScript far enough yet to handle this can anyone provide links to some example code or care to suggest how to change this?

Thanks Very Much.

Roger Vicker, CCP


--
*** Vicker Programming and Service *** Have bits will byte *** www.vicker.com 
***
Do not adjust your mind. The fault lies with reality.