Курсовые работы / ПРИС П _17

СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ

1 1С: Приедприятие 8 [электронный ресурс]: Системные требования – Режим доступа: URL: http://v8.1c.ru/requirements/ дата обращения: 20.12.2016

2 Нечаев Д. Ю., Чекмарев Ю. В. Надежность информационных систем

[электронный ресурс]: учебное пособие. М.: Изд. «ДМК Пресс» 2013. 64 с. Режим доступа: http://e.lanbook.com/books/element.php?pl1_id=3030

3 1С: Предприятие 8 [электронный ресурс]: Дерево объектов конфигурации Режим доступа: URL:http://v8.1c.ru/overview/Term_000000463.htm

дата обращения: 24.12.2016

4 Михеева Е.В.: Информационные технологии в профессиональной деятельности. - М.: Академия, 2013. 384 с.

5 Исаев Г.Н. Моделирование информационных ресурсов: теория и решение задач: Учебное пособие. - М.: Альфа-М: ИНФРА - М. 2014 - 224с.

6 Мартишин С.А., Симонов В.А., Храпченко М.В. Проектирование и реализация баз данных в СУБД MySQL c использованием MySQL Workbench:

Учебное пособие. - М.: ИД. "Форум": ИНФРА - М. 2013-160с.

7 Агальцов В.П., Титов В.М., Информатика для экономистов: учебник. -

М.: ИД. "Форум": ИНФРА - М. 2013-448с.

8 Светлов Н.М., Светлова Г.Н. Информационные технологии управления проектами: Учеб. пособие. - 2-е издание., перераб. и доп. - М.: ИД. "Форум":

ИНФРА - М. 2012-232с.

9 Взаимодействие с базой данных 1С: Приедприятие 8 [электронный ресурс]: Системные требования – Режим доступа: URL: https://habrahabr.ru/post/247657/ дата обращения: 10.12.2016

10 1С: ИТС [электронный ресурс]: Заполнение табличной части из регистра сведений – Режим доступа: URL: http://its.1c.ru / дата обращения: 2.12.2016 11 Система проектирования прикладных решений [электронный ресурс]:

Использование СППР - Режим доступа: URL: http://v8.1c.ru/model/?printversion=1

дата обращения: 12.12.2016

32

12 Абрамов Г.В., Медведкова И.Е., Коробова Л.А. Проектирование информационных систем [электронный ресурс]: учебное пособие /Абрамов Г.В.–

Воронеж, Воронежский Государственный университет инженерных технологий:

2012 - 172с. Режим доступа: http://biblioclub.ru/ id=141626&sr=1 дата обращения:

10.12.2016 13 Вендров А.М. Современные технологии анализа и проектирования

информационных систем [Электронный ресурс] // Центр Информационных Технологий: Режим доступа: URL http://www.citmgu.ru/ дата обращения: 15.12.2016

14 Радченко, М. А. 1С: Предприятие 8.1. Практическое пособие разработчика. Примеры и типовые приемы/ М.А. Радченко. – Питер: "1С-

Паблишинг", 2013. – 512 стр.

15 Баженова, И. Ю. Основы проектирования приложений баз данных.:

учеб. пособие./ И.Ю.Баженова - М.: Интернет-Ун-т Информ Технологий БИНОМ.

Лаб. знаний, 2014 - 252 с.

16 Информационный сервер "Фирма 1С". Электр. ресурс 1: 1С:

Управление торговлей 8. Режим доступа: URL: http://softrm.ru/ut8general/storage дата обращения: 20.12.2016

17 Маклаков, С.В. BPwin и ERwin. CASE - средства разработки информационных систем. Учебное пособие/ С.В. Маклаков. – Москва: Диалог – МИФИ, 2013. – 256с.

18 Гайдамакин, Н.А. Автоматизированные информационные системы,

базы и банки данных, ввод, курс: учеб. пособие для вузов./ Н.А. Гайдамакин - М.:

Гелиос АРВ, 2015. - 101 с.

19 Сайт компании 1с [Электронный ресурс] URL: http://www.1с.ru дата обращения: 25.12.2016

20 Проектирование информационных систем [Электронный ресурс]: -

Режим доступа: URL http://www.kgau.ru/istiki/umk/pis/pis.htm дата обращения:

7.12.2016

33

Запрос.УстановитьПараметр("Наименование",Объект.ЛистКормления); РезультатЗапроса = Запрос.Выполнить(); ЗаполнитьЗначенияСвойств(Объект.ЛистКормления,РезультатЗапроса);

КонецПроцедуры &НаКлиенте Процедура Денник(Команда) КонецПроцедуры &НаКлиенте

