CREATE PLAN RECEPT P — различия между версиями
Материал из Фабиус wiki
Hisava (обсуждение | вклад) (Новая страница: «CREATE_PLAN_RECEPT_P - это программа из справочника R266 Сформировать плановую рецептуру для ПЕК…») |
Hisava (обсуждение | вклад) м |
||
| Строка 1: | Строка 1: | ||
| − | CREATE_PLAN_RECEPT_P - это программа из справочника [[R266]] | + | [[CREATE_PLAN_RECEPT_P]] - это программа из справочника [[R266]] |
| − | + | Сформировать плановую рецептуру для ПЕКО | |
| − | Сформировать плановую рецептуру для ПЕКО | + | [[CREATE_PLAN_RECEPT_P]]() |
| − | + | ||
| − | + | ||
| − | + | ||
= Текст = | = Текст = | ||
| − | |||
local i, aa | local i, aa | ||
| Строка 20: | Строка 16: | ||
endif | endif | ||
| − | for i := 1 to len( aa ) | + | for i := 1 to [[len]]( aa ) |
Create_Plan_Recept_2( aa[i] ) | Create_Plan_Recept_2( aa[i] ) | ||
next | next | ||
| − | Message( 'По выбранным изделиям рецептура 21 скопирована в рецептуру номер 99' ) | + | [[Message]]( 'По выбранным изделиям рецептура 21 скопирована в рецептуру номер 99' ) |
| + | = Смотрите также = | ||
| + | [[Полезные функции]] | ||
| − | |||
[[Функции Delphi]] | [[Функции Delphi]] | ||
| − | |||
| − | |||
Версия 15:46, 30 мая 2017
CREATE_PLAN_RECEPT_P - это программа из справочника R266
Сформировать плановую рецептуру для ПЕКО
CREATE_PLAN_RECEPT_P()
Текст
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_Recept_2( aa[i] ) next Message( 'По выбранным изделиям рецептура 21 скопирована в рецептуру номер 99' )
