Shawn,I have been troubled with GET commands since I started with kix. I want to display an edit menu A thru J. GET user's selection, go erase their previous entry and GETS their new entry. Everytime, this results in the original GET being echo'd onto the GETS input. What am I doing wrong here?
code:
:EditUserInf
$INF=""
DIM $ARROW
$ARROW = "<----------"
$SPACE = " "
Color c+/n
AT(6,45) $ARROW + " A"
AT(7,45) $ARROW + " B"
AT(8,45) $ARROW + " C"
AT(9,45) $ARROW + " D"
AT(10,45) $ARROW + " E"
AT(11,45) $ARROW + " F"
AT(12,45) $ARROW + " G"
AT(13,45) $ARROW + " H"
AT(14,45) $ARROW + " I"
AT(15,45) $ARROW + " J"
AT(17,9) "Enter the letter of the field you wish to edit: " GET $INFSELECT
CASE UCASE($INF) = "A"
Color n/n
$FNAME = ' '
AT(6,5) 'First Name: '$FNAME
AT(6,5) 'First Name: ' GETS $FNAME
$key = 'FNAME'
$string = $FNAME
$nul = WriteProfilestring($filename, $section, $key, $string)
