"МОЛ=СоздатьОбъект("Справочник.МОЛ");<br>Если МОЛ.Выбрать("Выберите МОЛ","ДляВыбора")=1 Тогда<br> НужныйМОЛ=МОЛ.ТекущийЭлемент();<br> ВыбратьСтроки();<br> Пока ПолучитьСтроку() = 1 Цикл <br> Если Товар.МОЛ=НужныйМОЛ Тогда<br> ...<br> КонецЕсли;<br> КонецЦикла;<br>КонецЕсли;<br>"
Древовидный
Печать
Искать в теме:
Почему при обновлении не дает обновлять отдельные докумменты? 1C7.7 Sql Бухучет4.5 507
Проблема с количеством пользователей
Thorvardr
читатель
офлайн
Дата регистрации: 25.02.2005
Сообщений: 3082
Сообщений: 3082
Пост №11 02.07.2009 13:22
maestro_voln
читатель
офлайн
Дата регистрации: 04.03.2009
Сообщений: 289
Сообщений: 289
Пост №12 02.07.2009 15:52
Спасибо!<br>Получилось))
TesterSS
читатель
офлайн
Дата регистрации: 06.07.2009
Сообщений: 1
Сообщений: 1
Пост №13 06.07.2009 14:17
"Мне кажется, что код написан некорректно.<br>Почему...<br><br>ТЗ.ВыбратьСтроки();<br>МОЛ="""";<br>Пока ТЗ.ПолучитьСтроку()=1 Цикл <br> Если ТЗ.МОЛ=МОЛ Тогда<br> Товар=ТЗ.Товар; // !!!<br> ...<br> Иначе<br> МОЛ=ТЗ.Товар.МОЛ; // !!!<br> ...<br> Товар=ТЗ.Товар; // !!!<br> ...<br> КонецЕсли; <br>КонецЦикла;<br>Переменные Товар и МОЛ есть в многострочной части документа. Следовательно, при таком написании очень велика вероятность, что Вы просто переписываете значения из ТЗ в многострочную часть...<br>Хотя по идее такого не должно быть<br><br>Измените название переменных Товар и МОЛ (например _Товар, _МОЛ) и попробуйте.<br><br>...<br>ТЗ.ВыбратьСтроки();<br>_МОЛ="""";<br>Пока ТЗ.ПолучитьСтроку()=1 Цикл <br> Если ТЗ.МОЛ <> _МОЛ Тогда<br> _МОЛ = ТЗ.Товар.МОЛ; <br> Таб.ВывестиСекцию("МОЛ"); <br> КонецЕсли;<br><br> _Товар = ТЗ.Товар;<br> Таб.ВывестиСекцию("Строка");<br>КонецЦикла;<br>.."