Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Подскажите как правильно?? Fox2.6 / 6 сообщений из 6, страница 1 из 1
07.05.2007, 00:11
    #34508230
Andrey86
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите как правильно?? Fox2.6
Всем здрасте.
Подскажите! Есть две базы osn.dbf и s_osn.dbf с общим полем inv(Cимвольным), я делаю через меню запросом в форму выбор всех данный из s_osn.dbf которые совпадают с общим полем, но результат получаеться только одна запись (первая) хотя их должно быть несколько. Что не так?
1) sele 1
use osn inde &osn1,&osn
sele 6
use s_osn inde s_osn
inde on inv to s_osn

2)case menu_nak=1
set relation to inv into s_osn
do edit_nak
if read()%256=12
exit
endif

3)func edit_nak
defi wind w_edit_osn from 9,18 to 16,76 shad
acti wind w_edit_osn
@ row()+1,0 say [Инв №: ] get s_osn.inv
@ row()+1,0 say repl([─],30)
@ row()+1,0 say [Наименование: ] get s_osn.nazv
@ row()+1,0 say [НАК: ] get s_osn.okpo
...
Рейтинг: 0 / 0
07.05.2007, 00:40
    #34508252
Andrey86
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите как правильно?? Fox2.6
изменил
@ row()+1,0 say [Инв №: ] get s_osn.inv
@ row()+1,0 say repl([─],30)
@ row()+1,0 say [Наименование: ] get s_osn.nazv
@ row()+1,0 say [НАК: ] get s_osn.okpo

на
scan
@ prow()+1,0 say s_osn.inv+[ ]+s_osn.nazv+[ ]+s_osn.okpo
endscan

но не работает, выдает только одну запись по условию связи
...
Рейтинг: 0 / 0
07.05.2007, 12:00
    #34509093
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите как правильно?? Fox2.6
Andrey86изменил
@ row()+1,0 say [Инв №: ] get s_osn.inv
@ row()+1,0 say repl([─],30)
@ row()+1,0 say [Наименование: ] get s_osn.nazv
@ row()+1,0 say [НАК: ] get s_osn.okpo

на
scan
@ prow()+1,0 say s_osn.inv+[ ]+s_osn.nazv+[ ]+s_osn.okpo
endscan

но не работает, выдает только одну запись по условию связи

Какая-то неадекватная у тебя замена. Редактирование одной записи ты заменил на вывод всей таблицы. И в конце всех @...say...get должна стоять команда read. И @...say...get работают только для текущей строки таблицы, если хочешь одновременно редактировать несколько строк, то это надо делать через временные переменные.

У тебя row() и prow() не меняется и все выдается в одно и то же место экрана. По итогу ты видишь последнюю запись.
Сделай переменную для номера строки или используй "?" для вывода.
Код: plaintext
? s_osn.inv+[ ]+s_osn.nazv+[ ]+s_osn.okpo
...
Рейтинг: 0 / 0
08.05.2007, 00:22
    #34511199
Andrey86
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите как правильно?? Fox2.6
ребят, как можно из полей базы сделать в окне выбор меню, тоесть я хочу чтобы высвечивались соответствующие записи в окне а при нажатии на запись выводилась моя форма редактирования этой записи.
как бы так:
1)выбор всех записей по условию
scan
@ prow()+1,0 say s_osn.inv+[ ]+s_osn.nazv+[ ]+s_osn.okpo
endscan

2)вывод формы редактирования выбранной записи в первом меню
@ row()+1,0 say [Инв №: ] get s_osn.inv
@ row()+1,0 say repl([?],30)
@ row()+1,0 say [Наименование: ] get s_osn.nazv
@ row()+1,0 say [НАК: ] get s_osn.okpo

но в 1) выводиться только одна всего запись, а их несколько, пониял что prow не то но и "?" тоже не то. Возможно ли сделать такое без создания массивов этих баз?????????????????????????????
...
Рейтинг: 0 / 0
08.05.2007, 07:59
    #34511337
BMJ
BMJ
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите как правильно?? Fox2.6
чем BROWSE плохая команда? При желании по ENTER можно вызвать и EDIT.

ненавязчивый совет: SELE 1 & sele 2 дучше заменить USE <NazvTable> IN 0, а потом просто SELE nazvTable
...
Рейтинг: 0 / 0
08.05.2007, 08:01
    #34511339
Dima T
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите как правильно?? Fox2.6
Нашел в архивах поделку на FPD
База большая, ее в архиве нет, при первом запуске Сервис->Индексирование
смотри, изучай
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Подскажите как правильно?? Fox2.6 / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]