- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
//********************************************************************************
// (c) корпорация Галактика
// Галактика 7.12 - Управление производственной логистикой
// Функции для пересчета в накладных/актах
//********************************************************************************
...
ECTb_npux_OPgEP := False;
if (SpSopr.PrMC = word(1))
{ //--- проверяем только Материалы ---
ECTb_PACX_OPgEP := False;
...
Язык программирования - адская смесь Pascal и С. Но не в этом дело. Я ещё никогда прежде не хотел так сильно надавать по рукам автору названий переменных! Это официальный исходник :(