Картотека сотрудников подразделения предприятия

Лит.

Лист

Листов

Провер.

Нач.бюро

Н.контр.

Утв.

 Экранная форма FR Процедура кнопки “Таблица ”

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.



Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.

 Экранная форма FR Процедура кнопки “Сортировка”

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.

 Экранная форма FR Процедура кнопки “Выборка”

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.



Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.



Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.

 Экранная форма FR Процедура кнопки “Заголовок”

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.

 Экранная форма FR Процедура кнопки “Создание Word-файла”

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.



Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.



Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.



Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.



Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.



Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.



Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.

 Экранная форма FR Процедура кнопки “ Создание Excel-файла ”

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.



Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.



Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.



Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.



Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.



Процедура кнопки “Выход”

Размещено на http://www.allbest.ru

Изм	Лист	№ докум.	Подп.	Дата
Разраб.					Лит.	Лист	Листов
Провер.
Нач.бюро
Н.контр.
Утв.

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

Экранная форма FR.

Свойства экранной формы FR

Top = 45

Left = 34

Height = 410

Width = 309

DoCreate = .T.

AutoCenter = .F.

BorderStyle = 2

Caption = "COM - сервер"

Closable = .F.

MaxButton = .F.

MinButton = .F.

Movable = .F.

WindowType = 1

Name = "FR"

Кнопка 1

Top = 45

Left = 60

Height = 27

Width = 192

Caption = "Таблица"

TabIndex = 1

Name = "Command2"

Кнопка 2

Top = 117

Left = 72

Height = 27

Width = 168

Caption = "Сортировка"

TabIndex = 2

Name = "Command1"

Кнопка 3

Top = 153

Left = 72

Height = 27

Width = 168

Caption = "Выборка"

TabIndex = 3

Name = "Command3"

Кнопка 4

Top = 189

Left = 72

Height = 27

Width = 168

Caption = "Заголовок"

TabIndex = 4

Name = "Command5"

Кнопка 5

Top = 270

Left = 72

Height = 27

Width = 168

Caption = "Создание Word - файла"

TabIndex = 7

Name = "Command8"

Кнопка 6

Top = 309

Left = 72

Height = 27

Width = 168

Caption = "Создание Excel - файла"

TabIndex = 8

Name = "Command6"

Кнопка 7

Top = 362

Left = 113

Height = 27

Width = 84

Caption = "Выход"

TabIndex = 9

Name = "Command4"

Линии:

Height = 0

Left = 24

Top = 105

Width = 264

Name = "Line1"

Height = 0

Left = 24

Top = 228

Width = 264

Name = "Line2"

Height = 124

Left = 24

Top = 105

Width = 0

Name = "Line3"

Height = 124

Left = 288

Top = 105

Width = 0

Name = "Line4"

Height = 0

Left = 24

Top = 261

Width = 264

Name = "Line5"

Height = 0

Left = 24

Top = 345

Width = 264

Name = "Line6"

Height = 84

Left = 24

Top = 261

Width = 0

Name = "Line7"

Height = 84

Left = 288

Top = 261

Width = 0

Name = "Line8"

Строки:

FontBold = .T.

FontSize = 12

Caption = "Исходные данные"

Height = 21

Left = 79

Top = 17

Width = 161

Name = "Label3"

FontBold = .T.

FontSize = 12

Caption = "Подготовка"

Height = 21

Left = 106

Top = 80

Width = 107

Name = "Label1"

FontBold = .T.

FontSize = 12

Caption = "Формирование"

Height = 21

Left = 96

Top = 238

Width = 131

Name = "Label2"

Исходный код процедуры кнопки «Таблицы».

fr.Enabled=.F.

select 1

use b1 order tag t1

define window win from 1,1 to 30,100 system close zoom font 'Arial',10

activate window win

on key label RightMouse append blank

browse fields p1:h='Таб.номер',p2:h='Фамилия',p3:h='Имя',p4:h='Отчество',p5:h='Должность',;

p6:h='Оклад',p7:h='Дата поступления',p8:h='Подразделение';

title 'Перечень сотрудников' nomenu

on key label RightMouse

deactivate window win

release window win

pack

use

fr.Enabled=.T.

Исходный код процедуры кнопки«Сортировка».

fr.Enabled=.F.

