Разработка ЭИС контроля и учета товара на складе на примере ООО «Форпост – Север»

Введение
1. Исследовательский раздел
1.1 Обобщенная характеристика предметной области
1.1.1 Характеристика объекта исследования
1.1.2 Экономическая область функционирования
1.1.3 Характеристика предмета исследования
1.1.4 Существующая технология выполнения выбранной функции управления
1.2 Экономическая сущность исследуемых задач
1.3 Постановка задачи на разработку ЭИС
1.4 Анализ существующих разработок
2. Специальный раздел
2.1 Функциональные подсистемы ЭИС
2.2 Новая технология выполнения выбранной функции управления
2.3 Обеспечивающие подсистемы ЭИС
2.3.1 Информационное обеспечение
2.3.1.1 Информационная модель и ее описание
2.3.1.2 Используемые классификаторы и система кодирования
2.3.1.3 Характеристика нормативно-справочной и входной информации
2.3.1.4 Характеристика результатной информации
2.3.3 Математическое обеспечение
2.3.4 Техническое обеспечение
2.4 Экономические параметры разработки и внедрения ЭИС
2.4.1 Планирование и контроль выполнения работ
2.4.2 Расчет себестоимости разработки и внедрения ЭИС
2.4.3 Обоснование целесообразности разработки и внедрения ЭИС
2.4.4 Экономический эффект от внедрения ЭИС
3. Технологический раздел
3.1 Обоснование выбора средств разработки
3.1.1 Обоснование выбора средств разработки клиентской части ЭИС
3.1.2 Обоснование выбора СУБД
3.2 Реализация клиентской части ЭИС
3.2.1 Дерево функций и сценарий диалога
3.2.2 Структурная схема пакета
3.3 Реализация БД ЭИС
3.4 Схема функционирования ЭИС
3.5 Технология работы с ЭИС
4. Раздел Безопасность Жизнедеятельности
4.1 Анализ опасных и вредных факторов
4.2 Разработка мероприятий, обеспечивающих снижение опасных и вредных факторов
4.3 Экологическая оценка
Заключение
Список использованных источников
Приложение 1 – Программный код модулей

