Назва поля Тип Пояснення

TAB numeric табельний номер

FIO character ПІБ

POL character підлогу

DATA date дата народження

OBR logical наявність вищої освіти

LANG numeric кол-во ін. мов, кот-ми влад. працівник

STAG numeric стаж роботи на фірмі

DETI numeric кількість дітей

SRZAR numeric середньомісячна зарплата

COMP logical знання ПК

Вивести в BROWSE-вікні список працівників з вищою освітою. Передбачити висновок назви таблиці та заголовків полів по-російськи.

3. Завдання

Зав. кафедрою Викладач

Квитки рішення і работа по Інформатиці 20 [ виправити ] текст може містити помилки, будь ласка перевіряйте перш ніж використовувати. скачати

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 1 1. Загальні відомості про реляційної моделі даних. 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. Працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Вивести поля TAB, FIO, DATA, OBR першого запису в БД для працівника, який пропрацював на фірмі не менше 10 років. 3. Завдання Зав. кафедрою Викладач КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 2 1. Структура команд СУБД FoxPro. 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Знайти та вивести на екран кількість працівників, середня зарплата яких не менше 250 грн. 3. Завдання Зав. кафедрою Викладач КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 3 1. Створення та зміна структури БД. Типи даних (типи полів). 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Знайти та вивести на екран кількість працівників фірми, що народилися пізніше 1954 року. 3. Завдання Зав. кафедрою Викладач КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 4 1. Засоби редагування даних. Команда BROWSE. Ключі і опції команди. 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Знайти та вивести на екран кількість працівників (жінок), які мають вищу освіту. 3. Завдання Зав. кафедрою Викладач КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 5 1. Засоби перегляду вмісту БД (DISPL, LIST, їх відмінність). 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Знайти та вивести на екран кількість працівників (жінок), які володіють навичками роботи на ПК. 3. Завдання Зав. кафедрою Викладач КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 6 1. Засоби редагування і додавання нових записів в БД (EDIT, CHANGE і APPEND). 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Знайти та вивести на екран середню зарплату для працівників фірми (жінок), що мають 3-х і більше дітей. 3. Завдання Зав. кафедрою Викладач КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 7 1. Логічне упорядкування БД. Створення і використання індексних файлів. 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Знайти та вивести на екран середню зарплату на фірмі. 3. Завдання Зав. кафедрою Викладач КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 8 1. Послідовний пошук інформації в БД (LOCATE, CONTINUE). 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Вивести в BROWSE-вікні список працівників зі стажем 10 років. Передбачити висновок назви таблиці та заголовків полів по-російськи. 3. Завдання Зав. кафедрою Викладач КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 9 1. Засоби створення і налагодження програм (MODI COMM, DO). 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Знайти та вивести на екран «середній стаж» працівників фірми. 3. Завдання Зав. кафедрою Викладач КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 10 1. Засоби алгоритмічного мови в FoxPro. Команди присвоювання і STORE. Робота з масивами. 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Знайти та вивести на екран вміст полів FIO, DATA, SRZAR, COMP запису для самого молодого працівника фірми. 3. Завдання Зав. кафедрою Викладач КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 11 1. Засоби алгоритмічної мови FoxPro. Команди IF і CASE. 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані:

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 12 1. Засоби алгоритмічної мови FoxPro. Команди DO - WHILE, LOOP, EXIT. 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Написати фрагмент програми, що реалізує обробку меню, яке містить такі пункти: введення нового запису в БД, перегляд, видалення, вихід. 3. Завдання Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 13 1. Використання вбудованих функцій FoxPro. Функції роботи з рядками. (LEN (), AT (), ALLTRIM (), SPACE ()). 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Знайти і видалити (логічно і фізично) з БД всі записи, що містять у полі дата народження посилання на 1966 рік. 3. Завдання Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 31 1. Використання вбудованих функцій FoxPro. Функції перевірки файлів і дисків (FILE (), EOF (), FOUND (), RECNO (), RECCOUNT ()). 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Вивести в BROWSE-вікні список всіх працівників, які володіють іноземними мовами. Передбачити висновок назви таблиці та заголовків полів по-російськи. 3. Завдання Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 14 1. Образотворчі засоби FoxPro. 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Вивести в BROWSE-вікні список працівників, які володіють навичками роботи на ПК. Передбачити висновок назви таблиці та заголовків полів по-російськи, передбачити видимий розмір поля FIO - 15 символів. 3. Завдання Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 15 1. Команди переміщення в БД. (GO TOP / BOTTOM, SKIP), навести приклади. 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Визначити, який відсоток працівників фірми не володіє іноземними мовами. 3. Завдання Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 16 1. Видалення записів у БД (логічне та фізичне). 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Визначити, який відсоток працівників фірми володіє навичками роботи на ПК. 3. Завдання Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 17 1. Засоби розробки меню (LIGHTBAR - меню). 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Знайти і видалити (логічно і фізично) з БД всі записи для працівників, які не володіють навичками робота на ПК. 3. Завдання Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 19 1. Структура програми, що реалізує обробку меню. 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Визначити, який відсоток працівників фірми (жінок) досяг пенсійного віку. 3. Завдання Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 20 1. Неформатований введення / висновок, команди INPUT, ACCEPT, WAIT, «?». 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані: Назва поля Тип Пояснення TAB numeric табельний номер FIO character ПІБ POL character підлогу DATA date дата народження OBR logical наявність вищої освіти LANG numeric кол-во ін. мов, кот-ми влад. працівник STAG numeric стаж роботи на фірмі DETI numeric кількість дітей SRZAR numeric середньомісячна зарплата COMP logical знання ПК Визначити, який відсоток працівників фірми отримує в місяць більше 500 грн. 3. Завдання Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ з дисципліни: «Інформатика та комп'ютерна техніка» Екзаменаційний квиток № 21 1. Засоби форматованого вводу / виводу. Команди @ ... SAY ... GET. Використання їх опцій і шаблонів. 2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані:

Назва поля Тип Пояснення

TAB numeric табельний номер

FIO character ПІБ

POL character підлогу

DATA date дата народження

OBR logical наявність вищої освіти

LANG numeric кол-во ін. мов, кот-ми влад. працівник

STAG numeric стаж роботи на фірмі

DETI numeric кількість дітей

SRZAR numeric середньомісячна зарплата

COMP logical знання ПК

Показати вміст БД за зростанням середньомісячної зарплати.

3. Завдання

Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ

КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ

з дисципліни: «Інформатика та комп'ютерна техніка»

Екзаменаційний квиток № 26

1. Робота з кількома БД. Поняття робочої області. Використання псевдонімів. Складене ім'я поля.

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

3. Завдання

Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ

КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ

з дисципліни: «Інформатика та комп'ютерна техніка»

Екзаменаційний квиток № 27

1. Типи бінарних зв'язків. Привести приклади.

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

3. Завдання

Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ

КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ

з дисципліни: «Інформатика та комп'ютерна техніка»

Екзаменаційний квиток № 28

1. Приклад програми роботи з двома БД (з використанням вікон).

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

3. Завдання

Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ

КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ

з дисципліни: «Інформатика та комп'ютерна техніка»

Екзаменаційний квиток № 29

1. Робота з фільтрами.

2. Дана база даних (БД) про кадровий склад фірми, яка містить наступні дані:

Назва поля Тип Пояснення

TAB numeric табельний номер

FIO character ПІБ

POL character підлогу

DATA date дата народження

OBR logical наявність вищої освіти

LANG numeric кол-во ін. мов, кот-ми влад. працівник

STAG numeric стаж роботи на фірмі

DETI numeric кількість дітей

SRZAR numeric середньомісячна зарплата

COMP logical знання ПК

Визначити, який відсоток працівників фірми має дітей.

3. Завдання

Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ

КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ

з дисципліни: «Інформатика та комп'ютерна техніка»

Екзаменаційний квиток № 30

1. Встановлення зв'язків 1:1 та 1: N в FoxPro.

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

3. Завдання

