Новости для бухгалтера, бухучет, налогообложение, отчетность, ФСБУ, прослеживаемость и маркировка, 1С:Бухгалтерия

Вход или Регистрация

Показывать по 10 20 40 сообщений
Новая тема Ответить
Письмо в техподдержку 1С
[Прочее]

Как показать подчиненный справочник?

Damates
читатель
офлайн
Дата регистрации: 08.04.2009
Сообщений: 9
Пост №11
 
08.09.2010 08:27

Хрендец. Было бы проще: кинул таблицу на форму, указал что отображать (как в Делфи). Поразбираюсь. Спасибо!

IceBeerg
читатель
офлайн
Дата регистрации: 06.10.2004
Сообщений: 803
Пост №12
 
08.09.2010 10:29

"Так оно и есть, таблица ПодчТаб на форме, но >функция<(не процедура) ОбновитьПодчТаб() должна вызываться из скрытого текста лежащего на форме у которого задана только формула как ОбновитьПодчТаб(), а Заголовок и Идентификатор пусты!<br>Вот рабочий пример (выводит единицы измерения и их коэффициент из подчиненного справочника Единицы):<br>//Для объекта текст, его формулы, объект расположен на форме и скрыт<br>Функция ОбновитьПодчТаб()<br> ПодчТаб.УдалитьСтроки();<br> ПодчСпр=СоздатьОбъект("Справочник.Единицы");<br> ПодчСпр.ИспользоватьВладельца(ТекущийЭлемент());<br> ПодчСпр.ВыбратьЭлементы();<br> Ном=0;<br> Пока ПодчСпр.ПолучитьЭлемент()>0 Цикл<br> Ном=Ном+1;<br> ПодчТаб.НоваяСтрока(Ном);<br> ПодчТаб.УстановитьЗначение(Ном,"Единица",ПодчСпр.Единица);<br> ПодчТаб.УстановитьЗначение(Ном,"Коэффициент",ПодчСпр.Коэффициент);<br> КонецЦикла;<br> Возврат 0;<br>КонецФункции<br><br>//В модуле формы для установки колонок таблицы лежащей на форме и названой ПодчТаб<br>ПодчТаб.НоваяКолонка("Единица",,,"Единица");<br>ПодчТаб.НоваяКолонка("Коэффициент",,,"Коэффициент");"

IceBeerg
читатель
офлайн
Дата регистрации: 06.10.2004
Сообщений: 803
Пост №13
 
08.09.2010 13:58

