Обсуждение написание модуля на харборе УРОК2

nordk

Итак господа экраны мы уже рисуем.
Теперь вопрос что будем во втором уроке обсуждать ввод/корректировку или сортировку/поиск ?
Пока суть да дело расскажу про удаление.
Если в нашу программу из первого занятия добавить
bDel:={||.F.} удаление будет запрещено и наоборот соответственно разрешено
Строка тогда изменится:
WORK->( INITLIST(nTop,nBot,cColHead,aBlockCols,cCurProc,,,,,,,bDel) )

itman · Posted: 21 Sep 2005 07:03 Post subject:

по сортировке/поиску думаю будет достаточно создать индексы и рассмотреть 14 параметр.
А вот на Вводе/редактировании остановиться поподробнее.
От себя добавлю, что для удобства восприятия вызов initlist лучше делать так:
initlist(nTop,nBot,cColHead,aBlockCols,cCurProc,;
,,,,,;
,bDel,,,,)
bDel как раз 12 параметр.
Т.е. пишем в каждой строке по пять параметров, в описании параметры пронумерованы, так будет намного быстрее

, и вероятность добавить переменнную "не туда" станет меньш

nordk · Posted: 21 Sep 2005 15:18 Post subject:

Это уж как Вам будет угодно....
Теперь давайте опять определимся для начала по каким полям хотим делать ввод/корректировку/фильтр/суммирование

Лариса Т. · Posted: 22 Sep 2005 10:09 Post subject:

с нетерпением ждем продолжения...
ввод и корректировка, наверное, всех полей. А суммирование, так один вариант - поле SUMMA.

nordk · Posted: 22 Sep 2005 13:01 Post subject:

Тогда создаем переменную
_aHeads:={{"Введите дату работ.................:","TEK_DATA"}, ; {"Введите номер документа............:","TEK_NOMER"}, ;{"Наименование работ.................:","NAME"}, ;{"Количество.........................:","KOL",,,"0"}, ;{"Цена...............................:","СENA",,,"0"}, ;
{"Сумма (руб.).......................:","SUMMA"}}

И пишем (по совету товарищей

)

initlist(nTop,nBot,cColHead,aBlockCols,cCurProc,;
_aHeads,,,,,;
,bDel,,,,)

Дальше опять наводим марафет - кому какой нравится и задаем вопросы

Сергей В. Чурбанов · Posted: 22 Sep 2005 15:00 Post subject:

Добрый день!
Добавил все строки но добавления в таблицу не получается, ккую кнопку нажать чтобы добавить запись в таблицу.

nordk · Posted: 22 Sep 2005 15:21 Post subject:

Попробуйте создать индексный файл work.cdx с каким-нибудь ключ

shura_k · Posted: 22 Sep 2005 15:22 Post subject:

У меня после этого в initlist пишет "неверный аргумент"

Лариса Т. · Posted: 22 Sep 2005 15:54 Post subject:

Получилось. А еще подскажите, пожалуйста, как написать, чтобы сумма вычислялась автоматом при вводе количества и цены.

nordk · Posted: 22 Sep 2005 16:05 Post subject:

Виноват !
Надо поправить тут
;{"Количество.........................:","KOL","1","1","0"}, ;{"Цена...............................:","СENA","1","1","0"},

а индекс нужен тока для фильтра - этот массив сразу на много направлений определя

nordk · Posted: 22 Sep 2005 16:21 Post subject:

shura_k · Posted: 22 Sep 2005 17:12 Post subject:

nordk · Posted: 22 Sep 2005 17:48 Post subject:

Убирать не надо
Похоже в поле Cena первый символ русский у меня был а Вы просто скопировали - ошибка говорит что переменную не опознала, нет мол тако

shura_k · Posted: 22 Sep 2005 17:55 Post subject:

shura_k · Posted: 22 Sep 2005 17:57 Post subject:

А как задать формат для Summa, а то после перемножения, очень много 0 вылази