Paul:
Interesting task. I haven't tried this but how about:

label top
CHOOSE vText from #values for (Lastname + ',' & Firstname ) from ListOfNames
IF vText = '[Esc]' THEN
  GOTO ENDBLK
ENDIF

Print Reportname where whatever

-- Set the playback value
set var vplay text = (sget(.vText,1,1))
out Play.ply
write .vplay continue
out term
playback Play.ply

GOTO TOP

LABEL ENDBLK
RETURN

The continue on the write statement suppresses the carriage return, which could 
complete the selection and frustrate the selection attempts - plus make an endless 
loop.

Jim Blackburn
Kodiak
Paul Eichhorn wrote:
> 
> Wow, Bill.
> 
> I had no idea you could "play" something into a Choose command.  I would
> love to be able to "play" back even the first letter of the last value
> selected to get the user back to roughly the same place on a long
> SQL/CHOOSE list.  That way, they could pull up the list, pop into a form,
> then come back to where they were without doing cyclical iterations of
> several "page downs".  Any details?
> 
> Ike

Reply via email to