v7: Выгрузка из файла txt в документ Операция

 ТекстСчета = СоздатьОбъект("Текст");

	ТекстСчета.Открыть(СокрЛП(Путь)); 

		Для а = 1 по ТекстСчета.КоличествоСтрок() Цикл

		Стр = ТекстСчета.ПолучитьСтроку(а); 

		Сообщить ( " " +а+ "    "+Стр);

    	КонецЦикла;

	 опер = СоздатьОбъект("Документ.Операция"); 

	Опер.Новая();

Опер.Дата = РабочаяДата();

Опер.Содержание = "Списание";  

Опер.НоваяПроводка();

Опер.Дебет.Счет = СчетПоКоду("");

Опер.Кредит.Счет = СчетПоКоду("");

 Данные = СоздатьОбъект("Текст");

Данные.КодоваяСтраница(0); // принудительная установка  

Данные.Открыть("c:\export.txt");

КолСтр  = Данные.КоличествоСтрок();

 Для н=1 по КолСтр Цикл 

 ТекСтр = Данные.ПолучитьСтроку(н);   

 Состояние("В файле прочитано строк "+н+" из "+КолСтр);

КонецЦикла;