define window win from 9,20 to 18,47 title 'Сортировка' system font 'Courier',10

activate window win

x1=0

@ 1,3 get x1 function '*V Таб.номер;Фамилия;Дата поступления;Номер подразделения' size 1.5,35,0 font 'Arial',10

read cycle

deactivate window win

release window win

fr.Enabled=.T.

Исходный код процедуры кнопки«Выборка».

fr.Enabled=.F.

define window win from 9,20 to 16,48 title 'Выборка' system font 'Courier',10

activate window win

b=0

m=0

@ 1,3 say 'Номер подразделения'

@ 1,26 get b color ,n/bg* picture '@z 99'

@ 4,8 get m function '*H Ввод;Отмена' size 1.5,13,0 font 'Arial',10

read cycle

deactivate window win

release window win

if m=1

if b>0

select 1

use b1

locate for p8=b

if found()

x2=2

x2a=b

wait window ' Выборка установлена ' timeout 2

else

wait window ' Номер подразделения отсутствует' timeout 2

endif

use

else

wait window ' Ошибка в номере подразделения ' timeout 2

endif

else

x2=1

x2a=0

wait window ' Выборка не установлена ' timeout 2

endif

fr.Enabled=.T.

Исходный код процедуры кнопки«Заголовок».

fr.Enabled=.F.

define window win from 9,20 to 16,79 title 'Заголовок' system font 'Courier',10

activate window win

m=0

@ 1,3 say 'Содержимое заголовка'

@ 1,25 get x3 color ,n/bg*

@ 4,26 get m function '*H Ввод' size 1.5,13,0 font 'Arial',10

read cycle

deactivate window win

release window win

if x3=space(45)

wait window ' Заголовок не введен ' timeout 2

x3='Перечень сотрудников '

else

wait window ' Заголовок введен ' timeout 2

endif

fr.Enabled=.T.

Исходный код процедуры кнопки«Создание Word - файла».

fr.Enabled=.F.

if file('rez.dbf')

erase rez.dbf

endif

select 1

use b1 order tag t1

copy to rez fields p1,p2,p3,p4,p5,p6,p7,p8

use

select 1

use rez

do case

case x1=1

index on str(p1,3) to rez.idx

case x1=2

index on p2 to rez.idx

case x1=3

index on dtos(p7) to rez.idx

case x1=4

index on str(p8,2) to rez.idx

endcase

set index to rez.idx

if x2=2

delete for p8#x2a

pack

endif

cs=reccount()+1

ck=6

dimension m1(cs,6)

m1(1,1)='Таб.№'

m1(1,2)='Ф.И.О.'

m1(1,3)='Должность'

m1(1,4)='Оклад'

m1(1,5)='Дата пост.'

m1(1,6)='№ подр.'

go top

i=2

do while .not.eof()

m1(i,1)=str(p1,3)

m1(i,2)=rtrim(p2)+' '+substr(p3,1,1)+'.'+substr(p4,1,1)+'.'

m1(i,3)=p5

m1(i,4)=str(p6,5)

m1(i,5)=dtoc(p7)

m1(i,6)=str(p8,2)

skip

i=i+1

enddo

set index to

use

dimension m2(6)

m2(1)=60

m2(2)=150

m2(3)=100

m2(4)=60

m2(5)=80

m2(6)=50

*

* COM - сервер: Visual FoxPro и Microsoft Word

*

a1=CreateObject("Word.Application")

a1.Visible=.t.

a2=a1.Documents.Add

a2.PageSetup.TopMargin=73

a2.PageSetup.LeftMargin=57

a2.PageSetup.BottomMargin=74

a2.PageSetup.RightMargin=25

a1.Selection.Font.Name='Arial'

a1.Selection.Font.Size=14

a1.Selection.TypeText(x3)

a1.Selection.TypeParagraph

with a1

.Selection.Font.Name='Arial'

.Selection.Font.Size=12

.ActiveDocument.Tables.Add(.Selection.Range,cs,ck)

a3=.ActiveDocument.Tables(1)

with a3

i=1

do while i<=cs

j=1

do while j<=ck

if i=1

.Cell(i,j).Height=25

.Cell(i,j).Range.Bold=.T.

else

.Cell(i,j).Height=15

