Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Сравнение значений полей двух таблиц / 4 сообщений из 4, страница 1 из 1
26.04.2004, 10:11
    #32496178
nova
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сравнение значений полей двух таблиц
Доброе утро!
Необходимо последовательно проверить значение поля каждой записи первой таблицы со значением поля каждой записи во второй таблице, и в случае если совпадающихся значений нет, то надо значение поля заменить на 0. Надеюсь меня поняли. Есть ли функция в VFP выполняющая такое действие или надо писать свою функцию обработки?
Спасибо!
...
Рейтинг: 0 / 0
26.04.2004, 10:40
    #32496234
Раз (1)
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сравнение значений полей двух таблиц
"Есть такая функция!" (с) В.И.Ульянов :)
SELECT ;
IIF(ISNULL(table1.field1), "0", PADR(table1.field1, 60, SPACE(1)) AS field1 , ;
IIF(ISNULL(table2.field2), "0", PADR(table2.field2, 60, SPACE(1)) AS field2 ;
FROM ;
table1 ;
FULL JOIN ;
table2 ;
ON table1.field1 = table2.field2

Это при условии, что поле символьного типа и размера 60. Если нет - с незначительными коллективами, в частности если численное - конструкцию IIF(ISNULL()) можно для элегантности заменить на NVL()
В синтаксисе могу облажаться.
...
Рейтинг: 0 / 0
26.04.2004, 10:43
    #32496245
Раз (1)
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сравнение значений полей двух таблиц
коллективами = коррективами :)
...
Рейтинг: 0 / 0
26.04.2004, 18:19
    #32497435
ВладимирМ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сравнение значений полей двух таблиц
Если есть индекс по этому полю в подчиненной таблице, то можно так:

select Tab1
REPLACE FOR SEEK(Field1,'Tab2','Field1')=.F. Field1 WITH 0
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Сравнение значений полей двух таблиц / 4 сообщений из 4, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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