Спасибо за разьяснения в clalist-е. Я поробовал использовать такой подход. но столкнулся с проблемой:
у меня есть таблица VodoBalans(VBL)
Код: Выделить всё
=============Так я описываю группу,==================
!====================================================
groupRepCols GROUP,PRE()
Zabor PDECIMAL(15,2) !1
PPD PDECIMAL(15,2) !2
PodGorVDZ PDECIMAL(15,2) !3
PoteriVDZVol PDECIMAL(15,2)
PoteriVDZPrc PDECIMAL(15,2) !5
WaterTeh PDECIMAL(15,2) !6 <------------!
PrihodVos PDECIMAL(15,2)
PrihodVos2 PDECIMAL(15,2)
PrihodVos1 PDECIMAL(15,2)
SNugVos2 PDECIMAL(15,2) !10
SNugVos1 PDECIMAL(15,2)
PodGorVos PDECIMAL(15,2)
SNugGor PDECIMAL(15,2)
PodPotr PDECIMAL(15,2)
PoteriGorVol PDECIMAL(15,2) !15
PoteriGorPrc PDECIMAL(15,2)
RealPotreb PDECIMAL(15,2) !17
PoteriGorVol_Vyp PDECIMAL(15,2)
PoteriGorPrc_Vyp PDECIMAL(15,2)
Vypad PDECIMAL(15,2) !20
END
!====================================================
=================== а это поверх группы массив ======
!====================================================
RepCols PDECIMAL(15,2),Dim(20),Over(groupRepCols)
========= деляю так: ===============================
SET(VodoBalans.KeyDate)
NEXT(VodoBalans)
MESSAGE (VBL:WaterTeh)
работает :^^^^^^^
MESSAGE (VodoBalans.WaterTeh)
работает :^^^^^^^
MESSAGE (RepCols[6])
НЕ работает!!! :^^^^^^^
--
Best regards,
Ivan mailto:shkmail@inbox.ru
(Добавление)
А присваивать буфер записи (VBL:Record) структуре (groupRepCols), поверх которой накладывается твой массив, не пробовал?

Хотя не очень понятно, зачем иметь промежуточную группу? Не проще ли объявить массив с OVER прямо в структуре файла?
--
Best regards,
Vadim mailto:vadim@softcreator.com
ICQ: 82308757
Не вижу таблицы...у меня есть таблица VodoBalans(VBL)
Может быть, и всё так. А почему тип Pdecimal - база Btrieve?Что я сделал не так?
---------------------------------------
C уважением,
Юрий Философов,
Главный программист
Корпорация "Диполь", Саратов
E-mail yufil@tacis-dipol.ru (служ)
yufil@mail.ru (дом)
ICQ#75924439
Написал: ClaList(2)