.Cell(i,j).Range.Bold=.F.

endif

b1=m1(i,j)

b2=m2(j)

.Cell(i,j).Width=b2

.Cell(i,j).Range.InsertAfter(b1)

j=j+1

enddo

i=i+1

enddo

endwith

i=1

do while i<=(cs+2)

.Selection.MoveDown

i=i+1

enddo

endwith

fr.Enabled=.T.

Исходный код процедуры кнопки«Создание Excel - файла».

fr.Enabled=.F.

if file('rez.dbf')

erase rez.dbf

endif

select 1

use b1 order tag t1

copy to rez fields p1,p2,p3,p4,p5,p6,p7,p8

use

*

* COM - сервер: Visual FoxPro и Microsoft Excel

*

e1=createobject('Excel.Application')

e1.WorkBooks.Add

e1.Visible=.T.

b=e1.Sheets.Count() &&число листов книги

* оставить только один лист

i=1

do while i<=(b-1)

e1.Sheets(1).Delete()

i=i+1

enddo

e2=e1.Sheets(1) &&установка листа 1

e2.Name='Лист 1'

e2.Range('A1').Value=x3

e2.Range('A3').Value='Таб.№'

e2.Range('B3').Value='Ф.И.О.'

e2.Range('C3').Value='Должность'

e2.Range('D3').Value='Оклад'

e2.Range('E3').Value='Дата пост.'

e2.Range('F3').Value='№ подр.'

select 1

use rez

do case

case x1=1

index on str(p1,3) to rez.idx

case x1=2

index on p2 to rez.idx

case x1=3

index on dtos(p7) to rez.idx

case x1=4

index on str(p8,2) to rez.idx

endcase

set index to rez.idx

if x2=2

delete for p8#x2a

pack

endif

go top

i=5

do while .not.eof()

e2.Cells(i,1).Value=str(p1,3)

e2.Cells(i,2).Value=rtrim(p2)+' '+substr(p3,1,1)+'.'+substr(p4,1,1)+'.'

e2.Cells(i,3).Value=p5

e2.Cells(i,4).Value=str(p6,5)

e2.Cells(i,5).Value=dtoc(p7)

e2.Cells(i,6).Value=str(p8,2)

skip

i=i+1

enddo

set index to

use

fr.Enabled=.T.

Исходный код процедуры кнопки«Выход».

fr.Release()

2.4 Описание процесса отладки программы

При отладке составленных программ был использован способ

пошагового выполнения программы и выявления при этом возможных

ошибок.

Все ошибки можно объединить в две группы:

- Синтаксические

- Логические.

К синтаксическим относятся ошибки неверного написания команд и
функций.

Примеры синтаксических ошибок:

Было: us

Надо: use

Было: skp

Надо: skip

Было: apend blank

Надо: append blank

Было: set tak off

Надо: set talk off

Было: go botom

Надо: go bottom

К логическим относятся ошибки, нарушающие логику программы.

Примеры логических ошибок:

Было: case ...

Надо: case ... endcase

Было: if ...

Надо: if ... endif

Было: do ...

Надо: do ... enddo

Были обнаружены и исправлены ошибки двух групп методом пошагового выполнения программы.

Далее представлены распечатки образов экранов пошагового выполнения программы после ее отладки.

Образы экранов на этапе выполнения.

Запуск программного обеспечения производится путем выполнения головной программы coms.prg.Данная программа устанавливает настройку среды FoxPro и передаёт управление экранной формы FR.

Рисунок 2.4.1.Экранная форма FR.

Выполнение экранной формы FR.В нее входят следующие кнопки: <Таблица>, <Сортировка>, <Выборка>, <Заголовок>, <Создание Word - файла>, <Создание Excel - файла>,<Выход>.

Процедура кнопки <Таблица> реализует работу со списком сотрудников.

Процедура кнопки <Сортировка> выполняет сортировку содержимого таблицы «Список сотрудников».

Процедура кнопки <Выборка> реализует функцию запроса из указанной таблицы по номеру подразделения.

Процедура кнопки <Заголовок> обеспечивает ввод заголовка в рабочую переменную.

Процедура кнопки <Создание Word - файла> реализует работу COM - сервера на основе FoxPro(приложение клиент) и Microsoft Word(приложение сервер).

