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' )