Теми рефератів

> Реферати > Курсові роботи > Звіти з практики > Курсові проекти > Питання та відповіді > Ессе > Доклади > Учбові матеріали > Контрольні роботи > Методички > Лекції > Твори > Підручники > Статті Контакти

Реферати, твори, дипломи, практика » Статьи » Підвищення ефективності використання НВІС ++

Реферат Підвищення ефективності використання НВІС ++

Тема: Статьи

битіе=Документи.Собитіе.СоздатьДокумент ();

НовоеСобитіе.CRM_Автор=ПараметриСеанса.ТекущійПользователь;

НовоеСобитіе.CRM_ДатаІзмененія=Запісь.ДатаСобитія;

НовоеСобитіе.CRM_Організація=Справочнікі.Організаціі.НайтіПоКоду ( 000000001 );

НовоеСобитіе.CRM_Подразделеніе=Справочники.Подразделения.НайтиПоКоду(laquo;000000003raquo;);

НовоеСобитіе.CRM_Трудозатрати=1;

НовоеСобитіе.Важность=Перечісленія.Важность.Средняя;

НовоеСобитіе.ВалютаДокумента=Справочнікі.Валюти.НайтіПоКоду ( 643 );

НовоеСобитіе.ВідОб'екта=Перечісленія.ВідиОб'ектовСобитія.Контрагент;

НовоеСобитіе.ВідСобитія=Перечісленія.ВідиСобитій.ЛічнаяВстреча;

НовоеСобитіе.ГруппаСобитія=Справочники.ГруппыСобытий.НайтиПоКоду(laquo;000000019raquo;);

НовоеСобитіе.Дата=Запісь.ДатаСобитія;

Якщо ЗначениеЗаполнено(Запись.Контрагент.ОсновноеКонтактноеЛицо) Тоді

НовоеСобитіе.КонтактноеЛіцо=Запісь.Контрагент.ОсновноеКонтактноеЛіцо;

Інакше

НовоеСобитіе.КонтактноеЛіцо=Запісь.ВладелецЕЦП;

КонецЕсли;

НовоеСобитіе.Контрагент=Запісь.Контрагент;

НовоеСобитіе.КратностьДокумента=1;

НовоеСобитіе.КурсДокумента=1;

НовоеСобытие.мВалютаРегламентированногоУчета =Справочнікі.Валюти.НайтіПоКоду ( 643 );

НовоеСобитіе.мІмяОб'екта=laquo;ДокументОбъект.Событие_НастройкиМастераПечатиСобытияraquo;;

НовоеСобитіе.НачалоСобитія=Дата (Формат (Запісь.ДатаСобитія, ДФ=РРРРММДД ) + 083000 );

НовоеСобитіе.ОкончаніеСобитія=Дата (Формат (Запісь.ДатаСобитія, ДФ=РРРРММДД ) + 173000 );

НовоеСобитіе.ОпісаніеСобитія= Послуги технічного фахівця raquo ;;

НовоеСобитіе.Основаніе=Не визначено;

НовоеСобитіе.Ответственний=Запісь.Ответственний;

НовоеСобитіе.СостояніеСобитія=Перечісленія.СостояніяСобитій.Запланіровано;

НовоеСобитіе.ТіпСобитія=Перечісленія.ВходящееІсходящееСобитіе.Ісходящее;

НовоеСобитіе.СодержаніеСобитія= Установка ЕЦП raquo ;;

Спроба

НовоеСобытие.Записать(РежимЗаписиДокумента.Проведение);

Виняток

Повідомити (ОпісаніеОшібкі () + Подія не проведене );

КонецПопиткі;

Запісь.Собитіе=НовоеСобитіе.Ссилка;

КонецПроцедури//СоздатьСобитіе ()

amp; НаКліенте

Процедура ОплаченоПріІзмененіі (Елемент)

Елементи.ДатаОплати.ТолькоПросмотр=(НЕ Запісь.Оплачено);

Якщо НЕ Запісь.Оплачено Тоді

Запісь.ДатаОплати=Дата ( 00010101 );

КонецЕсли;

КонецПроцедури

Вид готової до використання форми для введення відомостей про ЕЦП наведено на малюнку 2.23.

Малюнок 2.23 - Форма введення відомостей в 1С

Створення звіту

Звіт по використовуваних програмним продуктам, ліцензіями, ЕЦП створювався за допомогою конфігуратора в кілька етапів.

Спочатку був створений об'єкт звіт (малюнок 2.24) і здійснено його настройка на необхідний набір даних (малюнок 2.25).

Після конфігурування зовнішнього вигляду звіту необхідно розробити програмний модуль, що забезпечує коректне формування звіту за різними умовами запиту. Програма обробки на внутрішньому мовою 1С наведена нижче.

Малюнок 2.24 - Конфігуратор 1с (вкладка Основні)

Малюнок 2.25 - Конфігуратор 1с (програмування звіту)

Текст програми обробки:

ВИБРАТИ

_ ЕЦП.Період ЯК Період,

_ ЕЦП.Контрагент ЯК Контрагент,

_ ЕЦП.ПрограммнийПродукт ЯК ПрограммнийПродукт,

_ ЕЦП.Стоімость ЯК Вартість,

_ ЕЦП.АгентскоеВознагражденіе ЯК АгентскоеВознагражденіе,

_ ЕЦП.Оплачено ЯК Оплачено,

_ ЕЦП.ВладелецЕЦП ЯК ВладелецЕЦП,

_ ЕЦП.НачалоПеріода ЯК НачалоПеріода,