Процедура кнопки <Создание Excel - файла> реализует работу COM - сервера на основе FoxPro(приложение клиент) и Microsoft Excel(приложение сервер).

Процедура кнопки <Выход> закрывает экранную форму и передает управление программе coms.prg.

Рисунок 2.4.2.Результат нажатия кнопки<Таблица>.

Выполнение процедуры кнопки <Таблица>.Работа с таблицей «Список сотрудников» производится с помощью браузера.Чтобы ввести новую пустую запись необходимо нажать RightMouse. Коректировка любого данного в таблице производится непосредственно. Пометка нужной записи на удаление производится нажатием LeftMouse в левой крайней колонке.

Рисунок 2.4.3.Добавление пустой записи в таблицу.

Рисунок 2.4.4.Ввод данных в пустую запись.

Рисунок 2.4.5.Пометка текущей записи на удаление.

Физическое удаление помеченной записи производится с помощью команды Pack после закрытия окна браузера.

Рисунок 2.4.6.Результат нажатия кнопки<Сортировка>.

В окне выводятся следующие кнопки: <Таб.номер>, <Фамилия>, <Дата поступления>, <Номер подразделения>. При выборе одной из кнопок исходная таблица сортируется по соответсвующему полю.

Рисунок 2.4.7. Результат нажатия кнопки <Выборка>.

В рабочую переменную предлагается ввести номер подразделения. Также в окне есть 2 кнопки:<Ввод>,<Отмена>. При нажатии кнопки <Отмена> выборка не устанавливается и управление возвращается в экранную форму. При нажатии кнопки <Ввод> производится анализ данного, введенного в рабочую переменную. Если там 0,то выдаётся соответствующее сообщение. Если вводится подразделение,которого нет в таблице, то выборка не устанавливается и выдается соответствующее сообщение.

Рисунок 2.4.8.Вывод сообщения «Выборка не установлена».

Сообщение, которое выдается при нажатии кнопки <Отмена> в окне запроса.

Рисунок 2.4.9.Вывод сообщения «Ошибка в номере подразделения».

Сообщение, которое выдается в окне запроса при нажатии кнопки <Ввод>, если номер подразделения - 0.

Рисунок 2.4.10.Вывод сообщения «Номер подразделения отсутствует».

Сообщение, которое выдается в окне запроса при нажатии кнопки <Ввод>,если набран номер подразделения, который отсутсвует в таблице.

Рисунок 2.4.11.Вывод сообщения «Выборка установлена».

Сообщение, которое выдается в окне запроса при нажатии кнопки <Ввод>, если набранный номер подразделения присутствует в таблице.

Рисунок 2.4.12.Ввод содержимого заголовка в окне «Заголовок».

В рабочей переменной уже введен заголовок по умолчанию, который можно подтвердить нажатием кнопки <Ввод>, либо ввести измененный заголовок.

Рисунок 2.4.13.Вывод сообщения «Заголовок не введен».

Сообщение, которое выводится при попытке ввести пустой заголовок.

Рисунок 2.4.14.Ввод измененного заголовка.

Рисунок 2.4.15.Вывод сообщения «Заголовок введен».

Сообщение, которое выводится после ввода заголовка.

Рисунок 2.4.16. Выполнение процедуры кнопки <Создание Word - файла>.

Исходная DBF - таблица сортируется в данном случае по табельному номеру, производится выборка по введенному номеру подразделения(11), Создаётся экземпляр класса Word Application, Создается Word - документ , в котором строится таблица, у которой 6 колонок, а строк столько, сколько в запросе из DBF - таблицы. Данные из DBF - таблицы передаются в ячейки Word - таблицы. Перед таблицей выводится заголовок, указанный в соответствующей рабочей переменной.

Рисунок 2.4.17. Выполнение процедуры кнопки <Создание Excel - файла>.

Данная процедура работает аналогично предидущей. В итоге сформированные данные передаются в Excel - лист.

2.5 Результаты решения задачи и их оценка

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

Из информации данного файла были выбраны сотрудники по указанному подразделению.

Документ представлен в виде таблицы списка сотрудников.

Документы выдавались на экран для просмотра и печатались на принтере.

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

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

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

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