Зав. кафедрою Викладач

КИЇВСЬКИЙ НАЦІОНАЛЬНИЙ ЕКОНОМІЧНИЙ УНІВЕРСИТЕТ

КРИМСЬКИЙ ЕКОНОМІЧНИЙ ІНСТИТУТ

з дисципліни: «Інформатика та комп'ютерна техніка»

Екзаменаційний квиток № 18

1. Засоби розробки меню (POPUP - меню).

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

3. Завдання

Зав. кафедрою Викладач

2
. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

2
. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

2. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

ВСТУП

Методичні вказівки призначені для проведення практичних та лабораторних занять з дисципліни «Інформатика та комп'ютерна техніка" для всіх форм навчання. У них коротко викладено технології реляційних СУБД, реалізація їх засобами СУБД FoxPro, а також дані практичні прийоми їх реалізації. Основну увагу приділено викладу команд мови програмування середовища FoxPro з поясненнями на конкретних прикладах і завданнях з основних тем.

Реляційна МОДЕЛЬ

За способом встановлення зв'язків між даними розрізняють реляційну, ієрархічну і мережеву моделі.

Реляційна модель є зручною і найбільш звичною формою представлення даних у вигляді таблиці. У математичних дисциплінах таблиці відповідає термін відношення (relation). Звідси і пішла назва моделі - реляційна.

Одним з основних переваг реляційної моделі є її однорідність. Всі дані розглядаються як зберігаються в таблицях, в яких кожен рядок має один і той же формат. Кожен рядок у таблиці являє собою деякий об'єкт реального світу або співвідношення між об'єктами. Користувач моделі сам повинен для себе вирішити питання, чи мають відповідні сутності реального світу однорідністю. Цим самим вирішується проблема придатності моделі для передбачуваного застосування.

Реляційна модель має два головних властивості:

1. базові порції даних являють собою відносини (relations);

2. операції над таблицями зачіпають тільки співвідношення (relation closure).

Співвідношення - це математична концепція, що описує, як співвідносяться між собою елементи двох множин.

Модель пред'являє до таблиць наступні вимоги:

1. дані в клітинках таблиці повинні бути структурно неподільними. Кожна клітинка може містити лише одну порцію даних. Це властивість часто визначається як принцип інформаційної неподільності. Неприпустимо, щоб у клітинці таблиці реляційної моделі містилося більше однієї порції даних, що іноді називається інформаційним кодуванням. Прикладом служить ідентифікаційний номер автомобіля. Якщо записати його в одну клітинку, то буде порушено принцип неподільності інформації, оскільки в осередку виявляться колективні дані такі, як найменування виробника, моделі, зведення про знаходження підприємства і т.д.;

2. дані в одному стовпці повинні бути одного типу;

3. кожен стовпець повинен бути унікальним (неприпустимі дублювання стовпців);

4. стовпці розміщуються в довільному порядку;

5. рядки розміщуються в таблиці також у довільному порядку;

6. стовпці мають унікальні найменування.

Два фундаментальних правила: правило цілісності об'єктів (entity integrity rule) і правило посилальної цілісності (referential integrity rule).

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

Зовнішній ключ - Це стовпець або підмножина однієї таблиці, який може служить в якості первинного ключа для іншої таблиці. Зовнішній ключ таблиці є посиланням на первинний ключ іншої таблиці. Правило цілісності об'єктів стверджує, що первинний ключ не може бути повністю або частково порожнім, тобто мати значення null. Правило посилальної цілісності свідчить, що зовнішній ключ може бути або порожнім, або відповідати значенню первинного ключа, на який він посилається.

Формальне визначення наступне:

Схемою відношення R називається скінченна множина імен атрибутів {A , A , ..., A }. Кожному імені атрибута A ставиться у відповідність множина D , Зване доменом атрибуту A , 1 <= i <= n. Домен атрибуту A позначається також dom (A ). Імена атрибутів іноді називаються символами атрибутів або просто атрибутами. Домени є довільними непустою кінцевими або рахунковими множинами. Нехай D = D D ... D .

Ставлення r зі схемою R - це кінцеве безліч відображень {t , T , ..., T } З R в D; причому кожне відображення t r має задовольняти наступній обмеження: t (A ) Належить D , 1 <= i <= n. Ці відображення називаються кортежами.

Сімейство систем управління базами даних FoxPro, є продуктом відомої фірми Fox Software і має широку популярність у всьому світі. У цьому посібнику розглядається версія FoxPro2.6 (нерусифікованому), що працює під управлінням Windows.

ТИПИ ДАНИХ

Visual FoxPro 6.0 типи даних

У середовищі FoxPro встановлені наступні стандартні типи файлів (всього понад 60, наводяться лише деякі):

. Dbf - файл бази даних;

. Fpt - файл для зберігання текстів memo-полів;

. Idx - індексний файл;

. Cdx - мультііндексний файл;

. Prg - командний, програмний файл;

. Mem - файл для зберігання тимчасових змінних;

. Fxp - відкомпільований комадно prg-файл;

. Pjx - файл проекту.

1. СУБД FOXPRO: ознайомлення з системою роботи У МЕНЮ-орієнтованого режиму

Робота в середовищі FoxPro виконується в одному з наступних режимів:

- Безпосередня інтерпретація команд;

- Меню - орієнтований режим;

• виконання програм.

При роботі в першому режимі користувач вводить текст команди в командному вікні. Середовище здійснює синтаксичний контроль і виконує команду. Деякі команди в процесі виконання проводять власний діалог з користувачем, інші можуть видавати лише короткі повідомлення про підсумки роботи. Другий режим призначений для початківців, який не освоїв ще мови команд. Нарешті, режим виконання програм передбачає, що користувач буде писати програми, використовуючи мову команд xBase, доповнений спеціальними командами програмування. Весь цикл з написання, налагодження та виконання програм можна здійснювати в середовищі системи.

МЕНЮ - ОРІЄНТОВАНИЙ РЕЖИМ.

Робочий простір FoxPro представлено вікном, верхній рядок якого є рядком головного меню системи. Під нею - робоча зона користувача. У робочому просторі відкрито також командне вікно, розмір і положення якого можна змінювати або видалити.

Активізація рядка меню F10

Вибір заголовка меню клавіші управління курсором

Вхід в меню наступного рівня Enter

Скасування Esc

За клавішами F1-F10 закріплені стандартні директиви, призначення клавіш можна перевизначити.

Гарячі клавіші (наприклад, CTRL + F2 - активізація командного вікна, CTRL + D - виконання програм)

Головне меню складається з заголовків груп операцій і команд:

Для FoxPro 2.6 системне меню виглядає наступним чином

SYSTEM FILE EDIT DATABASE RECORD PROGRAM WINDOW

Кожній групі відповідає меню другого рівня - меню операцій і директив, деякі з них відкривають свої діалогові вікна. Переміщення усередині вікон - клавішами управління курсором, по полях вікон - Tab. У діалогах використовуються командні "кнопки", зображені на екрані. До них відносяться, наприклад. Ok (підтвердження установок). Cancel (скасування установок). Save (збереження) і багато інших. Недоступні пункти головного меню і директиви мають знижену яскравість.

Розглянемо деякі пункти головного меню.

System-меню - допоміжні засоби FoxPro,

в тому числі:

About FoxPro - пред'явлення фірмового знака.

Help - допомога. Перегляд і вибір варіанта допомоги -

клавіші управління курсором.

Вхід у наступне меню - Enter. Переміщення -

клавіші управління курсором.

Контекстна допомогу викликається з будь-якого

режиму - F1.

Macros - закріплення макрокоманд за клавішами F1 - F10.

Filer - менеджер файлів - виконує функції управління

файлами.

Вибір полів - Tab. Ліве поле - перегляд файлів

(Скролінг).

Праве поле - вибір накопичувача, каталогу,

маркування. Нижнє поле-маніпуляція файлами.

Calculator - виклик калькулятора.

