Разработка в системе 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

Стоит отметить, что в 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-документами приведен в документации.

Запись 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 иметь один индексный файл, в котором хранятся все индексы этого файла.

Объект ТекстовыйДокумент предназначен для манипулирования строками текстового файла. Все строки в системе хранятся в кодировке 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, и исполнение модуля продолжается.

Интернет-соединение

С помощью объекта ИнтернетСоединение можно устанавливать и разрывать соединение с провайдером через коммутируемые линии (модем). После установления соединения можно отправлять и принимать почту, обращаться к сайтам (веб-серверам) по протоколам HTTP/HTTPS и к FTP-серверам.

Для операций через эти протоколы можно также использовать процедуры и функции глобального контекста для работы с файлами, например, КопироватьФайл.

Поле HTML-документа

Элемент управления ПолеНТМLДокумента позволяет отобразить HTML-страницу. Это могут быть как локальные страницы, так и страницы из Интернета:

У данного элемента управления есть метод Перейти, который позволяет указать адрес страницы (URL) или HTML-макет, хранящийся в конфигурации.

Следующий фрагмент демонстрирует, как можно указать адрес сайта (веб-сервера) для данного элемента управления:

ЭлементыФормы.ПолеНТМLДокумента.Перейти("http://www.lc.ru");

Электронная почта (e-mail)

Для работы с электронной почтой в 1C:Предприятии 8.0 существуют следующие объекты:

• Почта,

• ПочтовоеСообщение,

• ПочтовыйАдрес,

• ПочтовоеВложение.

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

Объект Почта имеет методы Выбрать и Послать. Первый метод возвращает массив объектов ПочтовоеСообщение, а второй метод принимает объект ПочтовоеСообщение в качестве параметра.

В объекте ПочтовоеСообщение поле Отправитель имеет тип ПочтовыйАдрес, а поля Получатели, Копии и СлепыеКопии являются коллекциями объектов ПочтовыйАдрес. Поле Вложения также является коллекцией объектов типа ПочтовоеВложение.

Следующий пример создает электронное письмо, присоединяет к нему два файла и отправляет его сразу двум адресатам:

Письмо = Новый ПочтовоеСообщение;

Письмо.Тема = "Тест";

Письмо.Текст = "Это тестовое письмо!";

Письмо.Получатели.Добавить("myboss@company.ru");

Письмо.Получатели.Добавить("myfriend@company.ru");

Письмо.Вложения.Добавить("с:\test.txt");

Мелодия = Новый ДвоичныеДанные("с:\opera.mp3");

Письмо.Вложения.Добавить(Мелодия,"Опера.mр3");

Почта = Новый Почта;

Почта.Послать(Письмо)

Работа с FTP

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

FTP = Новый FТРСоединение("ftp://ftp.mysite.ru",21,"login","password");

РТР.УстановитьТекущийКаталог("htdocs");

FTP.Получить("index.htm", "с:\old\index.htm");

FTP.Записать("с:\new\index.htm", "index.htm");

К таким средствам относятся:

• Обмен данными через файлы. Это могут быть текстовые или dbf-файлы, а также XML-документы. Табличный документ 1С:Предприятия 8.0 может быть сохранен в формате Microsoft Excel™.

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

• Взаимодействие через механизм Automation, при котором 1С:Предприятие 8.0 может выступать в качестве клиента и сервера, т.е. как управляемое и как управляющее приложение.

• Поддержка интернет-технологий: работа с электронной почтой (e-mail), операции с файлами по протоколами HTTP, HTTPS,FTP.

• Технология внешних компонент, позволяющая подключать dll-библиотеки, разработанные специально для 1С:Предприятия.

• Размещение в форме элементов управления ActiveX.

Все эти средства позволяют строить комплексные решения с участием 1С:Предприятия 8.0.

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

Приведенный ниже пример подключает внешнюю компоненту Math.dll’, содержащую различные математические функции, и использует из нее генератор псевдослучайных чисел:

ЗагрузитьВнешнююКомпоненту("Math.dll");

МФ = Новый("Addln.Math");

//Для инициализации датчика случайных чисел используется процедура

MO.SRAND(1000); //параметр может быть от 0 до 32767

Для н = 1 По 10 Цикл

	Сообщить(МФ.RAND()); //случайное число в промежутке от 0 до 32767

КонецЦикла;

Как известно, автоматизация расчета зарплаты является одной из наиболее сложных прикладных задач. При этом практически во всех системах автоматизации из-за различий в законодательствах для каждой страны создается уникальный модуль расчета зарплаты.

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

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

• периодичность (день, неделя, месяц, год),

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

В новой версии 1С:Предприятия для реализации сложных периодических расчетов предназначены следующие объекты:

• планы видов расчета,

• регистры расчета.

Кроме вышеперечисленных, активно применяются и другие объекты конфигурации:

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

• Регистры сведений могут хранить любую информацию, развернутую по нескольким измерениям. Кроме того, они могут быть периодическими, тогда информация дополнительно разворачивается во времени. При помощи регистров сведений реализуются графики учета времени (аналог календарей в версии 7.7). Например, при расчете зарплаты это будут графики работы сотрудников предприятия.

• Документы предназначены для ввода записей в регистры расчета. Например, документы Отпуск, Премия.

• Отчеты используются для вывода детальной и сводной информации, например, отчеты РасчетныеЛистки, Свод.

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