Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
19 апр 2025, 14:58

Посмотрите что не верно в этом коде

Автор ildarik_58, 27 фев 2013, 09:47

0 Пользователей и 1 гость просматривают эту тему.

ildarik_58

да нет документы есть в этом периоде! может обработка ничего невыполняет?
вот он должен отбирать цикл за период посмотрите правильный код плиз:
Процедура КнопкаВыполнитьНажатие(Кнопка)
   
   ВыборкаПланПроизводства = Документы.ПланПроизводства.Выбрать(НачалоПериода, КонецПериода);
     
   
   Пока ВыборкаПланПроизводства.Следующий() Цикл
     
      ДокументОбъект = Документы.Заказнапроизводство.СоздатьДокумент();
      ДокументОбъект.Заполнить(ВыборкаПланПроизводства.Ссылка);
     ДокументОбъект.Дата = ТекущаяДата();
     ДокументОбъект.Записать();
     
   КонецЦикла;
   
     
КонецПроцедуры

Добавлено: 27 фев 2013, 15:35


Цитата: ildarik_58 от 27 фев 2013, 15:31
да нет документы есть в этом периоде! может обработка ничего невыполняет?
вот он должен отбирать цикл за период посмотрите правильный код плиз:
Процедура КнопкаВыполнитьНажатие(Кнопка)
   
   ВыборкаПланПроизводства = Документы.ПланПроизводства.Выбрать(НачалоПериода, КонецПериода);
     
   
   Пока ВыборкаПланПроизводства.Следующий() Цикл
     
      ДокументОбъект = Документы.Заказнапроизводство.СоздатьДокумент();
      ДокументОбъект.Заполнить(ВыборкаПланПроизводства.Ссылка);
     ДокументОбъект.Дата = ТекущаяДата();
     ДокументОбъект.Записать();
     
   КонецЦикла;
   
     
КонецПроцедуры


Yura063

Процедура на клиенте? или запускаете на толстом клиенте обычное приложение?
Помогли, отблагодари!

ildarik_58

запускаю через 1С:Предприятие: УПП немогу! могу сказать это внешняя обработка

Yura063

Тупой вопрос. Обновляли окно документы Заказ на производство?
Помогли, отблагодари!

ildarik_58

да создание нового документа заказ на производство выходит! почему не происходит отбор документов план производства

Yura063

Документы сохраняются пустые?
Помогли, отблагодари!

ildarik_58

ДА СОЗДАЮТЬСЯ ПУСТЫЕ ФОРМЫ! И ПОСМОТРИТЕ ПОЖАЛУЙСТА ЧТО НЕ ВЕРНО В ЭТОМ КОДЕ
   Запрос = Новый Запрос("Выбрать Источник.Номенклатура,Источник.Количество,Источник.Номенклатура.ЕдиницаИзмерения КАК ЕдиницаИзмерения,Источник.Спецификация,Источник.Ссылка.Дата КАК ДатаДокумента,Источник.Ссылка.Номер КАК НомерДокумента
|ИЗ Документ.ПланПроизводства.КакТамВашаТабличнаяЧастьНазываетсяНеЗнаю КАК Источник
|Где Источник.ссылка.Проведен, Источник.Дата между &НачалоПериода и &КонецПериода")
Запрос.УстановитьПараметр("НачалоПериода", НачалоПериода);
Запрос.УстановитьПараметр("КонецПериода", КонецПериода);
Результат = Запрос.Выполнить()
Если НЕ Результат.Пустой() Тогда
Выборка = Результат.Выбрать();
ЗаказНаПроизводство = Документы.Заказнапроизводство.СоздатьДокумент();
Пока Выборка.Следующий() Цикл
//тут получаем данные запроса и заполняем документ ЗаказНаПроизводство, только не методом Заполнить(), а каждый реквизит отдельно.
КонецЦикла;
КонецЕсли;

Yura063

Сделайте проще!

   ВыборкаПланПроизводства = Документы.ПланПроизводства.Выбрать(НачалоПериода, КонецПериода);
   
   Пока ВыборкаПланПроизводства.Следующий() Цикл
      ДокументОбъект = Документы.Заказнапроизводство.СоздатьДокумент();
      //тут Команды для заполнения шапки
      ДокументОбъект.Дата = ТекущаяДата(); //например

      ТЗ = ВыборкаПланПроизводства.Товары.Выгрузить(); //это для товара
      ДокументОбъект.Товары.Загрузить(ТЗ);
     
      ДокументОбъект.Записать();
     
   КонецЦикла;

И запрос не нужен! Выборка документов у вас работает раз появляются документы!
Помогли, отблагодари!

ildarik_58

а что вместо товары на писать планпроизводства?
Добавлено: 28 фев 2013, 09:42


а какую команду  для заполнения шапки надо? и вместо товаров писать заказнапроизводство?

Gunner

Сформулируйте пожалуйста свою задачу правильно например так: есть такой-то документа, необходимо создать другой на основании этого с такой же табл. частью

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск