TheGodMode
Проблема №2: По нажатию клавиши Enter нужно что бы открылся редактор в котором я бы мог отредактировать абсолютно все поля БД связанные с этим человеком.

Цитата:

Обновляет записи в таблице новыми значениями.

REPLACE FieldName1 WITH eExpression1 [ADDITIVE]
[, FieldName2 WITH eExpression2 [ADDITIVE]] ... [Scope]
[FOR lExpression1] [WHILE lExpression2] [IN nWorkArea | cTableAlias]
[NOOPTIMIZE]

Божья_коровка
Вы опять с нами? Мы же вас забыли как страшный сон

TheGodMode
Я не могу найти вообще никакой документации по FPD 1.1 и вот приходится мудрить)

TheGodMode
Пока что понимаю что нужно как то определить id выбранной записи из БД и по этому id вывести данные в формочку в которой их можно будет изменить и нажать кнопку сохранить.
1) Как именно выбрать данные я не знаю и не могу найти нигде
2) Как сделать формочку в которой можно будет редактировать эти данные тоже не знаю
3) Ну клавиша "Сохранить" должна уже выполнять команду REPLACE.

Так что до 3-го пункта мне пока что очень далеко

+---------------------------------+
¦             Example             ¦
+---------------------------------+

USE Customer
COPY TO Backup
USE Backup
SET TALK OFF
STORE SPACE(40) TO mcustomer, maddress
STORE SPACE(24) to mcity
STORE SPACE(2) to mstate
STORE SPACE(10) to mzip
DEFINE WINDOW menter FROM 7,10 to 17,70 PANEL
ACTIVATE WINDOW menter
@ 1,3  SAY 'Customer: ' GET mcustomer
@ 3,3  SAY 'Address: '  GET maddress
@ 5,3  SAY 'City: '     GET mcity
@ 7,3  SAY 'State: '    GET mstate
@ 7,18 SAY 'Zip: '      GET mzip
READ
DEACTIVATE WINDOW menter
IF UPDATED()
    APPEND BLANK
    REPLACE company           WITH mcustomer
    REPLACE address1          WITH maddress
    REPLACE city              WITH mcity
    REPLACE Backup->state     WITH mstate
    REPLACE Backup.zip        WITH mzip
ENDIF

Божья_коровка
команду replace (правда не знаю была ли она в FPD1).

ssa

Божья_коровка
команду replace (правда не знаю была ли она в FPD1).

Она была еще в DBase II. Лично использовал.

Божья_коровка

TheGodMode
Я не могу найти вообще никакой документации по FPD 1.1 и вот приходится мудрить)

Давай мыло хелп вышлю, тут не крепится объём 214 КБ. Разбивать на части не охота.

ssa

Божья_коровка

TheGodMode
Я не могу найти вообще никакой документации по FPD 1.1 и вот приходится мудрить)

Давай мыло хелп вышлю, тут не крепится объём 214 КБ. Разбивать на части не охота.

Есть у него хелп, и даже на русском. Встроенный.

Цитата:

+---------------------------------+
¦ EDIT ¦
+---------------------------------+
Change database records in an editing window

+---------------------------------+
¦ Format ¦
+---------------------------------+
EDIT
[FIELDS <field list>]
[<scope>]
[FOR <expL1>]
[WHILE <expL2>]
[FORMAT]
[FREEZE <field>]
[KEY <expr1> [, <expr2>]]
[LAST]
[NOAPPEND]
[NOCLEAR]
[NODELETE]
[NOEDIT | NOMODIFY]
[NOMENU]
[NORMAL]
[NOWAIT]
[PREFERENCE <expC1>]
[SAVE]
[TIMEOUT <expN1>]
[TITLE <expC2>]
[WIDTH <expN2>]
[[WINDOW <window name1>]
[IN [WINDOW]
<window name2> | SCREEN]]
[COLOR <ColorPairList>
| COLOR SCHEME <expN3>]

+---------------------------------+
¦             Example             ¦
+---------------------------------+

USE CUSTOMER
EDIT FIELDS taxrate :P = "9.99"

Божья_коровка

ssa

Божья_коровка

TheGodMode
Я не могу найти вообще никакой документации по FPD 1.1 и вот приходится мудрить)

Давай мыло хелп вышлю, тут не крепится объём 214 КБ. Разбивать на части не охота.

Есть у него хелп, и даже на русском. Встроенный.

А чего ТС тогда говорит, что никакой документации нет?
Лукавит наш студент? Какая ему документация еще нужна?

TheGodMode
Проблема №1: При листании БД в строчках возникают непонятные символы и цифры, не понимаю откуда они беруться (Прошу помощи с этим, тыкните в место где ошибка и скажите как это исправить)

Set talk off

akvvohinc
RecTop и RecBottom тоже нужны.
Он не написал, но на деле у него работают и клавиши Home/End.
Первая запись не всегда будет иметь номер 1, а Reccount() - не всегда последняя, так как часть записей может быть удалена, может быть установлен фильтр, а также подключен индекс.

Цитата:

Ну, и конечно доделать выравнивание колонок.
Поскольку команд типа PADR() в этой версии еще не было, то лучше написать свою функцию, дополняющую/обрезающую переданную строку до требуемой длины.

Божья_коровка
Аспид, меня знаете что смущает во всей этой истории, почему для реальной задачи ТС запретили использовать BROW\CHANGE\EDIT. Можно ещё как то понять когда просто учебная задача, но когда реальная задача к примеру, это ведь удобнейшая вещь для досовских приложений. Любопытно, в чём идея начальства отдела разработки и сопровождения этого завода в таком запрете?
Я не могу вспомнить на своём опыте, чтобы что то запрещали разработчикам, вроде как ТС, вот это можно использовать это нельзя. Были конечно корпоративные стандарты разработки в крупных компаниях, но так чтобы запрещали использовать какие то родные команды среды разработки, такого не припомню. Немного странный поход начальства к реализации. ИМХО