Страница 1 из 1
Связь таблиц в МТО
Добавлено: 03 сен 2009, 13:14
Yurii
Здравствуйте!
Подскажите пожалуйста, как связаны между собой документы: Планы снабжения (таблица MNPLAN) в модуле Управление материально – технического обеспечения и Договор (таблица Dogovor) в модуле Управление договорами. Существует ли возможность связать данные таблицы (т.е использовать подцепку) и как это реализовать ?
Спасибо заранее всем!
Добавлено: 03 сен 2009, 13:28
edward_K
все в шаблоне настраивается, но не более 3(любые)+3(програмируемые) аналитик + внешние атрибуты. А там потом по журналу посмотрите.
Добавлено: 03 сен 2009, 13:48
Yurii
edward_K, Вы какой имеете ввиду шаблон ? Мне необходимо подцепку организовать двух этих таблиц на vip.. Если вы с этим сталкивались, не могли бы Вы выслать или накидать кусок кода подцепки ? Заранее огромное спасибо.
Добавлено: 08 сен 2009, 16:28
oiko
Насколько мне кажется все связи в производственных модулях идут через objacct. Вот например связка которая у меня была для накладных - кто кому входящий правда не помню.
502==objacct.vidsopr
and 1==objacct.kindrec
and 4==objacct.typeobj
and MnPlan.nrec==objacct.cobject
and objacct.cowner==katsopr.nrec
Добавлено: 08 сен 2009, 17:09
galover
вот тоже нашел, может пригодится
Код: Выделить всё
// Заполнить таблицу договоров, привязанных к позиции плана (обработано)
procedure FillSpDogovorTable;
{
delete all from tblSpDogovor;
insert into tblSpDogovor (NRec, SpMnPlNRec, CMc, CDogovor, NoDoc, NoDocExt, DDoc, ShipAddTerms, OrgName)
select
SpDocs.NRec,
tblSpPlan.NRec,
tblSpPlan.CMc,
Dogovor.NRec,
Dogovor.NoDoc, // Номер спецификации доп соглашения
Dogovor.NoDoc_Ext,
Dogovor.DDoc,
Dogovor.ShipAddTerms, // Дополнительные условия отгрузки
KatOrg.Name
from
tblSpPlan,
SpObjAcc,
SpDocs,
Dogovor,
KatOrg
where
((
tblSpPlan.NRec /== SpObjAcc.CPos
and 31 == SpObjAcc.TypePos // Тип позиции
and 1 == SpObjAcc.KindRec
and (73 = SpObjAcc.TypeObj or 75 = SpObjAcc.TypeObj) // Спецификация договора или доп. соглашения
and 1 == SpObjAcc.TypeHier(noindex) // Тип иерархии
and SpObjAcc.CObject == SpDocs.NRec
and SpDocs.CDoc == Dogovor.NRec
and Dogovor.COrg == KatOrg.NRec
));
}
Добавлено: 15 сен 2009, 11:21
Yurii
Всем огромное спасибо!
Добавлено: 15 сен 2009, 11:25
Yurii
Вот как я связал...
MnPlan.TypePlan = 29 - план снабжения:
Select
MnPlan.nRec,
MnPlan.Name,
Dogovor.nRec,
Dogovor.Ddoc,
Dogovor.Summa
from
MnPlan,
ObjAcct,
Dogovor
where
((
word(29) == ObjAcct.TypeObj And
word(1) == ObjAcct.KindRec (NoIndex) And
MnPlan.nRec /== ObjAcct.cObject And
ObjAcct.cOwner /== Dogovor.nRec
)) ;