код, преобразованный из foxpro в visual foxpro, неправильно использует команду SELECT. он использует Esc вместо ключа возврата
SELECT DISTINCT FNAME FROM FIRMS INTO ARRAY ARR
@ 1, 38 GET FN1 DEFAULT AWARDTY(1) SIZE 1, 40 FROM ARR COLOR SCHEME 7
READ
CLEAR
SELECT DISTINCT PNAME FROM FIRMS WHERE FNAME=FN1 INTO ARRAY ARR
@ 1, 38 GET PN1 DEFAULT AWARDTY(1) SIZE 1, 40 FROM ARR MESSAGE 'SELECT PARTY NAME TO MODIFY' COLOR SCHEME 7
READ
CLEAR
Команда должна быть завершена клавишей возврата, теперь она завершается клавишей esc