ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Копирование данных в Foxpro 2.6
10 сообщений из 10, страница 1 из 1
Копирование данных в Foxpro 2.6
    #32727234
Nik_Lis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nik_Lis
Гость
Подскажите пожайлуста, как сделать частичное копирование данных из
одной таблицы в другую в foxpro 2.6:
Допустим есть 2 таблицы содержащие анкетные данные, первая содержит 100
записей(фамилия, имя, отчество, место рождения, паспортные данные),
вторая 30 записей, 20 из которых, из первой таблицы, но заполнены
только поля фамилия, имя отчество, остальные пустые.
Нужно отобрать эти 20 записей в первой таблице, и скопировать
недостающие данные во вторую.
С помощью каких функций foxpro 2.6 можно выполнить подобную операцию?
...
Рейтинг: 0 / 0
07.10.2004, 09:40
| Ответить | Цитировать | Написать  
Копирование данных в Foxpro 2.6
    #32727242
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
SELECT-SQL + APPEND FROM

Подробнее надо расписывать?
...
Рейтинг: 0 / 0
07.10.2004, 09:44
| Ответить | Цитировать | Написать  
Копирование данных в Foxpro 2.6
    #32727264
leaf
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
leaf
Участник
select в свободную таблицу?
append из курсора в 2 прокатит ?
...
Рейтинг: 0 / 0
07.10.2004, 09:51
| Ответить | Цитировать | Написать  
Копирование данных в Foxpro 2.6
    #32727277
plugh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
plugh
Участник
Конечно, прокатит:

SELECT cursur
db = dbf()
append from &db

таким макаром..
...
Рейтинг: 0 / 0
07.10.2004, 09:59
| Ответить | Цитировать | Написать  
Копирование данных в Foxpro 2.6
    #32727297
Nik_Lis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nik_Lis
Гость
Пожайлуста, если можно поподробней
...
Рейтинг: 0 / 0
07.10.2004, 10:05
| Ответить | Цитировать | Написать  
Копирование данных в Foxpro 2.6
    #32727324
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
Уточни вопрос:

Во второй таблице УЖЕ ЕСТЬ записи со значениями полей "Фамилия", "Имя", "Отчество" такие же как и в первой таблице.

Тебе надо найти соответсвтующие записи в первой таблице и переписать содержимое незаполненных полей из первой таблицы во вторую? Или ДОБАВИТЬ НОВЫЕ записи, оставив записи с незаполненными полями "как есть"?
...
Рейтинг: 0 / 0
07.10.2004, 10:13
| Ответить | Цитировать | Написать  
Копирование данных в Foxpro 2.6
    #32727346
Nik_Lis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nik_Lis
Гость
Нужно найти соответсвтующие записи в первой таблице и переписать содержимое незаполненных полей из первой таблицы во вторую.
...
Рейтинг: 0 / 0
07.10.2004, 10:21
| Ответить | Цитировать | Написать  
Копирование данных в Foxpro 2.6
    #32727355
Nik_Lis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nik_Lis
Гость
Нужно найти соответсвтующие записи в первой таблице и переписать содержимое незаполненных полей из первой таблицы во вторую, добавлять новые записи не нужно.
...
Рейтинг: 0 / 0
07.10.2004, 10:24
| Ответить | Цитировать | Написать  
Копирование данных в Foxpro 2.6
    #32727428
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
Тогда я неправильно понял вопрос. Действия примерно такие:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
* Организуем перебор всех записей с незаполненными полями во второй таблице
select Tab2
SET ORDER TO  0 
GO TOP
SCAN FOR EMPTY(Field1) AND EMPTY(Field2) AND ...
	* Ищем Имя, Фамилия, Отчество в первой таблице
	select Tab1
	LOCATE FOR Familiya=Tab2.Familiya ;
		AND Imya=Tab2.Imya ;
		AND Otchestvo=Tab2.Otchestvo
	select Tab2
	* Если нашли, то делаем замену в текущей записи второй таблицы
	IF FOUND('Tab1')
		REPLACE Field1 WITH Tab1.Field1,
			Field2 WITH Tab1.Field2,
			...
	ENDIF
ENDSCAN
...
Рейтинг: 0 / 0
07.10.2004, 10:52
| Ответить | Цитировать | Написать  
Копирование данных в Foxpro 2.6
    #32727934
Nik_Lis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Nik_Lis
Гость
Попробую, большое спасибо.
...
Рейтинг: 0 / 0
07.10.2004, 13:19
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Копирование данных в Foxpro 2.6
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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