![]() |
#1 |
Участник
|
Подскажите пожалуйста какой код служит для преноса(копирования) даных из таблици в таблицу?
Например мне нужно пренести из таблици XXXX все строки в другую аналогичную таблицу ZZZ. |
|
![]() |
#2 |
Участник
|
Если эти таблицы имеют одинаковый субтип, то код будет такой:
if xxxx.find('-') then repeat zzz := xxxx; zzz.insert; until xxxx.next = 0; Если таблицы разные, то используйте TRANSFERFIELD |
|
![]() |
#3 |
Участник
|
Цитата:
<<переменная record должна принадлежать 50002, а не 50001>> где xxxx имеет номер 50001, а zzz 50002. |
|
![]() |
#4 |
Участник
|
|
|
![]() |
#5 |
Участник
|
Цитата:
А еще не подскажите, в каком направлении двигаться дальше? Например: У обоих таблиц (xxxx, zzz) есть поля (код товара, название, количество). Надо чтобы при переносе данных из таблице xxxx в таблицу zzz строчки которые совпадают, складывались. Примерно как при учете товара в заказе покупки, когда товар переносится в зону склада. |
|
![]() |
#6 |
Участник
|
Цитата:
Сообщение от lobster
![]() Спасибо, все сработало.
А еще не подскажите, в каком направлении двигаться дальше? Например: У обоих таблиц (xxxx, zzz) есть поля (код товара, название, количество). Надо чтобы при переносе данных из таблице xxxx в таблицу zzz строчки которые совпадают, складывались. Примерно как при учете товара в заказе покупки, когда товар переносится в зону склада. IF zzz.GET(xxxx."Item No.", xxxx."Varient No.") THEN BEGIN // все ключевые поля таблицы zzz zzz.Quantity += xxxx.Quantity; ...... zzz.MODIFY; END ELSE BEGIN ..... zzz.INSERT END |
|