Гость
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Set relation / 3 сообщений из 3, страница 1 из 1
27.02.2011, 21:24
    #37138512
Anetka
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Set relation
Здравствуйте! Подскажите, пожалуйста.
Есть форма. На ней грид.
В гриде поля uch(участок), tabn(табельный номер), fio(ФИО), dolg(должность).
Грид сделан по двум таблицам - kadr и kadrshifr.
Поля uch(участок), tabn(табельный номер), fio(ФИО) берутся из таблицы kadr.
Поле shifr из таблицы kadrshifr.
Связь сделана через DE.
Две таблицы связаны по полям dolg(таблица kadr) и shifr(kadrshifr).

Моя задача: сделать связь через Set relation.

Мой код:
use kadrshifr
index on mc to kadrshifr
USE kadr78 index kadrshifr
select kadr78
set relation to kadr78.uch into kadrshifr

WITH THISFORM.Grid1
.RecordSource='kADR78'
.Column1.ControlSource='tabn'
.Column2.ControlSource='uch'
.Column3.ControlSource='ALLTRIM(kADR78.fam)+" "+ALLTRIM(kADR78.imy)+" "+ALLTRIM(kADR78.otc)'
.Column3.ControlSource='kadrshifr.naim'
ENDWITH
...
Рейтинг: 0 / 0
27.02.2011, 21:34
    #37138520
Anetka
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Set relation
Вот код. Там была ошибка в полях
use kadrshifr
index on shifr to kadrshifr
USE kadr78 index kadrshifr
select kadr78
set relation to kadr78.dolg into kadrshifr

WITH THISFORM.Grid1
.RecordSource='kADR78'
.Column1.ControlSource='tabn'
.Column2.ControlSource='uch'
.Column3.ControlSource='ALLTRIM(kADR78.fam)+" "+ALLTRIM(kADR78.imy)+" "+ALLTRIM(kADR78.otc)'
.Column3.ControlSource='kadrshifr.naim'
ENDWITH
...
Рейтинг: 0 / 0
27.02.2011, 22:28
    #37138564
Anetka
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Set relation
Все сделала. Не нужно
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Set relation / 3 сообщений из 3, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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