Сетевая модель данных

и недостатки

и 1978 г.
Предложена сетевая модель данных, поддерживающая связи типа m:n
Впервые специфицированы языки БД:
ЯОД схемы (концептуальный уровень)
ЯОД подсхемы (внешний уровень)
Язык определения хранимых данных – ЯОХД (внутренний уровень)
ЯМД
Реализация - Integrated Database Management System (IDMS) компании Cullinet Software, Inc.,

поименованное данное. Его экземпляр представляет значение данного.
Тип записи – поименованная совокупность имен полей:

ПРЕПОДАВАТЕЛЬ

ФИО

Должность

Адрес

ПРЕПОДАВАТЕЛЬ

Иванов

профессор

Киев

Экземпляр типа записи – набор экземпляров полей:

базе данных с точки зрения значений их полей.

Ключ базы данных (КБД) – это уникальный внутренний идентифи-катор записи. КБД автоматически присваивается записи при ее запоминании в БД и не изменяется при любых изменениях записи.

Ключ CALC – это внутренний идентификатор записи, который присваивается ей на основании значений определенных полей (элементов данных) записи.

композиции наборов строятся многоуровневые иерархические и сетевые структуры.

Владелец набора
Члены набора

Экземпляр набора включает один экземпляр записи-владельца и любое количество экземпляров каждого типа записи-члена набора

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

нового экземпляра записи)
INSERT (вставка записи-члена в экземпляр набора)
REMOVE (удаление записи-члена из экземпляра набора)
DELETE (удаление текущей записи)
MODIFY (модификация текущей записи)

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

FIND

Помещает найденную запись в РОП.

GET

FIND Faculty RECORD BY DATABASE KEY X;
If Error_Status=0 then GET Faculty;
Else Print "Not Found !";

поля должны быть определены в схеме БД как, так называемые, CALC-ключи.

FIND [имя-записи] RECORD BY CALC-KEY

Синтаксис:

Пример: Найти запись лекции, у которой поле LID равно «L3». (Поле LID определено как CALC-поле)

Lecture.LID = "L3";
FIND Lecture RECORD BY CALC-KEY;

экземпляра-владельца и экземпляров членов набора. Записи-члены набора упорядочены.

SUBJECT

LECTURE

Is taught at

Has

TEACHER

NEXT Lecture RECORD IN Has SET;

Текущий экземпляр набора “Has”

L2 - текущая запись-член набора “Has”

L3 - следующая запись-член набора “Has”

Error_Status != 0 – достигнут конец записей-членов в экземпляре набора

PRIOR Lecture RECORD IN Has SET;

L3 - текущая запись-член набора “Has”

Текущий экземпляр набора “Has”

L2 - Предыдущая запись-член набора “Has”

Error_Status != 0 – достигнуто начало записей-членов в экземпляре набора

Is_taught_at

SET

Синтаксис:

Пример:

FIND FIRST Lecture RECORD IN Has SET;

Текущий экземпляр набора “Has”

L1 - первая запись-член набора “Has”

Error_Status != 0 – экземпляр набора не имеет записей-членов

L1 L2 L3 L4 L5

S1 S2 S3

T1 T2

OF Has SET

Текущий экземпляр набора “Has”

L2 - текущая запись-член набора “Has”

T1 - запись-владелец набора “Has”

Lecture RECORD IN Has SET;
FIND OWNER OF Is_taught_at SET;
FIND LAST Lecture RECORD IN Is_taught_at SET;
FIND NEXT Lecture RECORD IN Has SET;
FIND OWNER OF Is_taught_at SET;

T1
L3
S2
L4
L5
S3

RECORD

Синтаксис:

Пример:

STORE Teacher RECORD

Вставка производится в экземпляр текущего набора

текущим
Сделать присоединяемый экземпляр записи текущим
Выполнить команду INSERT

INSERT [тип-записи] RECORD INTO [тип-набора] SET

Синтаксис:

Пример:

x=31; FIND Teacher RECORD BY DATABASE KEY x;
y=24; FIND Lecture RECORD BY DATABASE KEY y;
INSERT Lecture RECORD INTO Has SET;

REMOVE

REMOVE [тип-записи] RECORD FROM [тип-набора] SET

Синтаксис:

Пример: Удалить все лекции у преподавателя с ID 31.

x=31; FIND Teacher RECORD BY DATABASE KEY x;
Loop: FIND NEXT Lecture RECORD IN Has SET;
IF Error_Status=0 THEN BEGIN; REMOVE Lecture RECORD FROM Teacher SET;
GO TO Loop;
END;

экземпляр записи БД.

Пример: Заменить у преподавателя с ключом базы данных 31 имя на «Иванов».

x=31; FIND Teacher RECORD BY DATABASE KEY x;
GET Teacher RECORD;
Teacher.Name = ”Иванов”;
MODIFY RECORD;

БД
Владелец набора может быть удален, когда в этом наборе отсутствуют записи-члены

DELETE [тип-записи] RECORD

Синтаксис:

Пример: Удалить лекцию с ID 21.

x=21; FIND Lecture RECORD BY DATABASE KEY x;
DELETE Lecture RECORD;