Calendar-Diary - виклик календаря для внесення записів. Ліве поле -

вибір дня (по стрілках), місяця (PgUp, PgDn), року

(Shift + PgUp, Shift + PgDn), поточна дата - Т. Праве

полі - для записів (Вхід - Tab, Вихід-Shift Tab).

Special Characters - таблиця символів псевдографіки.

ASCII Chart - таблиця ASCII-кодів.

Capture - взяття в буфер заданої області екрана.

Puzzle - гра

File-меню:

New - створення

Open - відкриття

Close - закриття

Save - збереження

Save as - збереження з новим ім'ям

Revert - повернення попередньої версії файлу

Printer Setup - установки принтера

Print - друк файлу

Quit - вихід

При створенні нового файлу (New) користувачеві пропонується вибрати тип створюваного файлу: бази даних, програмний, текстовий, індексний, генератора звітів або ін Обраний тип отримує позначку (•).

Edit - меню - вбудований текстовий редактор системи.

Undo - скасування останньої дії,

Redo - повторення скасованої дії,

Cut - вирізка частини тексту в буфер,

Сoру - копіювання частини тексту в буфер,

Paste - виведення вмісту буфера у текст,

Clear - очищення частини тексту,

Select All - виділення всього тексту вікна,

Goto Line - перехід до рядка,

Find - пошук заданого фрагмента тексту,

Find Again - пошук наступного входження,

Replace and Find Again - послідовний пошук із заміною,

Replace All - повна заміна всіх входжень,

Preference - налаштування редактора.

Database - меню - робота з даними, збереженими в БД

Setup - модифікація баз даних, індексів, фільтрів,

Browse - виклик команди повноекранного редагування,

Append From - додавання записів з інших БД або файлів,

Copy Те - копіювання в інші БД або файли,

Sort - сортування записів,

Total - створення БД з сумами по заданому ознакою,

Average - середнє арифметичне числових полів,

Count - підрахунок записів з вказаним ознакою,

Sum - підсумовування числових полів,

Calculate - обчислення в БД,

Report - підключення раніше створеної форми звіту,

Pack - фізичне видалення позначених полів,

Reindex - переіндексування бази.

Record-меню - робота з записами файлів БД

Append - виклик вікна додатки БД новими записами,

Change - виклик вікна редагування записів,

Goto - перехід до зазначеного запису,

Locate - послідовний пошук запису по ключу,

Continue - продовження пошуку,

Seek - прискорений індексний пошук за словом,

Replace - зміни (обчислення) в БД,

Delete - позначка записів для видалення,

Recall - зняття позначок для видалення.

Program - меню - засоби роботи з програмами

Do - вибір командного файлу і виконання,

Cancel - переривання програми,

Resume - продовження програми,

Compile - перехід у вікно компіляції,

Generate - виклик генератора додатків,

FoxDoc - виклик документатора програм,

FoxGraph - виклик графічного пакета.

Window-меню - робота з вікнами

Hide - видалення командного вікна з екрану,

Clear - очищення робочого поля,

Move - переміщення командного вікна,

Size, Zoom - зміна розміру командного вікна,

Cycle - циклічне перемикання активних вікон,

Color - вибір колірної схеми,

Command - активізація командного вікна,

Debug - виклик отладочного вікна,

Trace - трасування програм,

View - перехід в View

Детальну інформацію про роботу в меню - орієнтованому режимі можна отримати з контекстної допомоги (Help - F1).

Введення, редагування, видалення, пошук, перегляд даних можна виконати для відкритої в View-вікні бази даних за допомогою команд Record-меню з головного меню:

- Додавання, введення даних;

- Зміна, коректування полів записів;

- Позначка записів до видалення;

- Скасування позначки до видалення;

- Заміна значень полів;

- Перехід до запису, положення якої вказується в

діалоговому вікні за допомогою селекторних кнопок:

<Тор> - до першого запису,

- До останнього запису

- За вказівкою номера запису,

- Зміщення від активної запису за вказівкою кроку

- Пошук даних шляхом вказівки у вікні критеріїв пошуку:

- Область пошуку вибирається з альтернатив:

- Всі записи файлу;

- Наступна за активної записом;

- За вказівкою номера запису;

- Залишилися, починаючи з активною;

- Вказівка ​​логічних умов відбору за значеннями полів у

вікні редактора виразів;

- Відбір даних, поки істинно логічне умова;

- Швидкий пошук для індексованого файлу даних

Команди Record-меню не зачіпають фізичної структури бази даних. Зауваження: У відкритому Browse-вікні зручно використовувати комбінації клавіш:

^ N - доповнення, ^ Т - позначка до видалення, ^ W-вихід зі збереженням змін.

Команди Database-меню дають такі можливості:

- Аналоги однойменних команд з меню Window / View;

- Стиснення даних, видалення позначених записів.

- Сортування записів по заданому ключу з перезаписом в

інший файл даних.

Додаткові можливості роботи з даними в меню - орієнтованому режимі можна освоїти за допомогою Help-меню.

Більш широке коло можливостей роботи зі створеною базою даних, що задовольняють всім інформаційним потребам користувача, забезпечує покомандний режим роботи (набір команд в Command-вікні) або програмний режим (створення командних prg-файлів).

2.Основні КОМАНДИ FOXPRO

У цьому розділі наводиться короткий опис основних команд мови програмування середовища FoxPro, які можна задавати безпосередньо в Command-вікні або використовувати в тексті програм. Отримання командні файли виконуються в режимі інтерпретації. Продуктивне освоєння мови можливе лише при практичній опрацювання матеріалу на комп'ютері.

Формат команди FOXPRO:

ІМЯ_КОМАНДИ [<кордону>] [<список виразів »]

[FОR <умова>] [WHILE <умова>]

Тут <зона дії> - межі дії команди:

ALL - всі записи;

REST - всі записи від поточної до кінця;

NEXT - Наступні N записів;

RECORD - Запис з номером N;

FОR <умова> - виконання команди тільки для записів,

задовольняють умові;

WHILE <умова> - виконання команди тільки до тих пір, поки не

перестане виконуватися умова.

Приклад:

LIST ALL FIELDS num, name FOR name = 'A'

Для довгих записів команд використовується символ перенесення на наступний рядок - ";".

КОМАНДИ УСТАНОВКИ

Крім наведених вище команд у FOXPRO є великий клас команд, відомі як команди установки. Вони не виконують будь-яких дій, але впливають на роботу інших команд.

Є два типи команд установки:

SET <параметр> ON | OFF

SET <параметр1> TO <параметр2>

ON | OFF - означає, що установка або включена, тобто працює,

або вимкнена.

Приклади:

SET TALK OFF - погашення виведення службових

повідомлень про роботу команд на екран;

SET PROCEDURE TO a: \ proc1 - призначення процедурного файлу.

Перелік найбільш часто використовуваних команд установки наведена у Додатку 2.

Перейдемо до розгляду конкретних команд.

Діалогове КОМАНДИ

Створення та зміна структури файлу бази даних.

СRЕАТЕ <ім'я файлу> - створення структури БД в діалозі.

Приклад

Назва поля Тип Пояснення

TAB numeric табельний номер

FIO character ПІБ

POL character підлогу

DATA date дата народження

OBR logical наявність вищої освіти

LANG numeric кол-во ін. мов, кот-ми влад. Працівник

STAG numeric стаж роботи на фірмі

DETI numeric кількість дітей

SRZAR numeric середньомісячна зарплата

COMP logical знання ПК

MODIFY STRUCTURE - зміна структури відкритої БД.

При виклику цих команд середу відкриває діалог, надаючи екран-форму для введення даних про структуру створюваного файлу бази даних.

Команди редагування

APPEND [BLANK] - додавання запису в кінець відкритої БД

([BLANK]-порожній запис).

INSERT [BLANK] [BEFORE] - вставка запису до [BEFORE] або після

поточного запису.

