Автоматическая подвязка договора

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
Espada
Местный житель
Сообщения: 336
Зарегистрирован: 07 май 2013, 17:32
Откуда: РБ, Минск

Автоматическая подвязка договора

Сообщение Espada »

Доброго дня. решаю вопрос по созданию Разового договора из Счет-фактуры. вроде бы всё создаётся нормально

Код: Выделить всё

...
if (b1.getfirst basedoc = tsOk)
	{
b1.clearbuffer(b1.tNDOGOVOR);
b1.Dogovor.DESCR     :=   b1.basedoc.DESCR;
b1.Dogovor.DESGR     :=   b1.basedoc.DESGR;
b1.Dogovor.SUMMA     :=   b1.basedoc.TOTAL;
b1.Dogovor.SUMNDS    :=   b1.basedoc.NDS;
b1.Dogovor.CORG      :=   b1.basedoc.CORG;
b1.Dogovor.CPLAT     :=   b1.basedoc.CORG;
b1.Dogovor.DDOC      :=   Data;
b1.Dogovor.NODOC     :=   b1.basedoc.NODOC;
b1.Dogovor.NODOC_EXT :=   b1.basedoc.NODOC;
b1.Dogovor.CNOTE     :=   '4001D16E626FBBBDh';
b1.Dogovor.DIRECT    :=   word(1);
b1.Dogovor.TIDK      :=   word(400);
b1.Dogovor.TIPMONEY  :=   word(1);
b1.Dogovor.VHODNAL   :=   word(2);
b1.Dogovor.CBANKPOL  :=   b1.basedoc.CMYBANK;
b1.Dogovor.CMYORG    :=   b1.basedoc.CGROTPR;
b1.Dogovor.CPOL      :=   b1.basedoc.CGROTPR;
b1.Dogovor.CGROTP    :=   b1.basedoc.CGROTPR;
b1.Dogovor.VIDDOG    :=   word(0);
b1.Dogovor.CVIDDOG   :=   '4001896F2F136F54h';
b1.Dogovor.DINPUT    :=   Data;
b1.Dogovor.DBEG      :=   Data;
b1.Dogovor.DEND      :=   Data;
b1.Dogovor.Status    :=   word(1);
b1.insert current Dogovor;
...
теперь мне нужно, что бы после создания этого договора он сразу же прикреплялся к счет-фактуре из которой был создан. и с этим не получается справиться... пробовал привязать basedoc.cdogovor к dogovor.nrec, но что-то не выходит...
под каждым красивым павлиньим хвостом, скрывается самая обычная куриная жопа!!! так что меньше пафоса господа!!!
Алексей
Местный житель
Сообщения: 2896
Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область

Re: Автоматическая подвязка договора

Сообщение Алексей »

Если к ДО, то правильно делаете, только незабывайте ещё про хоз.операцию.

Код: Выделить всё

basedoc.cdogovor := dogovor.nrec;
update current basedoc;
soprhoz.cdogovor := dogovor.nrec;
update current soprhoz;
Немного смутило слово Счёт-Фактура.. она живёт в другой таблице, schfact.
Espada
Местный житель
Сообщения: 336
Зарегистрирован: 07 май 2013, 17:32
Откуда: РБ, Минск

Re: Автоматическая подвязка договора

Сообщение Espada »

Алексей писал(а):Если к ДО, то правильно делаете, только незабывайте ещё про хоз.операцию.

Код: Выделить всё

basedoc.cdogovor := dogovor.nrec;
update current basedoc;
soprhoz.cdogovor := dogovor.nrec;
update current soprhoz;
Немного смутило слово Счёт-Фактура.. она живёт в другой таблице, schfact.
А подскажите пожалуйста, как в Create view связать basedoc и Soprhoz
...

Код: Выделить всё

basedocnrec == basedoc.nrec
and basedoc.() == soprhoz.nrec
...
под каждым красивым павлиньим хвостом, скрывается самая обычная куриная жопа!!! так что меньше пафоса господа!!!
zna
Местный житель
Сообщения: 552
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Челябинск
Контактная информация:

Re: Автоматическая подвязка договора

Сообщение zna »

Espada, создайте по F7 новый договор, и посмотрите в журнале, создалась ли запись в SoprHoz. Там связку и увидите
Судя по контексту, под "Счётом- фактурой" понимается ДО?
Espada
Местный житель
Сообщения: 336
Зарегистрирован: 07 май 2013, 17:32
Откуда: РБ, Минск

Re: Автоматическая подвязка договора

Сообщение Espada »

zna писал(а):Espada, создайте по F7 новый договор, и посмотрите в журнале, создалась ли запись в SoprHoz. Там связку и увидите
Судя по контексту, под "Счётом- фактурой" понимается ДО?
Хорошая идея) спасибо) дада ДО
под каждым красивым павлиньим хвостом, скрывается самая обычная куриная жопа!!! так что меньше пафоса господа!!!
Masygreen
Местный житель
Сообщения: 1089
Зарегистрирован: 04 сен 2008, 11:27
Откуда: Москва
Контактная информация:

Re: Автоматическая подвязка договора

Сообщение Masygreen »

Espada писал(а):Доброго дня. решаю вопрос по созданию Разового договора из Счет-фактуры. вроде бы всё создаётся нормально
Этого не достаточно, Attrdog допустим не создали .. запустите журнал посмотрите, что создается при новом договоре. И вроде фейс был создания, но тут не уверен...
Время ведет!
Алексей
Местный житель
Сообщения: 2896
Зарегистрирован: 24 июн 2005, 12:12
Откуда: Иркутская область

Re: Автоматическая подвязка договора

Сообщение Алексей »

and basedoc.viddoc == soprhoz.tipdoc
and basedoc.nrec == soprhoz.csoprdoc
Espada писал(а): А подскажите пожалуйста, как в Create view связать basedoc и Soprhoz
...

Код: Выделить всё

basedocnrec == basedoc.nrec
and basedoc.() == soprhoz.nrec
...
Espada
Местный житель
Сообщения: 336
Зарегистрирован: 07 май 2013, 17:32
Откуда: РБ, Минск

Re: Автоматическая подвязка договора

Сообщение Espada »

Только вернулся к этому вопросу) спасибо за советы, помогло) всё отлично работает)
под каждым красивым павлиньим хвостом, скрывается самая обычная куриная жопа!!! так что меньше пафоса господа!!!
Ответить