С.А. Митичкин

Разработка в системе 1C: Пред приятие 8.0

Подписано в печать 07.08.2003. Формат 60×90 Vie

Бумага офсетная. Гарнитура «Петербург». Печать офсетная.

Объем 25,81 п.л. Тираж 5 000 экз. Заказ Я-778

Издательство ООО «1С-Паблишинг»

123056 Москва, а/я 64, ул. Селезневская, 21

По вопросам приобретения книги обращайтесь в фирму «1C»,

к 1С:Франчайзи и в книжные магазины.

Фирма «1C»

123056 Москва, а/я 64, Селезневская ул., 21

Тел.: (095) 737-92-57, факс: (095) 281-44-07

e-mail: lc@lc.ru

URL:http://www. lc.ru

По вопросам оптовых закупок учебных и методических пособий

по программным продуктам фирмы «1C» обращайтесь

в ООО «1С-Паблишинг»: 123056 Москва, ул. Селезневская, 21

Тел.: (095) 281-02-21, факс: (095) 281-44-07

e-mail: publishing@lc.ru

Отпечатано с оригиналов фирмы «1С-Паблишинг»

Казанский производственный комбинат программных средств

420 044 Казань, ул. Ямашева, 36

Система 1С:Предприятие 8.0 имеет средства для работы с XML-документами. Для их использования на компьютере должен быть установлен «Microsoft XML Core Services 4.0» или выше.

Стоит отметить, что в 1C:Предприятии 8.0 возможна работа с XML-документами большого объема, так как реализуется принцип последовательного чтения и записи XML-документов.

Запись XML

Следующий фрагмент создает простой XML-документ и записывает его в файл. Иерархический отступ конструкций языка показывает вложенность XML-элементов друг в друга:

Файл = Новый ЗаписьХМL;

Файл.ОткрытьФайл(ПутьКФайлу);

Файл.ЗаписатьОбъявлениеХМL();

Файл.ЗаписатьНачалоЭлемента("goods");

Файл.ЗаписатьНачалоЭлемента("good");

Файл.ЗаписатьНачалоЭлемента("name");

Файл.ЗаписатьТекст("Ботинки");

Файл.ЗаписатьКонецЭлемента();

Файл.ЗаписатьНачалоЭлемента("price");

Файл.ЗаписатьТекст(ХМLСтрока(600));

Файл.ЗаписатьКонецЭлемента();

Файл.ЗаписатьКонецЭлемента();

Файл.ЗаписатьНачалоЭлемента("good");

Файл.3 аписатьНачалоЭлемента("name");

Файл.ЗаписатьТекст("Сапоги");

Файл.ЗаписатьКонецЭлемента();

Файл.ЗаписатьНачалоЭлемента("price");

Файл.ЗаписатьТекст(ХМLСтрока(1000)) ;

Файл.ЗаписатьКонецЭлемента();

Файл.ЗаписатьКонецЭлемента();

Файл.ЗаписатьКонецЭлемента() ;

В результате работы программы получился следующий XML-документ:

<?xml version="1.0"?>

	<goods>

		<good>

			<пате>Ботинки</пате>

			<рпсе>600</рпсе>

		</good>

		<good>

			<пате>Сапоги</пате>

			<price>1000</price>

		</good>

	</goods>

Чтение XML

Чтение XML-документов производится через объект ЧтениеХМL с помощью метода Прочитать:

Чт = Новый ЧтениеХМL;

Чт.ОткрытьФайл(ПутьКФайлу);

Пока Чт.Прочитать() Цикл

	Рез = "ТипУзла=" + Чт.ТипУзла;

	Рез = Рез + " Имя='" + Чт.Имя;

	Рез = Рез + "' ЛокальноеИмя='" + Чт.ЛокальноеИмя;

	Рез = Рез + "' Префикс5'" + Чт.Префикс;

	Рез = Рез + "' Значение'" + Чт.Значение;

	Рез = Рез + "' " ;

	Сообщить(Рез) ;

КонецЦикла

Дополнительно система 1С:Предприятие 8.0 поддерживает преобразование с помощью XSL. Язык XSL или extensible Stylesheet Language — это язык описания стилей отображения для XML-документов. Он позволяет описать способ отображения документов для различных носителей, будь то окно веб-обозревателя или устройство печати. Данные в формате XML форматируются с помощью таблицы стилей в формате XSL, в результате создается отображение данных в соответствии с заданными стилями.

Полный список объектов, их свойств и методов для работы с XML-документами приведен в документации.

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

Запись DBF-файла

Следующий фрагмент программы создает DBF-файл с тремя полями и выгружает в него справочник Сотрудники:

ФайлВВР = Новый XBase;

ФайлВВР.Поля.Добавить("Name","S",100);

ФайлВВР.Поля.Добавить("Вер","S",5 0) ;

ФайлОВР.Поля.Добавить("Sum","N",10,2);

ФайлВВР.Кодировка = КодировкаХВаве.ОЕМ; //кодировка BOS

ФайлВВР.СоздатьФайл("с:\staff.dbf");

Сотрудники = Справочники.Сотрудники.Выбрать();

Пока Сотрудники.Следующий() Цикл

	ФайлВВР.Добавить();

	ФайлВВР.Name = Сотрудники.Наименование;

	ФайлВВР.Вер = Сотрудники.Подразделение;

	ФайлВВР.Sum = Сотрудники.Оклад;

	ФайлВВР.Записать();

КонецЦикла;

ФайлВВР.ЗакрытьФайл();

Чтение DBF-файла

Чтение DBF-файла производится еще проще:

ФайлВВР = Новый XBase;

ФайлВВР.ОткрытьФайл("с:\staff.dbf",.Истина); //только для чтения

ФайлВВР.Первая();