CHANGE [<зона дії>] [FIELDS <список полів>] [WHILE <умова>]

[FOR <умова>] - редагування значень полів.

DELETE [зона дії] [WHILE <умова>] [FОR <умова>] позначка

записів ознакою видалення.

BROWSE ... - команда доступу користувача до даних.

При виклику цих команд і наявності відкритої бази даних середу розгортає для користувача вікно редагування. Команда BROWSE буде розглянута дещо пізніше.

ПЕРЕГЛЯД ДАНИХ.

Команди DISPLAY і LIST

DISPLAY [<зона дії>] [<поля>] FOR [<умова>] WHILE [<умова>]

[OFF] [TO PRINT / TO FILE <файл>]

Команда LIST зі схожими функціями не робить зупинок при видачі даних, і за замовчуванням область її дії - весь файл, а команди DISPLAY-одна поточна запис.

Приклади:

DISPLAY REST FOF fio = 'І'

LIST 'прізвище', fio FOR dolg = "інженер"

Видалення даних

ERASE <файл> - видалення закритого файлу;

ZAP - видалення всіх записів зі збереженням структури;

DELETE [<зона дії>] [WHILE <умова>] [FOR <умова>] - позначка на видалення або логічне видалення записів;

PACK - фізичне видалення, позначених до видалення записів;

RECALL [<зона дії>] [WHILE <умова>] [FOR <умова>] - зняття позначок до видалення;

Зауваження. помічені до видалення запису залишаються в БД, проте вони можуть не оброблятися іншими командами, якщо була виконана установка

SET DELETE ON.

Виконання команди PACK призводить до фізичного знищення записів,

БД при цьому стискається.

Фільтрація даних

SET FILTER ТО [<умова>] - установка FOR-умови для всіх команд обробки даних (інші дані недоступні).

SET FILTER TO без параметра - скасовує обмеження.

Приклад:

Зміна даних

REPLACE [<кордону>] [WHILE <умова>] [FОR <умова>] <Поле1>

WITH <вираз> [, <поле2> WITH <вираз> ...] [ADDITIVE]

- Множинне зміна полів у відповідності з виразами.

Приклад: REPLACE zarp with zarp * 1.25 for dolg = "інженер"

Послідовний пошук

LOCATE FОR <умова> [<кордону>] [WHILE <умова>] - пошук першого

задовольняє FOR-умові запису, При успішному пошуку

покажчик записів встановлюється на знайдену запис.

CONTINUE - продовження пошуку

Приклад:

USE KADR

LOCATE FOR stag> 12

DO WHILE! EOF () & & поки не досягнуто кінець файлу даних

? FIO

CONTINUE

ENDDO

Перераховані команди можуть бути виконані шляхом вибору з в системному меню або безпосереднім набором в Command-вікні. Поряд з іншими командами і засобами програмування, що приводяться далі, вони можуть використовуватися також у текстах програм.

3. СТВОРЕННЯ КОМАНДНИХ Фото

Командні файли представляють собою вихідні тексти програм і мають тип. Prg. Вони створюються за допомогою вбудованого редактора FoxPro, що викликається командою

MODIFY COMMAND <ім'я файлу>

За командою MODI COMM (припустиме скорочення) без зазначення імені за умовчанням створюється prg-файл без імені. Присвоїти ім'я слід при першому збереженні тексту програми. Зручно використовувати комбінацію клавіш ^{^} W для збереження тексту програми. Для редагування раніше створеної програми використовують команду

MODI Сомма <ім'я>.

Для запуску програм використовується команда

DO <ім'я командного файлу>

Створена програма виконується в режимі інтерпретації. При виявленні помилки виконання переривається і коментується повідомленням.

Приклад. Наводиться текст програми, призначеної для відображення всіх записів БД, що містять інформацію про співробітників, які отримують зарплату менше 200.

SET TALK OFF

SET DATE BRITISH

USE KADR

LOCATE FOR Zarp <200

DO WHILE! EOF () & & поки не досягнуто кінець файлу даних

DISPL

CONTINUE

ENDDO

4.Команда повноекранного редагування BROWSE

Команда BROWSE представляє собою цілу середу редагування. Вона має більше 20 різних параметрів. Розглянемо найбільш часто використовуються з них.

Формат команди.

BROWSE

[FIELDS <пoля>] [FОR <условіе1>]

[FORMAT] [FREEZE <поле>]

[Кеу, <вир 1> [, <вир2>]] [LAST]

[LEDIT / REDIT] [LOCK <вирN1>]

[LPARTITION] [NOAPPEND]

[NOCLEAR] [NODELETE]

[NOEDIT / NOMODIFY] [NOLGROD / NORGRIG]

[NOLINK] [NOMENU]

[NOOPTIMIZE] [NORMAL]

[NOWAIT] [PARTITION <вирN2>]

[REST] [PREFERENCE <вирC1>]

[TIMEOUT <вирN3>] [ТITLЕ <вирС2>]

[NOOPTIMIZE] [WHEN <ycловіе3>]

[Window <вікно>] [NOWAIT]

