Бухгалтерия / Говнокод #25465 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  10. 10
  11. 11
  12. 12
  13. 13
  14. 14
  15. 15
  16. 16
  17. 17
  18. 18
  19. 19
Набор = РегистрыСведений.ЗначенияСвойствОбъектов.СоздатьНаборЗаписей();
		Отбор = Набор.Отбор;
		Отбор.Объект.Использование = Истина;
		Отбор.Объект.ВидСравнения = ВидСравнения.Равно;
		Отбор.Свойство.ВидСравнения = ВидСравнения.Равно;
		Отбор.Объект.Значение = Грузополучатель;                
		Отбор.Свойство.Значение = ПланыВидовХарактеристик.СвойстваОбъектов.НайтиПоНаименованию("GLN").Ссылка;
		Набор.Прочитать();
		GLN_получ = "";
		Если Набор.Количество() > 0 Тогда
			Для нумер = 0 по Набор.Количество()-1 Цикл
				Свво = Набор.Получить(нумер).Свойство;
				Если СокрЛП(Свво.Наименование) = "GLN" Тогда
					GLN_получ = Набор.Получить(нумер).Значение;
				КонецЕсли;
			КонецЦикла;
		КонецЕсли;

		ОбластьМакета.Параметры.GLN_получ       = GLN_получ;

Запостил: cdpoma cdpoma, (Updated )

Комментарии (18) RSS

    • ava Asaharu # Ссылка на оригинал 0 ⇈

      Автор молодой, зеленый, индусский программист.
      3 строчки кода, медленно превращаются в 1.
      //Отбор.Объект.Использование = Истина;
//Отбор.Объект.ВидСравнения = ВидСравнения.Равно;
//Отбор.Объект.Значение = Грузополучатель;
Отбор.Объект.Уставновить(Грузополучатель, Истина);

      PS: А вообще, в печатных форма нужно использовать запрос для получения всех сведений, его доработать легко, достаточно заглянуть в "УправлениеОтчетами"
      Ответить

Добавить комментарий

Семь раз отмерь — один отрежь, guest!

    А не использовать ли нам bbcode?

    ↑
    8
    ↓