Помогите разобраться с DBF

[rusrmm]

Есть файл DBF в из которого берутся данные для формирования платёжки,
Подскажите как мне нужные реквизиты перенести в печатную форму
Вот написал:
Перем ИмяПути, ИмяФайла;
Процедура ОткрТ()
   Файл = СоздатьОбъект("XBASE");
   ИмяФайла="*.dbf";
   ФС.ВыбратьФайл(0, ИмяФайла, ИмяПути, , "*.dbf|*.dbf", "dbf", );
   Каталог = ИмяПути + ИмяФайла;
КонецПроцедуры

Процедура Сформировать()
   Файл = создатьОбъект("XBASE");
   Файл.ОткрытьФайл(Каталог);
   Файл.КодоваяСтраница(1);   
   Если Файл.Открыта()=0 Тогда
      Сообщить("Не удалось открыть файл!");
   КонецЕсли;
   
   
   Файл.Первая();
   Пока Файл.ВКонце()=0 Цикл
      Таб = СоздатьОбъект("Таблица");
      Таб.ИсходнаяТаблица("Квитанция");
      Таб.ВывестиСекцию("Шапка");
      ЛицСчёт = Файл.LCZN;   
         ФИО=Файл.FIO;
      Таб.ВывестиСекцию("Подвал");
      Таб.Показать();
            Файл.Следующая();
   КонецЦикла;
КонецПроцедуры
 
но что-то не выходит, что делаю не так   

[Naghual]

Что именно не выходит? Что не так?
В каком месте ошибка?

Телепаты в отпуске...

[rusrmm]

Из dbf не хочет в таблицу подстовлять значения LCZN и FIO, тупо мишет место ФИО и Лиц номера =>  LCZN и FIO

[rusrmm]

всё разобрался, выражение в таблице не стояло, но появилась проблема место нормального ФИО, появляюсться эроглефы, как быть ?

[Naghual]

Кодовая страница неверная.
Либо при записи, либо при чтении.

[rusrmm]

Спасибо разобрался,  но есть ещё вопрос.  В dbf файле 6000 человек при выходе на печать создаются  6000 квитанций, как можно сделать что бы эти 6000 квитанций попадали в один файл для печати, а не по отдельности.
И ещё, как сделать что бы в таблице текст отражался по вертикале?  поясняю основной текст написан по горизонтали, а дополнительный по вертикале, тоесть перевёрнут.

[Kivals]

как можно сделать что бы эти 6000 квитанций попадали в один файл для печати, а не по отдельности.
Вынести создание и показ таблицы за цикл:

Код:

	Таб = СоздатьОбъект("Таблица");
	Таб.ИсходнаяТаблица("Квитанция");
	Таб.ВывестиСекцию("Шапка");
	Файл.Первая();
	Пока Файл.ВКонце()=0 Цикл
		ЛицСчёт = Файл.LCZN;   
		ФИО=Файл.FIO;
		Таб.ВывестиСекцию("Подвал");
		Файл.Следующая();
	КонецЦикла;
	Таб.Показать();

И ещё, как сделать что бы в таблице текст отражался по вертикале?
В свойствах ячейки закладка Положение Поле Ориентация (в градусах)

[rusrmm]

Спасибо ,  с  надписью по вертикале всё получилось, а с печатью 6000 я так пробовал,
В одной платёжке он подставляет ФИО и Лец. Номер на  все 6000 человек. 

[Kivals]

У тебя выражения для вывода точно заданы в секции "Подвал"?
Прилепи таблицу "Квитанция" к сообщению

[rusrmm]

Прилепи таблицу "Квитанция" к сообщению

а по подробнее можно?

[Kivals]

создаешь новый файл, выбираешь Таблица
в своей обработке переключаешься в таблицу "Квитанция", выделяешь все (как в экселе - выше и левее ячейки 1-1), копируешь в буфер
Переключаешься на вновь созданную таблицу, тоже выделяешь все и вставляешь из буфера.
Сохраняешь как файл. Прикрепляешь здесь к сообщению.

[rusrmm]

СП всё получилось.
задам ещё один тупой вопрос  -  таблица выдается на печать в книжной форме, где в конфигураторе надо поменять, что бы она выдавалась в альбомном формате. Поддерживает ли 1С двухстороннею печать?

[Kivals]

двусторонняя печать - это функция принтера, а не программы
альбомная ориентация - читай:
Таблица.ПараметрыСтраницы() - первый параметр: ориентация
а также
Таблица.Опции(...ИмяОпцийПечати...) - сохранять настройки, выбранные пользователем (ориентация, поля, масштаб, ...), от таблицы к таблице