Здраствуй ВладимирМ, вот опять мне нужна от тебя помощь или совет

дело происходит все там же

большое спасибо за пример

тема: ПомогитеПожалуста...

сделал все работает... вот только есть одно но.. потребовалось еще одну пачку ввести и т.е. надо выкачать данные из еще одной таблицы, но
чтобы получалось примерно так

таблица Table1 в которую выкачиваю данные выглядит так т.е 4 столба

kod naim p296 p400
1 Медведь 124 100
1 Медведь 1000 100
1 Медведь 1 100
1 Медведь 100
1 Медведь 100
2 Зигзак 22
2 Зикзак 22222

а должна выглядеть так

kod naim p296 p400
1 Медведь 124 100
1 Медведь 1000 200
1 Медведь 1 300
1 Медведь 0 400
1 Медведь 0 500
2 Зигзак 22
2 Зикзак 22222


вот кодик... я никак не могу добить его, слава богу что хоть вставлять начал, а то и этого не было....

&&
select svod_glav
SCAN
SELECT p296
SCAN FOR p296.nnn=svod_glav.nnn
SELECT table1
APPEND blank
replace table1.nnn WITH p296.nnn
replace table1.kod WITH ALLTRIM(p296.kod)
replace table1.naim WITH ALLTRIM(p296.naim)
replace table1.mes WITH ALLTRIM(p296.mes)
replace table1.god WITH ALLTRIM(p296.god)
replace table1.p296 WITH p296.summe
ENDSCAN

&& Здесь смотрю если в пачке р296 записей меньше чем в
&& в пачке р400. то вставляю ноликами недастающие
&& и затем записываю в поле table1.p400 суммы из пачки р400
SELECT p400
SCAN
SELECT table1
IF p400.kod=table1.kod AND p400.naim=table1.naim
FOR nn=1 TO 2
SELECT table1
GO top
APPEND blank
REPLACE table1.nnn WITH p400.nnn
replace table1.kod WITH ALLTRIM(p400.kod)
REPLACE table1.naim WITH ALLTRIM(p400.naim)
replace table1.mes WITH ALLTRIM(p400.mes)
REPLACE table1.god WITH ALLTRIM(p400.god)
replace table1.p400 WITH 000000000000000.00
ENDFOR

SCAN FOR p400.nnn=svod_glav.nnn
SELECT table1
SCAN
replace table1.p400 WITH p400.summe
ENDSCAN
ENDSCAN
ENDIF

ENDSCAN

ENDSCAN