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

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

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

Проблема с заполнением табличной части

Волтос
читатель
офлайн
Дата регистрации: 14.11.2006
Сообщений: 19
Пост №1
 
15.10.2007 10:06

"Здравствуйте. В 1С:Бухгалтерия 7.7 имеется документ. При нажатии кнопки "Заполнить" должна заполняться табличная часть и одновременно выводиться отчет. Проблема в том, что когда реквизит табличной части формы совпадает с именем ячейки в таблице отчета, наименование ОС перестает выводится. Вместо этого выводятся пустые ячейки. <br><br>Вот код процедуры: <br><br>Перем Ит, м, мв, итм, г, гт, мср;<br>Перем аморт10;<br>Перем оно65, оно175;<br>Перем Таб;<br>Перем бухнач, налнач;<br>Перем разн, уменьш65, уменьш175, сумманарит;<br>Перем итог;<br>//*******************************************<br>Процедура Заполнить()<br>       Ном=1;<br> амортпремит=0;<br> оно65ит=0;<br> оно175ит=0;<br> бухначит=0;<br> налначит=0;<br> разнит=0;<br> уменьш65ит=0;<br> уменьш175ит=0;<br><br> Таб=СоздатьОбъект("Таблица");<br> Таб.ИсходнаяТаблица("Таблица");<br> Таб.ПовторятьПриПечатиСтроки(Таб.ВысотаСекции("Заголовок")+1,Таб.ВысотаСекции("Заголовок")+Таб.ВысотаСекции("Шапка"));<br> Таб.ВывестиСекцию("Заголовок");<br> Таб.ВывестиСекцию("Шапка");<br> Ит = СоздатьОбъект("БухгалтерскиеИтоги");<br> Ит.ИспользоватьСубконто(ВидыСубконто.ОсновныеСредства,,,);<br> Ит.ВыполнитьЗапрос(Д1,Д2);<br><br> спрОС = СоздатьОбъект("Справочник.ОсновныеСредства");<br> <br> спрОС.ВыбратьЭлементы();<br>Пока СпрОС.ПолучитьЭлемент() = 1 Цикл <br> <br> ИнвНомер = спрОС.Код; <br> НаименованиеП= спрОС.Наименование;<br> ГодВВЭкспл = спрОС.ДатаВводаВЭксплуатацию;<br> БалансСтоимость = спрОС.ПервоначальнаяСтоимость.Получить(Д2);<br> сз=спрОС.СчетЗатрат.Получить(Д2);<br> СрокИсп=спрОС.СрокПолезногоИспользования.Получить(Д2);<br><br> <br> аморт10=БалансСтоимость*10/100;<br> БалансСтоимостьН=БалансСтоимость-аморт10;<br> оно65=аморт10*6.5/100;<br> оно175=аморт10*17.5/100;<br> м=ДатаМесяц(Д2);<br> мв=ДатаМесяц(ГодВВЭкспл);<br> г=ДатаГод(ГодВВЭкспл);<br> гт=ДатаГод(Д2);<br> гд1=ДатаГод(Д1);<br> мд1=ДатаМесяц(Д1);<br> мт=ДатаМесяц(ТекущаяДата());<br> гс=ДатаГод(ТекущаяДата());<br> Если гт>г Тогда<br> итм=12-мв+м;<br> Иначе <br> итм=м-мв;<br> итог=(оно65+оно175);<br> КонецЕсли;<br> Если СрокИсп > 0 Тогда<br> бухнач=БалансСтоимость/СрокИсп;<br> налнач=БалансСтоимостьН/СрокИсп;<br> КонецЕсли;<br> разн=бухнач-налнач;<br> уменьш65=разн*6.5/100;<br> уменьш175=разн*17.5/100;<br> сумманарит=(Окр(уменьш65,2)+Окр(уменьш175,2))*итм; <br> Если м-мд1 > 0 Тогда<br> Если итог<>сумманарит Тогда <br> Если БалансСтоимость>=10000 Тогда<br> Если г>2005 Тогда<br> Если (Лев(сз,2) > "44") или (Лев(сз,2) < "44") Тогда       <br> Если г<=гт Тогда<br> Если ГодВВЭкспл>Д1 Тогда<br> Если (мв < м) Тогда <br> НоваяСтрока();<br> НомерПП=Ном;<br> ИнвНомер=ИнвНомер;<br> Наименование=НаименованиеП;<br> ВводВЭксплуатацию=ГодВВЭкспл;<br> СрокИсп=СрокИсп;<br> ПервНачСтоим=БалансСтоимость;<br> АмортПрем10=аморт10;<br> СтоимНалУч=БалансСтоимостьН;<br> ОНО65=оно65;<br> ОНО175=оно175;<br> СумНачБухУч=бухнач;<br> СумНачНалУч=налнач;<br> Разница=разн;<br> УменьшОНО65=уменьш65;<br> УменьшОНО175=уменьш175;<br> ОНО=сумманарит; <br> <br> <br> амортпремит=Окр(амортпремит+аморт10,2);<br> оно65ит=Окр(оно65ит+оно65,2);<br> оно175ит=Окр(оно175ит+оно175,2);<br> бухначит=Окр(бухначит+бухнач*(м-мв),2);<br> налначит=Окр(налначит+налнач*(м-мв),2);<br> разнит=Окр(разнит+разн,2);<br> уменьш65ит=Окр(уменьш65ит+уменьш65*(м-мв),2);<br> уменьш175ит=Окр(уменьш175ит+уменьш175*(м-мв),2);<br> КонецЕсли;<br> КонецЕсли;<br> КонецЕсли;<br>             КонецЕсли;<br> КонецЕсли;<br> КонецЕсли; <br> КонецЕсли;<br> <br> Иначе <br> Если итог<>сумманарит Тогда <br> Если БалансСтоимость>=10000 Тогда<br> Если г>2005 Тогда<br> Если (Лев(сз,2) > "44") или (Лев(сз,2) < "44") Тогда       <br> Если (мв = мд1-1) Тогда<br> <br> НоваяСтрока();<br> НомерПП=Ном;<br> ИнвНомер=ИнвНомер;<br> Наименование=НаименованиеП;<br> ВводВЭксплуатацию=ГодВВЭкспл;<br> СрокИсп=СрокИсп;<br> ПервНачСтоим=БалансСтоимость;<br> АмортПрем10=аморт10;<br> СтоимНалУч=БалансСтоимостьН;<br> ОНО65=оно65;<br> ОНО175=оно175;<br> СумНачБухУч=бухнач;<br> СумНачНалУч=налнач;<br> Разница=разн;<br> УменьшОНО65=уменьш65;<br> УменьшОНО175=уменьш175;<br> ОНО=сумманарит;<br><br> амортпремит=амортпремит+аморт10;<br>              оно65ит=оно65ит+оно65;<br> оно175ит=оно175ит+оно175;<br> бухначит=бухначит+бухнач*(м-мв);<br> налначит=налначит+налнач*(м-мв);<br> разнит=разнит+разн;<br> уменьш65ит=уменьш65ит+уменьш65*(м-мв);<br> уменьш175ит=уменьш175ит+уменьш175*(м-мв);<br> КонецЕсли;<br> КонецЕсли;<br> КонецЕсли;<br> КонецЕсли; <br> КонецЕсли;<br> КонецЕсли;<br>КонецЦикла; <br><br>Пока ПолучитьСтроку() =1 Цикл<br> Таб.ВывестиСекцию("Строка");<br> Ном=Ном+1;<br>КонецЦикла;<br><br> Таб.ВывестиСекцию("Подвал");<br> Таб.ВывестиСекцию("Подписи");<br> Таб.ПараметрыСтраницы(2,50,1,10,10,10,0); <br> Таб.ТолькоПросмотр(1);<br> Таб.Опции(0,0,6,0);<br> Таб.Показать("Ведомость учета ОС");<br>КонецПроцедуры      "

