/* 
**  Request.rexx 
**
**  Description: A test of the 'REQUEST' command.
**
**  Written by:  Anders Granli
**
**  Date:        11.10.96
**                 
*/

OPTIONS RESULTS

address 'MAGNIFICAD'

MAGNIFICADTOFRONT

REQUEST '"Continue?"' '"Would you like to continue?"' 'OK' 'Cancel' '"Maybe..."'
file = RESULT

MAGNIFICADTOBACK

IF (file=0) THEN
  SAY 'User selected "Cancel"'
ELSE 
IF (file=1) THEN
  SAY 'User selected "OK"'
ELSE
IF (file=2) THEN
  SAY 'User selected "Maybe..."'