[VALID [F:] [ERROR <вирC3>]

[COLOR SCHEME <вирN5> / COLOR <список колірних пар>]

Дія деяких опції команди.

1. Вибір полів

FIELDS <список полів> - перелік полів (за умовчанням - все).

Ключі:

: R - дозволено лише перегляд поля;

: <Вир N> - видимий розмір поля;

: У = <вир L1> - контроль виходу з поля;

: F - перевірка вводяться та існуючих даних;

: Е = <вирС2> - видача власного повідомлення;

: Р = <вирС2> - встановлення формату відображення даних за шаблоном;

: Н = <вирСЗ> - вказівку власного заголовка поля;

: В = <вир1>, <вир2> [: Є] - вказівка ​​кордонів чисел або дат;

: W = <вирL2> - контроль входу в полі.

До списку полів можуть включатися так звані обчислювані поля, які є функціями інших полів або змінних.

2. Відбір даних

FОR <умова 1> - встановлює фільтр для записів; виводяться тільки

записи, що задовольняють <условкю1>;

REST - запобігає повторний пошук спочатку;

Кеу <вир1> [, <вир2>] - обмеження дії команди діапазоном

ключового вираження активного індексного файлу

З. Розділення вікна

LOCK <вирN1> BROWSE - вікно ділиться на дві частини, де перші <вирN1> полів

дублюються в лівій частині вікна (перехід ^ Н);

PARTITION <вирN2> - те ж, але кордон проходить по полю <вирN2>

LEDIT / REDIT - діють тільки в розділеному вікні і задають

форму представлення даних (формуляр);

LPARTITION - курсор встановлюється в лівій половині вікна;

NOLINK - несинхронно переміщення видимих ​​записів;

NOLGRID / NORGRID - видаляє вертикальні лінії роздільники полів.

4. Контроль редагування записів

VALID <условіе2> [ERROR <вирC3>] - аналізує умови для поточного запису;

WHEN <условіе3> - визначає можливість доступу до запису;

NOAPPEND - доповнення по Ctrl-N неможливо;

NOEDIT / NOMODIFY - редагування неможливо;

NODELETE - редагування неможливо;

FREEZE <поле> - єдине доступне поле.

5. Конфігурування BROWSE-вікна

LAST - збереження конфігурації;

PREFERENCE FORMAT - використання форматного файлу;

NOCLEAR - після виходу вікно не видаляється;

NOMENU - придушує висновок системного меню;

TIMEOUT - час роботи з вікном;

TITLE <вирC3> - заголовок вікна;

WINDOW - дозволяє відкрити інше вікно.

Приклад:

Set talk off

set date British

use kadr.dbf

browse;

title '^ t-видалення ^ n-додавання ^ w-вихід';

fields;

fio: h = 'ПІБ': 20,;

dolg: h = 'посаду',;

zarp: h = 'зарплата',;

birth: h = 'день народження',;

pol: h = 'рол',;

adress: h = 'адреса',;

godzarp = zarp * 12: h = 'год.зарплата': p ='#####,##'

pack

close all

5.КОМАНДИ ВВЕДЕННЯ-ВИВЕДЕННЯ

Засоби неформатованого вводу / виводу

Команда виводу? /??

ПОНЯТТЯ Про РОБОЧИХ ОБЛАСТЯХ

У FoxPro обробляти відразу декілька файлів баз даних (до 25). Кожен такий файл типу DBF і всі допоміжні файли (наприклад, індексні) відкриваються у своїй окремої робочої області. Перехід з області в область здійснюється командою:

SELECT <робоча область / псевдонім>;

Перші десять робочих областей ідентифікуються номерами 1-10 або буквами A - J. Області з 11-ї до 25-ї позначаються номерами або буквено-цифровими іменами W11 - W25. Якщо в якості параметра вказати цифру 0, відбудеться перехід в першу вільну робочу область. Крім того, робочі області та файли бази даних можуть ідентифікуватися так званими псевдонімами. Псевдонімом області за замовчуванням є саме ім'я що знаходиться в ній файлу бази даних.

Область, в якій в даний момент працює користувач, називається активної робочої областю, і в ній можна працювати з розташованої тут базою даних. В одній команді можна працювати з полями інших баз (відкритих в інших областях). У цьому випадку ім'я поля з неактивної бази - складене: імені поля передує ім'я робочої області або псевдонім, розділені знаком «точка»:

<Робоча область / псевдонім>. <Ім'я поля>

Робоча область у складеному імені вказується будь-яким дозволеним чином (буквою, ім'ям її бази даних, псевдонімом), але не номером. Номер може бути вказаний в команді SELECT і у функціях.

При вході в СУБД активізується область 1 (або А), і, якщо користувач працює тільки з однією базою, піклуватися про відкриття областей не потрібно.

У команді USE можна одночасно вказувати і область, в якій відкривається база. Приклад:

USE delivery IN b.

Однак, перехід до зазначену область за допомогою такої команди не відбувається (для переходу необхідно скористатися командою SELECT).

ПРИКЛАД РОБОТИ з декількома базами даних

У КІЛЬКОХ ОБЛАСТЯХ

У наведеній нижче програмі наводиться приклад роботи з двома базами даних, базою Постачальник (Delivery) і базою Постачання (Supply). Структура баз і призначення полів наводиться в Додатку № 3. Дана програма дозволяє по введеному коду товару знайти всіх постачальників, що поставляють даний товар.

CLEAR

SET TALK OFF

SET EXACT OFF

SELE A

USE Supply

KOD = 0

@ 1,2 SAY 'Введіть код товару' GET KOD PICTURE'#####'

READ

LOCATE FOR indgoods = kod

IF! FOUND ()

WAIT 'Такого коду немає'

RETURN

ENDIF

ind = inddel

SELE B

USE Delivery

LOCATE FOR inddel = ind

IF! FOUND ()

WAIT 'Такого постачальника немає'

RETURN

ENDIF

DISPL namedel, count, tel, A.namgoods, A.pricegds

CLOSE ALL

Зв'язок виду одна_запісь-к-однієї

Команда

SET RELATION TO <ключ> INTO <область> [, <ключ> INTO < область> ...] [ADDITIVE]

пов'язує покажчик записів в активній робочої області з покажчиком записів з інших робочих областей, яких вказані після слова INTO, по заданому загальному полю (ключа). Єдина умова - файл бази даних, з яким встановлюється зв'язок, повинен бути проіндексований по цьому полю.

Приклад

Зв'язати бази даних SUPPLY.DBF і DELIVERY.DBF по полю INDDEL. За кодом постачальника вивести список постачальників та їх реквізити.

SET TALK OFF

CLEAR

SELE A

IF FILE ('Inddelivery.ind')

USE Delivery INDEX Inddelivery

ELSE

USE delivery

INDEX ON inddel TO Inddelivery

ENDIF

SELE B

USE Supply

SET RELATION TO inddel INTO A

DO WHILE. T.

kod = 0

CLEAR

@ 12,23 TO 14,50 DOUBLE

@ 13,25 SAY 'Введіть код товару' GET kod PICTURE'#####'

READ

LOCATE FOR indgoods = kod

IF! FOUND ()

WAIT 'Такого товару немає'

LOOP

ENDIF

name = namgoods

IF kod <> 0

SET FILTER TO indgoods = kod

BROWSE;

TITLE 'Список постачальників, що поставляють' + name;

FIELDS;

INDDEL: H = 'Код постачальника',;

A. NAMEDEL: H = 'Назва постачальника',;

A. ADRDEL: H = 'Адреса',;

A. TEL: H = 'Телефон'

SET FILTER TO

ENDIF

IF LASTKEY () = 27

EXIT

ENDIF

ENDDO

PACK

CLOSE ALL

У цій програмі виводяться записи, в яких для кожного коду постачальника inddel з поточної бази даних Supply.dbf (відкритої в області В) виводяться поля A.namedel (Назва постачальника), A.adrdel (Адреса) і A. TEL (Телефон) з бази даних Delivery.dbf (відкритої в області A).

У FoxPro є можливість встановлювати зв'язки з декількома базами одночасно. Якщо зі старшим файлом, який вже пов'язаний з іншим, необхідно пов'язати деякий третій (четвертий і т.д.), необхідно в усі наступні команди SET RELATION включати слово ADDITIVE, яке забезпечить збереження зв'язків, установлених раніше.

Зв'язок між усіма файлами розривається командою SET RELATION TO без параметрів. Зв'язок з окремим файлом в заданій <області> - командою SET RELATION OF INTO <область>.

Зв'язок виду одна_запісь-до-багатьох

Команда SET SKIP TO [<область1> [, <область2>] ...]

встановлює зв'язок типу одна_запісь-до-багатьох між двома або кількома базами даних.

З кожним записом зі старшої бази можуть бути зчеплені кілька записів з молодшої бази. Зв'язок може бути встановлена ​​відразу з декількома молодшими базами, що знаходяться у зазначених <областях>.

Перш ніж використовувати команду SET SKIP TO, необхідно виконати початкове зчеплення виду одна_запісь-к-однією командою SET RELATION. Видалення зв'язку одна_запісь-до-багатьох здійснюється командою SET SKIP TO без параметрів.

Приклад

Встановити зв'язок між трьома базами даних. У програмі використовується

третя база Товарів (Goods.dbf), що отримується з БД Supply.dbf

SET TALK OFF

IF FILE ('Goods.dbf')

ERASE Goods.dbf

ENDIF

IF FILE ('Indnum.idx')

ERASE Indnum.idx

ENDIF

SELE A

USE Supply

IF FILE ('Indg.idx')

SET INDEX TO Indg.idx

ELSE

INDEX ON indgoods TO Indg UNIQUE

ENDIF

COPY TO Goods FIELDS indgoods, namgoods, measure

SELE C

USE Smdeliv

IF FILE ('Indexdel.idx')

SET INDEX TO Indexdel.idx

ELSE

INDEX ON indgoods TO Indexdel UNIQUE

ENDIF

SELECT SUPPLY

SET RELATION TO inddel INTO Delivery ADDITIVE

SELE B

USE Goods

INDEX ON namgoods TO Indnum

SET RELATION TO indgoods INTO Supply ADDITIVE

SET SKIP TO Supply

BROWSE TITLE "Товари";

FIELDS;

Goods.Namgoods: H = "Ім'я Товару",;

Delivery.Namdel: H = "Ім'я Постачальника",;

Delivery.Adrdel: H = "Ім'я Постачальника",;

Delivery.Count: H = "Рахунок",;

Goods.Measure: H = "Ед.Ізмеренія",;

Supply.Pricegds: H = "Ціна Одиниці",;

Supply.Quant: H = "Кількість Під Одиниць",;

Totalamount = Supply.Quant * Supply.Pricegds: H = "Загальна Сума"

CLOSE ALL

11. РОБОТА З вікнами

Використання вікон - дуже зручне і ефектне засіб створення призначеного для користувача інтерфейсу в прикладній програмі.

Визначення вікна

DEFINE WINDOW <ім'я вікна> FROM , TO , <Х2>

[FOOTER <вир>] [TITLE <вир>] [SYSTEM / DOUBLE / PANEL / NONE]

[CLOSE] [FLOAT] [GROW] [SHADOW] [ZOOM] [FILL <вир>] [MINIMIZE]

FOOTER, TITLE - нижній і верхній заголовки;

форма меж вікна:

SYSTEM - стандартна,

DOUBLE - подвійна лінія,

PANEL - суцільна смуга,

NONE - не визначається,

CLOSE - допускає закриття вікна мишею,

FLOAT - переміщення за допомогою ^ F7 або мишею,

GROW - зміна розміру (^ F8 або мишею),

ZOOM /

MINIMIZE - розорювання і згортання вікна;

SHADOW - тіньова рамка,

FILL - символ заповнення вікна.

Активація вже певного вікна

ACTIVATE WINDOW [[<окно1 >][,< окно2>]] [,...]] ALL [BOTTOM / TOP]]

