Реализация информационной подсистемы

Объекты и методы проведения предпроектного обследования предприятия, анализ результатов . Схема организационной структуры управления и документооборота. Назначение информационной подсистемы. Реализация подсистемы "Helpdesk" на основе "1С: Предприятие".

Рубрика Программирование, компьютеры и кибернетика
Вид дипломная работа
Язык русский
Дата добавления 24.06.2011
Размер файла 6,9 M

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

Назначение информационной подсистемы - автоматизации процесса управления проблемами (инцидентами) - минимизация неблагоприятного влияния инцидентов и проблем, возникающих в результате ошибок в ИТ - инфраструктуре.

Цель создания информационной подсистемы - сокращение временных затрат на устранение проблем в работе технического и программного обеспечения.

Информационная подсистема «Helpdesk» выполняет следующие функции:

? ведение базы данных проблемных ситуаций;

? создание на основе этих данных отчётов и приложений;

? возможность поиска данных;

? сортировку записей в базе данных;

? формирование, просмотр и печать информации;

? ведение справочников по клиентам, сотрудникам, видам услуг;

? редактирование базы данных.

Данная информационная подсистема реализована при помощи системы прикладных решений «1С:Предприятие 8.2».

В результате предпроектного обследования было установлено, что на устранение проблемных ситуаций, связанных с работой технического и программного обеспечения, сотрудники отдела ИТ тратят около 50 часов в месяц. После внедрения программного продукта ожидается, что затраты времени сократятся в несколько раз.

Ориентировочный срок службы программы до морального старения программы пять лет, что и будет рассматриваться как расчётный период времени.

Исходное число строчек кода, на встроенном языке программирования «1С:Предприятие», в тексте программы ед.

В этом разделе рассмотрены вопросы расчёта:

? трудоёмкости выполняемых работ;

? суммарных затрат на создание программного продукта;

? экономии, достигаемой в результате перехода от ручной обработки информации на автоматизированную обработку;

? чистого дисконтированного дохода за пять лет использования программного продукта;

? внутренней нормы доходности проекта и срока его окупаемости.

4.2 Трудоёмкость выполняемых работ

Создание программного продукта предполагает разработку программы и всей программной документации, предусмотренной техническим заданием.

Трудоёмкость разработки программного обеспечения , чел-ч., определяется по формуле:

, (4.1)

где - затраты труда на описание задачи, чел-ч;

- затраты на исследование предметной области, чел-ч;

- затраты на разработку блок-схем, чел-ч;

- затраты на программирование, чел-ч;

- затраты на отладку, чел-ч;

- затраты на подготовку документации, чел-ч.

Все составляющие в правой части формулы (4.1) определены через общее число операторов D, ед.:

(4.2)

