Форум программистов, компьютерный форум, киберфорум
Visual FoxPro
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.73/22: Рейтинг темы: голосов - 22, средняя оценка - 4.73
668 / 558 / 242
Регистрация: 26.11.2012
Сообщений: 2,190
1

Копирование данных из одной таблицы dbf в шаблон dbf

23.04.2013, 11:51. Показов 4157. Ответов 2
Метки нет (Все метки)

Есть источник файл med.dbf с данными, необходимо перенести часть данных в файл-шаблон med.dbf. Особенность заключается в том, что в файле шаблон имя одного поле отличается. Prof_FN, в шаблоне PROFIL. На данный момент меняю в dbf редакторе. Но хотелось бы от этого уйти. Есть простые варианты решить эту проблемку?
На данный момент исползую данный код.

USE Result\MED.DBF IN 1 EXCLUSIVE
DELETE ALL
PACK
*GETCP()
APPEND FROM Data\MED.dbf FIELDS SL_ID, ID_MED, KOD_REZ, KOD_OTD, D_PST, D_END, KL_USL, PR_EXP, PL_EXTR, USL, KOL_USL, C_MU, DIAG, DS_S, PA_DIAG, PR_OUT, RES_L, PROF_FN, STOIM, CASE, PLACE, SPEC, PRVD, RES_G, SSD, ID_MED_TF, PSV, PR_PV, OBST, N_SCHET, D_SCHET, V_SCH
CLOSE DATA

USE Result\MED.DBF IN 1 EXCLUSIVE
SELECT 1
SCAN
replace med.spec WITH IIF(med.spec= 56, 1126, IIF(med.spec=1, 1101, IIF(med.spec= 26, 1111, IIF(med.spec= 49, 1122, IIF(med.spec= 19, 1109, IIF(med.spec= 17, 112205, med.spec))))))
replace med.prof_fn WITH IIF(med.prof_fn= 24, 112, IIF(med.prof_fn=32, 2, IIF(med.prof_fn= 33, 64, IIF(med.prof_fn= 9, 97, IIF(med.prof_fn= 1, 29, IIF(med.prof_fn= 35, 53, med.prof_fn))))))
ENDSCAN
REPLACE ALL psv WITH 1
CLOSE DATA

Код написан не мной.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
23.04.2013, 11:51
Ответы с готовыми решениями:

Переход с одной строки на другую в DBF сканировании
Стоит задача из dbf файла сделать xml. Нашел программу похожую по выполняем функциям на то что мне...

Microsoft DBASE (DBF) Присоединить 2 таблицы
Подскажите как реализовать такой запрос: У меня есть таблицаа "t" к ней надо добавить таблицу...

Как совсем удалить записи из таблицы DBF?
DELETE * From table1 where... - только помечает записи как удаленные. А как физически удалить...

Не считывает значение поля из файла (таблицы) *.dbf
Друзья! Имеется файл error_file.dbf с одной записью и всего одним полем типа Character, для...

2
185 / 179 / 28
Регистрация: 26.05.2011
Сообщений: 852
23.04.2013, 12:35 2
Код
SELECT таблица_откуда
SCAN 
	INSERT INTO таблица_куда (поле1,поле2,поле3,поле4,поле5_название_новое) ;
	 VALUES (таблица_откуда.поле1,таблица_откуда.поле2,таблица_откуда.поле3, ; 
	 		таблица_откуда.поле4,таблица_откуда.поле5_название_старое)
ENDSCAN
1
668 / 558 / 242
Регистрация: 26.11.2012
Сообщений: 2,190
23.04.2013, 12:59  [ТС] 3
Спасибо! поробую.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
23.04.2013, 12:59

Заменить значение в ячейках dbf по условию из другой таблицы
Имеются две таблицы А и Б. Имеют 2 общих столбца. Необходимо при выполнении 2 условий из таблицы Б...

Копирование данных из dbf в xls
Есть 2 файла, 1ый - DBF (данные расположены горизонтально по строкам, 1ая строка шапка, последующие...

Как подключить базу данных созданную в DBF Navigator с форматом ".dbf" к приложению на Lazarus?
1) Обязательно ли эти БД хранить ТОЛЬКО на диске C 2) Дайте полный алгоритм подключения их к...

Необходимо произвести "Update" одинаковых данных в 2.dbf из 1.dbf
зарание извеняюсь за корявость темы? вопрос такой. Есть два dbf файла структура баз полностью...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.