46284 (607813), страница 3
Текст из файла (страница 3)
{,
[{,
{}] {}]
В синтаксисе этой команды опции указываются фигурными скобками вместо обычно принятых квадратных. При записи команды в программе в квадратные скобки заключаются параметры (размерность) массива - число строк и столбцов. Если указано одно число, то массив одномерный. Формально двумерный массив с одним из параметров, равным единице, фактически является одномерным: DECLARE [12,1] или DECLARE [1,25].
Примеры.
DECLARE Mas [8,4] DECLARE Masi [10] STORE {15/10/89} TO Datl
[4,4] •]
&& Двумерный массив && Одномерный массив
Для ввода данных в переменную или элементы массива в программе используется команда
STORE ТО / или альтернативная форма .
/ = .
6. Ввод данных в базу и редактирование
После того как создана структура файла БД, можно вводить данные. Существуют две стандартные экранные формы ввода (и вывода) информации в файлы БД: BROWSE и EDIT. Первая форма вызывается командой
BROWSE [NOINIT] [NOFOLLOW] fNOAPPEND] [NOMENU]
[NOEDIT] [NODELETE] [NOCLEAR] [COMPRESS] [FORMAT] [LOCK ] [WIDTH ] [FREEZE ] [WINDOW ] [FIELDS [/R] [/] / = [ , [/R] [/] / = ]...]
В команде имеется ряд опций, позволяющих устанавливать различные режимы ее использования. В число этих опций входит группа опций, позволяющих назначить режимы работы с полями, и группа опций по размещению полей на экране. В состав первой группы входят следующие опции: NOEDIT , позволяющая установить режим только чтения для всех полей, NOAPPEND, не разрешающая добавлять новые записи, и NODELETE, не разрешающая помечать записи для удаления. Опция FREEZE назначает для обновления только одно указанное поле. Другие поля высвечиваются, но остаются недоступными для редактирования. Если для указанного в опции FREEZE поля командой PROTECT открыто только чтение, то обновление не разрешается. Опция FREEZE без имени поля отменяет ранее назначенную установку.
Поля высвечиваются в том порядке, который определен структурой файла БД или указан в команде опцией FIELDS, входящей в состав второй группы. Эта опция позволяет выбрать поле и определить порядок его расположения в таблице Browse.
Опция WIDTH устанавливает верхний предел ширины колонки для всех полей в таблице BROWSE. Эта ширина перекрывает ширину поля, назначенную при создании файла БД. Если опции WIDTH и используются одновременно, то принимается наименьшее значение. Данная опция, как и предыдущая, не применяется для полей типа Memo и логических полей. Значения числовых полей и полей даты не будут высвечиваться, если значение опции WIDTH меньше ширины этих полей, назначенных при определении структуры файла БД. Опция FORMAT позволяет разместить поля в таблице BROWSE в очередности, определенной экранной формой, которая установлена командой SET FORMAT TO.
Альтернативой команды BROWSE является команда EDIT
EDIT [NOINIT] [NOFOLLOW] [NOAPPEND] [NOMENU]
[NOEDIT] [NODELETE] [NOCLEAR] [<номер записи>] [FIELDS <список полей>] [<диапазон>] [FOR <условие>] [WHILE <условие>]
Эта команда выводит на экран по одной записи файла БД, поля которой размещаются по вертикали.
Если требуется обновить содержимое полей файла БД без привлечения данных из другого файла, например умножить содержимое числового поля на заданную величину, соединить содержимое двух символьных полей и т.д., можно использовать команду
REPLACE [] WITH
[ , WITH <выражение...] [WHILE ] [FOR ] [ADDITIVE]
которая изменяет (замещает) значения заданных полей (включая поля Memo) текущей записи или группы записей, определенных границами и опциями WHILE, FOR.
После ввода данных в файл БД нередко требуется быстро их просмотреть. Для этого служат команды
LIST/DISPLAY [] [[FIELDS] ]
[OFF] [] [FOR ] [WHILE ] [ТО PRINTER/ ТО FILE ]
Эти команды выводят все поля файла БД, если их список не определен опцией FIELDS. В начале каждой записи, если не указана опция OFF, выводится ее номер, опции , FOR и WHILE определяют диапазон выводимых записей. Команды LIST и DISPLAY идентичны с той разницей, что первая выводит записи непрерывно, а вторая делает остановку после вывода одной страницы экрана.
Кроме выводов файлов БД команды LIST и DISPLAY позволяют также высвечивать данные о файлах в директориях, содержимое буфера HISTORY (хранилище выполненных с клавиатуры команд), данные об используемых переменных и массивах, информацию о текущем сеансе работы с dBASE, структуру указанного файла БД и имена рабочих станций, работающих в среде ЛВС.
7. Дополнительные операции
Нередко возникает необходимость просмотреть структуру файла и вывести ее на печать. Для этого служит команда
LIST/DISPLAY STRUCTURE [IN <алиас>] [ТО PRINTER/ TO FILE <имя файла>]
которая выводит информацию о файле БД.
Существуют специальные команды перемещения по файлу, добавления новых записей и пометки записей для их последующего удаления.
Для перемещения по файлу используется команда
GO/GOTO BOTTOM/TOP [IN <алиас>]
ИЛИ
или
GO/GOTO [RECORD] [IN ]
Эти команды осуществляют переход на указанную запись в активном файле БД. В программах часто требуется перемещать указатель записи не на конкретную запись, а на следующую после текущей. Эту операцию выполняет команда
SKIP [] [IN ]
После того как указатель записи перемещен на нужную запись, которая становится текущей, можно выполнить требуемую операцию, например ввести запись до или после текущей. Для этого используется команда
INSERT [BEFORE] [BLANK]
которая позволяет ввести новую запись (или пустую запись, если указана опция BLANK) после текущей или перед ней (если задана опция BEFORE). Пометить одну или несколько записей для их последующего удаления можно командой
DELETE [] [FOR ] [WHILE ]
Опции , FOR и WHILE позволяют помечать записи, отобранные в соответствии с заданным диапазоном и условиями.
Для того чтобы уничтожить пометки на удаление записей используется команда
RECALL [] [FOR ] [WHILE ]
Физическое удаление помеченных записей активного файла БД выполняет команда PACK. Команда
APPEND [BLANK]
позволяет добавлять записи, введенные с клавиатуры в конец активного файла БД.
В ряде случаев требуется создать физически упорядоченный файл. Для этого используется команда
SORT TO ON [/А] [/С] [/D]
[ , [/А] [/С] [/D]...] [ASCENDING]/[DESCENDING] [] [WHILE ] [FOR ]
которая создает новый файл БД с записями, отсортированными в алфавитном, хронологическом или числовом порядке по заданным полям. Сортировка выполняется в порядке возрастания (/А) или убывания (/D) значений полей. Допускается сортировка максимум по десяти полям. Опция /С определяет сортировку независимо от прописных и строчных букв. Команда
COPY FILE ТО
делает копию файла любого типа.
После копирования или в других случаях нередко требуется переименовать файл. Для этого используется команда
RENAME ТО
Нередко требуется найти запись не по ее положению в файле БД, а по содержанию полей. Такой вид поиска предусмотрен, например, в меню команды BROWSE. Способ поиска по содержанию полей зависит от того, созданы ли индексные файлы по этим полям или по их комбинациям. Для поиска по неиндексированным полям используется команда
LOCATE [FOR] [] [WHILE ]
Эта команда выполняет в активном файле БД поиск первой записи, удовлетворяющей условию, заданному опцией FOR. Опции и WHILE определяют диапазон и условие начала и конца просмотра записей.
Для поиска по индексированным полям используются команды SEEK и FIND. Команда
SEEK
выполняет поиск первой записи файла БД с заданным значением индексированного поля. При этом соответствующий индекс должен быть установлен в качестве главного (управляющего) индекса. Команда
FIND
аналогична команде SEEK и также выполняет поиск первой записи в индексированном файле БД с заданным значением индекса при установленном соответствующем главном индексе. Отличие состоит в том, что в качестве поискового значения в команде FIND используется не выражение, а литеральная строка.
Основной командой, предназначенной для создания нестандартных экранных форм ввода и вывода информации, является
@<строка>,<колонка> [SAY <выр.>
[PICTURE <выр.С>]
[FUNCTION ]] [GET
[[OPEN] WINDOW <имя окна>] [PICTURE <выр.С>]
[FUNCTION <список функций>]
[RANGE [<нижний>] [,<верхний>]]
[VALID <условие> [ERROR <выр.С>]]
[WHEN <условие>] [DEFAULT <выражение>]
[MESSAGE ]]
[COLOR [] [, <нестандартная
область экрана>]]
Эта команда позволяет выводить или вводить информацию в заданном формате в указанные места экрана. Кроме того, с помощью опций SAY этой команды можно выводить данные на принтер или в файл на диске. Для того чтобы установить вывод информации с помощью данной команды на экран, принтер или в текстовый файл DOS, используется команда
SET DEVICE TO SCREEN/printer/file <имя файла>
Опция GET выводит и позволяет обновлять и редактировать данные, содержащиеся в полях, переменных или массивах.
Собственно обновление данных в переменных GET (здесь и ниже под словом «переменная» подразумеваются также поля файла БД и элементы массива) выполняется командой READ, которую следует поместить после данной команды. Эта команда активизирует переменные и выводит в них значения, находящиеся на экране.
Для приостановления процесса последовательного выполнения программы используется команда
WAIT [] [ТО ]
которая вызывает паузу до нажатия любой клавиши и высвечивает в нижней строке экрана сообщение. После нажатия клавиши выполнение программы продолжается, а в переменную заносится код ASCII этой клавиши.
С целью улучшения восприятия информации на экране можно использовать команду
@ , ТО , [DOUBLE/PANEL/] [COLOR ]
которая рисует на экране прямоугольную рамку, определяемую координатами верхнего левого - , - и правого нижнего - , - углов рамки. Опция DOUBLE позволяет рисовать двойную линию рамки (по умолчанию рисуется одинарная линия), опция PANEL - рамку в виде сплошной полосы. Кроме того, имеется возможность рисовать линию рамки заданными символами. Для этого задается список символов для определения рамки. Можно задать различные символы для сторон и углов рамки. В этом случае символы разделяются запятыми и располагаются в следующем порядке: f, b, I, r, fl, fr, bl, br, где f - верх; b - низ; 1 - левая сторона; г - правая сторона; П -левый верхний угол; fr - правый верхний угол; bl - левый нижний угол; br -правый нижний угол.
Пример.
@ 5,13 ТО 10,40 DOUBLE COLOR R/BG Д
Для полной очистки всего экрана используется команда
CLEAR [ALL/FIELDS/GETS/MEMORY/MENUS/ POPUPS/TYPEAHEAD/WINDOWS]
Она очищает экран, устанавливает курсор в левый нижний угол экрана и освобождает все незаконченные опции GET команды @...SAY...GET. Различные опции этой команды также закрывают файлы БД, очищают переменные, списки полей, окна, горизонтальные и вертикальные меню и буфер клавиатуры.
Команда @...SAY...GET является универсальной для организации ввода и вывода информации на экране. В программах нередко требуется вводить с клавиатуры данные для обеспечения процесса обработки информации, например имя файла БД, данные для ветвления программы, поисковые значения и т.д. Для этого предусмотрена специальная команда
ACCEPT [] ТО
которая позволяет вводить с клавиатуры данные символьного типа в переменную. Перед полем переменной можно высветить сообщение, например, о характере вводимых данных.
Кроме этой команды для ввода данных с клавиатуры можно использовать команду
INPUT [] ТО
которая выполняет аналогичные функции, но позволяет вводить в переменную с клавиатуры данные не только символьного, но и других типов, а также в виде заданного выражения, что не допускается в команде ACCEPT. Тип выражения определяет тип переменной, в которую вводится значение. После набора выражения с клавиатуры для ввода его в переменную надо нажать клавишу Enter.
Кроме универсальной команды SAY существует команда, специально предназначенная для вывода данных на экран и принтер:
?/?? [ [PICTURE ]
[FUNCTION ] [AT ] [STYLE ]] [,...] [,]
которая выводит значение одного или более заданных символьных выражений. Если установлено состояние SET PRINT ON, то выполняется вывод на принтер, если SET PRINT OFF, то на экран. Эта команда в форме ? выводит каждое выражение на следующей строке, а в форме ?? все выражения на одной строке. Для печати отчета используется команда
REPORT FORM /?
[] [WHILE ]
[FOR ] [PLAIN]
[HEADING <выр.С>] [NOEJECT]
[ТО PRINTER/TO FILE <имя файла>] [SUMMARY]
которая запускает программу печати отчета (файл отчета), созданную командой CREATE/MODIFY REPORT.
Для создания исходных программных файлов используются обычные текстовые редакторы, например встроенный редактор dBASE, который вызывается командой
MODIFY COMMAND/FILE <имя файла> [WINDOW <имя окна>]
Прикладная программа обычно состоит из главной процедуры и вызываемых из нее процедур, например:
<команды>
DO Procl
DO Proc2
DO РгосЗ
RETURN
PROCEDURE Procl
<команды>
RETURN
PROCEDURE Proc2
&& Начало главной процедуры
&& Конец главной процедуры
&& Начало Procl
&& Конец Procl
&& Начало Ргос2
617
<команды> RETURN
PROCEDURE РгосЗ <команды> RETURN
&& Конец Proc2 && Начало РгосЗ
&& Конец РгосЗ
Процедура представляет собой программный модуль, который выполняет определенную задачу. После ее выполнения управление передается в вызвавшую или главную процедуру. Процедура так же, как и программа, вызывается и выполняется командой
DO / [WITH ]
Опция WITH передает в вызываемую процедуру параметры (до 64).
Каждая процедура, размещаемая в файле процедур или в программном файле, должна начинаться с команды
PROCEDURE
и завершаться командой
RETURN [/ТО MASTER/TO ]
Команда RETURN удаляет все переменные, которые были определены в процедуре как PRIVATE (переменные, определенные как PUBLIC, остаются без изменения).
Командой DO в процедуру можно передавать из вызывающей программы и обратно параметры, которые в самой процедуре определяются командой
PARAMETERS
которая должна быть первой исполняемой командой в теле процедуры. В качестве параметра в списке может быть любое допустимое выражение, определяющее переменную, в которую передаются данные из соответствующего параметра вызывающей программы. Если эта переменная не объявлена глобальной (PUBLIC), то автоматически она имеет статус локальной (PRIVATE).
Определение переменных как локальных выполняется командой
PRIVATE <список переменных> / [ALL [LIKE/EXCEPT <шаблон>]]
Глобальные переменные можно использовать повсюду в программе и в вызываемых ею процедурах. Для объявления переменных и элементов массива глобальными используется команда
PUBLIC / [ARRAY ]
8. Организация системы меню
Чтобы организовать в dBASE систему меню, сначала надо определить его отдельные компоненты - меню вертикального и горизонтального типа. Для этого используются специальные команды, начинающиеся словом DEFINE - определить. Определение горизонтального меню выполняется командой
DEFINE MENU <имя менк» [MESSAGE <выр.С>]
Эта команда еще не создает горизонтальное меню, а только назначает ему имя и, если требуется, сообщение, которое будет высвечиваться в нижней строке экрана (строке сообщений). Для определения позиций горизонтального меню используется команда
DEFINE PAD
OF <имя меню> PROMPT <выр.С>
[AT <строка>, <ко'лонка>] [MESSAGE <выр.С>]
которая определяет одну позицию горизонтального меню. Для задания нескольких позиций данная команда повторяется соответствующее число раз. Вертикальное меню определяется командой
DEFINE POPUP <имя менк»
FROM , [ТО ,] [PROMPT FIELD ] /PROMPT FILES [LIKE ] /PROMPT STRUCTURE] [MESSAGE ]
которая устанавливает его имя (записывается по тем же правилам, что и для горизонтального меню) и координаты окна меню на экране. Опции FROM и ТО определяют координаты левого верхнего и правого нижнего углов окна меню.
Назначение текста и других атрибутов одной позиции ранее определенного вертикального меню осуществляется командой
DEFINE BAR <номер строки> OF <имя меню> PROMPT <выр.С> [MESSAGE <выр.С>] [SKIP [FOR <условие>]]
Чтобы определить нескольких позиций, надо эту команду повторить соответствующее число раз.
После того как определены позиции меню, обычно требуется назначить им определенные действия, которые будут выполняться при их выборе. Эти действия для позиций горизонтального меню назначаются командой
ON SELECTION PAD OF []
которая выполняет заданную команду при выборе указанной позиции горизонтального меню. В качестве команды может быть любая команда dBASE IV, в том числе команда вызова программ и процедур.
Для назначения действий позициям вертикального меню используется команда
ON SELECTION POPUP >/ALL []
которая выполняет заданную команду или процедуру при выборе позиции вертикального меню.
Обычно для назначения позициям меню каких-либо действий используется выход на процедуру, в которой помещаются команды для выполнения этих действий. В такой процедуре чаще всего применяется команда
DO CASE
CASE
[CASE ]
[OTHERWISE]
ENDCASE
Можно формировать вложенные структуры этой команды, т.е. внутри команды после ключевого слова CASE помещать другую команду DO CASE, а также любые другие команды ветвления и выполнения циклов, например IF...ENDIF, DO WHILE...ENDDO и др.
CASE CASE Val > 1000 <команды> CASE Val > 100 <команды> CASE Val > 10 <команды> OTHERWISE <команды> ENDCASE
Если требуется разветвить процесс только на два направления, можно использовать команду
IF [ELSE], ENDIF
При реализации операций, назначаемых позициям меню, нередко требуется организовать циклы повторяющихся действий, например организовать обработку файла БД и др. Это можно сделать с помощью ряда команд и их комбинаций. Одной из таких является команда
ход фай
DO WHILE
[EXIT]
[LOOP] ENDDO
руе
:
зац
которая обеспечивает повторение последовательности команд, заключенной между словами DO WHILE и ENDDO до тех пор, пока заданное условие истинно. Если встречается слово LOOP, то управление передается в начало цикла команд, а при встрече слова EXIT осуществляется выход из команды и управление передается на первую команду после слова ENDDO, завершающего данную команду.
Предыдущие команды позволяют определить меню и атрибуты их позиций. Для того чтобы активизировать горизонтальное и вертикальное меню (а также списки), используются команды
ACTIVATE MENU <имя меню> [PAD <имя позиции>]
ACTIVATE POPUP <имя меню>
которые вызывают на экран предварительно определенные меню.
Список литературы
Голицына О.Л., Максимов Н.В. и др., «Базы данных» (учебное пособие)
Могилёв А.В., Пак Н.И. и др., «Информатика»
Майоров А.Н. «Современные СУБД»
![](https://s.studizba.com/z.php?f=/templates/si/i/noavatar.png&w=100&h=100&t=1"){kind=avatar}