Программа по формированию указанных документов составлена на языке команд СУБД FoxPro, что является правильным решением т.к задачи такого типа (т.е экономические или информационносправочные) решаются в настоящее время с использованием таких систем управления базами данных, как FoxPro и др.

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



3. Инструкция по эксплуатации программы

3.1 Общие сведения

Задача выполняется в среде FoxPro посредством запуска головной программы.

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

3.2 Запуск программы

1. Запустить на выполнение VFP6.EXE

2. В командном окне ввести DO coms.PRG

3.3 Входные и выходные данные

Выполняется экранная форма, состоящая из следующих кнопок:

1 Таблица

2 Сортировка

3 Выборка

4 Заголовок

5 Создание Word-файла

6 Создание Excel-файла

7 Выход

1 пункт для работы с таблицей «Список сотрудников». На экран выводится браузер, который обеспечивает следующие режимы работы:

ПРОСМОТР

ВВОД

КОРРЕКТИРОВКА

УДАЛЕНИЕ

2 пункт для сортировки таблицы с последующими признаками.

Табельный номер

Фамилия

Дата поступления

Номер подразделения

3 пункт для выборки записей по номеру подразделений

4 пункт для ввода заголовка Word или Excel таблицы

5 пункт для создания Word-файла,в котором создается таблица и в нее переводятся все данные из DBF-таблицы.

На экране появляется сформированный документ. Для просмотра и печати документа использовать стандартные возможности Word среды.

6 пункт для создания Excel-файла,в котором создается таблица и в нее переводятся все данные из DBF-таблицы.

На экране появляется сформированный документ. Для просмотра и печати документа использовать стандартные возможности Excel среды.

7 пункт для завершения работы



4. Экономическая часть

4.1 Построение сетевого графика для разрабатываемого ПП

Рисунок 4.4.1.Сетевой график.

Вся работа может быть выполнена не менее чем за 31 временных единиц;

Работы 1-2, 2-4,4-5,5-6,6-7,7-8,8-9,9-10,10-11, лежат на критическом пути и подлежат тщательному контролю.

Определение ранних и поздних сроков свершения событий

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

Наиболее ранний срок свершения события Т(Р1) - срок, необходимый для выполнения всех работ, предшествующих данному событию, - определяется, как максимальный путь, предшествующий событию:

Т(Р1) = L(МAХ)

Заполнить на графике в левом секторе ранние сроки свершения событий.

T(P1)=0 дн.

Т(Р2)=0+3=3 дн.

Т(РЗ)=3+4=7 дн.

Т(Р4)=3+5=8 дн.

Т(Р5)=3+5+6 =14 дн.

Т(Р6)=3+5+6+6=20 дн.

Т(Р7)= 3+5+6+6+6=26 дн.

Т(Р8)= 3+5+6+6+6+1=27 дн.

Т(Р9)= 3+5+6+6+6+1+1=28 дн.

Т(Р10)= 3+5+6+6+6+1+1+1=29 дн.

Т(Р11)= 3+5+6+6+6+1+1+1=31 дн.

Наиболее поздний срок свершения событии Т(Р1) -это такой срок свершения события, превышение которого вызовет аналогичную задержку наступления завершающего события J.

Т(P1)=Т(КР)-LМАХ(i-J)

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

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

Т(П11)=31 дн.

Т(П10)=29 дн.

Т(П9)=28 дн.

Т(П8)=27 дн.

Т(П7)=26 дн.

Т(П6)=20 дн.

Т(П5)=14 дн.

Т(П4)=8 дн.

Т(П3)=8 дн.

Т(П2)=3 дн.

Т(П1)=0 дн.

Нужно обратить внимание на события, лежащие на критическом пути.

Для событий, лежащих на критическом пути Т(КР), ранний срок свершения события ра-вен позднему сроку свершения события: Т(Р1)=Т(П1) для событий на критическом пути.

Определение сроков начала и окончания работ

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

а) Начало работ. Раннее начало работы (IJ) равно раннему сроку свершения начального события (I): Т(РН(IJ))=Т(Р1)

Т(РН(1-2))=0

Т(РН(2-3))=0+3=3

Т(РН(2-4))=0+3=3

Т(РН(4-5))=3+5=8

