По теме из базы знаний
- Планирование производства в УПП 1.3. Возможно ли это.
- Принципы Теории системных ограничений (планирования производства в ERP)
- Автоматизация производства на 1С: планирование производства в «Управление производственным предприятием»
- Многопередельный расчет производственных документов от плана производства и ресурсных спецификаций в комплексной автоматизации. КА 2.0
- Планирование производства и контроль управления операциями в 1С:ERP: кейс внедрения на лакокрасочном предприятии
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(15) вот так я сделал!)но что не то вроде,как появилась,место с галочкой "план выполнен" но это самому нужно ставить,а что бы оно само как то ставило это наверное нельзя сделать?и вот такой еще момент,галочку ставишь,записываешь,закрываешь,по новой открываю,галочка уже не стоит..что то не так я походу сделал?
Прикрепленные файлы:
(21) блин чуток,не так..он теперь просто ставит галку при записи!не важно выполнен план или нет..а надо именно что бы тогда когда выполняется план!ну т.е. надо 4 болта,4 болта появились по заданному плану,вот в этот момент галка должна ставится,что типа все этот план уже "закрыт"!
Примерно такое
(28)
(28)
Процедура ПриЗаписи()
Для каждого Товар из товары цикл
Остаток = получениеОстатков(Товар.Номенклатура);
Если Товар.Количество > Остаток ИЛИ Товар.Количество = Остаток Тогда
ПланВыполнен = Истина;
КонецЕсли;
КонецЦикла;
КонецПроцедуры
Функция получениеОстатков(Номенклатура)
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ТоварыОрганизацийОстатки.Номенклатура КАК Номенклатура,
| СУММА(ТоварыОрганизацийОстатки.КоличествоОстаток) КАК КоличествоОстаток
|ИЗ
| РегистрНакопления.ТоварыОрганизаций.Остатки(&Сегодня, ) КАК ТоварыОрганизацийОстатки
|ГДЕ
| ТоварыОрганизацийОстатки.Номенклатура = &Номенклатура
| И ТоварыОрганизацийОстатки.Склад = &Склад
|
|СГРУППИРОВАТЬ ПО
| ТоварыОрганизацийОстатки.Номенклатура";
Запрос.УстановитьПараметр("Номенклатура", Номенклатура);
Запрос.УстановитьПараметр("Сегодня", ТекущаяДата());
Запрос.УстановитьПараметр("Склад", Справочники.Склады.НайтиПоКоду("000")); ////000 - ваш код склада
РезультатЗапроса = Запрос.Выполнить().Выбрать();
Если РезультатЗапроса.Следующий() Тогда
возврат РезультатЗапроса.КоличествоОстаток; //Если есть остаток
Иначе
возврат 0; //Если не найдено остатков
КонецЕсли
КонецФункции Показать
(37)
Процедура ПриЗаписи()
Для каждого Товар из товары цикл
Остаток = получениеОстатков(Товар.Номенклатура);
Если Товар.Количество > Остаток ИЛИ Товар.Количество = Остаток Тогда
ПланВыполнен = Истина;
КонецЕсли;
КонецЦикла;
КонецПроцедуры
Мнне кажется я вот тут не правильно написал,это же из регистра накоплений?
Процедура ПриЗаписи()
Для каждого Товар из товары цикл
Остаток = получениеОстатков(Товар.Номенклатура);
Если Товар.Количество > Остаток ИЛИ Товар.Количество = Остаток Тогда
ПланВыполнен = Истина;
КонецЕсли;
КонецЦикла;
КонецПроцедуры
Мнне кажется я вот тут не правильно написал,это же из регистра накоплений?
(44)а все понял,у меня прослужебное окно скрыто было,я и не видел.. вот ошибка
{Документ.ПланПроизводства.Форма.ФормаДокумента.Форма(512,26)}: Переменная не определена (товары)
Для каждого Товар из <<?>>товары цикл (Проверка: Толстый клиент (обычное приложение))
{Документ.ПланПроизводства.Форма.ФормаДокумента.Форма(512,26)}: Переменная не определена (товары)
Для каждого Товар из <<?>>товары цикл (Проверка: Толстый клиент (обычное приложение))
Прикрепленные файлы:
(59)
Код такой??
Процедура ПередЗаписью()
Для каждого План из СоставПлана цикл
Остаток = получениеОстатков(План .Номенклатура);
Если План .Количество > Остаток ИЛИ План .Количество = Остаток Тогда
ПланВыполнен = Истина;
КонецЕсли;
КонецЦикла;
КонецПроцедуры
Функция получениеОстатков(Номенклатура)
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ
| ТоварыОрганизацийОстатки.Номенклатура КАК Номенклатура,
| СУММА(ТоварыОрганизацийОстатки.КоличествоОстаток) КАК КоличествоОстаток
|ИЗ
| РегистрНакопления.ТоварыОрганизаций.Остатки(&Сегодня, ) КАК ТоварыОрганизацийОстатки
|ГДЕ
| ТоварыОрганизацийОстатки.Номенклатура = &Номенклатура
| И ТоварыОрганизацийОстатки.Склад = &Склад
|
|СГРУППИРОВАТЬ ПО
| ТоварыОрганизацийОстатки.Номенклатура";
Запрос.УстановитьПараметр("Номенклатура", Номенклатура);
Запрос.УстановитьПараметр("Сегодня", ТекущаяДата());
Запрос.УстановитьПараметр("Склад", Справочники.Склады.НайтиПоКоду("000")); ////000 - ваш код склада
РезультатЗапроса = Запрос.Выполнить().Выбрать();
Если РезультатЗапроса.Следующий() Тогда
возврат РезультатЗапроса.КоличествоОстаток; //Если есть остаток
Иначе
возврат 0; //Если не найдено остатков
КонецЕсли
КонецФункции ПоказатьКод такой??
(61) И да, добавьте еще условие в :
Для каждого План из СоставПлана цикл
Остаток = получениеОстатков(План .Номенклатура);
Если Остаток = 0 тогда
Возврат;
Конецесли;
Если План .Количество > Остаток ИЛИ План .Количество = Остаток Тогда
ПланВыполнен = Истина;
КонецЕсли;
КонецЦикла; Показать
(26)я иду к тому,что я делаю отчет в СКД ТоварыНаСкладахОстаткиИОброты,по мимо остатков и оборотов там у меня есть еще графа "Количество По Плану",вот если формируешь отчет он все планы суммирует!а я хотел что бы если план выполнен,что бы он дальше не фигурировал!может каким то другим путем это нужно сделать?
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот