by_maraderЕсть такая форма в проекте, работает с одной таблицей REG.DBF, в которой находится база обращений за субсидией.
проблема в том что люди обращаются несколько раз в год. Надо чтобы при вводе данных в поле NUMB1(номер дела)- была проверка есть ли уже такое дело и если есть то копировать данные в поля формы.
примерно написал код, но не работает:
LOCAL MsgResult
SET ORDER TO tag NUMB && NUMB
SEEK reg.numb
IF FOUND()
MsgResult=messagebox('Такий запис вже є. копіювати данні?',52,'')
if MsgResult=6
INSERT INTO reg (numb,fio,nam,klkul_name,dom,kvart);
values(reg.fio,reg.nam,reg.klkul_name,reg.dom,reg.kvart)
ENDIF
ENDIF

IF FOUND()
MsgResult=messagebox('Такий запис вже є. копіювати данні?',52,'')
if MsgResult=6
scatter memvar memo
append blank
gather memvar memo
ENDIF
ENDIF

igorbik,лучше так

IF FOUND()
scatter memvar memo
append blank
MsgResult=messagebox('Такий запис вже є. копіювати данні?',52,'')
if MsgResult=6
gather memvar memo
ENDIF
ENDIF