Формирование ордеров
Модераторы: m0p3e, edward_K, Модераторы
Формирование ордеров
Очень нужен исходный код для кнопки "Формирование ордеров" в накладных на внутреннее перемещение в модуле "складской учёт". Если чего у кого в ЛС скидывайте, заранее благодарен.
-
- Местный житель
- Сообщения: 2896
- Зарегистрирован: 24 июн 2005, 12:12
- Откуда: Иркутская область
Re: Формирование ордеров
А для чего, самому сформировать? Я пользовался объектом ObjInterface SopInMovObj; посмотри файл sopinmov.vih
Re: Формирование ордеров
Нужно дополнение к исходнику добавить, ораклейную функцию, которая будет формировать код партии для готовой продукции.Алексей писал(а):А для чего, самому сформировать? Я пользовался объектом ObjInterface SopInMovObj; посмотри файл sopinmov.vih
-
- Местный житель
- Сообщения: 2896
- Зарегистрирован: 24 июн 2005, 12:12
- Откуда: Иркутская область
Re: Формирование ордеров
может написать алгоритм и повесить его на "после создания ордеров" ?
ну или всеми нами любимый alter interface
ну или всеми нами любимый alter interface
Re: Формирование ордеров
Не всё так просто, там уже есть один alter и одна ораклейная функция, будет вторая, но для того чтобы понять когда её использовать, нужно знать работу основной части, потому что вариантов развития события при нажатии на кнопку "формирования ордеров" много. Чтобы вкурить это желательно иметь исходник. Возможно придётся перезаписать новый код события "формирования ордеров".Алексей писал(а):может написать алгоритм и повесить его на "после создания ордеров" ?
ну или всеми нами любимый alter interface
Re: Формирование ордеров
Усложните существующий alter - добавьте условияBlazeBio писал(а):Нужно дополнение к исходнику добавить, ораклейную функцию, которая будет формировать код партии для готовой продукции.Алексей писал(а):А для чего, самому сформировать? Я пользовался объектом ObjInterface SopInMovObj; посмотри файл sopinmov.vih
или все верно алгоритм после оприходования
на 712 именно так и делали для изменения партии ГП
типа с таким кодом
if (getfirst sklorder where ((pt.cpNrec==sklorder.csopr)))=tsok
{
if (getfirst sporder where ((sklorder.nrec==sporder.csklorder)))=tsok
do {
if (getfirst katmc where ((sporder.cmc==katmc.nrec)))=tsok
{
if (getfirst katparty where ((sporder.cparty==katparty.nrec)))=tsok
{
еще какието условия
oModifSal.Addsaldomc_Upd(sporder.nRec, true, true);
update current sporder set sporder.srprice:=чего-нибудь, sporder.rsrprice:=чего-нибудь, sporder.cparty:=чего-нибудь;
oModifSal.Addsaldomc_Upd(sporder.nRec, false, true);
}
}
} while (getnext sporder where ((sklorder.nrec==sporder.csklorder)))=tsok
}