Процедура ЛистКормленияЛошадьПриИзменении(Элемент) ЛистКормленияЛошадьПриИзмененииНаСервере();

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

Заполнение табличной части документа "Задание на тренинг":

Функция ВернутьНомерДняНедели (ДеньНедели)

Если ДеньНедели = Перечисления.ДниНедели.Понедельник Тогда Возврат 1;

ИначеЕсли ДеньНедели = Перечисления.ДниНедели.Вторник Тогда Возврат 2;

ИначеЕсли ДеньНедели = Перечисления.ДниНедели.Среда Тогда Возврат 3;

ИначеЕсли ДеньНедели = Перечисления.ДниНедели.Четверг Тогда Возврат 4;

ИначеЕсли ДеньНедели = Перечисления.ДниНедели.Пятница Тогда Возврат 5;

ИначеЕсли ДеньНедели = Перечисления.ДниНедели.Суббота Тогда Возврат 6;

ИначеЕсли ДеньНедели = Перечисления.ДниНедели.Воскресенье Тогда Возврат 7;

КонецЕсли; КонецФункции &НаСервере

Процедура ЗаполнитьНаНеделюНаСервере() Запрос= Новый Запрос; Запрос.Текст=

"ВЫБРАТЬ

|

|УПОРЯДОЧИТЬ ПО | ГрафикНагрузкиЛошади.ДеньНедели";

Запрос.УстановитьПараметр("Ответственный",Объект.Ответственный); РезультатЗапроса = Запрос.Выполнить(); ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();

35

Пока ВыборкаДетальныеЗаписи.Следующий() Цикл НоваяСтрока = Объект.Тренинг.Добавить();

ЗаполнитьЗначенияСвойств(НоваяСтрока,ВыборкаДетальныеЗаписи); НоваяСтрока.Дата =

НачалоНедели(Объект.Дата)+24*60*60*(ВернутьНомерДняНедели(НоваяСтрока.ДеньНедели)-1); КонецЦикла;

КонецПроцедуры &НаКлиенте

Процедура ЗаполнитьНаНеделю(Команда)

Оповещение = Новый ОписаниеОповещения("ЗаполнитьВопросЗавершениеНаНеделю", ЭтотОбъект);

ТекстВопроса = "Табличная часть будет очищена. Продолжить?"; ПоказатьВопрос(Оповещение, ТекстВопроса, РежимДиалогаВопрос.ДаНет);

КонецПроцедуры &НаКлиенте

Процедура ЗаполнитьВопросЗавершениеНаНеделю(Результат, ДополнительныеПараметры) Экспорт

Если Результат = КодВозвратаДиалога.Да Тогда Объект.Тренинг.Очистить(); ЗаполнитьНаНеделюНаСервере();

КонецЕсли; КонецПроцедуры &НаКлиенте

Процедура ДатаПриИзменении(Элемент) НачалоНедели = НачалоНедели(Объект.Дата); КонецНедели = КонецНедели(Объект.Дата);

КонецПроцедуры &НаКлиенте

Процедура ПриОткрытии(Отказ)

НачалоНедели = НачалоНедели(Объект.Дата); КонецНедели = КонецНедели(Объект.Дата);

КонецПроцедуры &НаКлиенте

Процедура ТренингДеньНеделиПриИзменении(Элемент) Элементы.Тренинг.ТекущиеДанные.Дата =

НачалоНедели(Объект.Дата)+24*60*60*(ВернутьНомерДняНедели(Элементы.Тренинг.ТекущиеДа нные.ДеньНедели)-1); КонецПроцедуры

SQL запрос в отчете "Остаток на складе":

ВЫБРАТЬ ОстаткиНаСкладеОстаткиИОбороты.Номенклатура,

ОстаткиНаСкладеОстаткиИОбороты.КоличествоПриход, ОстаткиНаСкладеОстаткиИОбороты.КоличествоРасход, ОстаткиНаСкладеОстаткиИОбороты.КоличествоКонечныйОстаток

ИЗ

РегистрНакопления.ОстаткиНаСкладе.ОстаткиИОбороты КАК ОстаткиНаСкладеОстаткиИОбороты

36

SQL запрос в отчете "Нагрузка лошадей"

ВЫБРАТЬ

ЗаданиеНаТренинг.Тренинг.( Лошадь, ВидРаботыЛошади, ВремяНагрузки, Дата, ФактОтработки, Комментарий),

ЗаданиеНаТренинг.Ответственный

ИЗ

Документ.ЗаданиеНаТренинг КАК ЗаданиеНаТренинг

ГДЕ

ЗаданиеНаТренинг.Тренинг.ФактОтработки = &Истина

37