Выгрузка данных печатной формы из 1С ЗиК

[Пытливый]

Доброго времени суток, уважаемые!
Преамбула: Банк у нас. Зарплату мы туда людям на карты перечисляем. К каждому перечислению надо варганить по хитрой банковской форме ведомость (MS Excel).
Расчет з/п ведем в 1С ЗиК. И в настоящий момент процесс созания хитрой ведомости происходит так: берется одна из печатных форм платежной ведомости, сохраняется в формате MS Excel, далее при помощи VBA формируется из этой формы хитрые ведомости.
Теперь, собственно, амбула: Люди! Ведь может же 1С в формате dbf данные выгружать, а? Ведь как было бы хорошо - выгрузил, загрузил - ведомость готова!
Поделитесь примером выгрузки в dbf-формат данных из 1С, а? Или, может, еще какой путь подскажете? (ведомости для банка нужны в MS Excel)
Спасибо за внимание.

[Dracosha Andrew]

Может, может 1С в DBF выгружать, а вам так даже удобнее XLM, если у вас OFICE XP или выше. Но надо обработку писать.

[Mrak]

Пытливый, написать обработку, чтобы она сразу эту "хитрую" форму банковскую формировала в xls-формате.

[Пытливый]

Dracosha Andrew, Mrak, спасибо за совет, а примерчики можете скинуть? Ну хоть чего-нить выгрузки в dbf?
Кстати, Mrak, а каким образом можно формат xls для печатной формы задать? У меня мыслишка в этом направлении двигалась-двигалась... только пока не идет... %О/ Или формат печатной формы "зашит" жестко, а потом уж надо его того... преобразовывать?

[Mrak]

Dracosha Andrew, Mrak, спасибо за совет, а примерчики можете скинуть? Ну хоть чего-нить выгрузки в dbf?

Для 1С 7.7?

Кстати, Mrak, а каким образом можно формат xls для печатной формы задать? У меня мыслишка в этом направлении двигалась-двигалась... только пока не идет... %О/ Или формат печатной формы "зашит" жестко, а потом уж надо его того... преобразовывать?

Формат никак не задать, только в модуле формирования печатной формы можно указать её сохранения в xls-файле. И соответственно печатную форму нужно привести 1 в 1 с банковской формой.

[Пытливый]

Mrak, да, выгрузки в dbf из 1С v7.7

только в модуле формирования печатной формы можно указать её сохранения в xls-файле

О! Т.е. я правильно понимаю: программно задаем формирование печатной формы, а затем, программно же задаем сохранение этой печатной формы как файла xls?

[Mrak]

Mrak, да, выгрузки в dbf из 1С v7.7

//*******************************************
Процедура Выгрузить()
	//создается файл
	ФайлВыгрузки = "c:\ext.dbf";
	ДБФ=СоздатьОбъект("XBase");
	Если ФС.СуществуетФайл(ФайлВыгрузки)=1 Тогда
		ДБФ.ОткрытьФайл(ФайлВыгрузки);
		ДБФ.ОчиститьФайл();
		Сообщить("Открыт файл "+ФайлВыгрузки);
		Если ДБФ.Открыта()=0 Тогда
			Предупреждение("База не открыта... Создайте новый файл!",8);
			Возврат;
		КонецЕсли;
	Иначе
		//определяются поля
		ДБФ.ДобавитьПоле("Vid",2,15,0);
		ДБФ.ДобавитьПоле("DataN",3,5,0);
		ДБФ.СоздатьФайл(ФайлВыгрузки);
	КонецЕсли;
	
	//выгружаются данные из таблицы значений например
	ТЗ.ВыбратьСтроки();
	Пока ТЗ.ПолучитьСтроку()=1 Цикл
		ДБФ.Добавить();
		ДБФ.Vid=ТЗ.Вид;
		ДБФ.DataN=ТекущаяДата();
		
		ДБФ.Записать();
	КонецЦикла;
КонецПроцедуры

О! Т.е. я правильно понимаю: программно задаем формирование печатной формы, а затем, программно же задаем сохранение этой печатной формы как файла xls?

Именно так.

[Dracosha Andrew]

О! Т.е. я правильно понимаю: программно задаем формирование печатной формы, а затем, программно же задаем сохранение этой печатной формы как файла xls?

Угу. Или вызываете из 1С Excel как OLE-сервер и фактически рисуете в нём нужный документ командами Excel'я
Но это вариант для настоящих перцев!!

[Mrak]

Dracosha Andrew, ну зачем так сложно?

Процедура Сформировать()
	//вывод на печать
	Таб = СоздатьОбъект("Таблица");
	Таб.ИсходнаяТаблица("Сформировать");
	Таб.ВывестиСекцию("Заголовок");
	Состояние("Заполнение выходной таблицы...");
	Таб.Опции(0, 0, Таб.ВысотаТаблицы(), 0);
	
	//заполнения строк чем-либо
	Док=СоздатьОбъект("Документ.НазначениеЗадания");
	Док.ВыбратьДокументы(ВыбНачПериода,ВыбКонПериода);
	Пока Док.ПолучитьДокумент()=1 Цикл
		Таб.ВывестиСекцию("время_кон");
	КонецЦикла;
	
	Таб.ВывестиСекцию("Итого");
	Таб.ТолькоПросмотр(1);
	Таб.Показать("Сформировать", "");
	
	//запись в xls
	Таб.Записать(путь+имя_файла,"XLS");
	Сообщить("Создан файл отчета "+путь+имя_файла+".xls");
КонецПроцедуры

[Пытливый]

ребяты, агроммные спасиббы и РЕСПЕКТ ФОРЕВА! Забрезжил свет!...

[Naumov]

Пытливый, А что мешает просто сохранить печатную форму в формате Excel? если кодит не охота.

[Пытливый]

Naumov, да ничего не мешает, так и делаю. Тупо беру, сохраняю печатную форму в формате Excel, а дальше начинаю на ее основе варганить ведомости в банк (Там много заморочек - в зависимости от номера счета он может попасть в ведомость одну (своя форма), а может в другую (форма уже другая), короче я макрос написал - полегчало!) :О) Вот теперь озадачился - чтобы полегчало еще больше - забабахаю внешнюю обработку, которая будет на основании документа делать ведомости по нужному для банка формату и сливать в файл xls. И торжественно отправлять файл в банк. :О) И вделаю спец кнопку в стул! Красную и большую!

[Mrak]

забабахаю внешнюю обработку, которая будет на основании документа делать ведомости по нужному для банка формату и сливать в файл xls. И торжественно отправлять файл в банк.

Можно было и раньше сделать эту форму при выводе на печать, а сохранять "ручками" в xls. Я всего лишь показал, как автоматом сохранять.

[Пытливый]

Mrak, я еще совсем "неопытный сварщик" :О) Т.е. с VBA возился, а 1С язык пока сложновато. На примере - понятнее стало. Спасибо. :О)

[Mrak]

Пытливый, но проблем, обращайся еще