Т(РН(5-6))=3+5+6=14

Т(РН(6-7))=3+5+6+6=20

Т(РН(7-8))=3+5+6+6=26

Т(РН(8-9))=3+5+6+6+1=27

Т(РН(9-10))=3+5+6+6+1+1=28

Т(РН(10-11))=3+5+6+6+1+1+1=29

Начало позднее работы (IJ): Т(ПH(IJ))=Т(РJ)-Т(IJ)

Т(ПH(1-2))=0

Т(ПH(2-3))=0+4=4

Т(ПH(2-4))=0+3=3

Т(ПH(4-5))=3+5=8

Т(ПH(5-6))=3+5+6=14

Т(ПH(6-7))=3+5+6+6=20

Т(ПH(7-8))=3+5+6+6+6=26

Т(ПH(8-9))=3+5+6+6+6+1=27

Т(ПH(9-10))= 3+5+6+6+6+1+1=28

Т(ПH(10-11))= 3+5+6+6+6+1+1+1=29

б) Окончание работы. Раннее окончание работы (IJ) равно раннему сроку свершения на-чального события (I) плюс продолжительность работы (IJ): Т(Р0(IJ))=Т(РI)+T(IJ)

Т(Р0(1-2))=0+3=3

Т(Р0(2-3))=3+4=7

Т(Р0(2-4))=3+5=8

Т(Р0(4-5))=3+5+6=14

Т(Р0(5-6))=3+5+6+6=20

Т(Р0(6-7))=3+5+6+6+6=26

Т(Р0(7-8))=3+5+6+6+6+1=27

Т(Р0(8-9))=3+5+6+6+6+1+1=28

Т(Р0(9-10))=3+5+6+6+6+1+1+1=29

Т(Р0(10-11))=3+5+6+6+6+1+1+1+2=31

Позднее окончание работы равно позднему сроку свершения конечного события (J): Т(П0(IJ))=Т(НJ)

Т(П0(1-2))=0+3=3

Т(П0(2-3))=3+5=8

Т(П0(2-4))=3+5=8

Т(П0(4-5))=3+5+6=14

Т(П0(5-6))=3+5+6+6=20

Т(П0(6-7))=3+5+6+6+6=26

Т(П0(7-8))=3+5+6+6+6+1=27

Т(П0(8-9))=3+5+6+6+6+1+1=28

Т(П0(9-10))=3+5+6+6+6+1+1+1=29

Т(П0(10-11))=3+5+6+6+6+1+1+1+2=31

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



таблица 1.

Шифр работы	Начало работ	Окончание работ	Резерв работы Р(IJ)
	Раннее	Позднее	Раннее	Позднее
	Т(РН(IJ))=Т(Р1)	Т(ПН(IJ))= =Т(ПJ)-Т(IJ)	Т(РО(IJ))= =Т(Р1)+Т(IJ)	Т(ПО(IJ))= =Т(ПJ)
1-2	0	0	3	3	0
2-3	3	4	7	8	1
2-4	3	3	8	8	0
3-4	-	-	-	-	-
4-5	8	8	14	14	0
5-6	14	14	20	20	0
6-7	20	20	26	26	0
7-8	26	26	27	27	0
8-9	27	27	28	28	0
9-10	28	28	29	29	0
10-11	29	29	31	31	0

Резервы времени

Разница между длиной критического пути и длиной любого другого полного пути называется полным резервом времени-пути. Полный резерв пути показывает на предельное увеличение продолжительности этого пути. Резерв времени события показы-вает, на какой предельно допустимый период времени можно задержать свершение этого со-бытия, не вызывая при этом изменения общего срока создания объекта. Резерв времени со-бытия равен разности между поздним и ранним сроками свершения события. Р(I)=Т(ПI)-Т(РI). Этими резервами обладают только события, не лежащие на критическом пути.

Полный резерв времени работы Р(П(IJ)) могут иметь только работы не лежащие на кри-тическом пути. Резерв времени работы Р(П(П)) - это время, на которое можно увеличить продолжительность пути данной работы, не изменяя при этом продолжительности критиче-ского пути. Резерв времени работы равен разности между поздним и ранним началом работы или между поздним и ранним окончанием работы.

