CREATE PLAN NHC
Материал из Фабиус wiki
Версия от 10:31, 21 апреля 2016; Hisava (обсуждение | вклад) (Новая страница: «CREATE_PLAN_NHC - это функция для R266 Сформировать плановую рецептуру для Ногинска = Полный те…»)
CREATE_PLAN_NHC - это функция для R266
Сформировать плановую рецептуру для Ногинска
Полный текст функции
local i, aa
aa := ChoiceRefr( 'R11', "GrpRecord( 'KOD' )", { 'KOD', 'PNAME' }, ~Title := 'Выберите изделия ( Alt+F1 или Alt+F2 )' )
if Empty( aa ) return endif
if ValType( aa ) = 'N' aa := { aa } endif
for i := 1 to len( aa ) CREATE_PLAN_NHC_2( aa[i] ) next
Message( 'Сформирована рецептура номер 10' )