Негативное воздействие электромагнитных полей на человека;Биологическое воздействие ионизирующих излучений;Возможность поражения электрическим током.4.2 Разработка мероприятий, обеспечивающих снижение опасных и вредных факторовМероприятия по защите от факторов, оказывающих негативноевлияние на органы зренияХарактеристика условий трудаПользователи разрабатываемой ЭИС, находятся в помещении с габаритами:S - площадь помещения, S = 18 м2;h - расчетная высота подвеса, h = 2,92 м;A - ширина помещения, А = 3 м;В - длина помещения, В = 6 м. Схема расположения рабочих мест в помещении представлена на рисунке 4.1Рис. 4.1 – Схема размещения рабочих мест в помещенииРасчет освещения производится для комнаты площадью 18м2, ширина которой 6м, высота - 3 м. Воспользуемся методом светового потока.Для определения количества светильников определим световой поток, падающий на поверхность по формуле: , где F - рассчитываемый световой поток, Лм; Е - нормированная минимальная освещенность, Лк (определяется по таблице). Работу программиста, в соответствии с этой таблицей, можно отнести к разряду точных работ, следовательно, минимальная освещенность будет Е = 300Лк; S - площадь освещаемого помещения (в нашем случае S = 15м2);Z - отношение средней освещенности к минимальной (обычно принимается равным 1,1…1,2 , пусть Z = 1,1); К - коэффициент запаса, учитывающий уменьшение светового потока лампы в результате загрязнения светильников в процессе эксплуатации (его значение зависит от типа помещения и характера проводимых в нем работ и в нашем случае К = 1,5); n - коэффициент использования, (выражается отношением светового потока, падающего на расчетную поверхность, к суммарному потоку всех ламп и исчисляется в долях единицы; зависит от характеристик светильника, размеров помещения, окраски стен и потолка, характеризуемых коэффициентами отражения от стен (РС) и потолка (РП)), значение коэффициентов РС и РП были указаны выше: РС=40%, РП=60%. Значение n определим по таблице коэффициентов использования различных светильников. Для этого вычислим индекс помещения по формуле: , гдеS - площадь помещения, S = 18 м2;h - расчетная высота подвеса, h = 2.92 м;A - ширина помещения, А = 3 м;В - длина помещения, В = 6 м. Подставив значения получим:Зная индекс помещения I находим n = 0,22 Подставим все значения в формулу для определения светового потока F: Для освещения выбираем люминесцентные лампы типа ЛБ40-1, световой поток которых F = 4320 Лк. Рассчитаем необходимое количество ламп по формуле: N - определяемое число ламп;F - световой поток, F = 33750 Лм;Fл- световой поток лампы, Fл = 4320 Лм. При выборе осветительных приборов используем светильники типа ОД. Каждый светильник комплектуется двумя лампами.Повышенная яркость света, пониженная контрастность и мерцание:Для исключения воздействия данных вредных факторов в компании каждый месяц должно проводится плановое мероприятие – калибровка мониторов. Для калибровки используются следующее программное обеспечение - AdobeGamma. Данное программное обеспечение помогает выбрать необходиые значения контрастности, яркости и частоты монитора.Мероприятия по защите от электромагнитных полейОсновные требования к организации рабочего места с целью снижения воздействия электромагнитных полей на пользователя:видеомонитор и системный блок, как основные источники импульсных электрических, магнитных и электростатических полей должны быть расположены в пределах рабочего места и максимально удалены от пользователя;видеомонитор, системный блок и источник питания должны быть заземлены. Системный блок должен быть заземлен через заземляющий контакт трехконтактной вилки питания и соединен отдельным проводником корпуса системного блока с контуром заземления помещения;сетевые розетки и провода электрического питания должны быть в пределах рабочего места пользователя;при организации электрического питания рабочего места необходимо предусмотреть возможность изменения полярности включения в розетку сетевой вилки питания системного блока и видеомонитора, маркировку фазного и нулевого провода.При организации рабочего места должно быть учтено влияние электромагнитных полей на рядом расположенные рабочие места.В кабинете пользователей системы расположение рабочих мест должно осуществляться вдоль боковых и торцевых стен помещения с ориентацией тыльной стороны каждого рабочего места к стене.Ослабление мощности электромагнитного поля на рабочем месте можно достигнуть путем увеличения расстояния между источником излучения и рабочим местом.Наиболее эффективным способом снижения воздействия электромагнитных полей и утомляемости органов зрения является установление оптимального расстояния от организма и органов зрения до ЭЛТ. Центр изображения на ВДТ устанавливается на высоте 0,7-1,2 м от уровня пола. Так, для ЭЛТ с размером диагонали 20-25 см, безопасное расстояние составляет 1,5 м. Предельно близкое расстояние от экрана составляет не менее 50-70 см (для контроля – на расстоянии вытянутой руки от дисплея). Предельно допустимый уровень напряженности электростатических полей устанавливается равным 60КВ/м в течение 1 часа.Защита от поражения электрическим токомЭлектрические установки, к которым относится все оборудование ПЭВМ, представляют для человека потенциальную опасность. Воздействие тока может привести к электрической травме, то есть повреждению организма электрическим током или электрической дугой.Оператор работает с оборудованием на 220 В. Наиболее частыми бывают случаи касания рукой или другими частями тела корпусов компьютеров и дисплеев. Для предотвращения электротравматизма необходимо применять зануление. Человек-оператор должен быть обучен правилам эксплуатации электрооборудования и оказанию первой помощи при поражении электрическим током.Для предотвращения образования и защиты от статического электричества необходимо использовать нейтрализаторы и увлажнители, а полы должны иметь антистатическое покрытие. Уровень электростатического поля не должен превышать 20 кВ в течение часа.Мероприятия по обеспечению БЖД в условиях чрезвычайной безопасностиПричины возгораний и взрывовПричины неэлектрического характера: неосторожное и халатное обращение с огнем;неправильное устройство или неисправность отопления;неисправность оборудования и нарушение режима производственного процесса;неправильное устройство и неисправность систем вентиляции и кондиционирования воздуха;самовоспламенение, самовозгорание отдельных веществ;взрывы пыли, газов или паров.Причинам электрического характера:короткое замыкание;перегрузки;большие переходные сопротивления, ;искрение и электрические дуги;статическое электричество.Мероприятия по защите:Технические:применение плавких предохранителей;правильный монтаж сетей;профилактические осмотры, ремонты.Организационные:обучение работающих противопожарным правилам;проведение инструктажей.Эксплуатационные:правильная эксплуатация техники и оборудования;правильное содержание зданий и территорий.Режимные мероприятия:запрещение курения в не установленных местах.4.3 Экологическая оценкаПри эксплуатации миллионов персональных компьютеров (ПК) ежегодно списывается примерно десять процентов. Ежегодно в России образуется более 10 тысяч тонн «компьютерного лома».Применение в большом объеме черных, цветных и драгоценных металлов в электронно-вычислительной и радиоэлектронной технике приводит к необходимости увеличения их добычи и, следовательно, разрушению верхнего покрова земли, нарушению флоры и фауны окружающего региона. Вычислительная техника после окончания срока эксплуатации является источником загрязнения почвы в результате постепенного накопления отходов.Современная электронно-вычислительная и радиоэлектронная техника являются в настоящее время одним из основных потребителей драгоценных, цветных и черных металлов. Там, где предъявляются высокие требования к надежности контактов и паянных соединений, применяются золото, серебро и даже металлы платиновой группы.Конструкция любого вычислительного комплекса имеет в своем составе черные, цветные, драгоценные и редкие металлы, из которых изготавливаются: корпус, рамы, стойки, блоки и другие вспомогательные устройства (черные металлы): провода для соединений, печатные платы, рисунок печатных плат (цветные и драгоценные металлы); на печатных платах установлены электроэлементы, содержащие драгоценные металлы, такие как золото, серебро и платина. Такие редкие вещества как золото, платина, серебро, гадолиний, галлий представляют собой очень ценные материалы, поэтому их переработка очень важна.Получение стекла из утилизированных и бракованных многослойных защитных экранов позволяет сократить разработку полезных ископаемых и уменьшить количество технологических переделов при производстве стекла. ЗаключениеИтак, целью данной работы является – повышение эффективности контроля и учета товара на складе ООО «Форпост» путем разработки ЭИС.Первая глава пояснительной записки была посвящена исследованию предметной области. В данной главе был описан процесс контроля и учета товара на складе и его компоненты.Описание деятельности предприятия ООО «Форпост»;Описание структуры управления предприятием;Описание недостатков существующего на предприятии процесса контроля и учета товара на складе;Описание требований к разрабатываемой ЭИС;Описание перечня информационных потребностей.Во второй главе даны проектные решения по информационному обеспечению: дано описание информационной модели, описаны используемые классификаторы и системы кодирования, описана входная, выходная и справочная информация системы.Также даны проектные решения по программному обеспечению: описано дерево функций ЭИС, дано описание базы данных, описана структура пакета, описаны программные модули ЭИС.Третья глава была посвящена финансово-экономическому обоснованию разработки и внедрения ЭИСконтроля и учета товара на складе ООО «Форпост», в данной главе были даны:Расчет разработки и внедрения ЭИС на предприятии ООО «Форпост»;Расчет показателей экономической эффективности от внедрения ЭИС на предприятии;Выводы о целесообразности внедрения ЭИС на предприятии ООО «Форпост».Период окупаемости программного обеспечения составляет 1 месяц.Список использованных источниковАнтопольский А.Б. Проблемы классификации информационных ресурсов по критериям информационной безопасности/ А.Б. Антопольский. - НТИ.- 2007. - № 6.- С. 125-126.Атлас науки [Электронный ресурс]. – Режим доступа: http://www.atlasofscience.org/ (10.01.2009).Бочаров Е.П. Интегрированные Корпоративные информационные системы: Принципы построения: лабораторный практикум на/ Е.П. Бочаров. – М.: Финансы и статистика, 2005. – 234 с.Вузы России [Электронный ресурс]. – Режим доступа: http://www.students.ru (10.01.2009).Гончаров А. Самоучитель HTML/ А. Гончаров. - СПб.: Питер, 2006. - 240 с.: ил.Зенкин А.А. Основы когнитивной компьютерной графики/ А.А. Зенкин - М.:Наука, 2006. – 271 с.Зольников Д.С. PHP 5 Самоучитель/ Д.С. Зольников. - 2-е изд. – М, 2005. – 361 с.Интернет университет информационных технологий [Электронный ресурс]. – Режим доступа: http://www.intuit.ru (17.12.2008).Казиев. В.М. Введение в практическое тестирование [Электронный ресурс].– Режим доступа: http://www.intuit.ru/department/informatics/practest/ (20.01.2009).Карпова Т.С. Базы данных: модели, обработка, реализация / Карпова Т.С. – СПб.: Питер, 2005. – 392с.Клещев Н.Т. Проектирование информационных систем/ Н.Т. Клещев, А.А. Романов. – М.: Российская экономическая академия, 2000.- 283с.Кобринский Б.А. К вопросу о формальном отображении образного мышления и интуиции специалиста в слабоструктурированной предметной области / Б.А. Кобринский. - Новости искусственного интеллекта. – 2008.Колиснеченко Д.Н. PHP 5 Самоучитель/ Д.Н. Колиснеченко. – Изд. 3-е. – СПб, Наука и техника, 2006. – 352с.Конноли Т. Базы данных: проектирование, реализация и сопровождение. Теория и практика: [пер. с англ.] / Конноли Т., Бегг К., Страчан А. - 2-е изд.- М.: Вильямс, 2001. – 394с.Приложение 1 – Программный код модулейМодуль «Товары» - добавление наименования товараprocedure TForm1.suiButton7Click(Sender: TObject);begintrytsklad.Append;tsklad.FieldByName('kod_tovar').AsString:=suiMaskEdit3.text;tsklad.FieldByName('cost').AsString:=suiNumberEdit4.text;tsklad.FieldByName('treb').AsInteger:=strtoint(suiNumberEdit3.text);tsklad.FieldByName('kol').AsInteger:=strtoint(suiNumberEdit5.text);tsklad.FieldByName('nazv').AsString:=suiedit1.text;tsklad.FieldByName('nehvat').AsInteger:=StrToInt(suiNumberEdit5.text)-strtoint(suiNumberEdit3.text);tsklad.Post;ExceptMessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0);end; ADOQuery1.Active:=false; ADOQuery1.Active:=true;suiComboBox3.Items.Add(tsklad.FieldValues['kod_tovar']+' '+tsklad.FieldValues['nazv']);suiComboBox4.Items.Add(tsklad.FieldValues['kod_tovar']+' '+tsklad.FieldValues['nazv']); end;Модуль «Учет заявок» - добавление информации о заявке клиентаprocedure TForm1.suiButton4Click(Sender: TObject);begintrytzayv.Append;tzayv.FieldByName('kod_tovar').AsString:=copy(suiComboBox4.text,0,4);tzayv.FieldByName('kod_zayv').AsString:=suiMaskEdit2.text;tzayv.FieldByName('status').AsString:=suiComboBox2.text;tzayv.FieldByName('kol').AsInteger:=strtoint(suiNumberEdit2.text);tzayv.FieldByName('data_podachi').AsString:=suiMaskEdit7.text;tzayv.FieldByName('data_post').AsString:=suiMaskEdit8.text;tzayv.FieldByName('kontragent').AsString:=suiEdit2.text;tzayv.Post;ExceptMessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0);end;tsklad.Filtered:=false;tsklad.Filter:='kod_tovar='+copy(suiComboBox4.text,0,4);tsklad.Filtered:=true;tsklad.Edit;tsklad.FieldValues['treb']:=tsklad.FieldValues['treb']+strtoint(suiNumberEdit2.text);tsklad.post;tsklad.Edit;tsklad.FieldByName('nehvat').AsInteger:=tsklad.FieldValues['kol']-tsklad.FieldValues['treb'];tsklad.Post;tsklad.Filtered:=false;ADOQuery1.Active:=false;ADOQuery1.Active:=true;end;Модуль «Учет заявок» - фильтрация заявокprocedure TForm1.suiButton14Click(Sender: TObject);beginif fl3=false thenif suiComboBox4.Text='' then MessageDlg('Выберитенаименованиетовара!',mtInformation,[mbYes],0)elsebegintzayv.Filter:='kod_tovar='+copy(suiComboBox4.Text,0,4);tzayv.Filtered:=true; fl3:=true; suiButton14.Caption:='Снятьфильтр';endelsebegin fl3:=false;suiButton14.Caption:='Фильтр по наименованию';tzayv.Filtered:=false;end;end;procedure TForm1.suiButton13Click(Sender: TObject);beginif fl4=false thenif suiMaskEdit7.Text='__.__.__' then MessageDlg('Введитедатуподачизаявок!',mtInformation,[mbYes],0)elsebegintzayv.Filter:='data_podachi='+suiMaskEdit7.Text;tzayv.Filtered:=true; fl4:=true; suiButton13.Caption:='Снятьфильтр';endelsebegin fl4:=false; suiButton13.Caption:='Фильтрподате';tzayv.Filtered:=false;end;end;Модуль «Операции» - добавление информации о движении товараprocedure TForm1.suiButton1Click(Sender: TObject);var i:integer;begintrytoperacii.Append;toperacii.FieldByName('kod_tovar').AsString:=copy(suiComboBox3.text,0,4);toperacii.FieldByName('kod_oper').AsString:=suiMaskEdit1.text;toperacii.FieldByName('type_oper').AsString:=suiComboBox1.text;toperacii.FieldByName('kol').AsInteger:=strtoint(suiNumberEdit1.text);toperacii.FieldByName('data_oper').AsString:=suiMaskEdit5.text;toperacii.Post;ExceptMessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0);end;if suiComboBox1.text='поступление' thenbegintsklad.Filter:='kod_tovar='+copy(suiComboBox3.text,0,4);tsklad.Filtered:=true;tsklad.Edit;tsklad.FieldValues['kol']:=tsklad.FieldValues['kol']+strtoint(suiNumberEdit1.text); tsklad.post;tsklad.Edit;tsklad.FieldByName('nehvat').AsInteger:=tsklad.FieldValues['kol']-tsklad.FieldValues['treb'];tsklad.Post;tsklad.Filtered:=false;end;if suiComboBox1.text='отгрузка' thenbegintsklad.Filter:='kod_tovar='+copy(suiComboBox3.text,0,4);tsklad.Filtered:=true;tsklad.Edit;tsklad.FieldValues['kol']:=tsklad.FieldValues['kol']-strtoint(suiNumberEdit1.text); tsklad.post;tsklad.Edit; tsklad.FieldByName('nehvat').AsInteger:=tsklad.FieldValues['kol']-tsklad.FieldValues['treb']; tsklad.post;tsklad.Filtered:=false;end; ADOQuery1.Active:=false; ADOQuery1.Active:=true;end;Модуль «Операции» - фильтрация информации о складских операцияхprocedure TForm1.suiButton11Click(Sender: TObject);beginif fl1=false thenif suiMaskEdit5.Text='__.__.__' then MessageDlg('Введитедатуоперации!',mtInformation,[mbYes],0)elsebegintoperacii.Filter:='data_oper='+suiMaskEdit5.Text;toperacii.Filtered:=true; fl1:=true; suiButton11.Caption:='Снятьфильтр';endelsebegin fl1:=false; suiButton11.Caption:='Фильтрподате';toperacii.Filtered:=false;end;end;procedure TForm1.suiButton12Click(Sender: TObject);beginif fl2=false thenif suiComboBox3.Text='' then MessageDlg('Выберитенаименованиетовара!',mtInformation,[mbYes],0)elsebegintoperacii.Filter:='kod_tovar='+copy(suiComboBox3.Text,0,4);toperacii.Filtered:=true; fl2:=true; suiButton12.Caption:='Снятьфильтр';endelsebegin fl2:=false;suiButton12.Caption:='Фильтр по наименованию';toperacii.Filtered:=false;end;end;