всем привет!!подскажите пож-та как сделать..имеется такой код
SET SAFETY OFF
CLOSE DATABASES
ALTER TABLE K:\ÎËÅÃ\reg_gek\in\dnp.dbf ADD COLUMN kvp n (10,2)
ALTER TABLE K:\ÎËÅÃ\reg_gek\in\dnp.dbf ADD COLUMN vhol n (10,2)
ALTER TABLE K:\ÎËÅÃ\reg_gek\in\dnp.dbf ADD COLUMN knlz n (10,2)
ALTER TABLE K:\ÎËÅÃ\reg_gek\in\dnp.dbf ADD COLUMN mus n (10,2)
ALTER TABLE K:\ÎËÅÃ\reg_gek\in\dnp.dbf ADD COLUMN pol n (10,2)
USE K:\ÎËÅÃ\reg_gek\in\dnp.dbf IN 1 EXCLUSIVE
USE K:\ÎËÅÃ\reg_gek\in\gkh1.dbf IN 3 EXCLUSIVE
SELECT 3
INDEX ON ALLTRIM(nomlist) tag lich
SET ORDER TO tag lich
*çàìåíÿåì âîäó,êàíàëèç,ìóñîð è ïîëèâ
SELECT 1
SET RELATION TO ALLTRIM(lich) INTO gkh1 ADDITIVE
SET EXACT ON RELATION TO ALLTRIM(lich) INTO gkh1 ADDITIVE
REPLACE all vhol WITH GKH1.saldovhol
REPLACE ALL knlz WITH GKH1.saldoknlz
REPLACE ALL mus WITH GKH1.saldomusr
REPLACE ALL pol WITH GKH1.saldopolv
SET RELATION OFF INTO Gkh1
USE K:\ÎËÅÃ\reg_gek\in\gkh2.dbf IN 4 EXCLUSIVE
SELECT 4
INDEX ON ALLTRIM(nomlist) tag lich
SET ORDER TO tag lich
*çàìåíÿåì êâàðòïëàòó
SELECT 1
SET ORDER TO TAG Lich OF K:\ÎËÅÃ\reg_gek\in\gkh2.cdx IN Gkh2
SET RELATION TO ALLTRIM(Dnp.lich) INTO Gkh2 ADDITIVE
REPLACE ALL kvp WITH GKH2.saldokvpl
SET RELATION OFF INTO Gkh2
REPLACE ALL Kvp WITH 0 FOR Kvp<0
REPLACE ALL vhol WITH 0 FOR vhol<0
REPLACE ALL knlz WITH 0 FOR knlz<0
REPLACE ALL mus WITH 0 FOR mus<0
REPLACE ALL pol WITH 0 FOR pol<0

вообщем хочу чтобы после выполнения этих команд на принтер распечатывался
простенький отчёт в котором будет общие суммы последних пяти колонок
например так kvp=123456 vhol=123456 knlz=654321 mus=.. pol=...

Fffffffffffffffffff,
пока нечего,т.к. незнаю с чего начинать и вообще незнаю как это делается

Ffffffffffffffff,спасибо,точто и искал,буду пробовать..

reware,
igorbik
СПАСИБО!