CREATE PLAN NHC
Материал из Фабиус wiki
Версия от 09:48, 27 июля 2017; Hisava (обсуждение | вклад)
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' )