1. Список говнокодов пользователя Kirmas

    Всего: 1

  2. 1C / Говнокод #7105

    −134

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    Функция ПолучитьОстаток(ДанныеСтроки)
    
    	Запрос = Новый Запрос("ВЫБРАТЬ
    	                       |	ПартииТоваровНаСкладахОстатки.КоличествоОстаток
    	                       |ИЗ
    	                       |	РегистрНакопления.ПартииТоваровНаСкладах.Остатки КАК ПартииТоваровНаСкладахОстатки
    	                       |ГДЕ
    	                       |	ПартииТоваровНаСкладахОстатки.СерияНоменклатуры = &Серия");
    	Запрос.УстановитьПараметр("Серия", ДанныеСтроки.Ссылка);
    
    	РезультатЗапроса = Запрос.Выполнить().Выбрать();
    
    	СерияНоменклатуры = ДанныеСтроки.Ссылка.ПолучитьОбъект();
    
    	Если РезультатЗапроса.Следующий() тогда
    		 СерияНоменклатуры.Остаток = РезультатЗапроса.КоличествоОстаток;
    	Иначе
    		 СерияНоменклатуры.Остаток = 0;
    	КонецЕсли;
    
    	СерияНоменклатуры.Записать(); 	 
    
    КонецФункции
    
    Процедура СправочникСписокПриВыводеСтроки(Элемент, ОформлениеСтроки, ДанныеСтроки)
    
    	ПолучитьОстаток(ДанныеСтроки);
    	
    КонецПроцедуры // СправочникСписокПриВыводеСтроки()

    Задача была - при выборе серии номенклатуры подтягивать в форму выбора остатки на складе...

    Kirmas, 29 Июня 2011

    Комментарии (6)