Тут вказані імена відкриваються або всіх (ALL) вікон. BOTTOM / TOP - розміщення нового вікна під / перед уже наявними.

Видалення з екрану

DEACTIVATE WINDOW <окно1> [, <окно2 >][,...] / ALL

Видалення з екрану і з пам'яті

CLEAR WINDOW - Видалення з екрану і з пам'яті ВСІХ вікон

RELEASE WINDOW <вікна> - Перерахованих вікон.

Відновлення вікна

RESTORE WINDOW

Збереження у файлі

SAVE WINDOW <вікна> / ALL TO <файл>

12.ПРІЛОЖЕНІЯ

12.1. СТАНДАРТНІ ФУНКЦІЇ FOXPRO

Арифметичні функції

ABS (<вирN>) - абсолютне значення числа <вирN>

BETWEEN (<вир>, <вир1>, <вир2>) - істинно (. Т.), якщо <вир1>  <вир> 

 <вир2>, інакше помилково (. F.) (для чисел,

рядків, дат)

CEILING (<вирN>) - округлення числа <вирN> з надлишком

FLOOR (<вирN>) - округлення числа <вирN> з недоліком

INТ (<вирN>) - ціла частина числа <вирN>

МАХ (<вир>, <вир1> [, <вир2 >...]) - максимальне значення зі списку

аргументів (числа, рядки, дати)

MIN <вир>, <вир1> [, <вир2 >...]) - мінімальне значення зі списку

аргументів

MOD (<вирN1>, <вирN2>) - цілочисельний залишок від ділення

<ВирN1> на <вирN2>

ROUND (<вирN1>, <вирN2>) - округлення числа <вирN1> до <вирN2>

знаків після коми

RAND (<вирN>]) - псевдовипадкове число в діапазоні 0 ... 1

SIGN (<вирN>) - знак числа <вирN>

Статечні, тригонометричні та інші функції

ЕХР (<вирN>) - експонента <виpN>

LOG (<вирN>) - натуральний логарифм <вирN>

LOG10 (<вирN>) - десятковий логарифм <вирN>

SQRT (<вирN>) - квадратний корінь числа <вирN>

SIN (<вирN>) - синус <вирN> від кута в радіанах

COS (<вирN>) - косинус <вирN>

TAN (<вирN>) - тангенс <вирN>

ASIN (<вирN>) - арксинус <вирN> (результат у радіанах)

ATAN (<вирN>) - арктангенс <вирN>

PI () - число 

DTOR (<вирN>) - перетворення градусної міри кута в

радіани

RTOD (<вирN>) - перетворення радіанної міри кута в

градуси

Строкові функції

<ВирС1> $ <вирС2> - входження <вирС1> у <вирС2>

(Результат. Т. або. F.)

