powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Set relation
3 сообщений из 3, страница 1 из 1
Set relation
    #37138512
Anetka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Здравствуйте! Подскажите, пожалуйста.
Есть форма. На ней грид.
В гриде поля 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
Set relation
    #37138520
Anetka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Вот код. Там была ошибка в полях
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
Set relation
    #37138564
Anetka
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Все сделала. Не нужно
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Set relation
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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