Р(П(IJ))=Т(П0(IJ))-Т(Р0(IJ))=Т(ПН(IJ)- Т(РН(IJ))

Определяем резервы времени работ и заносим их в таблицу 2.

4.2 Определение вероятности свершения завершающего события в заданный срок

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

По этому методу вероятность свершения завершающего события Р(К) в заданный срок Т(ДИР), есть функция от Z. Р(К)=F(Z) аргумент Z можно определить, используя формулу:

Z-аргумент нормальной функции распределения вероятностей; Т(ДИР)-директивный за-данный срок выполнения объекта; Т(КР)-срок свершения завершающего события по расчету (длина критического пути); -дисперсия работ, лежащих на критическом пути. Найдя Z, по таблице значений нормальной функции распределения вероятностей (таблица значений функции Лапласа), определяют вероятности свершения завершающего события в заданный срок Р(К). Если вероятность свершения завершающего события получилась < 0,25 , значит, маловероятно, что конечное событие свершится в заданный срок. Если вероятность равна 0,5 - существует реальная вероятность свершения завершающего события в заданный срок. Если вероятность > 0,65 - имеются избыточные ресурсы и можно улучшить сетевой график, про-ведя его оптимизацию, сократив до минимума Т(КР) - критический путь, т.е. срок выполне-ния всего объекта.

Определим Р(К) в нашей задаче:

Z=)/2.05 =0.5

, значения 2в табл.1

По таблице значений функции Лапласа аргументу Z=0.5 соответствует вероятность р(к)=0.6915. Следовательно, можно сделать вывод, что рассматриваемая работа будет выполнена в заданный срок, т.к. 0,35 < Р(к) < 0,65.

4.3 Расчет параметров сетевого графика

Таблица 2.

Шифр раб.	Наименование работы	Т MIN	Т НВ	Т МАХ	Т ОЖ	Работы	Рез. раб. Р(IJ)	д2 на Т(кр)
						Начало	Конец
						Ран.	Поз.	Ран.	Поз.
1-2	Получение задания на выполнение дипломного проекта	1	2	7	3	0	0	3	3	0	1,0
2-3	Выбор темы дипломного проекта	1	4	7	4	3	4	7	8	1	-
2-4	Написание введения	3	5	7	5	3	3	8	8	0	0,44
3-4	Фиктивная работа, показывающая невозможность написания введения без выбора темы дипломного проекта	-	-	-	-	-	-	-	-	-	-
4-5	Подготовка теоретической части	4	6	7	6	8	8	14	14	0	0,25
5-6	Подготовка расчетной части	5	6	7	6	14	14	20	20	0	0,11
6-7	Подготовка технологической части	4	5	7	6	20	20	26	26	0	0,25
7-8	Написание правил охраны труда	1	1	1	1	26	26	27	27	0	0
8-9	Написание пояснительной записки	1	1	1	1	27	27	28	28	0	0
9-10	Подготовка графического материала	1	1	1	1	28	28	29	29	0	-
10-11	Написание презентации	1	2	2	2	29	29	31	31	0	-

4.4 Сетевой график

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

Рисунок 4.4.2.Сетевой график.

Календарный план проведения работ

В общем случае составление календарного плана выполнения работ подразумевает заполнение таблицы, имеющей вид таблицы 10. Колонки 1-4 данной таблицы заполняются рассчитанными ранее сроками начала и окончания работ. Колонка 5 для каждой работы заполняется путем отсчета по календарю от даты начала всего комплекса работ, количества дней равного раннему сроку начала этой работы. Если работы выполняются только в рабочие дни, при отсчете дней по календарю необходимо пропускать выходные и праздничные дни. Аналогичным образом заполняется и колонка 6.

Перечень выполняемых работ	Продолжительность работ, календ. дн.	2014 год
Подготовка к созданию дипломного проекта	14	01.05-14.05
Фиктивная работа, показывающая невозможность написания введения без выбора темы диплома	-
Написание введения	7	14.05-21.05
Написание содержания дипломного проекта	21	21.05-11.06
Написание отчетного материала проекта	5	11.06-16.06



5. Мероприятия по технике безопасности и противопожарной безопасности

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

Настоящая инструкция подлежит обязательному и безусловному выполнению. За нарушение инструкции виновные несут ответственность в административном и судебном порядке в зависимости от характера последствий нарушения.