AT / ATC (<вирC1>, <вирC2> [, <вир N>) - пошук зліва направо у рядку

<ВирС2> позиції входження

підрядка <вирС1>, починаючи з

<ВирN> позиції рядка <вирС2>

RАТ (<вирС1>, <вирС2> [, <вирN>) - те ж справа наліво

INLIST (<виp1>, <виp2> [, <виp2> ...]) - входження <вир> у наступний

список (результат. Т. або. F.)

LEN (<вирC>) - довжина рядка <вирС>

LIKE (<вирC 1>, <вирС2>) - входження <вирС1> у <вирС2>

(Результат. Т. або. F.) з

використанням символів маски * і?

OCCURS (<вирC1>, <вирС2>) - число входжень <вирС1> у <вирС2>

LEFT (<вирC, <вирN>) - вирізка зліва з рядка <вирC>

символів у колич. <ВирN>

RIGHT (<виpC, <виpN>) - те ж праворуч

SUBSTR (<вирС>, <нач.поз .>,[< число символів>]) - вирізка з рядка

<ВирС1> підрядка символів від

<Нач.поз.> У кількості <число

символів>

LTRIM (<вирC>) - видалення початкових прогалин

TRIM / RTRM (<вирC>) - видалення завершальних прогалин

ALLTRIM (<вирC>) - видалення початкових і завершальних

прогалин

REPLICATE (<виpC>, <виpN>) - повтор <вирN> раз рядка <вирC>

SPACE (<вирN>) - формування рядка прогалин

довжини <вирN>

Функції перетворення

АSС (<вирC>) - видає ASCII код першого символу

CHR (<вирN>) - перетворює число в символ в

відповідно до коду

STR (<виpN >,[,[< дec.знaкі>]]) - перетворює число <вирN> в рядок

довжиною <довжина> з зазначеним

числом <дес.знакі>

VAL (<вирС>) - перетворює символьну запис числа

до числа

Функції мемо-полів

ATLINE (<вирc>, <мемо полі>) - перше входження рядка <вирC>

в <мемо поле>

ATCLINE (<вирC>, <мемо полі>) - те саме без розрізнення малих і

прописних літер

RATLINE (<вирC>, <мемо полі>) - останнє входження рядка <вирС>

в <мемо поле>

MLINE (<мемо поле "," вирN>) - повертає рядок <вирN> з

<Мемо поля>

MEMLINES (<мемо полі>) - число рядків у мемо полі

Функції роботи з датами

СТОD (<вирC>) - перетворення дати з рядка

символів у формат дати

DATE () - системна дата

DAY (<вирD>) - число місяця з дати

DMY (<вирD>) - представлення дати у вигляді

ДД МІСЯЦЬ ГГ (або ГГГТ)

DOW (<вирD>) - номер дня тижня

DTOC (<вирD>) - перетворення виразу типу дати

в рядок символів

GOMONTH (<вирD>, <вирN>)-повертає дату, яка відстоїть від

<ВирD> на ± <вирN> місяців

MONTH (<вирD>) - числове значення номера місяця по

даті

YEAR (<вирD>) - числове значення року по даті

Функція аналізу умов

BOF (<умова>, <вир1>, <вир2>) - видає значення <вир1>, якщо умова

істинно, і <вир2> якщо помилково.

Функції перевірки файлів і дисків

ВОF ([<область>]) - досягнення початку файлу (результат

. Т. або. F.)

ЕОF [(<область>]) - досягнення кінця файлу (результат

. Т. або. F.)

DBF ([<область>]) - видає повне ім'я файлу БД в

поточної області

DISCSPACE () - кількість вільних байт на активному

диску

DELETED ([<область>]) - наявність позначки запису до видалення

(Результат. Т. або. F.)

FILE (<ім'я>) - перевірка наявності файлу

FIELD (<вирN> [, <область>]) - видає ім'я поля за його номером в

активної БД

FOUND ([<область>]) - успішне завершення пошуку

(Результат. Т. або. F.)

FCOUNT ([<область>]) - число полів у відкритому файлі БД

LOOKUP (<Поле1>, <вир>, <поле2>) - шукає перше входження вираження в

<Поле2> та видає <Поле1>

LUPDATE ([<область>]) - дата останнього зміни БД

ORDER ([<область>]) - ім'я головного індексного файлу

RECNO ([<область>]) - номер поточного запису активного

файлу БД

RECCOUNT ([<область>]) - загальна кількість записів

RECSIZE ([<область>]) - розмір запису в байтах

HEADER ([<область>) - розмір заголовка БД в байтах

SЕЕK (<вир> [, <область>]) - пошук запису з <вир> у індексному

файлі

ЕМРТY (<вир>) - наявність даних в об'єкті (результат

. Т. або. F.)

ТYРЕ (<вирС>) - видає букву імені типу

Функції позиціонування

COL () - номер поточної колонки екрану або вікна

ROW () - номер поточного рядка екрану або вікна

РСОL () - номер поточної колонки на принтері

PROW () - номер поточного стовпця на принтер

12.2. SET - КОМАНДИ

Ці команди служать дня завдання прапорців станів, параметрів середовища тощо, які зазвичай задаються на початку тексту програми та в разі необхідності перевизначаються або скасовуються. У середовищі FoxPro є понад 100 таких команд. Наведемо деякі з них. За додатковими роз'ясненнями можна звернутися до HELP.

SET ALTERNATE ON / OFF - встановити прапор виведення даних з екрану

в файл

SET BELL ON / OFF - встановити прапор звукового сигналу

SET BLINK ON / OFF - встановити прапор миготіння символів

SET SENTURY ON / OFF - встановити прапор відображення століття

в датах

SET CLOCK ON / OFF - встановити прапор виведення часу

SET COLOR TO - задати кольори меню та вікон користувача

SET COLOR OF SCHEME - задати кольору схеми

SET CURRENCY TO - задати грошовий знак

SET DATE TO ... - визначити формат дати

SET DECIMALS TO ... - встановити число цифр у дробовій

частини числа

SET DEFAULT TO ... - задати диск і каталог за замовчуванням

SET DELETED ON / OFF - встановити прапор доступу до записів з

позначкою видалення

SET ECHO ON / OFF - встановити прапор активізації вікна налагодження

SET ESCAPE ON / OFF - встановити прапор переривання по

клавіші ESC

SET FILTER TO ... - задати фільтр доступу до записів

SET FUNCTION ... TO ... - зв'язати команду з функціональної

клавішею

SET HELP ON / OFF - встановити режим доступу до допомоги

SET INDEX TO ... - відкрити індекс

SET KEY TO - задати граничне значення ключового

індексу

SET MESSAGE TO ... - задати місце розташування повідомлень

SET ORDER TO ... - задати основний індекс

SET PATH TO ... - задати список каталогів для пошуку файлів

SET PRINTER ON ... - встановити прапор виводу на принтер

SET PROCEDURE TO ... - відкрити заданий процедурний файл

SET RELATION TO ... - встановити зв'язок 1:1 з іншого БД

SET RELATION OFF - розірвати зв'язок з іншою БД

SET SHADOWS ON / OFF - встановити прапор наявності тіні

SET SKIP TO ... - встановити зв'язок 1: N з іншого БД

SET SPACE ON / OFF - встановити прапор вставки прогалин

SET TALK ON / OFF - встановити прапор виведення результатів

виконання команд

SET WINDOW OF MEMO TO ... - задати ім'я вікна редагування

мемо-полів

12.3. ТЕКСТИ ПРОГРАМ

Структура для бази даних: DELIVERY.DBF

Field Field Name Type Width Dec Index

1 INDDEL Numeric 2

2 NUMDEL Character 10

3 ADRDEL Character 20

4 COUNT Character 8

5 TEL Numeric 6

Структура для бази даних: SUPLY.DBF

Field Field Name Type Width Dec Index

1 INDSUP Numeric 5

2 INDDEL Numeric 2

3 DATE Date 8

4 NAMGOODS Character 15

5 QUANT Numeric 5

6 PRICEGOODS Numeric 5 лютого

7 MEASURE Character 3

8 INDGOODS Numeric 5

*********************** Робота з кількома БД *****

USE Suply

ERASE Goods.dbf

INDEX ON indgoods TO Indg UNIQUE

COPY TO Goods FIELDS indgoods;

, Namgoods, measure

SELECT 2

USE Goods

BROWSE

CLOSE ALL

SET TALK OFF

DEFINE WINDOW vvod FROM 2, 2 TO 7, 35 DOUBLE FLOAT SHADOW

DEFINE WINDOW vivod FROM 8, 2 TO 20,70 SYSTEM;

COLOR SCHEME 10

CLEAR

SELECT A

IF FILE ('Inddeliv.idx')

USE Delivery INDEX Inddeliv

ELSE

USE Delivery

INDEX ON inddel TO Inddeliv

ENDIF

SELECT B

USE Suply

SET RELATION TO inddel INTO Delivery

DO WHILE. T.

ACTIVATE WINDOW vvod

CLEAR

A = 0

@ 2,5 SAY 'Введіть код товару' GET A PICTURE'#####'

READ

LOCATE FOR indgoods = A

IF! FOUND ()

WAIT 'Такого коду немає'

LOOP

ENDIF

name = namgoods

IF A <> 0

SET FILTER TO indgoods = A

ACTIVATE WINDOW vivod

BROWSE;

TITLE 'Список постачальників, що поставляють' + name;

FIELDS;

A.inddel: H = 'Код постачальника',;

A.namdel: H = 'Ім'я постачальника',;

A.adrdel: H = 'Адреса постачальника',;

A.tel: H = 'Телефон постачальника',;

A.count: H = 'Рахунок постачальника'

DEACTIVATE WINDOW vivod

SET FILTER TO

ENDIF

DEACTIVATE WINDOW vvod

IF LASTKEY () = 27

EXIT

ENDIF

ENDDO

PACK

CLOSE ALL

CLEAR

SET TALK OFF

SELECT B

USE Goods

SELECT A

USE Suply

INDEX ON indgoods TO Indg

SELECT C

USE Delivery

INDEX ON inddel TO Indexdel

SELECT Suply

SET RELATION TO inddel INTO Delivery

SELECT Goods

INDEX ON namgoods TO Indnum

SET RELATION TO indgoods INTO Suply

SET SKIP TO Suply

BROWSE TITLE 'Товари';

FIELDS;

Goods.namgoods: H = 'Ім'я товару',;

Delivery.numdel: H = 'Ім'я постачальника',;

Delivery.adrdel: H = 'Його адреса',;

Delivery.count: H = 'Рахунок',;

Goods.measure: H = 'Одиниця виміру',;

Suply.pricegoods: H = 'Ціна одиниці',;

Suply.quant: H = 'Кількість одиниць',;

Totalamount = Suply.quant * Suply.pricegoods;

: H = 'Загальна сума'

CLOSE ALL

3.1. Лінійна програма

********** Установки ***********

CLEAR

SET TALK OFF

CLOSE ALL

USE state IN a & & відкрити в зоні а файл STATE

USE sotr IN b & & відкрити в зоні b файл CADR

*********** Робота з таблицею state **************

SELECT a

BROWSE;

TITLE 'Штати ^ Т - удал ^ N - добав ^ W - coxp';

FIELDS cod: H = 'Код',;

dolg: H = 'Посада',;

zarp: H = 'Оклад',;

kol: H = 'Кількість'

*********** Пошук даних в таблиці STATE ***********

CLEAR

с = 0

@ 5, 10 SAY 'Задайте код посади:' GET з PICTURE'###'

READ

@ 6, 2 SAY 'Результат пошуку'

LOCATE ALL FOR cod = C

DO WHILE! EOF ()

? 'Посада -', dolg, 'Оклад -', zarp

CONTINUE

ENDDO

WAIT 'Продовження - ENTER' WINDOW

******** Робота з таблицею sotr ****************

SELECT b

BROWSE;

TITLE 'Список - ^ T-удал ^ N - добав ^ W - сохр';

FIELDS cod: Н = 'Код',;

fio: H = 'Прізвище І.О.' ,;

tab: H = 'Табельний номер'

**** Пошук даних в таблиці SOTR ****

CLEAR

с = 0

@ 5, 10 SAY 'задайте код посади:';

GET з PICTURE'###'

READ

@ 6, 2 SAY 'Результат пошуку'

LIST 'Прізвище -', fio, 'Табельний номер -', tab;

WHILE cod = c

WAIT 'Продовження - ENTER' WINDOW

**** Робота з форматом ****

SET FORMAT TO cadr.fmt

CHANGE

SET FORMAT TO

******** Встановлення зв'язку ********************

SELECT b

SET ORDER TO cod

SELECT a

SET ORDER TO cod

SET RELATION TO cod INTO b

SET SKIP TO b

BROWSE;

TITLE 'Інформація';

FIELDS A.dolg: H = 'посаду',;

B.fio: H = 'П.І.Б.' ,;

A.zarp: H = 'оклад',;

nal = A.zarp * 0.2: H = 'податок'

SET RELATION TO

********* Кінець програми **********

3.2 Програма, що складається з процедур, що викликаються з меню

CLEAR ALL

SET TALK OFF

CLOSE ALL

SET SHADOWS ON

USE state IN a

USE cadr IN b

************** МЕНЮ ****************

DEFINE POPUP mmenu

DEFINE BAR1 OF mmenu PROMPT 'Інформація'

DEFINE BAR2 OF mmenu PROMPT 'Штатний розклад підприємства "

DEFINE BAR3 OF mmenu PROMPT 'Список співробітників'

DEFINE BAR4 OF mmenu PROMPT 'Стан'

DEFINE BAR5 OF mmenu PROMPT 'Запит'

DEFINE BAR6 OF mmenu PROMPT 'Вихід'

ON SELECTION BAR6 OF mmenu DEACTIVATE POPUP

ON SELECTION BAR1 OF mmenu DO about

ON SELECTION BAR4 OF mmenu DO p2table

ON SELECTION BAR5 OF mmenu DO pspr

ON BAR2 OF mmenu ACTIVATE POPUP wow

ON BAR3 OF mmenu ACTUVATE POPUP sos

DEFINE POPUP wow

DEFINE BAR1 OF wow PROMPT 'Перегляд'

DEFINE BAR2 OF wow PROMPT 'Пошук'

ON SELECTION BAR1 OF wow DO pstate

ON SELECTION BAR2 OF wow DO psearch

ON SELECTION POPUP wow DO wow

DEFINE POPUP sos

DEFINE BAR1 OF sos PROMPT 'Перегляд'

DEFINE BAR2 OF sos PROMPT 'Пошук'

ON SELECTION BAR1 OF sos DO pstate

ON SELECTION BAR2 OF sos DO psearch

ON SELECTION POPUP sos DO sos

ACTIVATE POPUP mmenu

************ Робота з таблицею state **************

PROCEDURE pstate

SELECT a

BROWSE;

TITLE 'Штати ^ T - удал ^ N - добав ^ W - coxp';

FIELDS cod: Н = 'Код',;

dolg: H = 'Посада',;

zarp: H = 'Оклад',;

kol: H = 'Кількість'

RETURN

******** Пошук даних в таблиці STATE ************

PROCEDURE psearch

CLEAR

c = 0

@ 10, 15 SAY 'Задайте код посади:';

GET з PICTURE'###'

READ

@ 12, 10 SAY 'Результат пошуку'

LOCATE ALL FOR cod = c

DO WHILE! EOF ()

? 'Посада -', dolg, 'Оклад -', zarp

CONTINUE

ENDDO

WAIT 'Продовження - ENTER' WINDOW

CLEAR

RETURN

******** Робота з таблицею cadr ***************

PROCEDURE pcadr

SELECT b

BROWSE;

TITLE 'Список ^ T - удал ^ N - добав ^ W - сохр';

FIELDS cod: H = 'Код',;

fio: H = 'Прізвище І.О.' ,;

tab: H = 'Табельний номер'

RETURN

******** Пошук даних в таблиці SOTR *******

PROCEDURE рcadrsr

CLEAR

с = 0

@ 5, 10 SAY 'Задайте код посади:';

GET з PICTURE'###'

READ

@ 6, 2 SAY 'Результат пошуку'

LIST 'Фіо -', fio, 'Табельний номер -', tab;

WHILE cod = c

WAIT 'Продовження - ENTER' WINDOW

CLEAR

RETURN

******** Встановлення зв'язку ******************

PROCEDURE p2table

SELECT b

SET ORDER TO cod

SELECT a

SET ORDER TO cod

SET RELATION TO cod INTO b

SET SKIP TO b

BROWSE;

TITLE 'Інформація';

FIELDS A.dolg: H = 'Посада',;

B.fio: H = 'П.І.Б.' ,;

A.zarp: H = 'Оклад',;

nal = a.zarp * 0.2: H = 'Податок'

SET RELATION TO

RETURN

********* Заставка ************

PROCEDURE about

CLEAR

@ 8, 15 TO 20, 60 double

@ 9, 25 SAY 'Штатний розклад'

@ 12, 20 SAY 'Модель інформаційної системи'

WAIT 'Продовження - ENTER' WINDOW

CLEAR

RETURN

********* Запит ************

PROCEDURE pspr

CLEAR

DEFINE WINDOW spr FROM 10, 10 TO 18, 40;

TITLE "Довідка 'SHADOW

ACTIVATE WINDOW spr

@ 1, 1 SAY 'Запит про зайняті посадах і загальному'

@ 2, 1 SAY 'Кількості ставок по них'

WAIT 'Продовження - ENTER' WINDIW

DEACTIVATE WINDOW spr

SELECT B

SET ORDER TO cod

SELECT A

SET ORDER TO cod

SET RELATION TO cod INTO b

SET SKIP TO B

SELECT A.dolg, A.kol, COUNT (B.fio) AS cnt, SUM (A.zarp) AS ssum;

FROM state A, cadr B INTO CURSOR qq;

WHERE B.cod = A.cod;

GROUP by A.dolg

BROWSE TITLE 'Зайняті посади';

FIELDS dolg: Н = 'Посада',;

kol: Н = 'За штатом',;

cnt: Н = 'Зайнято',;

ssum: Н = 'Сумарний оклад'

CLEAR

SET RELATION TO

RETURN

11. Завдання.

1. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

2
. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

3. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

4
. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

5. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

6
. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

7. Забезпечити форматний введення змінної x і форматний висновок значення функції y, використовуючи оператор розгалуження case. Функція має вигляд:

8. Забезпечити форматний введення змінної x і форматний висновок значення функції y чаплі оператор розгалуження case. Функція має вигляд:

РЕКОМЕНДОВАНА ЛІТЕРАТУРА

1. Дейт К. Введення в системи баз даних. - М.: Наука-1980 .- 463 с.

2. Мідоу Ч. Аналіз інформаційних систем. - М.: Прогрес. - 1977 .- 400 с.

3. Цікрітзіс Д., лохівський Ф. Моделі даних .- М.: Фінанси і статистика. -1985.-344 с.

4. Мейєр Д. Теорія реляційних баз даних. - М.: Мир. -1987.-608 с.

5. Бойко В.В., Савінков В.Ф. Проектування баз даних інформаційних систем .- М.: Фінанси і статистика. -1982 .- 382 с.

6. Джексон Г. Проектування реляційних баз даних для використання з мікро-ЕОМ. - М.: Мир. - 1991. - 252 с.

7. Попов А.А. Програмування в середовищі FoxPro2.0. - М.: Фінанси і статистика. - 1993. - 350 с.

1. Бемер С. FoxPro 2.6 для WINDOWS. - Київ: Торгово-видавниче бюро BHV .- 1995.-463 с.