"Вот как бы унифицировал:<br>//*********************************************************************************************<br>//Выводит в форму списка справочника содержимое подчиненного справочника, в таблицу ПодчТаб.<br>//Функция ОбновитьПодчТаб() помещается в скрытый объект Текс в поле Формула, поля Заголовок<br>//и Идентификатор должны быть пусты. Наименование подчиненного справочника задаелся в переменной<br>//Справочник. Наименование заголовков беруться из Синонима, если он пуст то из Идентификатора.<br>//*********************************************************************************************<br><br>Перем ПодчСпр, Справочник;<br><br>Функция ОбновитьПодчТаб()<br> Если ПустоеЗначение(Справочник)=0 Тогда<br> ПодчТаб.УдалитьСтроки();<br> ПодчСпр.ИспользоватьВладельца(ТекущийЭлемент());<br> ПодчСпр.ВыбратьЭлементы();<br> Ном=0;<br> Пока ПодчСпр.ПолучитьЭлемент()>0 Цикл<br> Ном=Ном+1;<br> ПодчТаб.НоваяСтрока(Ном);<br> Для НомРек=1 По Метаданные.Справочник(Справочник).Реквизит() Цикл<br> Реквизит=Метаданные.Справочник(Справочник).Реквизит(НомРек).Идентификатор;<br> //ПодчТаб.УстановитьЗначение(Ном,Реквизит,Строка(Шаблон( "[ПодчСпр."+Реквизит+"]")));<br> ПодчТаб.УстановитьЗначение(Ном,Реквизит,Шаблон("[ПодчСпр."+Реквизит+"]"));<br> КонецЦикла;<br> КонецЦикла;<br> КонецЕсли;<br> Возврат 0;<br>КонецФункции<br><br>Справочник="""";//Здесь задать наименование справочника как он в конфигураторе (идентификатор)<br>Для Ном=1 По Метаданные.Справочник(Справочник).Реквизит() Цикл<br> Реквизит=Метаданные.Справочник(Справочник).Реквизит(Ном).Идентификатор;<br> Синоним=Метаданные.Справочник(Справочник).Реквизит(Ном).Синоним;<br> Если ПустоеЗначение(Синоним)=1 Тогда<br> ПодчТаб.НоваяКолонка(Реквизит,,,Реквизит);<br> Иначе<br> ПодчТаб.НоваяКолонка(Реквизит,,,Синоним);<br> КонецЕсли;<br>КонецЦикла;<br>ПодчСпр=СоздатьОбъект("Справочник."+Справочник);"

Damates
читатель
офлайн
Дата регистрации: 08.04.2009
Сообщений: 9
Пост №14
 
09.09.2010 10:26

УРА!!! Все понял! Все работает как надо! Еще бы редактировалось. Спасибо огромное!

IceBeerg
читатель
офлайн
Дата регистрации: 06.10.2004
Сообщений: 803
Пост №15
 
09.09.2010 11:15

Можно и редактирование придумать, только сам ввод данных будет происходить не в таблице, а запросами ввода текста, чисел и т.д. Будем пробовать?

Damates
читатель
офлайн
Дата регистрации: 08.04.2009
Сообщений: 9
Пост №16
 
10.09.2010 08:27

Не не будем.Вчера показал клиентам - понравилось. Только добавились новые задачи:<br>Некоторая продукция рассчитывается не на 100 штук, а на 10 или 8 (Хочу добавить в справочник Продукция новый коэффициент и<br>В расчете вместо цифры брать значение из справочника). Это только для кондитерских изделий.<br>Для хлеба:Учитывать масло на смазку форм=(кг. хлеба*0,34)/1000. Включается в в печать и в отчет после основного масла.<br>Плюс новый отчет по муке учитывающий фактические показатели и разницу(между нормой и фактом кг муки и % припека ) по каждой продукции.Как сделать пока не знаю. Думаю добавить регистр и в проведении до-та его тоже заполнять, а потом запросом вытаскивать. Если надо форму отчета пошлю. (как бы файлик прикрепить на форуме?)

IceBeerg
читатель
офлайн
Дата регистрации: 06.10.2004
Сообщений: 803
Пост №17
 
10.09.2010 11:21

С коэффициентом все понятно. У нас заведен подчиненный справочник Единицы где забиваются единицы измерения товара, так сказать, например: квадратные метры, штуки, упаковки (подвесной потолок, ламинат и т.п.) :) и на печать выводиться с расшифровкой по единицам, для упрощения отгрузки.<br>Про отчет немного не понял, объясните по другому. Что в документе заполняется и что собираетесь в регистр пихать?<br>Файлик на форуме не прикрепляется... Если хотите шлите на icebeerg(сцобако)newmail.ru но сначала по подробнее про отчет.

Damates
читатель
офлайн
Дата регистрации: 08.04.2009
Сообщений: 9
Пост №18
 
10.09.2010 12:06

Все уже сделал (кроме отчета)<br>По отчету: в документ добавил ФактМуки и ФактПроцента (и соответственно в форме)<br>Хочу добавить регистр:Продукция, Норма по муке, Факт по муке, Норма процента, факт процента<br>Можно ли в Модуле документа проводить еще регистр?<br>Отчет должен быть такой:<br><br>            Продукция1| Мука       | Процент | Разница|Продукция2 | Мука ....<br>       штуки кг. | норма | факт | норма |факт | | |штуки | кг.| норма факт ....<br>Дата<br>Наверно в регистр придется еще добавить штуки и кг.

IceBeerg
читатель
офлайн
Дата регистрации: 06.10.2004
Сообщений: 803
Пост №19
 
10.09.2010 12:42

"> Можно ли в Модуле документа проводить еще регистр?<br>Не понял! У меня в модуле документа обрабатываются 3и регистра, ОстаткиТоваров, РезервыТоваров и Взаиморасчеты.<br>Можно в регистр и не писать лишнюю информацию а делать запрос к документам, а не регистру, Например:<br>Вместо<br> "//{{ЗАПРОС(Сформировать1)<br> |Товар = Регистр.ОстаткиТоваров.Товар;<br> |Склад = Регистр.ОстаткиТоваров.Склад;<br> |ОстатокТовара = Регистр.ОстаткиТоваров.ОстатокТовара;<br> |Функция ОстатокТовараКонОст = КонОст(ОстатокТовара);<br> |Группировка Товар;<br> |Группировка Склад;<br> |"//}}ЗАПРОС<br> ;<br>Делать<br> "//{{ЗАПРОС(Сформировать2)<br> |Товар = Документ.РасходнаяНал.Товар;<br> |Склад = Документ.РасходнаяНал.Склад;<br> |Количество = Документ.РасходнаяНал.Количество;<br> |Функция КоличествоСумма = Сумма(Количество);<br> |Группировка Товар;<br> |Группировка Склад;<br> |"//}}ЗАПРОС<br> ;<br>Сейчас разгребусь с текучкой и еще подумаю по поводу вашей ситуации.."

zak555 (398843952)
читатель
офлайн
Дата регистрации: 27.03.2008
Сообщений: 4656
Пост №20
 
10.09.2010 13:29

<br>> Можно в регистр и не писать лишнюю информацию а делать запрос к документам, а не регистру...<br><br>о_О<br>действительно, зачем вообще нужен регистр ? <br>

Показывать по 10 20 40 сообщений

Читают тему:

Быстрый переход
Для технических специалистов
  • Книга жалоб и предложений по работе сайта
  • Для технических специалистов
  • Представление регламентированной отчетности
  • Говорильня
  • Бухгалтерский учет: обсуждаем проекты нормативных актов и рекомендаций по ведению учета от БМЦ
  • Новый порядок применения ККТ (онлайн кассы с передачей сведений в ФНС)
  • Интернет-конференция: Оформление командировок по новым правилам
  • МАРКИРОВКА
  • ЕГАИС
  • Учет, налогообложение, автоматизация