Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / FoxPro, Visual FoxPro Новый топик    Ответить
 Есть данные и таблицы, есить запрос. Есть алгоритм. Надо сделать 5й пункт Фокспро  [new]
pafosjoker
Member

Откуда: Россия Крым Красноперекопск
Сообщений: 11
IF! EOF()

PRIVATE m.sel_old, m.kdk_cur

m.sel_old = ALIAS()

UPDATE (m.sel_old) SET Cfldnik = '1' where 1=1

m.kdk_cur = sys(2015)

=usql_exec([select n_kdk, kk42, ceh, kzbr, kslp, '0' as metka from _kdk937 ], (m.kdk_cur))

SELECT(m.kdk_cur)

index on allt(n_kdk) + allt(kk42) + allt(STR(ceh)) + allt(kzbr) + allt(kslp) tag sort

SELECT(m.sel_old)

set relation to allt(n_kdk) + allt(cfldkk42) + allt(STR(cfldceh)) + allt(cfldkzbr) + allt(cfldkslp) into &kdk_cur

allt(cfldkzbr) + allt(cfldkslp) â (&kdk_cur)

REPLACE all ;

Cfldnik with &kdk_cur..metka

set relation off into &kdk_cur

allt(cfldkzbr) + allt(cfldkslp) â (&kdk_cur)

SELECT(m.sel_old)

delete from (m.sel_old) where allt(Cfldnik) == '0'

SELECT(m.sel_old)

GO top

ENDIF

алгоритм

Задача:

Получить изменения по кадровому составу работников
предприятия.



Что имеем:

Таблица с данными отдела кадров:

- таб. №

- признак пользователя сети

- цех (участок, бригада)

- должность

- дата увольнения



Как это делать:


сравниваем
копию и основную таблицу
Находим
отличия
Все
найденные изменения выводим на экран
Параллельно
Создать отчет по изменениям для возможности дальнейшей обработки


5. Создаем копию таблицы отдела кадров с интересующими
данными для следующего сеанса. .
25 мар 14, 16:39    [15784770]     Ответить | Цитировать Сообщить модератору
 Re: Есть данные и таблицы, есить запрос. Есть алгоритм. Надо сделать 5й пункт Фокспро  [new]
chudin
Member

Откуда:
Сообщений: 23
copy to "myFile.dbf" && копирует текущую открытую таблицу в заданный файл
25 мар 14, 17:25    [15785158]     Ответить | Цитировать Сообщить модератору
 Re: Есть данные и таблицы, есить запрос. Есть алгоритм. Надо сделать 5й пункт Фокспро  [new]
pafosjoker
Member

Откуда: Россия Крым Красноперекопск
Сообщений: 11
chudin, эм...мне нужно обновить копию. Тоесть оно обновит ту резервную? и куда его в этом запросе влепить то?
25 мар 14, 17:35    [15785197]     Ответить | Цитировать Сообщить модератору
Все форумы / FoxPro, Visual FoxPro Ответить