Компьютерные науки - Учебники на русском языке - Скачать бесплатно
выполнит те же действия.
Библиотека: CLIPPER.LIB
См.также: RETURN.
READ [SAVE]
Синтаксис: READ [SAVE]
Включает редактирование текущих GETов.
SAVE - оставляет действительными редактируемые GET, позволяя
отредактировать их еще раз другим READ. Если SAVE не
используется, то все GET после редактирования становятся
недействительными.
READ позволяет редактировать на экране все текущие GET. В
присутствии FORMAT SET, READ передает ему контроль до входа в
режим редактирования.
В процессе редактирования предоставляется возможность изменять
на экране содержимое переменных, определенных с помощью GET.
Клавиши выбора объекта редактирования:
-----------------------------------------------------------
Клавиша Действие
-----------------------------------------------------------
стр.влево Символ влево. Не переводит курсор на
Ctrl-S предыдущий GET.
стр.вправо Символ вправо. По окончании текущего
Ctrl-D GET курсор переводится в начало след.
Ctrl-стр.влево Слово влево.
Ctrl-A
Ctrl-стр.вправо Слово вправо.
Ctrl-F
стр.вверх Предыдущий GET.
Ctrl-E
стр.вниз Следующий GET.
Ctrl-X, Return,
Ctrl-M
Home Первый символ GET.
End Последний символ GET.
Ctrl-Home Начало первого GET.
- 87 -
Ctrl-End Начало последнего GET.
-----------------------------------------------------------
Клавиши редактирования:
-----------------------------------------------------------
Клавиша Действие
-----------------------------------------------------------
Del Удалить символ в позиции курсора.
BackSpace Удалить символ слева от курсора.
Ctrl-T Удалить слово справа.
Ctrl-Y Удалить символы от позиции курсора до
конца GET.
Ctrl-U Восстановить исходное значение
текущего GET.
-----------------------------------------------------------
Клавиши управления режимом редактирования:
-----------------------------------------------------------
Клавиша Действие
-----------------------------------------------------------
Ins Включение режима вставки.
-----------------------------------------------------------
Клавиши управления завершением процесса редактирования:
-----------------------------------------------------------
Клавиша Действие
-----------------------------------------------------------
PgUp, PgDn Выход из READ с сохранением текущего
GET.
Return Выход из READ из последнего GET.
Esc Выход из READ без сохранения текущего
GET.
-----------------------------------------------------------
Кроме того можно покинуть READ, выполнив CLEAR, CLEAR GETS,CLEAR
ALL изнутри SET KEY-процедуры или пользовательской функции,
инициализированной VALID.
Необходимо заметить, что READ внутри форматного файла
игнорируется. Клиппер поддерживает только одностраничные
форматы.
Библиотека: CLIPPER.LIB
- 88 -
См.также: @...GET, CLEAR GETS, SET FORMAT, LASTKEY().
RECALL
Синтаксис: RECALL [<эобл.опр.>]FOR [<эусловие>] WHILE [<эусловие>]
Возвращает записям, помеченным для удаления их прежний статус.
<эобл.опр.> - часть файла данных, где будет действовать RECALL.
По умолчанию имеется ввиду текущая запись. Если указано
<эусловие>, то по умолчанию будут обработаны все записи файла.
FOR - отбирает соответствующие заданному условию записи в файле
данных внутри заданной области (<эобл.опр.>).
WHILE - позволяет просматривать записи начиная с текущей до
первого невыполнения условия.
Если DELETED-ON, RECALL будет работать только с одной текущей
записью или с записями, указанными в <эобл.опр.>.
Пример:
USE Sales
DELETE RECORD 4
? DELETED() && Результат: .T.
RECALL
? DELETED() && Результат: .F.
Вслучае работы в сетях при употреблении RECALL для одной записи,
она должна быть предварительно обработана RLOCK(). Если же речь
идет о нескольких записях, весь файл данных должен быть
предварительно заперт FLOCK() или USE EXCLUSIVE.
Библиотека: CLIPPER.LIB
См.также: DELETE, PACK, SET DELETED, ZAP, DELETED().
REINDEX
Синтаксис: REINDEX
Пересоздает все открытые индексные файлы в текущей рабочей
области.
REINDEX просматривает все открытые индексные файлы и в
зависимости от UNIQUE-ON или OFF удаляет в каждом файле
повторяющиеся ключи или, соответственно, оставляет их.
В сетях перед употреблением REINDEX необходимо использовать USE
EXCLUSIVE.
Библиотека: CLIPPER.LIB
- 89 -
См.также: INDEX, PACK, SET INDEX, SET UNIQUE, USE.
RELEASE
Синтаксис: RELEASE <эсписок переменных>/[ALL [LIKE/EXCEPT <эшаблон>]]
Удаляет переменные из памяти.
<эсписок переменных> - список удаляемых переменных.
<эшаблон> - маска, определяющая группу переменных,
предназначенных к удалению (LIKE), или, наоборот, защищенных от
него (EXCEPT).
Использование: в случае, если для перечисления переменных
используется список, то удаление производится независимо от
статуса переменной. PUBLIC и PRIVATE более высоких уровней тоже
удаляются. В случае же использования ALL (все), LIKE/EXCEPT,
команда действует только на переменные определенные в текущей
процедуре.
Необходимо заметить, что удаленные с помощью второго,
"локального" способа переменные, объявленные на этом уровне
PRIVATE, становятся вновь доступными после выхода из этой
процедуры.
Пример:
PUBLIC one
one = "1"
DO Proc2
? TYPE("one") && Результат: C
RETURN
PROCEDURE Proc2
PRIVATE one
one = "2"
DO Proc3
? TYPE("one") && Результат: U
RETURN
PROCEDURE Proc3
RELEASE one
? TYPE("one") && Результат: U
RETURN
Библиотека: CLIPPER.LIB
См.также: CLEAR ALL, CLEAR MEMORY, QUIT.
RENAME
Синтаксис: RENAME <эфайл1>. TO <эфайл2>.
Переименовывает файл.
<эфайл1> - старое имя, <эфайл2> - новое имя.
Внимание! Перед употреблением команды файл должен быть закрыт
- 90 -
(CLOSE). Соответствующий memo (.dbt) файл должен быть также
переименован.
Библиотека: CLIPPER.LIB
См.также: COPY FILE, ERASE, RUN, FILE().
REPLACE
Синтаксис: REPLACE [<эобл.опр.>][<эсиноним> ->] <эполе1> WITH <эвыр.1>
[,<эполе2> WITH <эвыр.2>,...]
[FOR <эусловие>] [WHILE <эусловие>]
Изменяет содержимое полей в соответствии с определенными
выражениями.
<эполе> - имя поля, подлежащего изменению. Тип может быть любым,
включая memo.
<эвыр.> - выражение, значение которого присваивается полю.
<эсиноним> - с его помощью можно использовать поля из другого
файла в другой рабочей области. Здесь <эсиноним> - имя рабочей
области, которой принадлежит поле <эполе>.
<эобл.опр.> - часть текущего файла данных. По умолчанию
подразумевается текущая запись. В случае употребления FOR/WHILE,
<эобл.опр.> по умолчанию - ALL (все записи).
FOR - отбирает соответствующие заданному условию записи в файле
данных внутри заданной области (<эобл.опр.>). WHILE - позволяет
просматривать записи начиная с текущей до первого невыполнения
условия.
Необходимо учитывать, что в случае изменения содержимого поля,
являющегося ключевым, соответствующий индекс-файл перепишется и
положение указателя записей в нем изменится. Во избежании ошибок
в этом случае необходимо проделать следующее: CLOSE INDEX,
REPLACE, SET INDEX TO, REINDEX. Содержимое memo-поля также можно
изменить, указав в REPLACE соответствующую символьную строку.
Пример:
SELECT 1
USE Customer
APPEND BLANK
SELECT 2
USE Invoices
*
REPLACE Charges WITH Customer -> Markup * Cost,;
Custid WITH Customer -> Custid,;
Customer -> Last_tran WITH DATE()
В сетях в случае применения REPLACE для одной записи, она должна
быть предварительно обработана RLOCK(). Если же запись не одна,
то весь файл должен вначале быть FLOCK() или USE EXCLUSIVE. То
же относится и к полю, обрабатываемому REPLACE в невыбраной
- 91 -
рабочей области.
Библиотека: CLIPPER.LIB
См.также: APPEND, JOIN, UPDATE, STRTRAN().
REPORT FORM
Синтаксис: REPORT FORM <эфайл1>/(<эвырС1>) [<эобл.опр.>] [FOR <эусловие>]
[WHILE <эусловие>] [TO PRINT] [TO FILE <эфайл2>/(<эвырС2)]
[SUMMARY] [PLAIN] [HEADING <эвырС3>] [NOEJECT]
Выводит табулированный и по необходимости группированный отчет с
заголовками страниц и колонок, определяемых соответственным
(.frm)-файлом.
<эфайл1> - имя файла, содержащего форму отчета.
<эобл.опр.> - часть записей, подлежащая выводу. По умолчанию -
ALL (все).
FOR - отбирает соответствующие заданному условию записи в файле
данных внутри заданной области (<эобл.опр.>). WHILE - позволяет
просматривать записи начиная с текущей до первого невыполнения
условия.
TO PRINT - организует параллельный вывод на печать.
TO FILE - загружает выводимую информацию в файл
<эфайл2>(отбрасывая символы "пропуск листа"(ASCII 12)). Если не
указано расширение файла, создается (.txt).
SUMMARY - подлежат выводу только группы, подгруппы и основные
общие строки (grand total lines).
PLAIN - подавляет вывод даты, номера сраницы и числа страниц.
Кроме того имя отчета и заголовки колонок печатаются только в
начале вывода.
HEADING - выводит <эвырС3> в первой строке каждой страницы.
NOEJECT - подавляет прогон первой страницы, когда включено TO
PRINT.
REPORT FORM выдает отчет по форме, определенной в (.frm)-файле.
Этот файл может быть создан при помощи RL.EXE (см. главу 12,
Утилиты Клиппера).
Если необходимо помещаемый в файл (TO FILE) текст оснастить
управляющими кодами "пропуск листа" (ASCII 12), дополните свою
программу следующими командами:
SET PRINTER TO <эфайл>
REPORT FORM <эфайл> TO PRINT
SET PRINTER TO
Пример:
USE Sales INDEX Sales
- 92 -
REPORT FORM Sales TO PRINT FOR Branch = "100"
Библиотека: CLIPPER.LIB
См.также: LABEL FORM, LIST.
RESTORE
Синтаксис: RESTORE FROM <эфайл>/(<эвырС>) [ADDITIVE]
Восстанавливает переменные из (.mem)-файла.
<эфайл> - имя (.mem)-файла, загружаемого с диска.
ADDITIVE - загружаемые переменные добавляются к существующим.
Переменные с совпадающими именами переписываются, если не
являются "спрятанными" (PRIVATE). В противном случае (ADDITIVE
не выбрано) существующие переменные удаляются до того, как будут
загружегны новые.
Переменные инициализируются как локальные (PRIVATE) с областью
действия в текущей процедуре, если они не были объявлены ранее
глобальными (PUBLIC) и не используется ADDITIVE.
Пример:
демонстрирует типичное применение SAVE и RESTORE. Здесь
переменные, описывающие содержимое экрана, вначале записываются,
а потом считываются с диска.
* Генерация и использование массива хранения содержимого экрана.
SAVE SCREEN TO scr_1
SAVE ALL LIKE scr_* TO Screens
*
<экоманды...>
*
RESTORE FROM Screens ADDITIVE
ptr = "1"
RESTORE SCREEN FROM scr_&ptr
Библиотека: CLIPPER.LIB
См.также: RESTORE SCREEN, SAVE, SAVE SCREEN.
RESTORE SCREEN
Синтаксис: RESTORE SCREEN [FROM <эпеременная>]
Назначение: вывести на индикацию прежде сохраненное содержимое
экрана.
<эпеременная> - переменная, содержащая информацию для вывода на
экран.
Используется совместно с SAVE SCREEN для временного хранения
содержимого экрана с последующим его восстановлением.
Пример:
ans = .F.
SAVE SCREEN
@ 10, 10 CLEAR TO 12, 45
@ 10, 10 TO 12, 45 DOUBLE
@ 11, 12 SAY "Переписать существующий файл ? (y/n) " ;
- 93 -
GET ans PICTURE "Y"
READ
RESTORE SCREEN
RETURN
Библиотека: CLIPPER.LIB
См.также: RESTORE, SAVE SCREEEN.
RETURN
Синтаксис: RETURN [<эвыр.>]
Назначение: Заканчивает процедуру или программу, возвращая
контроль вызывающей программе или операционной системе.
<эвыр.> - возвращаемая величина, в случае если речь идет о
пользовательской функции.
В случае использования RETURN в программе высшего уровня,
управление передается операционной системе. В подпрограммах
управление передается вызывающей программе и освобождаются все
PRIVATE переменные. В процедуре или функции может быть более
одного оператора RETURN.
Библиотека: CLIPPER.LIB
См.также: CANCEL, PRIVATE, PUBLIC.
RUN
Синтаксис: RUN/! /(<эвырС>)
Назначение: Вызов DOS-команды или программы из скомпилированной
программы пользователя.
- исполняемая программа, включая резидентные
DOS-команды и COMMAND.COM.
Использование: при использовании RUN необходимо иметь
достаточный объем свободной памяти для COMMAND.COM (27К для DOS
3.2) и программу, которую надо выполнить. Путь доступа к
COMMAND.COM должен быть определен при помощи COMSPEC (по
умолчанию корневая дирректоря системного диска). Если же
COMMAND.COM не расположен на этом диске или диск был сменен,
необходимо выполнить SET COMSPEC с указанием соответствующего
пути.
Не следует использовать RUN для выполнения пользовательских
прогамм, т.к. можно потерять содержимое некоторых участков
памяти.
Чтобы получить прямой доступ в DOS можно воспользоваться
командой RUN COMMAND. В этом случае вероятно будет необходимо
изменить стандартное DOS-сообщение (prompt), например для того,
чтобы дать инструкции, как вернуться в Клиппер-программу. Для
реализации такого процесса необходимо создать файл пакетной
обработки, позволяющий установить форму сообщения, загрузить
пользовательскую программу и после ее завершения восстановить
прежнюю форму DOS-сообщения. Такой файл может выглядеть
следующим образом:
- 94 -
echo off
prompt Dir: $p$_Type EXIT to return.$_$g
<эпользовательская программа>
prompt $p$g
Следующий пример демонстрирует возможности использования RUN в
комбинации с MEMOREAD() и MEMOWRIT() для создания
пользовательской функции редактирования memo-поля:
* Main.prg
success = EditorMemo ("NE +", "Notes")
FUNCTION EditorMemo
PARAMETERS editor, memofld
IF MEMOWRIT("Clipedit.tmp", &memofld)
RUN (editor + " Clipedit.tmp")
REPLACE &memofld WITH MEMOREAD ("Clipedit.tmp")
RETURN 0
ELSE
RETURN -1
ENDIF
Функция EditorMemo() возвращает -1 в случае ошибки и 0 при
успешном завершении.
Библиотека: CLIPPER.LIB
См.также: INDEX, PACK, SET INDEX, SET UNIQUE, USE.
SAVE
Синтаксис: SAVE TO /(<эвырС>) [ALL [LIKE/EXCEPT <эшаблон>]]
Назначение: загрузка переменных на хранение в (.mem)-файл.
- имя файла для хранения переменных. Расширение по
умолчанию (.mem).
<эшаблон> - маска, определяющая группу переменных.
Использование: SAVE организует хранение переменных без
каких-либо ссылок на их область действия (локальные или
глобальные). Необходимо отметить, что "спрятанные" переменные
SAVE не обрабаттывает, даже если они PUBLIC. SAVE также не
обрабатывает массивы.
Пример:
one = "1"
SAVE TO Temp
one = "2"
RESTORE FROM Temp
? one && результат: 1
Библиотека: CLIPPER.LIB
См.также: RESTORE, RESTORE SCREEN, SAVE SCREEN.
SAVE SCREEN
- 95 -
Синтаксис: SAVE SCREEN [TO <эпеременная>]
Назначение: сохранить текущее содержимое экрана в буфере или
переменной.
<эпеременная> - имя переменной. Создается символьная переменная
размером 4000 байт.
Использование: в паре с RESTORE SCREEN. Удобно хранить
содержимое нескольких последовательных картинок, используя
элементы массива, но при этом не может быть организовано
хранение этой информации на диске, т.к. SAVE TO не воспринимает
массивы.
Библиотека: CLIPPER.LIB
См.также: RESTORE SCREEN, SAVE.
SEEK
Синтаксис: SEEK <эвыр.>
Назначение: поиск записей по совпадению индексного ключа.
- выражение, сравниваемое с ключом.
Использование: поиск начинается с первого ключа в индекс-файле и
заканчивается в случае совпадения и очередного ключа или в
случае нахождения ключа со значением большим, чем . В
случае совпадения указатель записей устанавливается в
соответствующую позицию. Если SOFTSEEK-OFF (по умолчанию) и
совпадения не найдено, то указатель записей получает значение
LASTREC()+1, EOF() = .T., FOUND() = .F.. В случае SOFTSEEK-ON и
запись не найдена, указатель получает значение, равное позиции
первой записи с ключем большим, чем контрольное значение.
FOUND() и EOF() в этом случае возвращают .F..
Пример:
USE Sales INDEX Branch
? INDEXKEY(0) && резултат: BRANCH
? Branch && резултат: 100
SEEK "100"
?FOUND(), EOF(), RECNO() && резултат: .T. .F. 1
Библиотека: CLIPPER.LIB
См.также: FIND, INDEX, LOCATE, SET DELETED, SET EXACT, SET INDEX,
SET SOFTSEEK, USE, EOF(), FOUND(),RECNO().
SELECT
Синтаксис: SELECT <эрабочая область>/<эсиноним>/(<эвырЧ>)
Назначение: сменить текущую рабочую область.
<эрабочая область> - номер рабочей области (число от 0 до 254
включительно).
<эсиноним> - имя рабочей области, в которой существует открытый
- 96 -
файл данных. Первые 10 рабочих областей могут быть определены
буквами от A до J.
<эвырЧ> - числовое выражение, имеющее значение от 0 до 254.
Использование: Clipper поддерживает 254 рабочих области. При
запросе области 0 будет выбрана первая неиспользуемая. В каждой
рабочей области можно открыть один файл данных и до 15
индекс-файлов. Каждая рабочая область имеет следующие атрибуты:
Атрибут Функция
----------------------------------------------------------------
Имя ALIAS()
Номер SELECT()
Файл данных ALIAS()
Индекс-файл INDEXORD()/INDEXKEY()
Исключительность FLOCK()/NETERR()
Количество записей LASTREC()/RECCOUNT()
Количество полей FCOUNT()
Номер записи RECNO()
Флаг начала файла BOF()
Флаг конца файла EOF()
Проверка флага FOUND()
----------------------------------------------------------------
Библиотека: CLIPPER.LIB
См.также: USE, SET INDEX, ALIAS(), SELECT()
SET ALTERNATE
Синтаксис: SET ALTERNATE TO [/()]
SET ALTERNATE on/OFF/()
Назначение: Перенаправление вывода данных для команд кроме
@...SAY...GET в текстовый файл.
Указанием имени файла в качестве аргумента параметра TO
открывается стандартный ASCII текстовой файл с расширением по
умолчанию (.txt). Имя файла может включать свое собственное
расширение, дисковод и/или путь доступа. Если указанный файл уже
существует, то его содержимое перепишется.
SET ALTERNATE ON/OFF разрешает одновременный вывод информации
стандартным для используемой команды способом и засылку на
хранение в файл. При SET ALTERNATE OFF файл не закрывается.
Описываемые файлы никак не связаны с рабочими областями.
Одновременное существование двух файлов невозможно. Чтобы
закрыть файл необходимо использовать CLOSE ALTERNATE, CLOSE ALL
или SET ALTERNATE TO без аргументов. Следует отметить, что
записать информацию, выдаваемую @...SAY на диск можно при помощи
SET PRINTER TO .
Пример:
SET ALTERNATE TO Listfile
SET ALTERNATE ON
USE Customers
DO WHILE .NOT. EOF()
- 97 -
? Lastname, City
SKIP
ENDDO
USE
CLOSE ALTERNATE
Библиотека: CLIPPER.LIB
См.также: CLOSE, DISPLAY [TO FILE], LABEL FORM [TO FILE],
LIST [TO FILE], REPORT FORM [TO FILE], SET PRINTER TO,
TEXT [TO FILE], FCLOSE(), FCREATE(), FERROR(), FOPEN(),
FREAD(), FREADSTR(), FSEEK(), FWRITE().
SET BELL
Синтаксис: SET BELL on/OFF/()
Назначение: Выключатель звукового сигнала экранных операций.
Сигнал используется в следующих случаях:
- при введении последнего символа в GET;
- при ошибки типа данных в GET.
Задать в программе посылку звукового сигнала можно, указав ?? CHR(7).
Пример:
SET BELL OFF
SET FORMAT TO No_bell
DO WHILE LASTKEY() <> 27
READ
ENDDO
CLOSE FORMAT
SET BELL ON
Библиотека: CLIPPER.LIB
См.также: SET CONFIRM, CHR()
SET CENTURY
Синтаксис: SET CENTURY on/OFF/()
Назначение: выключатель указания цифр столетия вводимых и
выводимых для полей типа дата и переменных.
При SET...OFF цифры столетия не выводятся и не могут быть
введены. Если в процессе обработки данных получилась дата не
двадцатого столетия, то всеравно при SET...ON будут
индицироваться только последние две цифры данных. Вводимым же
датам автоматически присваивается двадцатое столетие.
Клиппер поддерживает даты в диапазоне от 01/01/0100 до
12/31/2999.
- 98 -
Пример:
SET CENTURY OFF
? DATE() && результат: 09/01/87
SET CENTURY ON
? DATE() && результат: 09/01/1987
*
SET CENTURY (DATE() >= CTOD("01/01/2000"))
Библиотека: CLIPPER.LIB
См.также: SET DATE, CTOD(), DATE(), DTOC(), DTOS(), YEAR().
SET COLOR
Синтаксис: SET COLOR TO [<эстандартный>[,<эвыделенный>][,<эграничный>]
[,<эфоновый>][,<эотключеный>]]/(<эвырС>)
Назначение: определение цветов.
стандартный/выделенный - это пары цветов (символ/фон).
стандартный - используется для всех @...SAY и для ?... .
выделенный - для GET.
граничный - цвет границы экрана.
фоновый - цвет фона. Не поддерживается на некоторых машинах,
снабженных драйверами Nantucket.
отключенный - цвет невыбранного GET.
Есть возможность задать повышенную интенсивность и мигание
индицируемого элемента. Повышенная интенсивность задается
указанием символа "+", а мигание символом "*". Каждый атрибут
имеет отношение к цвету написанного (не фон) и место его
указания в списке не имеет значения.
Аргументы по умолчанию: W/N, N/W,,,N/W.
Цвет обозначается цифрой либо буквой, причем смешивать их в
одной строке нельзя.
Таблица обозначения цветов:
----------------------------------------------------------------
Цвет Номер Буква
----------------------------------------------------------------
Черный 0 N
Голубой 1 B
Зеленый 2 G
Бирюзовый 3 BG
Красный 4 R
Пурпурный 5 RB
Коричневый 6 GR
Белый 7 W
Серый - N+
Желтый - GR+
Без цвета - X
Подчеркивание - U
Негатив - I
----------------------------------------------------------------
- 99 -
Внимание: SET COLOR TO с использованием номеров не
поддерживается, если при компоновке программы участвует
ANSI.OBJ.
Для обеспечения централизованной установки цветов удобно
использовать в качестве аргументов SET COLOR TO переменные:
c_says = "W/N, BG+/B,,,W/N"
SET COLOR TO &c_says
*
SET COLOR TO (c_says)
Пример: вывод текущего GET красным на белом, в то время как
остальные выводятся черным на белом.
color = "W/N,R/W,,,N/W"
SET COLOR TO &color
STORE SPACE(10) TO one, two, three
@ 1,1 SAY "Enter One: " GET one
@ 2,1 SAY "Enter Two: " GET two
@ 3,1 SAY "Enter Three: " GET three
READ
Библиотека: CLIPPER.LIB
См.также: ISCOLOR()
SET CONFIRM
Синтаксис: SET CONFIRM on/OFF/()
Назначение: Выбор между двумя способами завершения GET: по
полному заполнению или по вводу специального символа.
Использование: Для завершения GETов Клиппер использует следующие
символы: Ctrl-Home, Ctrl-End, стр.вверх, стр.вниз, Ctrl-C, PgUp,
Ctrl- W, PgDn, Esc, Enter.
При использовании MENU TO, CONFIRM не работает.
Библиотека: CLIPPER.LIB
См.также: @...GET, READ, SET BELL.
SET CONSOLE
Синтаксис: SET CONSOLE ON/off/()
Назначение: Выключатель индикации командных сообщений.
Использование: Подавляет или разрешает индикацию сообщений для
всех команд вывода списков, включая сообщения команд ACCEPT,
INPUT, WAIT. Исключение составляют такие экранные команды, как:
@...SAY...GET, @...PROMPT, @...BOX, @...CLEAR TO, @...TO, CLEAR.
- 100 -
Пример:
USE Sales
SET CONSOLE OFF
LIST Branch TO PRINT
SET CONSOLE ON
Библиотека: CLIPPER.LIB
См.также: SET DEVICE.
SET CURSOR
Синтаксис: SET CURSOR ON/off/()
Назначение: выключатель индикации курсора.
Использование: Ввод и вывод при SET...OFF не претерпевает
никаких принципиальных изменений. Командой удобно пользоваться
для запрета индикации курсора во время различных экранных
выводов и разрешать индикацию только во время ввода с
клавиатуры.
Пример:
SET CURSOR OFF
ans = .N.
@ 24, 0
@ 24, 15 SAY " Закончить работу [Y/N] ?" GET ans PICTURE "Y"
READ
SET CURSOR ON
Библиотека: CLIPPER.LIB
См.также: SET CONSOLE.
SET DATE
Синтаксис : SET DATE AMERICAN/ANSI/BRITISH/FRENCH/GERMAN/ITALIAN
Назначение: установка формата вывода данных типа "дата".
Параметры: предоставляется возможность пользоваться следующими
форматами:
AMERICAN mm/dd/yy
ANSI yy.mm.dd
BRITISH dd/mm/yy
FRENCH dd/mm/yy
GERMAN dd.mm.yy
ITALIAN dd-mm-yy
Использование: SET DATE действует на всю программу. Удобно
предусмотреть в начале программы секцию настройки на
определенный формат. Начальную установку можно произвести в DOS:
SET CLIP_DATE = BRITISH
- 101 -
Далее в самой программе:
date_set = UPPER(GETE("CLIP_DATE"))
DO CASE
CASE date_set = "AMERICAN"
SET DATE AMERICAN
CASE date_set = "ANSI"
SET DATE ANSI
CASE date_set = "BRITISH"
SET DATE BRITISH
CASE date_set = "FRENCH"
SET DATE FRENCH
CASE date_set = "GERMAN"
SET DATE GERMAN
CASE date_set = "ITALIAN"
SET DATE ITALIAN
ENDCASE
Библиотека: CLIPPER.LIB
См.также: SET CENTURY, CTOD(), DATE(), DTOC().
SET DECIMALS
Синтаксис: SET DECIMALS TO
Назначение: Установка количества знаков после запятой, выводимых
в результате работы функций и различных вычислений.
- количество знаков после запятой.
В случае SET FIXED-OFF под действие SET DECIMALS попадают
SQRT(), EXP(), LOG() и деление. Все другие вычисления определяют
количество знаков исходя из результатов вычислений. В случае же
SET FIXED-ON вывод всех числовых результатов подчиняется SET
DECIMALS.
Пример:
SET DECIMALS TO 2 && Значение по умолчанию
? 2/4 && Результат: 0.50
? 1/3 && Результат: 0.33
SET DECIMALS TO 4
? 2/4 && Результат: 0.5000
? 1/3 && Результат: 0.3333
Библиотека: CLIPPER.LIB
См.также: SET FIXED.
SET DEFAULT
Синтаксис: SET DEFAULT TO [:]
Назначение: Установка дисковода и директории для размещения
созданных пользовательской программой файлов.
- 102 -
- имя дисковода или буква.
- имя директории.
Если указывается и дисковод и директория, то после буквы
дисковода нужно указать (:). При употреблении команды без
аргументов устанавливается последняя используемая для текущего
дисковода директория.
Использование: По умолчанию устанавливается дисковод и
директория, используемые при запуске пользовательской программы.
Для установления пути доступа к файлам необходимо пользоваться
SET PATH. SET DEFAULT не изменяет установленные DOS дисковод и
директорию.
Пример:
SET PATH TO
? FILE("Sales.dbf") && Рузультат: .F.
SET DEFAULT TO C:\CLIPPER\FILES
? FILE("Sales.dbf") && Рузультат: .T.
Библиотека: CLIPPER.LIB
См.также: SET PATH.
SET DELETED
Синтаксис: SET DELETED on/OFF/()
Назначение: Выключатель автоматической фильтрации записей,
помеченных для удаления.
Использование: В случае SET DELETED ON большинство команд будут
игнорировать помеченные для удаления записи. Тем не менее
сохраняется возможность обращатся к записи по ее номеру (GOTO,
например). Также SET DELETED ON не оказывает никакого действия
на INDEX и REINDEX. Однако для RECALL ALL статус SET DELETED
имеет значение.
Пример:
USE Sales
? LASTREC() && Результат: 84
DELETE RECORD 4
COUNT TO num
? num && Результат: 84
SET DELETED ON
COUNT TO num
? num && Результат: 83
Библиотека: CLIPPER.LIB
См.также: DELETE, INDEX, SET INDEX, USE, DELETED().
SET DELIMITERS
Синтаксис: SET DELIMITERS TO []/DEFAULT
SET DELIMITERS on/OFF/()
- 103 -
Назначение: Определяет символ-разделитель, используемый в GET.
|
