Just for the fun of it:
SET VAR vCaption TEXT = 'Who writes captions this long?'
SET VAR vMessage TEXT = 'Blah Blah'
SET VAR vMessLength INTEGER = (SLEN(.vMessage))
SET VAR vCapLength INTEGER = (SLEN(.vCaption))
IF (SLEN(.vCaption)) > (SLEN(.vMessage)) THEN
SET VAR vMessage = ((SFIL(' ',.vCapLength) ) + .vMessage + (SFIL(' ',+
.vCapLength) ) + '.' )
ENDIF
PAUSE 2 USING .vMessage CAPTION .vCaption
RETURN
On 29/05/2013 9:46 AM, Bruce A. Chitiea wrote:
The following representative PAUSE command:
PAUSE 2 USING 'Blah Blah' +
CAPTION 'Who writes captions this long??'