Пока НЕ ФайлВВР.ВКонце() Цикл

	НовСотр = Справочники.Сотрудники.СоздатьЭлемент();

	НовСотр.Наименование = ФайлВВР.Name;

	НовСотр.Подразделение = ФайлВВР.Вер;

	НовСотр.Оклад = ФайлВВР.Sum;

	НовСотр.Записать() ;

	ФайлВВР.Следующая();

КонецЦикла,

ФайлВВР.ЗакрытьФайл();

Удаленные записи

Файлы DBF устроены таким образом, что удаление записи не приводит к физическому удалению записи из файла. Запись просто помечается на удаление и пропускается при переборе. Таким образом, размер файла остается прежним.

Чтобы физически удалить все помеченные на удаление записи, нужно применить метод Сжать. Средства встроенного языка позволяют работать с записями, помеченными на удаление, перебирать их и даже отменять пометку на удаление.

Индексы

Для упорядочивания содержимого DBF-файла и поиска в нем по значению одного или нескольких полей применяется механизм индексов. Его применение можно сравнить с сортировкой картотеки по определенному признаку (совокупности признаков). Однако, в отличие от картотеки, файл может иметь сразу несколько индексов, и, соответственно, являться упорядоченным одновременно по нескольким признакам.

Индексы хранятся в индексном файле, причем один индексный файл может содержать сразу несколько индексов. Рекомендуется для одного файла DBF иметь один индексный файл, в котором хранятся все индексы этого файла.

• Функциональность внешней компоненты v7plus.dll включена в стандартную поставку в виде объектов для работы с электронной почтой (e-mail), с файлами по протоколам HTTP, HTTPS, FTP, XML-документами и др.

• Введен новый элемент управления «Поле HTML-документа».

• В форме могут располагаться элементы управления ActiveX.

• Введен механизм СОМ-соединения для быстрого и надежного доступа к системе 1С:Предприятие 8.0 из других программ.

Объект «ТекстовыйДокумент»

Объект ТекстовыйДокумент предназначен для манипулирования строками текстового файла. Все строки в системе хранятся в кодировке UNICODE, но есть возможность записи и чтения текстов в других кодировках. С помощью методов Прочитать и Записать текстовый документ считывается из файла или записывается в файл.

При работе с текстовым документом можно манипулировать его строками, для чего предназначены следующие методы:

ДобавитьСтроку

Добавляет строку в конец текстового документа.

ЗаменитьСтроку

Заменяет строку с указанным номером на переданную.

ВставитьСтроку

Вставляет в текстовый документ строку с указанным номером.

Удалить Строку

Удаляет из текстового документа строку с указанным номером.

КоличествоСтрок

Получает количество строк в тексте.

ПолучитьСтроку

Получает строку текстового документа по номеру.

Следующий пример демонстрирует применение этих методов:

Текст = Новый ТекстовыйДокумент;

Текст.Прочитать("catalog.txt", КодировкаТекста.МЖ!);

Текст.ЗаменитьСтроку(52, "Установка оборудования " + Стоимость);

Текст.ВставитьСтроку(53, "Замена оборудования... ");

Текст.УдалитьСтроку(10);

Текст.ДобавитьСтроку("Конец файла");

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

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

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

КонецЦикла;

Текст.Записать("catalog2.txt",КодировкаТекста.ANSI);

Текст.ТолькоПросмотр = Истина;

Текст.Показать();

Можно прочитать весь текстовый документ в строковую переменную или, наоборот, в текстовый документ записать значение строковой переменной. Для этого предназначены методы ПолучитьТекст и УстановитьТекст. Текст, содержащийся в текстовом документе до исполнения метода УстановитьТекст, удаляется:

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

ТекстДок.УстановитьТекст(стр);

Метод Очистить позволяет полностью очистить текстовый документ (удалить все строки). С помощью метода Показать текстовый документ можно отобразить на экране. Если установить свойство ТолькоПросмотр в значение Истина, то пользователь не сможет изменить текстовый документ.

Последовательный доступ к тексту

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

Текст обычно хранится в кодировке UNICODE, но объекты ЧтениеТекста и ЗаписьТекста умеют работать и с другими кодировками.

Объект «ЗаписьТекста»

Объект ЗаписьТекста предназначен для последовательной записи текстовых файлов. Приведенный ниже фрагмент запишет небольшой текстовый файл:

Файл = Новый

ЗаписьТекста("с:\test.txt".КодировкаТекста.ANSI.Символы.ПС); 

Файл.Записать("Строка1");

Файл.ЗаписатьСтроку("Строка2");

Файл.Записать("Строка3");

Файл.3акрыть();

В результате работы программы получится следующий текстовый файл:

Строка1Строка2

Строка3

Объект «ЧтениеТекста»

Объект ЧтениеТекста предназначен для последовательного чтения текстовых файлов. Следующий фрагмент прочитает ранее записанный файл:

Файл = Новый

ЧтениеТекста("с:\test.txt",КодировкаТекста.ANSI,Символы.ПС);

Строка1 = Файл.Прочитать(7);

Строка2 = Файл.ПрочитатьСтроку();

Строка3 = Файл.Прочитать();

Файл.Закрыть() ;

Система 1С:Предприятие 8.0, как и версия 7.7, позволяет выполнять команды операционной системы через командный интерпретатор и запускать внешние приложения. Для этого предназначены процедуры ЗапуститьПриложение и КомандаСистемы:

ЗапуститьПриложение

Выполняет запуск внешнего приложения либо открытие файла с использованием связанного с ним приложения.

КомандаСистемы

Вызывает на исполнение команду операционной системы, как если бы она была введена в командной строке. После загрузки приложения управление возвращается в 1С:Предприятие 8.0, и исполнение модуля продолжается.