Квалификационная работа была разработана в соответствии с техническим заданием. При разработке была проанализирована работа отдела материально-технического снабжения и АГЗС «Северного объединения по эксплуатации газового хозяйства», в результате которого была поставлена задача разработки информационной системы учета товаров на примере АГЗС «Северного объединения по эксплуатации газового хозяйства» и выбраны комплекс технических средств, пакет программ, посредствам которых была реализована данная задача.
Для достижения этой задачи были проведены: сбор и предварительная обработка необходимых статистических и технико-экономических данных, связанных с деятельностью предприятия, сбор и анализ информации по теме дипломного проекта, также был проведён обзор рынка существующих информационных систем, решающих задачи автоматизации предприятия.
Результатом данной квалификационной работы является разработка информационной системы учета товаров на примере АГЗС «Северного объединения по эксплуатации газового хозяйства». В процессе выполнения работы были составлены алгоритмы, необходимые для работы системы, был осуществлен выбор необходимых технических средств.
В процессе разработки программы выполнены требования к функциональным характеристикам, условия эксплуатации и требования к операционной и программной совместимости. Разработка информационной системы учета товаров на примере АГЗС «Северного объединения по эксплуатации газового хозяйства» и ее внедрение позволяет связать информационные потоки АГЗС и отдела ОМТС главного офиса, сократить затраты рабочего времени оператора АГЗС, затрачиваемого на заполнение бумажной отчетности, повысить точность и оперативность обмена информацией между АГЗС и главным офисом.
В разделе «Экономическая эффективность» была рассчитана оптимальность проекта.
В разделе «информационная безопасность» были рассмотрены системы защиты информации, представленные на рынке ИТ, и произведен их анализ.
Таким образом, исходя из вышесказанного, можно сделать вывод о том, что информационная система, разработанная в ходе проведения проектной части может использоваться с целью облегчения учета товаров на любой АГЗС.
2. Гамбург К.С. Методическое пособие по оформлению пояснительной записки и графического материала дипломных и курсовых проектов и работ. - СТИ МИСиС, 2007 г.
3. Глушаков С.В., Ломотько Д.В. Базы данных. Учебный курс. - М.: ООО «Издательство АТС», 2001 г.-504с
4. Информатика и математика для юристов. Под. ред. Х.А. Андриашина, С. Я. Казанцева. - М.: ЮНИТИ-ДАНА, Закон и право, 2001. - 308 с.
5. И. Б. Львов, Г. Г. Казеева, И. А. Морев Информатика. Владивосток. 1999-2001 гг. - 260 с.
6. Исследование операций в экономике. Под ред. проф. Н.Ш. Кремера. - М.: Банки и биржи, ЮНИТИ, 1999. - 407 с.
7. Колесник А.П. Компьютерные системы в управлении финансами. - М.: «Финансы и статистика»,2002 г.
8. Кузнецов С.Д. СУБД (системы управления базами данных) и файловые системы.- М: Майор, 2001 г.
9. Левин В.К. Защита информации в информационно-вычислительных cистемах и сетях // Программирование. - 2001 г. - N5. -354 с.
10. Проектирование баз данных СУБД Microsoft Access: Учеб. пособие для вузов / Гринченко Н. Н., Гусев Е. В., Макаров Н. П. и др. -- М.: Горячая линия-Телеком, 2004. -- 240 с.
11. С.Н. Новиков. Защита информации в сетях связи с гарантированным качеством обслуживания. Новосибирск. 2003. - 480 с.
12. www.citforum.ru/database/mssql/overview/
13. www.citforum.ru/operating_systems/windows.shtml
14. www.kunegin.narod.ru/ref6/lan/4.htm
15. www.la2-ua.clan.su/forum/11-22-1
16. www.netnsk.ru/publica/inet/mbr_05.htm
17. www.opersys.ru
18. www.referatzakaz.ru/Predmet/informatika/9.htm
19. www.sider.home.nov.ru/book/side3
20. www.windxp.com.ru
Приложение 1
Программный код:
Клиентское приложение на АГЗС:
Главный модуль:
'Dim Nempl As Integer
'Public Function Ndep_()
' MsgBox (Ndep)
' Ndep_ = Ndep
'End Function
' Возвращает название серверной базы
Public Function SDB()
SDB = rz("select Сервер from Константы") '"[\\C:\gaz\gazserver.mdb]."
End Function
' Возвращает код этой заправки
Public Function KZ()
KZ = rz("select КодЗаправки from Константы")
' Посылает на сервер остатки
Public Function SendOstatki()
DoCmd.RunSQL "insert into " & SDB & "Остатки(КодЗаправки, КодНоменклатуры, Количество, Дата) select ЗапросОстатки.K1,ЗапросОстатки.N,ЗапросОстатки.s,ЗапросОстатки.d from ЗапросОстатки"
' Посылает на сервер обороты
Public Function SendOboroti()
' Записываем обороты в локальную таблицу
DoCmd.RunSQL "INSERT INTO Обороты ( Дата, КодНоменклатуры, КодКонтрагента, Количество, Сумма, КодЗаправки )" & _
"SELECT DateValue(Продажа.Дата) AS Выражение1, Продажа.КодНоменклатуры, Продажа.КодКонтрагента, Sum(Продажа.Количество) AS [Sum-Количество], Sum(Продажа.Стоимость) AS [Sum-Стоимость], Константы.КодЗаправки " & _
"FROM Продажа, Константы " & _
"WHERE (((Продажа.Дата)> all(select max(Начало) from Смены)))" & _
"GROUP BY DateValue(Продажа.Дата), Продажа.КодНоменклатуры, Продажа.КодКонтрагента, Константы.КодЗаправки"
' Записываем обороты в таблицу сервера
DoCmd.RunSQL "INSERT INTO " & SDB() & "Обороты ( Дата, КодНоменклатуры, КодКонтрагента, Количество, Сумма, КодЗаправки )" & _
' Записываем обороты по клиенту на сервер
DoCmd.RunSQL "INSERT INTO " & SDB() & "РасчетыКонтрагенты ( Дата, КодКонтрагента, Сумма, КодРайона )" & _
Страницы: 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17