Система управления базами данных Visual FoxPro5.0 - от начальных навыков к профессиональной работе. Крушель Е.Г - 62 стр.

                                          108

 Лукьянова А.А.      Коммерция                  Менеджер предприятия
Поля: ФИО - точно по файлу students.dbf, поле ФИО;
      хобби     - поле символьного типа (склонности);
      профессия - поле символьного типа (рекомендуемая профессия).
       Добавьте в проект students, в котором в базе данных находится таблица
students.dbf, созданные таблицы stud1.dbf и stud2.dbf (см раздел 6 в главе 1). Для этого
просто откройте проект в диалоге Open. В проекте с помощью мыши зайдите в БД
students и после того, как откроется ее структура (т.е. внутри находится элемент этой
структуры - таблица students) нажмите на кнопку Add. На экране откроется окно диалога
Open, в котором Вы выберите созданную только что таблицу stud1.dbf. Аналогичным
образом добавьте в БД students - таблицу stud2.dbf.

       Наша задача: сделать так, чтобы перемещение файлового указателя в
“материнском” файле students.dbf сопровождалось автоматическим перемещением
указателей в двух “дочерних” файлах. Последовательно вводите в командном окне:
CLEAR
CLOSE DATABASES           && закрываются все базы, открытые ранее. В рабочих
областях
SELECT 1                  && A (1), B (2) и C (3) будут открыты соответственно
USE stud1                 && файлы stud1.dbf, stud2.dbf, students.dbf
SELECT 2
USE stud2                 && Рабочая область 3 (с "материнским" файлом
SELECT 3                  && students.dbf) как открытая последней, является активной.
USE students
SET RELATION TO RECNO() INTO 1, RECNO() INTO 2
                          && По этой команде устанавливается связь (relation) между
                          && "материнским" файлом и файлами, открытыми в других
                          && (открытых, но неактивных) рабочих областях.
CLEAR
 GO 3                     && переход к третьей записи в файле students.dbf
                          && ("материнском)". Благодаря команде SET RELATION...
                          && одновременно происходит автоматическое перемещение
                          && указателя в файлах, открытых в областях A и B.
?ФИО,A-> ФИО,B-> ФИО
                          && по этой команде будут выведены на экран значения поля
                          && ФИО из файлов в активной области и из двух неактивных
                          && (A и B). Допускается и другой синтаксис:
                          &&           a-> ФИО,     b-> ФИО
                          &&           A. ФИО,      B. ФИО
                          &&           a. ФИО,      b. ФИО
                          &&           stud1. ФИО, stud2. ФИО
       Вы увидите на экране одни и те же фамилии: файловый указатель одновременно
с “материнской” переместился и в обеих “дочерних” базах.

       Второй способ установления связи между неиндексированными таблицами гораздо
нагляднее и быстрее первого, т.к. осуществляется через системное меню.
    Для этого зайдите в проект и выберите структуру Databases, в ней находятся БД
students.dbc, которая содержит наши три таблицы.
    После того, как Вы оказались в этой структуре выберите в системном меню Window
команду Data Session или нажмите соответствующую кнопку на стандартной панели
инструментов Visual FoxPro 5.0 (пиктограмма «с очками»). Перед Вами появится диалог
Data Session – это отдельная среда, описывающая рабочую область, курсоры рабочей