Реферат: Отчет по практике в информационных технологиях управления производством - Refy.ru - Сайт рефератов, докладов, сочинений, дипломных и курсовых работ

Отчет по практике в информационных технологиях управления производством

Рефераты по коммуникации и связи » Отчет по практике в информационных технологиях управления производством
Оглавление

2

Оглавление 2


Электронные информационные технологии управления на предприятии


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

Ведется база данных, в которой отражены все сотрудники, а также сведения о них, помещения, работы. База данных активно пополняется и изменяется программистами.

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


Уровни автоматизации управления на предприятии


На предприятии автоматизировано:

Изготовление лекал;

Склад;

Учет готовой продукции;

Учет сырья;

Учет сотрудников;

Учет помещений;

Учет оборудования;

Заявки на работы и ремонты.


Информационные технологии управления предприятием


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

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


Электронное документационное управление предприятием


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

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


Автоматизация процессов делопроизводства на предприятии


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


Производственные задачи с использованием Internet, использование ресурсов Internet в работе предприятия


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

Кроме того, Internet используется для поддержки фирменного сайта предприятия, на котором расположена информация о предприятии, контактные данные для обратной связи, каталог продукции и другое.


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


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


Топология, структура сети, используемое сетевое оборудование корпоративной сети предприятия


Топология построения сети на предприятии – звезда.

Используются оптические магистрали и медные витые пары в зданиях. В удаленных точках используется Wi-Fi. Активное сетевое оборудование – коммутаторы.


Организация и оценка уровня эффективности системы защиты информации на предприятии


Защита от проникновения из Internet – аппаратный шлюз и выделенный прокси-сервер с установленным антивирусом.

Защита от атак на рабочих местах – антивирус Касперского. Защита от несанкционированного доступа на рабочих местах – использование паролей. Защита от потери информации – ее централизованное хранение на сервере и резервное копирование.


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


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


Организация хранения и поиска экономической информации (классификация СУБД, использование СУБД в управлении предприятием)


В качестве СУБД используется Informix, работает под управлением OS Linux.


Выводы и рекомендации по совершенствованию информационной структуры предприятия


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


Индивидуальное задание


Цель задачи:

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

Рис. 1 Окно программы


Листинг программы:

unit Unit1;


interface


uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, Grids, StdCtrls;


type

TForm1 = class(TForm)

Button1: TButton;

Button2: TButton;

Button3: TButton;

StringGrid1: TStringGrid;

OpenDialog1: TOpenDialog;

procedure Button3Click(Sender: TObject);

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;


var

Form1: TForm1;


massiv: TStringList;

simvol,stroka,razmer: string;

i,j,n,m,razm,temp: integer;

arr: array [1..88,1..88] of integer;

diagonal: array [1..88] of integer;


implementation


{$R *.dfm}


procedure TForm1.Button3Click(Sender: TObject);

begin

application.Terminate;

end;


procedure TForm1.Button1Click(Sender: TObject);

begin

i:=0;

j:=1;

if opendialog1.Execute then

begin

massiv:=TStringList.Create;

massiv.LoadFromFile(OpenDialog1.FileName);

razmer:=massiv.Strings[0];

end;

for n:=1 to length(razmer) do

if razmer[n]<>' '

then simvol:=simvol+razmer[n]

else begin

StringGrid1.ColCount:=StrToInt(simvol);

StringGrid1.RowCount:=StrToInt(simvol);

razm:=StrToInt(simvol);

end;

for n:=1 to massiv.Count-1 do

begin

stroka:=massiv[n]+' ';

simvol:='';

j:=1;

inc(i);

for m:=1 to length(stroka) do

begin

if stroka[m]<>' '

then simvol:=simvol+stroka[m]

else begin

arr[i,j]:=StrToInt(simvol);

inc(j);

simvol:='';

end;

end;

end;

for i:=1 to razm do

for j:=1 to razm do

StringGrid1.Cells[j-1,i-1]:=IntToStr(arr[i,j]);


end;


procedure TForm1.Button2Click(Sender: TObject);

begin

for i:=1 to razm do diagonal[i]:=arr[i,i];

for i:=1 to razm do

begin

n:=diagonal[i];

j:=i-1;

while (j>=0) and (diagonal[j]>n) do

begin

diagonal[j+1]:=diagonal[j];

j:=j-1;

diagonal[j+1]:=n;

end;

end;

for i:=1 to razm do

StringGrid1.Cells[i-1,i-1]:=IntToStr(diagonal[i]);

end;


end.