Соблюдение правил безопасной работы является необходимым условием предупреждения производственного травматизма.

1. Общие положения

Область распространения и порядок применения инструкции:

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

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

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

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

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

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

2. Виды опасных и вредных факторов

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

поражение электрическим током,

механические повреждения

электромагнитное излучение

инфракрасное излучение

опасность пожара

повышенный уровень шума и вибрации

Для снижения или предотвращения влияния опасных и вредных факторов необходимо соблюдать санитарные правила и нормы, гигиенические требования к видеодисплейным терминалам, персональным электронно-вычислительным машинам и организации работы (Утверждено Постановлением Госкомсанэпиднадзора России от 14 июля 1996 г. N 14 СанПиН 2.2.2.542-96), и Приложение 1,2

3. Требования электробезопасности

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

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

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

2. Во избежание повреждения изоляции проводов и возникновения коротких замыканий не разрешается:

а) вешать что-либо на провода;

б) закрашивать и белить шнуры и провода;

в) закладывать провода и шнуры за газовые и водопроводные трубы, за батареи отопительной системы;

г) выдергивать штепсельную вилку из розетки за шнур, усилие должно быть приложено к корпусу вилки.

3. Для исключения поражения электрическим током запрещается:

а) часто включать и выключать компьютер без необходимости;

б) прикасаться к экрану и к тыльной стороне блоков компьютера;

в) работать на средствах вычислительной техники и периферийном оборудовании мокрыми руками;

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

д) класть на средства вычислительной техники и периферийном оборудовании посторонние предметы.

3. Запрещается под напряжением очищать от пыли и загрязнения электроооборудование.

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

5. Ремонт электроаппаратуры производится только специалистами-техниками с соблюдением необходимых технических требований.

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

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

8. При пользовании элетроэнергией в сырых помещениях соблюдать особую осторожность.

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

10. Спасение пострадавшего при поражении электрическим током главным образом зависит от быстроты освобождения его от действия током.

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

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

Искусственное дыхание пораженному электрическим током производится вплоть до прибытия врача.

4. Требования по обеспечению пожарной безопасности

На рабочем месте запрещается иметь огнеопасные вещества

В помещениях запрещается:

а) зажигать огонь;

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

в) курить;

г) сушить что-либо на отопительных приборах;

д) закрывать вентиляционные отверстия в электроаппаратуре

Источниками воспламенения являются:

а) искра при разряде статического электричества

б) искры от электроборудования

в) искры от удара и трения

г) открытое пламя

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

Помещения с электроборудованием должны быть оснащены огнетушителями типа ОУ-2 или ОУБ-3.



Заключение

Целью дипломного проекта является создание программного обеспечения по данной теме, которое включает в себя создания com сервера FoxPro и Microsoft Word, и Excel.

Для составления программы был разработан подробный алгоритм а также изучены основы программирования в СУБД FoxPro V6.0, работа на персональном компьютере типа Pentium 4 и основные моменты работы операционной системы Windows XP.

В программе реализованы все требования, которые предъявлялись к дипломному проекту. По разработанному алгоритму (блок - схеме) была составлена и отлажена программа. На этапах выполнения и отладки все выявленные ошибки были изучены и устранены. Данная программа заключает в себе широкий набор функций, т.е. команды работы с внешними устройствами (видеомонитор и принтер), а также команды работы с файлами базы данных организованными по методу используемому в СУБД FoxPro. Кроме этого в программе использованы основные команды для всех языков программирования т.е. присваивание, цикл, условие, открытие и закрытие файлов.

При написании и отладке программы использовались основные моменты работы в среде OS Windows XP.

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

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

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

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

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



Список литературы

1. М.Базиян, Использование Visual FoxPro 6.0 М.: Издательский дом `Вильямс', 2000 c.928

2. А.Микляев, Учебник пользователя IBM PCМ.: Альтекс-А,2002 c.702

3. Л.Омельченко, Самоучитель Visual FoxPro 6.0СП.: БХВ-Санкт-Петербург,2000 с.512

4. Р.Пэддок, Visual FoxPro 6.0 Разработка корпоративных приложений

М.: ДМК,2000 c.592

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