где ? исходное число строчек кода в тексте программы, (;

с - коэффициент сложности задачи;

р - коэффициент коррекции программы, учитывающий новизну проекта.

Коэффициент сложности задачи «с» характеризует относительную сложность программы по отношению к так называемой типовой задаче, реализующей стандартные методы решения, сложность которой принята равной единице (величина коэффициента «с» лежит в пределах от 1,25 до 2). Для рассматриваемого программного продукта, включающего в себя алгоритмы учёта, анализа, отчётности, поиска - коэффициент сложности задачи примем равным 1,8 (с=1,8).

Коэффициент «р» коррекции программы, учитывающий новизну проекта, количественно характеризует увеличение объёма работ по реализации программного продукта, возникающего внесения изменений в алгоритм или в тексте программы по результатам её тестирования и отладки, с учётом коррекций требований к прецедентам, поддерживаемым программным продуктом, со стороны заказчика. В данном случае заказчик недостаточно хорошо представлял себе полный перечень прецедентов, которые должен поддерживать программный продукт, а это приводило к многочисленным корректировкам и доработкам текста программного кода. Поэтому примем коэффициент «р» равным 0,1.

В результате подстановки численных значений коэффициентов и параметров в формулу (4.2) получим следующее общее число строчек кода в тексте программы:

D = 600 ? 1,8?(1+0,1) = 1188 ед.

Затраты труда на описание принимаем: = 40 чел.-ч. Работу по описанию задачи и все другие работы по созданию программного продукта выполняет инженер-программист с окладом 5000 руб. в месяц и коэффициентом квалификации =0,7 (опыт работы по специальности 3 года).

Затраты труда на изучение задачи , чел.-ч., с учётом уточнения описания и квалификации программиста могут быть определены по формуле:

, (4.3)

где D - общее число строчек кода в тексте программы, ед.;

b - коэффициент увеличения затрат труда вследствие недостаточного описания задачи;

- количество строчек кода в тексте программы, приходящееся на один чел.-ч., (ед / чел.-ч.);

- коэффициент квалификации работника (определяется в зависимости от стажа работы).

В связи с тем, что решение рассматриваемой задачи потребовало уточнения и доработок, примем коэффициент b = 1,5.

Количество строчек кода в тексте программы, приходящееся на один чел.-ч., примем равным = 80 ед. / чел.-ч.

Таким образом, на основании формулы (4.3) получим:

31,80 чел.-ч.

Затраты труда на разработку алгоритма решения задачи , чел.-ч., рассчитываются по формуле:

, (4.4)

где D - общее число строчек кода в тексте программы, ед.;

- количество строчек кода в тексте программы, приходящееся на один чел.-ч., (ед / чел.-ч.);

- коэффициент квалификации работника (определяется в зависимости от стажа работы).

Для расчёта по формуле (4.4) примем = 20 ед./чел.-ч.

Подставив численные значения параметров и коэффициентов в формулу (4.4), получим:

84,80 чел.-ч.

Затраты труда на составление программы по готовой блок-схеме , чел.-ч., определяется по формуле:

, (4.5)

где D - общее число строчек кода в тексте программы, ед.;

- количество строчек кода в тексте программы, приходящееся на один чел.-ч., (ед / чел.-ч.);

- коэффициент квалификации работника (определяется в зависимости от стажа работы).

Для расчёта по формуле (4.5) примем = 20 ед./чел.-ч.

84,80 чел.-ч.

Затраты труда на отладку программы на персональном компьютере

, чел.-ч., рассчитываются по формуле:

, (4.6)

где D - общее число строчек кода в тексте программы, ед.;

- количество отлаживаемых операторов программы, приходящееся на один чел.-ч., (ед / чел.-ч.);

- коэффициент квалификации работника (определяется в зависимости от стажа работы).

Для расчёта по формуле (4.6) примем = 4 ед./чел.-ч.

Подставив численные значения параметров и коэффициентов в формулу (4.6), получим:

424,30 чел.-ч.

Затраты труда на подготовку документации по задаче , чел.-ч., определяются по формуле:

, (4.7)

где - затраты труда на подготовку материалов в рукописи, чел.-ч.;

- затраты труда на редактирование, печать и оформление документации, чел.-ч.

Затраты труда на подготовку материалов в рукописи , чел.-ч., вычислим по формуле:

, (4.8)

где D - общее число строчек кода в тексте программы, ед.;

- количество операторов программы в рукописи, приходящееся на один чел.-ч., (ед / чел.-ч.);

- коэффициент квалификации работника (определяется в зависимости от стажа работы).

Для расчёта по формуле (4.8) примем = 20 ед./чел.-ч.

Подставив численные значения параметров и коэффициентов в формулу (4.8) получим:

84,80 чел.-ч.

Затраты труда на редактирование, печать и оформление документации , чел.-ч., вычислим по формуле:

(4.9)

Подставив численное значение затраты труда на подготовку материалов в рукописи , чел.-ч., в формулу (4.9), получим:

чел.-ч.

Таким образом, подставив численные значения затраты труда на подготовку материалов в рукописи , чел.-ч., и затраты труда на редактирование, печать и оформление документации , чел.-ч., в формулу 4.7, получим:

чел.-ч.

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

чел.-ч.

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

, (4.10)

где - коэффициент коррекции, учитывающий изменения трудоёмкости разработки программного обеспечения в зависимости от уровня языка программирования;

- откорректированная трудоёмкость разработки программного обеспечения, чел.-ч.

Использованная среда разработки «1С: Предприятие» не относится к алгоритмическим языкам высокого уровня, с учётом этого примем = 1.

Таким образом, получим по формуле (4.10) итоговую откорректированную трудоёмкость разработки программы:

чел.-ч.

4.3 Расчёт себестоимости автоматизированной информационной

подсистемы

Себестоимость создания автоматизированной подсистемы З, руб., определяется по следующей формуле:

, (4.11)

где - основная заработная плата производственного персонала, руб.;

- дополнительная заработная плата производственного персонала, руб.;

- отчисления на страховые взносы, руб.;

- затраты на потребляемую электроэнергию, руб.;

- расходы на материалы и запасные части, руб.;

- затраты на техническое обслуживание и текущий ремонт вычислительной техники, руб.;

- затраты на амортизацию вычислительной техники, руб.

Плановый фонд рабочего времени одного специалиста производственного персонала в месяц, , ч., вычислим по формуле:

, (4.12)

где - количество рабочих дней специалиста производственного персонала за месяц;

- продолжительность рабочего дня специалиста производственного персонала, ч.

Для расчётов по формуле (4.12) примем = 22 дня, = 8 ч. Подставив указанные числовые значения параметров и в формулу (4.12) получим, что плановый фонд рабочего времени одного специалиста производственного персонала в месяц составляет:

Таким образом, часовая тарифная ставка , руб./ч, инженера-программиста:

Основная заработная плата , руб., производственного персонала определяется по формуле:

. (4.13)

Подставив все числовые значения параметров в формулу (4.13) получим, что основная заработная плата инженера-программиста первой категории составит:

руб.

Дополнитльная заработная плата не начисляется.

Отчисления в Пенсионный фонд Российской Федерации, Фонд социального страхования Российской Федерации и фонды обязательного медицинского страхования Российской Федерации вычислим по формуле:

где - норматива страховых взносов.

В соответствие с законом № 212-Ф3 от 24.07.2009 норматива страховых взносов составляет 34 % (=34 %).

Подставив все численные значения в формулу (4.14) получим, что отчисления на страховые взносы равны:

Мощность ЭВМ равна =0,3 кВт.

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

, (4.16)

где - коэффициент, учитывающий затраты времени на профилактические работы на ЭВМ;

- коэффициент коррекции времени работы вычислительного комплекса

Для расчётов по формуле (4.16) примем =1,1 и =0,8. Подставив все численные значения параметров в формулу (4.16) получим:

ч.

Стоимость 1 кВтч электроэнергии составляет = 3,5 руб./кВтч.

Подставив все численные значения параметров в формулу (4.15) получим, что затраты на потребляемую энергию составят:

607,66 руб.

Данные для расчёта затрат на материалы и запасные части занесём в таблицу 4.1.

Таблица 4.1 - Затраты на материалы и покупные изделия

Материал, покупаемое изделие

Количество, ед.

Цена за единицу, руб.

Сумма, руб.

Тонер для картриджа принтера

1

500

500

USB-Flash накопители, 1ГБ

1

500

500

Бумага офисная

2

250

250

Итого

1250

Следовательно, затраты на материалы и запасные части составят:

руб.

Затраты на техническое обслуживание и текущий ремонт вычислительной техники , руб.:

где - балансовая стоимость вычислительной техники, руб.;

- норма отчислений на ремонт, %;

- годовой фонд времени работы вычислительной техники, ч.

Для расчётов по формуле (4.17) примем:

? балансовая стоимость вычислительной техники 30000,00 руб.;

? норма отчислений на ремонт = 4 %;

? годовой фонд времени работы вычислительной техники при 40-часовой рабочей неделе в текущем году = 1986 ч.

Подставив все числовые значения параметров в формулу (4.17) получим, что затраты на техническое обслуживание и текущий ремонт вычислительной техники составят:

Затраты на амортизацию вычислительной техники , руб.:

где - балансовая стоимость вычислительной техники, руб.;

- норма отчислений на амортизацию вычислительной техники, %;

- годовой фонд времени работы вычислительной техники, ч.

Для расчётов по формуле (4.18) примем:

? балансовая стоимость вычислительной техники 30000,00 руб.;

? норма отчислений на амортизацию = 20 %;

? годовой фонд времени работы вычислительной техники при 40-часовой рабочей неделе в текущем году = 1986 ч.

Подставив все числовые значения параметров в формулу (4.19) получим, что затраты на амортизацию вычислительной техники составят:

Все расчёты по статьям калькуляции затрат, составляющих себестоимость автоматизированной подсистемы сведены в таблицу 4.2.

Таблица 4.2 - Величины затраты, составляющих себестоимость автоматизированной информационной системы

Статья расхода

Сумма, руб.

Основная заработная плата производственного персонала

Отчисления на страховые взносы

7962,20

Затраты на потребляемую электроэнергию

607,66

Расходы на материалы и запасные части

1250

Затраты на техническое обслуживание и ремонт вычислительной техники

Затраты на амортизацию вычислительной техники

1748,41

Итого

35336,10

Таким образом, полные затраты на создание программного продукта составляют 35336,10 руб.

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

, (4.19)

где - норма рентабельности, %.

Для расчётов по формуле (4.19) примем =15 %. Подставив численное значение параметров в формулу (4.20) получим:

руб.

Капиталовложения при внедрении программного продукта равняются его оптовой цене:

К = Ц = руб.

4.4 Оценка экономической эффективности внедрения программного

продукта

Показатель эффекта определяет все позитивные результаты, достигаемые при использовании программного продукта. Прибыль от использования программного продукта за год эксплуатации П, руб., определяется по формуле:

(4.20)

гдеЭ - стоимостная оценка результатов применения программного продукта в течение года, руб.;

- стоимостная оценка затрат при использовании программного продукта в течение года, руб.

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

(4.21)

где - затраты на ручную обработку информации, руб.;

- затраты на автоматизированную обработку информации, руб.;

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

Данный продукт используется сотрудниками ООО «Страховая компания «Северная Казна», г. Ставрополь. Оклад сотрудников составляет 25000 руб., премиальный фонд отсутствует. Тогда, цена одного часа работы , руб./ч., составит:

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

Таблица 4.3 - Данные о времени, затрачиваемом на обработку информации вручную и при использовании программного продукта за один месяц

Наименование работы

, ч.

, ч.

Поиск клиента в базе данных

10

2

Расчёт показателей работы сотрудников

20

2

Проводка операции (регистрация инцидента)

10

3

Итого

40

7

В таблице 4.3 использованы следующие условные обозначения:

? - затраты на ручную обработку информации в месяц, ч.;

? - затраты на автоматизированную обработку информации в месяц, ч.;

Из таблицы 4.3 следует, что общие затраты времени на ручную обработку информации в месяц , ч., составляют = 40 ч., а общие затраты на автоматизированную обработку информации - = 7 ч.

Годовые затраты (затраты за 12 месяцев) при ручной обработке информации вычислим по формуле:

(4.22)

Тогда годовые затраты составят:

= 68184 руб.

Годовые затраты при автоматизированной обработке информации вычислим по формуле:

(4.23)

Тогда годовые затраты при автоматизированной обработке информации (по данным таблицы 4.3 общие затраты времени на ручную обработку информации = 7 ч/месяц) составят:

= 11931,8 руб.

Следовательно, годовой эффект от внедрения программного продукта, даже без учёта дополнительного экономического эффекта (= 0), на основании формулы (4.22), получится равным:

руб.

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

На основании формулы (4.16) за 12 месяцев затраты на электроэнергию при потребляемой мощности компьютера составят (стоимость электроэнергии =3,5 руб./кВт-ч.):

руб.

Балансовая стоимость вычислительной техники = 30000 руб. Тогда, на основании формулы (4.18) затраты на техническое обслуживание составят:

.

Затраты на амортизацию вычислительной техники по формуле (4.19) составят:

Тогда, эксплуатационные затраты при использовании программного продукта составят:

88,2 +50,75 +253,77 = 392,73 руб.

Прибыль от использования программного продукта за год рассчитаем по формуле (4.21):

П = Э - З = - 392,73 = 55859,47 руб.

Таким образом, имеем следующий денежный поток:

0 шаг (капиталовложения) - руб.;

1 шаг ? 55859,47 руб.;

2 шаг ? 55859,47 руб.;

3 шаг ? 55859,47 руб.;

4 шаг ? 55859,47 руб.;

5 шаг ? 55859,47 руб.

Чистый дисконтированный доход ЧДД, руб., от использования

программного продукта определим по формуле:

гдеN - расчётный период, год;

- прибыль от использования программного продукта за k-й год его эксплуатации, руб.;

К - капиталовложения при внедрении программного продукта, руб.

Следовательно, ЧДД, руб., при N = 5, т. е. за пять лет использования программного продукта (срок до морального старения рассматриваемой информационной системы) при норме дисконта Е = 20 составит:

= 46549,56 + 38791,3 + 32326,08 + 26938,4 + 22448,67 126416,39 руб.

Приходим к выводу, что ЧДД положителен, т. е. проект эффективен.

Внутреннею норму доходности проекта , %, определим по формуле:

где ? максимальное значение внутренней нормы дисконта, %, при которой ЧДД является положительной величиной (ЧДД > 0);

? минимальное значение внутренней нормы дисконта, %, при которой ЧДД является отрицательной величиной (ЧДД < 0);

? ЧДД, руб., вычисляемый по формуле (4.25) при подстановке нормы дисконта E = ;

? ЧДД, руб., вычисляемый по формуле (4.25) при подстановке нормы дисконта E = .

Предполагаем, что лежит в диапазоне 130 … 140 %. При норме дисконта =130 % получаем ЧДД = 1664,61 руб. Таким образом, при = 130 % ЧДД положителен.

При норме дисконта =140 % получаем ЧДД = ?1238,07 руб. Таким образом, при = 140 % ЧДД отрицателен.

Срок окупаемости проекта , год, найдём по формуле:

, (4.27)

гдеN - максимальное количество лет, прошедших с начала эксплуатации программного продукта, в течение которых величина дохода от его использования не превысила величины капиталовложения при внедрении программного продукта;

- величины приведённых (дисконтированных) годовых эффектов за j-й год, руб., прошедший с начала эксплуатации программного продукта, вычисленные по формуле (4.25) при подстановке нормы дисконта Е = 20 %.

Величина приведённого (дисконтированного) годового эффекта за первый год расчётного периода по формуле (4.25) равна:

что больше величины капиталовложений (К =.

Тогда, в формуле (4.27) имеем N = 0 и срок окупаемости составит:

4.5 Основные технико-экономические показатели проекта

Для удобства анализа, все основные технико-экономические показатели проекта сведены в таблицу 4.4.

Таблица 4.4 - Основные технико-экономические показатели проекта

Основные характеристики

Единицы измерения

Проект

Итоговая трудоёмкость разработки

чел-ч.

Полные затраты на создание программного продукта

руб.

35336,10

Оптовая цена программного продукта

руб.

Годовой экономический эффект от внедрения программного продукта

руб.

55859,47

Чистый дисконтированный доход

руб.

126416,39

Внутренняя норма доходности

%

135,73

Срок окупаемости проекта

год

0,87

Выводы

1. Итоговая трудоёмкость разработки программного продукта составила чел.-ч.;

2. Полные затраты на создание программного продукта составляют 35336,1 руб.;

3. Оптовая цена программного продукта - руб.;

4. Годовой эффект от внедрения программного продукта составляет 55859,47руб.;

5. Чистый дисконтированный доход - 126416,39 руб.;

6. Внутренняя норма доходности - 135,73 %;

7. Срок окупаемости проекта 0,87 года;

8. Таким образом, исходя из полученных данных, разработанная информационная подсистемы «Helpdesk» для ООО «Страховая компания «Северная Казна», г. Ставрополь является экономически обоснованной и эффективной.

Заключение

В данном дипломном проекте была изучена организационно-управленческая структура фирмы ООО «Страховая компания «Северная Казна», г. Ставрополь.

Основным результатом дипломного проекта является разработанная подсистема на базе «1С: Предприятие 8.2» - самой распространенной в России технологической платформе. Подсистема выполнена в виде конфигурации, что позволяет самостоятельно доработать систему: открытая модель данных и прикладной функционал. Существует возможность интеграции с другими системами, а так же работа через WEB интерфейс.

Разработанная в данном проекте подсистема использует все современные технологии и позволяет автоматизировать процесс обращений пользователей в отдел ИТ.

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

Разработанная информационная подсистемы «Helpdesk» для ООО «Страховая компания «Северная Казна», г. Ставрополь является экономически эффективной, чистый дисконтированный доход равен 126416,39 руб. Срок окупаемости данного проекта составит 0.87 года, что объясняется небольшим количеством человек пользующихся разработанным программным продуктом, а также большой трудоемкостью разработки.

обследование предприятие информационный подпрограмма

Библиографический список

1. Кузнецов, И.Н., Деловое письмо [Текст] / И.Н. Кузнецов, М.: Издательство «Издательский дом Дашков и К», 2007 г.

2. Титоренко Г.А. Автоматизированные информационные технологии в экономике: [Текст] / Г.А. Титоренко,. - М.: Компьютер, ЮНИТИ, 1998г.

3. Рязанцева, Н. 1С Предприятие 8.2. Управление торговлей. Секреты работы [Текст] / Н. Рязанцева, СПб.: Питер, 2009 г. - 103 с.

4. Рязанцева, Н.-1С Предприятие_Торговля и Склад. Секреты работы [Текст] / Н. Рязанцева, СПб.: Питер, 2009 г. - 121 с.

5. Рязанцева Н.,1С: Предприятие. Бухгалтерский учёт [Текст] / Н. Рязанцева, СПб.: Питер, 2010 г. - 105 с.

6. Козырев, Д.В. - 1С Предприятие v8 Методические материалы [Текст] / Д.В. Козырев, М.: «1С-Учебный центр №3», 2010 г. - 92 с.

7. Радченко, М.Г. - Решение задач бухгалтерского учета 1Cv8 [Текст] / М.Г. Радченко, М.: ООО «1С-Паблишинг», 2009 г. - 59 с.

8. Илюшечкин, В.М. Основы использования и проектирования баз данных [Текст] / В.М. Илюшечкин, М.: «Юрайт ИД Юрайт», 2011 г. 231 с.

9. Соколов, Я.В. Бухгалтерский учет - веселая наука [Текст] / Я.В. Соколов, М., 2009 г. - 638 с.

10. Самарина, Е.В. Секреты профессиональной работы с «1С: Бухгалтерией 8». Учет производственных операций [Текст] / Е.В. Самарина, С.А. Харитонов, Д.В.Чистов, М., 2009 г. - 437 с.

11. Архипова, Н.И. Исследование систем управления. Учебное пособие для вузов [Текст] / Н.И. Архипова. - М.: «Издательство ПРИОР», 2002 г. - 214 с.

12. Харитонов, С.А. Секреты профессиональной работы с «1С:Бухгалтерией 8». УЧЕТ ОСНОВНЫХ СРЕДСТВ [Текст] / С.А. Харитонов, Д.В. Чистов, М.: Инфра-М, 2003 г. - 280 с

13. Михайлов, А. 1С: Предприятие 8.2 системное программирование [Текст] / А. Михайлов, М: OOO «1С-Паблишинг» 2009 г. - 218 с.

14. Дубянский, В. 1С: Предприятие. Конфигурирование и администрирование для начинающих [Текст] / В. Дубянский, СПб: «БХВ-Петербург», 2010 г. - 170 с.

15. Радченко, М.Г. - Практическое пособие разработчика [Текст] / М.Г. Радченко, М: OOO «1С-Паблишинг» 2009 г. - 169 с.

16. Михайлов, С.Е. 1С программирование как дважды два [Текст] / С.Е. Михайлов, М.: «Издательство ПРИОР», 2009 г. - 214 с.

17. Харитонов, С.А. - Введение в конфигурирование в системе «1С - Предприятие 8.2». Основные объекты [Текст]/ , С.А. Харитонов СПб.: Питер, 2010. - 89 с.

18. Самарина, Е.В. - Описание языка 1С8 в виде CHM. Удобный справочник [Текст]/ Самарина, Е.В. М., 2010 г. - 567 с.

19. Козырев, Д.В. - Профессиональная разработка в системе 1СПредприятие 8 [Текст] / Д.В. Козырев, М. «1С-Учебный центр №3», 2009 г. - 103 с.

20. 1С:Предприятие [Электронный ресурс] // Официальный сайт 1С. - Режим доступа к электрон. дан.: http://www.v8.1c.ru. - Загл. с экрана.

Приложения

Приложение А. Листинг программы

А.1 Листинг общего модуля

// Функция определения текущего пользователя системы.

// Пользователь определяется по логину в справочнике Сотрудники и по пользователю ИБ

//

// Параметры:

// - нет.

//

// Возвращаемое значение:

// - СправочникСсылка Сотрудники

Функция ОпределитьТекущегоСотрудника() Экспорт

//#Если Клиент Тогда

//Возврат ПараметрыСеанса.ТекущийПользователь;

//#Иначе

Возврат Справочники.Сотрудники.НайтиПоРеквизиту("Логин", ПользователиИнформационнойБазы.ТекущийПользователь().Имя);

//#КонецЕсли

КонецФункции

Функция ЗаписатьЗаказаннуюУслугу(парУслуга, парКомпонента, Описание, Инициатор) Экспорт

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

Документ.Дата = ТекущаяДата();

Документ.Источник = Перечисления.ТипРегистрации.WEB;

UUID = строка (парУслуга.УникальныйИдентификатор());

Документ.Инициатор = Инициатор;

UUID1 = строка (парКомпонента.УникальныйИдентификатор());

ОписаниеСобытия = "<HTML>

|<BODY>

|<H1>Заказ услуги</H1>

|<TABLE>

|<TR><TH valign=top align=left>Услуга</TH>

|<TD><A href='Выполнить=Справочники.Услуги.ПолучитьСсылку(новый УникальныйИдентификатор("""+UUID+""")).ПолучитьФорму().Открыть()'>Услуга</TD></TR>

|<TR><TH valign=top align=left>Компонента услуги</TH>

|<TD><A href='Выполнить=Справочники.СоставУслуг.ПолучитьСсылку(новый УникальныйИдентификатор("""+UUID1+""")).ПолучитьФорму().Открыть()'>КомпонентаУслуги</TD></TR>

|<TR><TВ COLSPAN=2>ОПИСАНИЕ_ЗАКАЗА</TD></TR>

|</TABLE>";

Документ.Описание = ОписаниеСобытия;

Документ.Записать();

Возврат Инициатор.Логин;

КонецФункции

Функция ЗаписатьОценкуИнцидента(ОценкаЗап,ОценкаКомментарийЗап, СсылкаДок) Экспорт

объект = СсылкаДок.ПолучитьОбъект();

объект.Оценка = ОценкаЗап;

объект.КомментарийОценка = ОценкаКомментарийЗап;

объект.Записать();

КонецФункции

Процедура ЗаписатьУслугиИнцидента(Ссылка ,услуга, компонента) Экспорт

объект = Ссылка.ПолучитьОбъект();

объект.Услуга = услуга;

объект.КомпонентаУслуги = компонента;

объект.Записать();

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

Функция ЗаписатьИнцидент() Экспорт

//Документ = Документы.Инцидент.СоздатьДокумент();

//Документ.Записать();

КонецФункции

Функция ВернутьТекстПисьмаВТекстовомФормате(ТекстПисьма) Экспорт

Текст = ТекстПисьма;

// найдем начала тела HTML документа

НачалоТела = Найти(ВРЕГ(Текст),"<BODY");

Если НачалоТела > 0 Тогда

Текст = Прав(Текст,СтрДлина(Текст)-НачалоТела+1);

КонецЕсли;

// уберем определение стилей

КонецСтиля = Найти(ВРЕГ(Текст),"</STYLE>");

Пока КонецСтиля>0 Цикл

Текст = Прав(Текст,СтрДлина(Текст)-(КонецСтиля+7));

КонецСтиля = Найти(ВРЕГ(Текст),"</STYLE>");

КонецЦикла;

// заменим переводы строк

Текст = СтрЗаменить(Текст,"<BR>",Символы.ПС);

//Текст = СтрЗаменить(Текст,Символы.ВК+Символы.ВК,"");

Текст = СтрЗаменить(Текст,"&nbsp;"," ");

ПозицияКонцаТэга = Найти(Текст,">");

// пробежимся по всем тэгам

Пока ПозицияКонцаТэга>0 Цикл

КонецТэга = ПозицияКонцаТэга;

НачалоТэга = Найти(Текст,"<");

ДлинаТэга = КонецТэга-НачалоТэга+1;

Тэг = Сред(Текст,НачалоТэга,ДлинаТэга);

Пока СтрЧислоВхождений(Тэг,"<")>1 Цикл

НачалоВложенногоТэга = Найти(Прав(Тэг,СтрДлина(Тэг)-1),"<")+1;

Тэг = Прав(Тэг,СтрДлина(Тэг)-НачалоВложенногоТэга+1);

КонецЦикла;

Текст = СтрЗаменить(Текст,Тэг,"");

ПозицияКонцаТэга = Найти(Текст,">");

КонецЦикла;

Возврат СокрЛП(Текст);

КонецФункции

Функция сПолучитьКонтактнуюИнформациюТекст(Ответственный) Экспорт

Запрос = НОвый Запрос

Если ТипЗнч(Ответственный) = Тип("СправочникСсылка.Сотрудники") Тогда

Запрос.Текст =

"ВЫБРАТЬ

|СотрудникиКоординатыСотрудника.ВидСвязи.Представление Как ВидСвязи,

|СотрудникиКоординатыСотрудника.Контакт

|ИЗ

|Справочник.Сотрудники.КоординатыСотрудника КАК СотрудникиКоординатыСотрудника

|ГДЕ

|СотрудникиКоординатыСотрудника.Ссылка = &Ссылка";

Иначе

Возврат "";

КонецЕсли;

Запрос.УстановитьПараметр("Ссылка", Ответственный);

Выборка = Запрос.Выполнить().Выбрать();

КоординатыСотрудника = "";

Сотрудник = КоординатыСотрудника + Выборка.ВидСвязи + Символы.Таб + Выборка.Контакт + Символы.ПС;

КонецЦикла;

КонецФункции

Процедура ОбновлениеИндекса() Экспорт

Сообщение = Новый СообщениеПользователю;

Сообщение.Текст = "Запуск регламентного задания Обновление индекса " + ТекущаяДата();

Сообщение.Сообщить();

Если ПолнотекстовыйПоиск.ПолучитьРежимПолнотекстовогоПоиска() = РежимПолнотекстовогоПоиска.Разрешить Тогда

Если Не ПолнотекстовыйПоиск.ИндексАктуален() Тогда

ПолнотекстовыйПоиск.ОбновитьИндекс( , Истина);

КонецЕсли;

КонецЕсли;

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

Процедура СлияниеИндексов() Экспорт

Если ПолнотекстовыйПоиск.ПолучитьРежимПолнотекстовогоПоиска() = РежимПолнотекстовогоПоиска.Разрешить Тогда

Если Не ПолнотекстовыйПоиск.ИндексАктуален() Тогда

ПолнотекстовыйПоиск.ОбновитьИндекс(Истина);

КонецЕсли;

КонецЕсли;

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

Процедура ОтправитьПочту() Если ЗагрузитьВнешнююКомпоненту("ROM-Mail.dll")=0 Тогда Сообщить("Не удалось загрузить внешнюю компоненту ROM-Mail.dll"); Возврат; КонецЕсли; //подключение Почта=СоздатьОбъект("AddIn.AddInMail"); Почта.СерверОтправки=СокрЛП(СерверОтправки); Почта.ПортОтправки=СокрЛП(ПортОтправки); Почта.АутентификацияПриОтправке=ФлагАутентификация; Если Почта.Соединение=0 Тогда Если Почта.Подключиться("Отправка")=0 Тогда Сообщить("Не удалось подключиться к почтовому серверу","!"); Возврат; КонецЕсли; КонецЕсли; //сообщение Почта.Важность=0; Почта.Кодировка="windows-1251"; Почта.ТипПисьма=2; Почта.АдресОтправителя=СокрЛП(АдресОтправителя); Почта.ИмяОтправителя=СокрЛП(ИмяОтправителя); //получатели Почта.ДобавитьАдрес("АдресПолучателя",СокрЛП(ИмяПолучателя),СокрЛП(АдресПолучателя)); //вложения Для й=1 По Вложения.РазмерСписка() Цикл Почта.Вложения=Почта.Вложения+Вложения.ПолучитьЗначение(й)+";"; КонецЦикла; Почта.Тема=СокрЛП(ТемаПисьма); Почта.Тело=СокрЛП(ТекстПисьма); //отправка Если Почта.Соединение=0 Тогда Сообщить("Соединение потеряно","!"); ИначеЕсли Почта.Отправить()=1 Тогда Сообщить("Почтовое сообщение отправлено","i"); Иначе Сообщить("Не удалось отправить сообщение","!"); КонецЕсли; //отключение Почта.Отключиться(); КонецПроцедуры

//процедура выполняет получение файла автообмена Процедура Почта_Получить(База) //настройка Если П.Подключиться("Прием")=0 Тогда Сообщить("Не удалось подключиться к почтовому серверу для получения почты","!"); КонецЕсли; КонецЦикла; //отключение П.Отключиться(); КонецПроцедуры

//процедура выполняет отправку файла автообмена Процедура Почта_Отправить(База) //настройка П=СоздатьОбъект("AddIn.AddInMail"); П.СерверОтправки=СокрЛП(База.СерверОтправки); П.ПортОтправки=СокрЛП(База.ПортОтправки); П.Логин=СокрЛП(База.ПочтаЛогин); П.Пароль=СокрЛП(База.ПочтаПароль); П.АутентификацияПриОтправке=База.Аутентификация; //подключение |Получатель: "+СокрЛП(База.Удаленная); //вложения Каталог=СокрЛП(База.Экспорт)+"\"; Файл=ФС.НайтиПервыйФайл(Каталог+"*.*"); Пока ПустаяСтрока(Файл)=0 Цикл //добавление Если Лев(Файл,1)<>"." Тогда Сообщить("Вложен файл: "+Каталог+Файл); П.Вложения=П.Вложения+Каталог+Файл+";"; КонецЕсли; //следующий Файл=ФС.НайтиСледующийФайл(); КонецЦикла; //отправка Если ПустаяСтрока(П.Вложения)=0 Тогда Если П.Отправить()=0 Тогда Сообщить("Не удалось отправить почту","!"); КонецЕсли; КонецЕсли; //отключение П.Отключиться(); КонецПроцедуры

А.2 Листинг отчета «Поиск данных»

&НаКлиенте

Процедура Поиск(Команда)

Искать(0);

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

&НаКлиенте

Процедура ПредыдущаяПорция(Команда)

Искать(-1);

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

&НаКлиенте

Процедура СледующаяПорция(Команда)

Искать(1);

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

&НаКлиенте

// Процедура поиска, получение и отображение результата

Процедура Искать(Направление)

Если ПустаяСтрока(ПоисковоеВыражение) Тогда

Предупреждение("Не задана строка поиска.");

Возврат;

КонецЕсли;

ИскатьСервер(Направление);

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

&НаСервере

Процедура ИскатьСервер(Направление) Экспорт

СписокПоиска = ПолнотекстовыйПоиск.СоздатьСписок();

СписокПоиска.СтрокаПоиска = ПоисковоеВыражение;

Если Направление = 0 Тогда

СписокПоиска.ПерваяЧасть();

ИначеЕсли Направление = -1 Тогда

СписокПоиска.ПредыдущаяЧасть(ТекущаяПозиция);

ИначеЕсли Направление = 1 Тогда

СписокПоиска.СледующаяЧасть(ТекущаяПозиция);

КонецЕсли;

РезультатыПоиска.Очистить();

Для Каждого Результат Из СписокПоиска Цикл

РезультатыПоиска.Добавить(Результат.Значение);

КонецЦикла;

РезультатПоиска = СписокПоиска.ПолучитьОтображение(ВидОтображенияПолнотекстовогоПоиска.HTMLТекст);

ТекущаяПозиция = СписокПоиска.НачальнаяПозиция();

ПолноеКоличество = СписокПоиска.ПолноеКоличество(); Иначе

СообщениеОРезультате = "Не найдено";

Элементы.СледующаяПорция.Доступность = Ложь;

Элементы.ПредыдущаяПорция.Доступность = Ложь;

КонецЕсли;

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

&НаКлиенте

Процедура РезультатПоискаПриНажатии(Элемент, ДанныеСобытия, СтандартнаяОбработка)

ЭлементHTML = ДанныеСобытия.Event.srcElement;

Если (ЭлементHTML.id = "FullTextSearchListItem") Тогда

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

НомерВСписке = Число(ЭлементHTML.nameProp);

// Получить строку списка поиска по номеру

ВыбраннаяСтрока = РезультатыПоиска[НомерВСписке].Значение;

// Открыть форму найденного объекта

ОткрытьЗначение(ВыбраннаяСтрока);

СтандартнаяОбработка = Ложь;

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

А.3 Листинг документа «Инцидент»

&НаКлиенте

Процедура ПослеЗаписи(ПараметрыЗаписи)

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

Сообщение.Текст = "";

Сообщение.Отправитель = "veshur@mail.ru";

Сообщение.Тема ="Добавлен ноовый инцидент";

Сообщение.Получатели.Добавить("veshur@mail.ru");

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

//подключаемся без параметров, к клиенту установленному по умолчанию в системе

Почта.Подключиться(,);

Попытка

//Пытаемся послать письмо

Почта.Послать(Сообщение,Истина);

Исключение

Сообщить(ОписаниеОшибки());

Возврат;

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

//отключение

Почта.Отключиться();

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

А.4 Листинг документа «Наряд»

&наКлиенте

Процедура ПослеЗаписи(ПараметрыЗаписи)

//Адресс = Объект.Ответственный.УникальныйИдентификатор.ЭлектроннаяПочта;

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

Сообщение.Текст = "";

Сообщение.Отправитель = "Начальник отдела ИТ";

Сообщение.Тема ="Для Вас создан наряд";

Сообщение.Получатели.Добавить("veshur@mail.ru");

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

//подключаемся без параметров, к клиенту установленному по умолчанию в системе

Приложение Б. Копии слайдов презентации

Слайд 1 - Тема дипломного проекта, ФИО дипломника, ученая степень, ученое звание и ФИО руководителя

Слайд 2 - Актуальность, цель и задачи дипломного проекта

Слайд 3 - Диаграмма вариантов использования информационной подсистемы

Слайд 4 - Логическая модель базы данных

Слайд 5 - Интерфейс информационной подсистемы

Слайд 6 - Интерфейс информационной подсистемы

Слайд 7- Примеры отчетов, формируемых подсистемой

Слайд 8 - Примеры отчетов, формируемых подсистемой

Слайд 9 - Показатели технико-экономической эффективности проекта

Слайд 10 - Показатели технико-экономической эффективности проекта

Слайд 11 - Итоги дипломного проектирования

Размещено на Allbest.ru


Подобные документы

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.