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

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

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

Печатная форма

Nbuh77
читатель
офлайн
Дата регистрации: 15.04.2009
Сообщений: 121
Пост №1
 
06.12.2010 17:21

"Здравствуйте всем!Подскажите пожалуйста в печатной форме я добавил пустые строки таким образом             <br>КоличествоСтрокНаСтранице=30;<br>КоличествоПустыхСтрок=КоличествоСтрокНаСтранице-Расписание.Количество();<br>Для К=1 По КоличествоПустыхСтрок Цикл<br> ОбластьРасписание = Макет.ПолучитьОбласть("Расписание");<br> ТабДок.Вывести(ОбластьРасписание);<br> а вот НомерСтроки неполучается,т.е. если на печать вывожу только 7 позиции то нмера строк только на них а на пустых строках не получается,строк всего 30 выручите кто нибудь.За ранее спасибо."

Prikum
активный пользователь
онлайн
Дата регистрации: 18.02.2002
Сообщений: 20952
Пост №2
 
06.12.2010 17:23

Код показывай!

Nbuh77
читатель
офлайн
Дата регистрации: 15.04.2009
Сообщений: 121
Пост №3
 
06.12.2010 17:31

"КоличествоСтрокНаСтранице=30;<br>КоличествоПустыхСтрок=КоличествоСтрокНаСтранице-Расписание.Количество();<br>Для К=1 По КоличествоПустыхСтрок Цикл<br> ОбластьРасписание = Макет.ПолучитьОбласть("Расписание");<br> ТабДок.Вывести(ОбластьРасписание);<br>"

Nbuh77
читатель
офлайн
Дата регистрации: 15.04.2009
Сообщений: 121
Пост №4
 
06.12.2010 17:33

"Процедура ГрафикГруппы(Элемент)<br> ТабДок = Новый ТабличныйДокумент;<br> Макет = Документы.ПланПодготовки.ПолучитьМакет("ГрафикГруппы");<br> // Шапка<br> Шапка = Макет.ПолучитьОбласть("Шапка");<br> Шапка.Параметры.Заполнить(ЭтотОбъект);<br> ТабДок.Вывести(Шапка);<br> // Расписание<br> Область = Макет.ПолучитьОбласть("РасписаниеШапка");<br> ТабДок.Вывести(Область);<br> ОбластьРасписание = Макет.ПолучитьОбласть("Расписание");<br> Для Каждого ТекСтрокаРасписание Из Расписание Цикл<br> ОбластьРасписание.Параметры.Заполнить(ТекСтрокаРасписание);<br> ТабДок.Вывести(ОбластьРасписание);<br> КонецЦикла;<br><br> КоличествоСтрокНаСтранице=30;<br>КоличествоПустыхСтрок=КоличествоСтрокНаСтранице-Расписание.Количество();<br>Для К=1 По КоличествоПустыхСтрок Цикл<br> ОбластьРасписание = Макет.ПолучитьОбласть("Расписание");<br> ТабДок.Вывести(ОбластьРасписание);<br>КонецЦикла;<br><br> ТабДок.ОтображатьСетку = Ложь;<br> ТабДок.Защита = Ложь;<br> ТабДок.ТолькоПросмотр = Ложь;<br> ТабДок.ОтображатьЗаголовки = Ложь;<br> ТабДок.Показать();<br>КонецПроцедуры<br>"

Prikum
активный пользователь
онлайн
Дата регистрации: 18.02.2002
Сообщений: 20952
Пост №5
 
06.12.2010 17:38

"> КоличествоСтрокНаСтранице=30;<br>> КоличествоПустыхСтрок=КоличествоСтрокНаСтранице-Расписание.Количество();<br>> Для К=1 По КоличествоПустыхСтрок Цикл<br>> ОбластьРасписание = Макет.ПолучитьОбласть("Расписание");<br>> ТабДок.Вывести(ОбластьРасписание);<br>> КонецЦикла;<br><br>У тебя просто выводится область, заполнения нет, поэтому и нет номера строки! <br>Попробуй сделать:<br> Для К=1 По КоличествоПустыхСтрок Цикл<br> ОбластьРасписание = Макет.ПолучитьОбласть("Расписание");<br>       ОбластьРасписание.Параметры.НомерСтроки = КоличествоСтрокНаСтранице+К;<br> ТабДок.Вывести(ОбластьРасписание);<br> КонецЦикла;<br><br>"

Nbuh77
читатель
офлайн
Дата регистрации: 15.04.2009
Сообщений: 121
Пост №6
 
06.12.2010 17:54

Так она считает от пронумераванных 7-ми далее 31.32.../ пробовал по разному то 23 во все и так далее.

Prikum
активный пользователь
онлайн
Дата регистрации: 18.02.2002
Сообщений: 20952
Пост №7
 
06.12.2010 17:57

"А если подумать самому(ой)?<br><br>КоличествоСтрокНаСтранице=Расписание.Количество();<br><br>"

Nbuh77
читатель
офлайн
Дата регистрации: 15.04.2009
Сообщений: 121
Пост №8
 
06.12.2010 17:58

Пытаюсь.

Nbuh77
читатель
офлайн
Дата регистрации: 15.04.2009
Сообщений: 121
Пост №9
 
06.12.2010 18:19

"Спасибо большое плучилось.<br>КоличествоСтрокНаСтранице=30;<br>КоличествоПустыхСтрок=КоличествоСтрокНаСтранице-Расписание.Количество();<br>Для К=1 По КоличествоПустыхСтрок Цикл<br>ОбластьРасписание = Макет.ПолучитьОбласть("Расписание");<br>КоличествоСтрокНаСтранице=Расписание.Количество();<br>ОбластьРасписание.Параметры.НомерСтроки = КоличествоСтрокНаСтранице+К;<br>ТабДок.Вывести(ОбластьРасписание);<br>КонецЦикла;<br>"

Prikum
активный пользователь
онлайн
Дата регистрации: 18.02.2002
Сообщений: 20952
Пост №10
 
06.12.2010 18:21

Ну слава богу, а то думаю, куда пропал!?

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

Читают тему:

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