powered by simpleCommunicator - 2.0.56     © 2025 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / как перенести даные из одной таблицы в другую
7 сообщений из 7, страница 1 из 1
как перенести даные из одной таблицы в другую
    #35579600
nensi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
как перенести даные из одной таблицы в другую?
Например, одна "ggg" таблица с полями:
komy, pix, pn, pnm,pd,pz
Эта балица должна пополнять "kk" таблицу с полями:
komy, index_doc, name_doc, nom_doc,dat,zmist
Причем :

kk.komy=ggg.komy,
kk.index_doc=ggg.pix,
kk.name_doc=ggg.pnm,
kk.nom_doc=ggg.pn,
kk.dat=ggg.pd,
kk.zmist=ggg.pz,

Но это при условии, что ggg временная таблица, записи в которой долго не задерживаются, а вот kk-исполняет роль накопительного массива. Т.е. таблица в которой можно просмотреть записи за прошлые дни, месяца...
Буду благодарна любой информации:)
...
Рейтинг: 0 / 0
как перенести даные из одной таблицы в другую
    #35579689
гость...
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Для девятки
Код: plaintext
1.
insert into kk (komy, index_doc, name_doc, nom_doc,dat,zmis) select komy,pix,pnm,pn,pd,pz from ggg
Для других версий
Код: plaintext
1.
2.
3.
4.
5.
select ggg
scan
insert into kk (komy, index_doc, name_doc, nom_doc,dat,zmis) values ;
 (ggg.komy,ggg.pix,ggg.pnm,ggg.pn,ggg.pd,ggg.pz)
endscan
...
Рейтинг: 0 / 0
как перенести даные из одной таблицы в другую
    #35579754
nensi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Получилось))))))))))))) Огромное Вам спасибо!
...
Рейтинг: 0 / 0
как перенести даные из одной таблицы в другую
    #35580262
nensi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
правда есть еще один вопросик...если одно поле состоит у меня вот так:

m.komy=", "+ALLTRIM(ggg.sp)
sele kk
append blank
replace komy with m.komy

Т.е. через запятую перечисляет в одном нужном мне поле, то что было в нескольких строках в ggg.sp. Но, нужно перенести так из ggg так, чтобы одно поле в kk было через запятую. т.е объединение, а всё остальное оставалось как есть. Например:

sp: pix pnm_doc
Книги 10 paper
Журналы 10 paper
ЕЩе что-то 10 paper

Долно быть в kk:
komy: index_doc name_doc
Книги , Журналы, ЕЩе что-то 10 paper

Вот как-то так....:(
...
Рейтинг: 0 / 0
как перенести даные из одной таблицы в другую
    #35580296
nensi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
nensiправда есть еще один вопросик...если одно поле состоит у меня вот так:

m.komy=", "+ALLTRIM(ggg.sp)
sele kk
append blank
replace komy with m.komy

Т.е. через запятую перечисляет в одном нужном мне поле, то что было в нескольких строках в ggg.sp. Но, нужно перенести так из ggg так, чтобы одно поле в kk было через запятую. т.е объединение, а всё остальное оставалось как есть. Например:

sp:________________pix_______________pnm_doc
Книги______________10_______________paper
Журналы___________10 _______________paper
ЕЩе что-то_________10 _______________paper

Долно быть в kk:
komy:_________________________index_doc ________________________name_doc
Книги , Журналы, ЕЩе что-то ______10 ____________________________paper

Вот как-то так....:(
...
Рейтинг: 0 / 0
как перенести даные из одной таблицы в другую
    #35580373
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Cделай индекс по KK.index_doc и проверяй есть ли запись с таким значением index_doc если есть - дописывай в нее. Как-то так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
select ggg
scan
   if indexseek(ggg.index_doc, .T., 'kk', 'index_doc')
      replace in kk komu with alltrim(kk.komu) + ',' + alltrim(ggg.komu)
   else
    insert into kk (komy, index_doc, name_doc, nom_doc,dat,zmis) values ;
       (ggg.komy,ggg.pix,ggg.pnm,ggg.pn,ggg.pd,ggg.pz)
   endif
endscan
...
Рейтинг: 0 / 0
как перенести даные из одной таблицы в другую
    #35580898
nensi
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Dima TCделай индекс по KK.index_doc и проверяй есть ли запись с таким значением index_doc если есть - дописывай в нее. Как-то так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
select ggg
scan
   if indexseek(ggg.index_doc, .T., 'kk', 'index_doc')
      replace in kk komu with alltrim(kk.komu) + ',' + alltrim(ggg.komu)
   else
    insert into kk (komy, index_doc, name_doc, nom_doc,dat,zmis) values ;
       (ggg.komy,ggg.pix,ggg.pnm,ggg.pn,ggg.pd,ggg.pz)
   endif
endscan

Спасибо за помощь:)
...
Рейтинг: 0 / 0
7 сообщений из 7, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / как перенести даные из одной таблицы в другую
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]