N@talia
читатель
офлайн
Дата регистрации: 20.09.2007
Сообщений: 177
Пост №2
 
15.10.2007 11:51

>>реквизит табличной части формы совпадает с именем ячейки в таблице отчета<br>А почему нельзя переименовать ячейку, чтобы имена не совпадали?

impuls
читатель
офлайн
Дата регистрации: 24.11.2005
Сообщений: 1798
Пост №3
 
15.10.2007 13:13

"Введите строку <br>> Таб.ВывестиСекцию("Строка");<br><br>в предыдущий цикл по перебору ОС (если формируется новая строка).<br><br><br>"

Волтос
читатель
офлайн
Дата регистрации: 14.11.2006
Сообщений: 19
Пост №4
 
15.10.2007 15:15

Нет! Так тоже не получается. Дело в том что он выводит все суммы и числа правильно, а вот столбец наименование пустой. Ничего не понимаю....<br><br><br><br>

Tanya
читатель
офлайн
Дата регистрации: 03.12.2001
Сообщений: 8412
Пост №5
 
15.10.2007 16:53

<br>Проверьте что стоит в отчете у ячейки с "наименованием". Тип должен быть выражение.<br><br><br>>Проблема в том, что когда реквизит табличной части <br>>формы совпадает с именем ячейки в таблице отчета, наименование ОС <br>>перестает выводится. <br>Это не связанно.<br>Зачем вообще присваивать имя ячейки (к тому же в приведенном примере не видно чтобы вы обращались к поименнованной области) при выводе на печать.<br><br><br><br><br><br>

Волтос
читатель
офлайн
Дата регистрации: 14.11.2006
Сообщений: 19
Пост №6
 
15.10.2007 17:21

У ячейки тип - выражение.<br><br>Ладно. Ну с этим отчетом. Я просто хочу вывести ОС за определенный период в табличную часть. При нажатии кнопки заполнить у меня выводятся все нужные мне ОС и цифры тоже, а поле наименование почему-то пустое.<br><br>

Tanya
читатель
офлайн
Дата регистрации: 03.12.2001
Сообщений: 8412
Пост №7
 
15.10.2007 18:43

"Какой тип столбца в табличной части документа, судя по тому что вы присваиваете СпрОС.Наименование, то тип должен быть строка, иначе<br>Наименование=СпрОС.Текущийэлемент()<br>А имена как раз и могут совпадать, потому как для вывода на печать табличной части достаточно<br><br>ВыбратьСтроки();<br>Пока ПолучитьСтроку() = 1 Цикл<br>Таб.ВывестиСекцию("Строка");<br>КонецЦикла;<br><br>"

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

Читают тему:

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