Глава_02

Цель:
Научиться переносить данные из текстового файла в справочник.

Решение:
Это должны быть вложенные циклы. Во внешнем цикле - чтение строки из файла.
Далее разделение этой строки на слова и перенесение каждого слова в свою ячейку
в справочнике.

ПолучитьСтроку() //Получить строку текста по номеру.
Цикл

Разделение строки на слова
Поместить слово в ячейку справочника

КонецЦикла

Создадим новый справочник НовыеСотрудники по всем правилам создания справочников.

Он будет содержать следующие поля:
Код
ФИО
Адрес по прописке
Документ
Должность
Оклад

Форма справочника и его форма списка создадутся практически автоматически.

Этот справочник включим в меню.
Тут же вопрос: А знаешь ли ты как исключить из меню ранее включенный справочник?

Итак справочник создан. Пустой справочник. Мы должны его заполнить программным путем.

Вопрос: Где должен находиться исходный считываемый файл? Надо ли указывать путь к нему?
Ответ: Путь к файлу указывать не надо. Достаточно поместить файл в директорию
рабочей базы. В ту директорию, в которой находится база с которой в настоящий момент работаешь.

Например текстовый файл по имени ТекстДляВставки.txt я поместил в директорю базы
Алексей Васильевич. И работает!

Содержание текстового файла таково:
Иванов Саратов Паспорт
Петров Вологда Водительское

Теперь текст программы, которая построчно прочтет этот файл и выведет его содержание в окно сообщений.
-------------------



Процедура Вставить()


    НовСотр = СоздатьОбъект("Справочник.НовыеСотрудники");

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

    Текст.Открыть("ТекстДляВставки.txt");	

	

    Если Текст.КоличествоСтрок() = 0 Тогда

           Предупреждение("Текст пустой!");

       Возврат;

        КонецЕсли;

	

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

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

      Сообщить(Стр);

       КонецЦикла;

Иванов Саратов Паспорт
Петров Вологда Водительское

Ура!!! Работает! Программа вывела в окно сообщений текст из текстового файла:

Перенос данных из файла в документ