vla wrote: |
Реально недостающих характеристик много - кто торговый представитель, контактное лицо, договор, срок расчетов, максимальный кредит и т.д.
Для чего все это нужно - например, для анализа сегментов продаж. Это тоже, кстати, повод для интересного многим примера - плагин, создающий перекрестную таблицу в Excell. |
Дениска wrote: |
А точно все эти данные нужно обязательно в БЭСТ-е видеть, а не в другой программе? Возможно вам стоит посмотреть CRM программы. К примеру, Monitor CRM (у них раньше был (и наверное и сейчас есть) импорт данных из БЭСТ-а). P.S. Надеюсь на развития этого Урока этот комментарий не повлияет |
nordk wrote: |
Давайте начнем с уточнений. 1.Сами справочники необходимо хранить в своих базах. а стало быть нужен интерфейс их заполнения. При данной постановке видится 2 вида решения: - создаем две БД в первой храним первую характеристику, во второй - вторую - первую характеристику храним в массиве, который заполняем в конфигурационном текстовом файле, поскольку характеристик будет явно немного и врядли будут добавляться, вторую в отдельной БД 2.Можно сделать интерфейс заполнения внутри самого справочника будет ли это красиво....Дело Вашего вкуса 3.Не надо мудрить с мемо-полями - создаем в БД партнеров свои поля |
vla wrote: |
По п.1 - думаю, что две БД будет более универсальным примером.
По п.2 - сделать заполнение внутри справочника, и фиг с ним, со вкусом ![]() По п.3 - почему подумал про мемо - некоторые поля бывают длинными (контактное лицо и емэйл, например), и не хочется раздувать PARTNER. |
nordk wrote: |
п.3 можно и не раздувать справочник партнеров а сделать отдельную таблицу с характеристиками. |
nordk wrote: |
Давайте лучше вы создадите 2 нужные базы с индексами позволящими иерархию. Напишете их структуру сюда и сделаете заготовку в которой откроете эти две базы и базу партнеров. Выложите сюда наработку и следующим шагом мы с Вами организуем справочники. Третьим шагом будет QINPUT собственно Четвертый это корректировка и пополнение справочников внутри них. |
Code: |
//корректировка доп.информации о партнере //к уроку 202 (QINPUT) function main() Local p_vid,p_typ,p_post Local aRef Local aSet,aSetKey altd() aSet:=SaveSet() aSetKey:=SaveSetKey() NETUSE("PART_T","part_t.dbf",,.F.) //справочник типов партнеров NETUSE("PART_V","part_v.dbf",,.F.) //справочник видов партнеров p_typ:=val(token(partner->adress2,,1)) //подтянули текущее значение типа p_vid:=val(token(partner->adress2,,2)) //подтянули текущее значение вида p_post:=alltrim(token(partner->adress2,,3)) //подтянули текущее значение емэйла // // if NoOrYes("Изменять информацию о партнере",2,{" Да "," Нет "})=1 partner->(RECLOCK()) partner->adress2:=str(p_typ,6,0)+';'+str(p_vid,6,0)+';'+ltrim(p_post) partner->(F_DBUNLOCK()) endif part_t->( DBCLOSEAREA() ) part_v->( DBCLOSEAREA() ) RestSetKey(aSetKey) RestSet(aSet) return nil |
vla wrote: | ||
|
Code: |
token(partner->adress2,";"1) |
nordk wrote: |
Приведите пожалуйста формат таблиц part_t и part_v и созданных к ним индексов |
output generated using printer-friendly topic mod. All times are GMT + 4 Hours