Міністерство освіти і науки України
Вінницький національний технічний університет
Інститут автоматики, електроніки та комп’ютерних систем управління
Факультет автоматики та комп’ютерних систем управління
Кафедра комп’ютерних
систем управління
СИСТЕМА УПРАВЛІННЯ БАЗОЮ ДАНИХ ВІДДІЛУ КАДРІВ В СЕРЕДОВИЩІ FOXPRO
Пояснювальна записка
з дисципліни ”Бази знань та експертні системи”
до курсового проекту за спеціальністю
“Системи управління і автоматики”
08-01.БЗЕС.005.00.000 ПЗ
Вінниця ВНТУ 2007
Міністерство освіти і науки України
Вінницький національний технічний університет
Інститут автоматики, електроніки та комп’ютерних систем управління
ЗАТВЕРДЖУЮ
Зав. кафедри КСУ, д.т.н., проф.
В.М.Дубовой
“28
” __08
___ 2007 р.
Протокол № 1
ІНДИВІДУАЛЬНЕ ЗАВДАННЯ
на виконання курсового проекту з дисципліни “Бази знань та експертні системи”
студенту Кульчицький О.В.
групи 4АС-05
Варіант №5
Тема : СУБД відділу кадрів в середовищі FoxPro.
Вихідні дані:
1. Середовище FoxPro.
2. Особисті листки по обліку кадрів.
Необхідні результати:
1. Списки працівників за заданою ознакою (певного підрозділу, віку, освіти тощо)
Зміст
Анотація
Вступ
1.Розробка структурної схеми БД
1.1 Схема даних програм
2.Розробка структури програмного забезпечення
2.1 Розробка інтерфейсу
2.2 Розробка функціональних підсистем
3.Розробка експлуатаційної документації
3.1 Керівництво програміста
3.2 Керівництво користувача
3.3 Керівництво адміністратора
4.Тестування БД
Висновки
Використана література
Додатки37
Додаток А (обов‘язковий) СУБД відділу кадрів в середовищі FoxPro. Технічне завдання
Додаток Б (обов‘язковий) Лістинг програми
Додаток В Графічні матеріали
Анотація
В курсовому проекті представлена СУБД відділу кадрів. Дане програмна оболонка розроблена для регуляції роботи пошукового процесу, та слідкуванням за станом кадрів. Проведено нормалізацію та розроблене ER-модель СУБД. Розглянуто функціональні підсистеми, побудовано схеми даних програми та інтерфейсу. Проведено ряд тестувань програми, на основі якого зроблений висновки що до переваг та недоліків програмного продукту.
Вступ
В даному курсовому проекті потрібно розробити систему управління базою даних відділу кадрів, яка базується на створенні та нормалізації таблиць в яких повинні міститься дані про людей та їх персональні відомості, та реалізувати дану задачу на комп’ютері в середовищі FoxPro.
Програма повинна бути доступна будь якому користувачеві , незалежно від навиків та знань програмування. Основана задача створеної оболонки: облік кадрів, а також одержання додаткових відомостей про них.
1
Розробка структурної схеми БД
1.1 Схема даних програми
Перед нами поставлено задачу створити систему управління базою даних кадрів. Вхідними даними являються особисті листки по обліку кадрів. Виходячи з цього можна створити необхідних атрибутів.
Відділ Кадрів
(Ідентифікаційний номер, Працівник(ПІБ),Рік народження, Місце народження, Національність, Сімейний статус, Місце проживання, Освіта, Спеціальність, Мови, Вчена степінь, Труди , Відділ);
Після проведення нормалізації отримаємо три таблиці:
Кадр ( Ідентифікаційний номер
, працівник(ПІБ), рік народження, місце народження, національність , місце проживання, сімейний статус );
Освіта ( Вид освіти
, спеціальність , володіння мовами , вчена степінь, виконана праця, розробки);
Відділ (Номер відділу
, назва відділу ).
Маючи чотири таблиці можна побудувати ER – модель. Отримаємо:
Рисунок 1 - Схема даних БД
На основі даної схеми даних ми можемо зіставити зв’язки між об’єктами нашої БД табляця 1.1
Таблиця 1.1 – Зв’язність: відділ кадрів
| Працівник | Освіта | Підрозділ | |
| Працівник | Х | 1:1 | 1:1 |
| Освіта | 1:N | Х | |
| Підрозділ | 1:N | Х |
На підставі таблиці 1.1 визначимо правильні зв’язаності:
Працівник (1:1) <-->(1:N) освіта = (1:1)
Працівник (1:1) <-->(1:N) підрозділ =(1:N)
2 Розробка структури програмного забезпечення
2.1 Розробка інтерфейсу
Опис графічних об’єктів інтерфейсу показано в таблиці 2.1:
Таблиця 2.1 Опис графічних об’єктів
| Назва об’єкта
|
Тип об’єкта
|
Значення
|
| Ідентифікаційний номер | Поле | 12345 |
| Працівник(ПІБ) | Поле | Романцев Роман |
| Рік народження | Дата | 23/12/2007 |
| Місце народження | Поле | Україна м.Вінниця |
| Національність | Поле | Українець |
| Сімейний статус | Поле | жонат |
| Вид освіти | Поле | вища |
| Володіння мовами | Поле типу memo | українська |
| Вчена степінь | Поле | Доцент |
| Виконана праця | Поле типу memo | Система автоматизованого управління рукою маніпулятора |
| Номер відділу | Поле | 23456 |
| Назва відділу | Поле | Обчислюваний центр |
На малюнку 2.1 зображена головне меню СУБД відділ кадрів.
Рисунок 2.1 – меню СУБД відділ кадрів
Головна меню містить декілька функціональних підсистем. Які представлені у вигляді звичайних пунктів меню:
За допомогою пункту меню ”Forms” можна переглядати, редагувати та змінювати всі записи стосовно обліку кадрів, кожної таблиці окремо. Натиснувши меню ”Reports”, після вибору потрібного пункту меню можна переглядати та роздрукувати списки працівників.
Натиснувши меню ”About” виводить на екран форму(відомість) про автора програми.
Структура пункту меню ”Forms” має наступний вигляд(рисунок 2.2)
Рисунок 2.2 – Структура пункту меню ”Forms”
Даний пункт меню має п’ять основних вкладок. Перші три вкладки(“Kadri”, ”Education”, ”Department”) містять окремі відомості по кожній таблиці даної БД. Останні дві форми містять у собі зв’язану інформацію типу Працівник-освіта та Працівник-відділ ( в яких міститься інформація про працівників їх освіту та відношення до деякого відділу).
Що дає змогу легко та швидко знайти всі відомості, щодо певного працівника.
На (рисунку 2.3) зображена форма типу Працівник-освіта, яка дозволяє переглядати інформацію стосовно освіти працівників.
Рисунок 2.3 – Форма типу працівник-освіта
На даному Рис. 2.3 відображається відомості про працівника, його освіта, спеціальність, знання мов.
Це дає змогу вибрати певного працівника за деякими критеріями: володіння мовами, спеціальністю, вченою степінь, національністю.
На (рисунку 2.4) зображена форма типу Працівник-відділ, яка дозволяє переглядати інформацію стосовно певного місця роботи працівників. Вона дозволяє переглядати записи у БД, шукати працівників за певним критерієм, виводити на друк певні відомості, додавати і редагувати записи.
Рисунок 2.4 – Форма типу працівник-освіта
Форма зображена на (рисунку 2.4) відображає детальну інформацію стосовно працівників, та їх відношення до певного підрозділу. Це надзвичайно потрібно для ведення статистики, щодо працівників і їх місця зайнятості у певному підрозділі.
На рисунку 2.5 зображена форма, яка дає змогу переглядати відомості про працівників, додавати, редагувати та видаляти відомості щодо працівників.
Рисунок 2.5 – Форма обліку працівників
На рисунку 2.6 зображена форма, яка дає змогу переглядати відомості про певні підрозділи, де працюють працівники. За допомогою цієї форми користувач може додавати, редагувати та видаляти відомості щодо певних підрозділів.
Рисунок 2.6 – Форма обліку підрозділів
Структура пункту меню ”Rports” має наступний вигляд рисунок 2.7
Рисунок 2.7 – Структура меню ”Rports”
Даний пункт меню має дві основні вкладки. Вкладка “Kadri_education” формує звіт стосовно інформації працівників та їх освіти. Вкладка “Kadri_department” формує звіт стосовно інформації працівників та певного підрозділу де вони працевлаштовані.
Це дає змогу легко та швидко надати всі необхідні відомості, щодо певного працівника.
На рисунку 2.8 зображен звіт типу працівник-освіта, який надає детальну інформацію щодо працівників та їх освіти. За допомогою даного звіту можна переглядати дані, або виводити їх на друк.
Рисунок 2.8 – Звіт типу працівник-освіта
На рисунку 2.9 зображено звіт типу працівник-підрозділ, який надає детальну інформацію щодо працівників та їх працевлаштування у певному підрозділі. Даний звіт надає можливість переглядати дані, або виводити їх на друк
Рисунок 2.9 – Звіт типу працівник-підрозділ
Структура пункту меню ”Rports” має наступний вигляд(рисунок 2.10)
Рисунок 2.10 – Структура меню “About”
Даний пункт меню має всього одну основну вкладку. Вкладка “Author” виводить на екран форму, яка виводить детальну інформацію про розробника даного програмного забезпечення.
Це дає змогу легко та швидко надати детальну інформацію про автора даної СУБД.
Структура пункту меню ”File” має наступний вигляд (рисунок 2.11)
Рисунок 2.11– Структура меню “ File ”
Даний пункт меню має всього одну основну вкладку. Вкладка “Exit” надає змогу користувачеві вийти з СУБД відділу кадрів до головного меню середовища Visual FoxPro.
2.2
Розробка функціональних підсистем
Наша система складається з чотирьох функціональних підсистем:
1)Перегляду записів;
Дана підсистема створена в режимі конструктора форм.
.
Рисунок 2.12 - Кнопка перегляду записів
Добавивши необхідні таблиці, тобто таблиці які потрібні для вивдення на екран необхідних відомостей а додавши певний програмний код на метод натиснення кнопки(рисунок 2.13):
Рисунок 2.13 - Процедура перегляду записів
Аналогічне створення відбувається і в інших підсистемах, але додаємо різні таблиці відповідно до поставленої задачі.
2)Додання запис;
Дана підсистема створена в режимі конструктора форм.
Рисунок 2.14 - Кнопка додання запису у БД
Дана функціональна система призначена для додання запису у кінець БД. Це надзвичайно потрібно для додання нових відомостей про працівників. Додання запису відбувається шляхом додання у методі натиснення кнопки програмного коду типу Append Blank.
3)Редагування запису;
Рисунок 2.15 - Кнопка редагування запису файлу БД
Редагування записів відбувається шляхом додання у метод натиснення кнопки програмного коду типу Edit.
4)Видалення запису;
Рисунок 2.16 - Кнопка видалення запису з БД
Видалення записів з файлу БД відбувається шляхом додання у метод натиснення кнопки програмного коду типу delete. Після натиснення даної функціональної кнопки СУБД помічає вибрані записи на видалення.Схема функціональної підсистеми зображена на рисунку 2.17
Рисунок 2.17 - Розробка функціональних підсистем
Дана функціональна система надає змогу користувачеві в повній мірі користуватися достатньо потужною СУБД. Вхідними даними особисті листки по обліку кадрів.
3 Розробка експлуатаційної документації
3.1 Керівництво програміста
Розроблена СУБД призначена для систематизації обліку кадрів. Програмний продукт призначений для спрощення роботи бухгалтерії. Для експлуатації даної СУБД необхідна наявність:
- операційна система WINDOWS ХР;
- пакет програм Microsoft Visual FoxPro v8.0;
Вимоги до апаратного забезпечення:
- місця на диску не менше 7Мб
Усі необхідні для роботи дані знаходяться в таблицях, в які можна заносити дані, а також редагувати та вилучати. За допомогою форм можна отримувати необхідні нам результати: списки працівників за заданою ознакою (вік, освіта, певного підрозділу ).
3.2
Керівництво користувача
Створена СУБД дуже легка у використанні, навіть якщо користувач не мав досвіду програмування. Працюючи з даною СУБД, користувач може:
1. Виводити на друк та на екран записи, що містить наш база даних за певним критерієм пошуку.
2. Добавляти нові і корегувати старі дані в базі дані.
Всі операції здійснюються за допомогою функціональних кнопок:
- перегляд; - виведення на друк; редагування; та вихід .
1. За допомогою кнопки ”Перегляд ” можна переглядати всі записи СУБД відділу кадрів, ПІБ працівника, освіти, певного підрозділу. Натиснувши кнопку ”Виведення на друк”, після вибору потрібної строки даний звіт можна роздрукувати.
Натискання кнопки ”Перегляд” виводить на екран наступні відомості:
Рисунок 3.1- облік кадрів (перегляд)
2. Вкладка «Редагування» призначена для доповнення БД, та має наступні можливості:
Рисунок - 3.2 облік кадрів (редагування)
Натиснувши кнопку редагування з’явиться форма запропонує нам від коректувати деякі поля рисунок 3.3 . Для поповнення бази даних працівниками , необхідно натиснути кнопку з чистим листком і ввести у запропоновані поля нові дані. Для всіх цих даних існують окремі поля.
Рисунок 3.3 – Форма редагування запису
Натиснувши пункт меню reports користувач зможе отримати детальну інформацію про всіх працюючих працівників рисунок 3.4.
Рисунок 3.4 – Звіт списки працівників
Якщо ви бажаєте отримати детальну інформацію про певні підрозділи та працівників ,які працюють у них вам необхідно вибрати пункт меню reports рисунок 3.5.
Рисунок 3.5 – Звіт підрозділи
При виборі пункту меню About користувач має можливість дізнатися про розробника даної СУБД відділу кадрів рисунок 3.6.
Рисунок 3.6 – Інформація про розробника
3.3
Керівництво адміністратора
Перед початком роботи з БД необхідно перевірити комп’ютер на наявність вірусів , щоб уникнути втрати даних та потрапляння небезпечних вірусів які можуть пошкодити базу даних. Можливе встановлення паролю, якщо є така необхідність.
Перед тим як користувач хоче використати яку-небудь функцію, він повинен отримати дозвіл від адміністратора. Тому він посилає йому запит, комп’ютер перевіряє, що це за функція і потім тільки адміністратор дає або не дає дозвіл на використання цієї функції.
Також користувач не може змінювати, вводити визначені дані, що задаються адміністратором.
Якщо БД використовується як мережева, то користувачі не можуть заповнювати БД, коли адміністратор вносить якісь зміни. В такому випадку адміністратор перед початком повинен відключити мережу. Одним з недоліків такої БД є те, що при відключенні живлення дані можуть втрачатися (при відсутності авто - збереження), але в загальному всі операції, що виконуються з БД миттєво зберігаються, для уникнення небажаних втрат інформації.
4 Тестування БД
Для запуску СУБД необхідно запустити файл proj1.app. На екрані з’явиться меню:
Рисунок 4.1 – Головне меню proj1.app
Для того, щоб переглянути записи працівників та їхню освіту необхідно вибрати пункт меню Forms->Kadri_Education рисунок 4.2.
Рисунок 4.1- Форма працівник-освіта
Для того, щоб переглянути записи працівників та їхнє працевлаштування у певному підрозділі необхідно вибрати пункт меню Forms->Kadri_Department рисунок 4.3.
Рисунок 4.3 – Форма працівник-підрозділ
Для того, щоб додати запис у базу даних необхідно натиснути на кнопку з зображенням чистого листка перед вами зявиться форма запиту до якої таблиці слід додати запис рисунок 4.4
Рисунок 4.4 – Форма додання запису
Після вибору пункту меню Add record to both і внесення відповідних даних отримаємо новий запис рисунок 4.5
Рисунок 4.5– Новий запис у базі даних
При необхідності коректування запису необхідно натиснути на кнопку редагування даних рисунок 4.6
Рисунок 4.6 – Форма зі зміненим записом
При необхідності друку звіту стосовно працівників і
Рисунок 4.7 – Звіт підрозділи
При необхідності з бази даних можна вибрати працівників за певним типом освіти, для цього необхідно вибрати Reports->Kadri_Education рисунок 4.8.
Рисунок 4.8 – Звіт освіта кадрів
Для виходу з програми вам необхідно вибрати пункт меню File->Exit рисунок 4.9
Рисунок 4.9 – Вихід з програми
Висновки
У даному курсовому проекті розроблене СУБД відділу кадрів в середовище FoxPro, на основі створеного проектування і побудови бази даних , та проведення тестування, можна зробити висновок , дана програма працює коректно та відповідно вимог індивідуального завдання.
Список використаної літератури
1. В.М. Дубовой. Бази знань та експертні системи. Конспект лекцій. – В.: ВНТУ, 2007
2. Л.И. Омельченко.Visual FoxPro. Руководство пользователя с примерами. – К.: Бамбук, 2000. – 376 c.
3. О.Н. Романюк, Т.О. Савчук. Організація баз даних і знань.Навчальний посібник. – В.: УНІВЕРСУМ-Вінниця, 2003. – 217с.
4. Т.И. Гусева, Ю.Б. Башин. Проектирование баз данных в примерах и задачах. – М.: Радио и связь, 1992.
5. Джеффри Д. Ульман, Дж. Уидом. Введение в системы баз данных. – М.: Лори, 2000. – 376с.
6. Р. Райордан. Основы реляционных баз данных. – М.: Издательско-торговый дом Русская Редакция, 2001. – 384с.
7. В.Ю. Коцюбинский. Прикладні програмні системи. Конспект лекцій. – Вінниця: ВДТУ, 2002. – 73с.
Додаток А
(обов‘язковий)
Міністерство освіти і науки України
Вінницький національний технічний університет
Факультет автоматики та комп’ютерних систем управління
Кафедра комп’ютерних систем управління
Затверджено
Керівник д.т.н., проф.________________ Дубовой В.М.
“____” ________ 2007 р
Розробив
Студент гр. 4АС-05 ____________ Кульчицький О.В.
“____” ________ 2007 р
ТЕХНІЧНЕ ЗАВДАННЯ
на курсовий проект на тему:
“ СУБД відділу кадрів в середовищі FoxPro”
08-01.БЗЕС.005.00.000 ПЗ
1. Призначення та галузь застосування розробки.
1.1 Призначення – облік працівників.
1.2 Галузь застосування – в бухгалтеріях, підрозділах по обліку кадрів, відділах прийому на роботу, відділах зайнятості .
2. Основа розробки – особисті листки обліку кадрів.
3. Мета розробки.
3.1 Мета курсового проекту - створення системи управління базою даних відділу кадрів.
3.2 Перелік головних функцій.
- Перехід по записам бази даних;
- корегування будь-якого запису;
- додання нового запису до бази даних;
- видалення запису з бази даних;
- пошук по деяким ключовим словам.
4.Джерела розробки - індивідуальне завдання на курсовий проект з дисципліни, літературні та інші технічні матеріали з дисципліни бази знань та експертні системи.
5.Технічні вимоги.
5.1. Вимоги до програмної платформи
5.1.1. Наявність програмного середовища Visual FoxPro (6-9).
5.2.1 Операційна система – WINDOWS XP.
6. Етапи розробки:
1.Постановка задачі
2.ER- моделі
3.Алгоритми методів розв’язання задачі
4.Часткова програмна реалізація модулів
5.Тестування реалізованих програм модулів
7. Порядок контролю та приймання курсового проекту:
Отримання завдання на виконання курсового проекту – 26.09.2007 р.
Термін здачі курсового проекту на перевірку – до 17.12.2007 р.
Термін захисту курсового проекту – до 21.12.2007 р.
Додаток Б
(обов‘язковий)
Лістинг програми відділ кадрів
головна програма
HIDE WINDOW all
CLEAR ALL
DO menu1.mpr
головне меню
SET SYSMENU TO
SET SYSMENU AUTOMATIC
DEFINE PAD _21k04swkq OF _MSYSMENU PROMPT "File" COLOR SCHEME 3 ;
KEY ALT+F, ""
DEFINE PAD _21k04swkr OF _MSYSMENU PROMPT "Forms" COLOR SCHEME 3 ;
KEY ALT+F, ""
DEFINE PAD _21k04swks OF _MSYSMENU PROMPT "Reports" COLOR SCHEME 3 ;
KEY ALT+R, ""
DEFINE PAD _21k04swkt OF _MSYSMENU PROMPT "About" COLOR SCHEME 3 ;
KEY ALT+A, ""
ON PAD _21k04swkq OF _MSYSMENU ACTIVATE POPUP file
ON PAD _21k04swkr OF _MSYSMENU ACTIVATE POPUP forms
ON PAD _21k04swks OF _MSYSMENU ACTIVATE POPUP reports
ON PAD _21k04swkt OF _MSYSMENU ACTIVATE POPUP newitem
DEFINE POPUP file MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF file PROMPT "Exit"
ON SELECTION BAR 1 OF file set sysmenu to default
DEFINE POPUP forms MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF forms PROMPT "Kadri"
DEFINE BAR 2 OF forms PROMPT "Education"
DEFINE BAR 3 OF forms PROMPT "Department"
DEFINE BAR 4 OF forms PROMPT "Kadri_Education"
DEFINE BAR 5 OF forms PROMPT "Kadri_Department"
ON SELECTION BAR 1 OF forms do form form_main.scx
ON SELECTION BAR 2 OF forms do form form_edu.scx
ON SELECTION BAR 3 OF forms do form form_dep.scx
ON SELECTION BAR 4 OF forms do form main_edu.scx
ON SELECTION BAR 5 OF forms do form main_dep.scx
DEFINE POPUP reports MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF reports PROMPT "Kadri_education"
DEFINE BAR 2 OF reports PROMPT "Kadri_department"
ON SELECTION BAR 1 OF reports report form main_edu.frx preview
ON SELECTION BAR 2 OF reports report form main_dep.frx preview
DEFINE POPUP newitem MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF newitem PROMPT "Author"
ON SELECTION BAR 1 OF newitem do form author.scx
REPORT FORM main_dep.frx preview
інформація про автора
Left = 0
Width = 0
Height = 0
DataSource = .NULL.
Name = "Dataenvironment"
Caption = "Про автора"
Name = "Form1"
Height = 24
Left = 108
Top = 36
Width = 180
Name = "Label1"
Height = 24
Left = 140
Top = 60
Width = 108
Name = "Label2"Picture = fox.bmp
Height = 230
Left = 15
Top = 11
Width = 58
Name = "Image1"
Caption = "Курсовой проект ст гр 4АС-05"
_Caption = "Кульчицкого О.В."
Left = 168
Height = 25
Width = 73
Caption = "Ок"
Name = "Command1"
Left = 168
Height = 25
Width = 73
Caption = "Ок"
Name = "Command1"
PROCEDURE Click
_screen.ActiveForm.release()
ENDPROC
Left = 139
Width = 520
Height = 200
DataSource = .NULL.
Name = "Dataenvironment"Left = 10
Height = 90
Width = 90
Alias = "main"
Database = otdel_kadr.dbc
CursorSource = "main"
Name = "Cursor1ControlSource = "main.indf_nom"
Height = 23
Left = 75
TabIndex = 2
Top = 13
Width = 81
Name = "txtIndf_nom"
WordWrap = .T.
BackStyle = 0
Caption = "Indf_nom"
Left = 15
Top = 13
Width = 52
TabIndex = 1
Name = "lblIndf_nom"
ControlSource = "main.name"
Height = 23
Left = 224
MaxLength = 10
TabIndex = 4
Top = 18
Width = 81
Name = "txtName"WordWrap = .T.
BackStyle = 0
Caption = "Name"
Left = 182
Top = 18
Width = 34
TabIndex = 3
Name = "lblName"ControlSource = "main.surname"
Height = 23
Left = 75
MaxLength = 15
TabIndex = 6
Top = 49
Width = 115
Name = "txtSurname"ControlSource = "main.mstorozden"
Height = 23
Left = 81
MaxLength = 35
TabIndex = 10
Top = 93
Width = 253
Name = "txtMstorozden"WordWrap = .T.
BackStyle = 0
Caption = "Mstorozden"
Left = 10
Top = 93
Width = 63
TabIndex = 9
Name = "lblMstorozden"ControlSource = "main.grazdanstv"
Height = 23
Left = 80
MaxLength = 13
TabIndex = 12
Top = 134
Width = 101
Name = "txtGrazdanstv"PROCEDURE Click
thisform.command2.Enabled= .T.
IF BOF()=.F.
SKIP -1
ELSE
thisform.command1.Enabled= .F.
ENDIF
_screen.ActiveForm.refresh()
ENDPROCPROCEDURE Click
thisform.command1.Enabled= .T.
IF EOF()=.F.
SKIP 1
ELSE
thisform.command2.Enabled= .F.
ENDIF
_screen.ActiveForm.refresh()
ENDPROCLeft = 368
Height = 25
Width = 97
Caption = "Редактировать"
Name = "Command5"PROCEDURE Click
delete
ENDPROC
Left = 181
Height = 25
Width = 73
Caption = "Добавить"
Name = "Command3"PROCEDURE Click
APPEND BLANK
ENDPROC Left = 274
Height = 25
Width = 73
Caption = "Удалить"
Name = "Command4"Left = 0
Width = 0
Height = 0
Visible = .F.
TabStop = .F.
DataSource = .NULL.
Name = "Dataenvironment"BufferModeOverride = 5
Order = "wizard_1"
Database = otdel_kadr.dbc
CursorSource = "main"
Name = "CURSOR1"BufferModeOverride = 5
Database = otdel_kadr.dbc
CursorSource = "education"
Name = "CURSOR2"Height = 404
ScrollBars = 3
DoCreate = .T.
ShowTips = .T.
Caption = "MAIN"
Name = "form1"
layoutsty.Shape1.Name = "Shape1"
layoutsty.Shape2.Name = "Shape2"
layoutsty.Shape3.Name = "Shape3"
layoutsty.Shape4.Name = "Shape4"
layoutsty.Left = 4005
layoutsty.Visible = .F.
layoutsty.Name = "layoutsty"
Shape1.Name = "Shape1"
label1.Caption = "MAIN"
label1.Width = 70
label1.Name = "label1"
Shape2.Top = 345
Shape2.Name = "Shape2"Left = 21
Width = 105
Visible = .T.
Name = "INDF_NOM1"
Shape1.Width = 105
Shape1.Name = "Shape1"
label1.AutoSize = .T.
label1.Caption = "Indf_nom:"
label1.Width = 57
label1.Name = "label1"
Text1.Alignment = 1
Text1.ControlSource = "main.indf_nom"
Text1.Format = ""
Text1.InputMask = "9,999,999,999"
Text1.ReadOnly = .F.
Text1.Width = 99
Text1.Name = "Text1"Left = 129
Width = 102
Visible = .T.
Name = "NAME1"
Shape1.Width = 102
Shape1.Name = "Shape1"
label1.AutoSize = .T.
label1.Caption = "Name:"
label1.Width = 39
label1.Name = "label1"
Text1.ControlSource = "main.name"
Text1.Format = ""
Text1.InputMask = "XXXXXXXXXX"
Text1.ReadOnly = .F.
Text1.Width = 96
Text1.Name = "Text1"Comment = ""
Tag = ""
Left = 5
ReadOnly = .F.
RecordSource = "education"
RecordSourceType = 1
Top = 189
Visible = .T.
Width = 570
Name = "Grid1"
Column1.ControlSource = "education.education"
Column1.Width = 109
Column1.ReadOnly = .F.
Column1.Visible = .T.
Column1.Name = "Column1"
Column2.ControlSource = "education.specialn"
Column2.Width = 144
Column2.ReadOnly = .F.
Column2.Visible = .T.
Column2.Name = "Column2"
Column3.ControlSource = "education.languages"
Column3.Width = 74
Column3.ReadOnly = .F.
Column3.Visible = .T.
Column3.Name = "Column3"
Column4.ControlSource = "education.ych_stepen"
Column4.Width = 109
Column4.ReadOnly = .F.
Column4.Visible = .T.
Column4.Name = "Column4"
Column5.ControlSource = "education.trudi"
Column5.Width = 179
Column5.ReadOnly = .F.
Column5.Visible = .T.
Column5.Name = "Column5"
Column6.ControlSource = "education.vipoln_rab"
Column6.Width = 214
Column6.ReadOnly = .F.
Column6.Visible = .T.
Column6.Name = "Column6"Left = 33
Visible = .T.
oldtalk = OFF
viewkey = ("")
parentkey =
viewtype = 3
gridalias = education
topfile = .T.
endfile = .T.
addmode = .F.
nworkarea = 1
oldsetdelete = OFF
oldreprocess = 0
oldmultilocks = ON
oldsetfields = OFF
previewmode = .F.
previewinit = .T.
usedataenv = .F.
editmode = .F.
gridref = GRID1
oldbuffering = 1
Name = "BUTTONSET1"
cmdPrev.Enabled = .F.
cmdPrev.Name = "cmdPrev"
cmdNext.Enabled = .F.
cmdNext.Name = "cmdNext"
cmdTop.Enabled = .F.
cmdTop.Name = "cmdTop"
cmdEnd.Enabled = .F.
cmdEnd.Name = "cmdEnd"
cmdFind.Enabled = .T.
cmdFind.Name = "cmdFind"
cmdPrint.Enabled = .T.
cmdPrint.Name = "cmdPrint"
cmdExit.Enabled = .T.
cmdExit.Name = "cmdExit"
cmdAdd.Picture = (HOME()+"WIZARDSWIZBMPSWZNEW.BMP")
cmdAdd.DownPicture = ..........program filesmicrosoft visual foxpro 9wizardswizbmpswznew.bmp
cmdAdd.Enabled = .T.
cmdAdd.Name = "cmdAdd"
cmdDelete.Enabled = .F.
cmdDelete.Name = "cmdDelete"
cmdEdit.Picture = (HOME()+"WIZARDSWIZBMPSWZEDIT.BMP")
cmdEdit.DownPicture = ..........program filesmicrosoft visual foxpro 9wizardswizbmpswzedit.bmp
cmdEdit.Enabled = .F.
cmdEdit.Name = "cmdEdit"Left = 33
Visible = .T.
oldtalk = OFF
viewkey = ("")
parentkey =
viewtype = 3
gridalias = department
topfile = .T.
endfile = .T.
addmode = .F.
nworkarea = 1
oldsetdelete = OFF
oldreprocess = 0
oldmultilocks = ON
oldsetfields = OFF
previewmode = .F.
previewinit = .T.
usedataenv = .F.
editmode = .F.
gridref = GRID1
oldbuffering = 1
Name = "BUTTONSET1"
cmdPrev.Enabled = .F.
cmdPrev.Name = "cmdPrev"
cmdNext.Enabled = .F.
cmdNext.Name = "cmdNext"
cmdTop.Enabled = .F.
cmdTop.Name = "cmdTop"
cmdEnd.Enabled = .F.
cmdEnd.Name = "cmdEnd"
cmdFind.Enabled = .T.
cmdFind.Name = "cmdFind"
cmdPrint.Enabled = .T.
cmdPrint.Name = "cmdPrint"
cmdExit.Enabled = .T.
cmdExit.Name = "cmdExit"
cmdAdd.Picture = (HOME()+"WIZARDSWIZBMPSWZNEW.BMP")
cmdAdd.DownPicture = ..........program filesmicrosoft visual foxpro 9wizardswizbmpswznew.bmp
cmdAdd.Enabled = .T.
cmdAdd.Name = "cmdAdd"
cmdDelete.Enabled = .F.
cmdDelete.Name = "cmdDelete"
cmdEdit.Picture = (HOME()+"WIZARDSWIZBMPSWZEDIT.BMP")
cmdEdit.DownPicture = ..........program filesmicrosoft visual foxpro 9wizardswizbmpswzedit.bmp
cmdEdit.Enabled = .F.
cmdEdit.Name = "cmdEdit"
Додаток В