13спартак13,

1) Селектом выбрать в курсор сразу всех возможных клиентов
2) Курсор показать (BROWSE) и на правую кнопку навесить выбор нужного клиента

Пример кода поиска плат. поручений в таблице (исправить под свои проблемы)

SELECT * FROM PLATPOR1 WHERE PLATNUM = STROKA1 ;
INTO CURSOR SYS(2015) NOFI ;
ORDER BY PLATNUM, PLATDATE

if RECC() = 0
wait window [ Нет данных! ] nowait time 5
retu
endif

IF RECCOUNT() > 1

push key clear

ON KEY LABEL ENTER KEYBOARD CHR(23)
ON KEY LABEL RIGHTMOUSE KEYBOARD CHR(23)

BROWSE NOMODIFY nodelete nomenu ;
FIELDS PLATNUM :H= 'Номер' ,;
PLATDATE :H= 'Дата' ,;
SUMPLAT :H= 'Сумма' ;
title "Нажмите {Enter} или правую кнопку мыши для выбора"

Pop key

ENDIF

scatter memvar

select PLATPOR1
SET ORDER TO PLATID
SEEK M.PLATID
*или
*LOCATE FOR.................