Цикл не "Вперед", а "Назад"

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
Deinis
Местный житель
Сообщения: 783
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва
Контактная информация:

Цикл не "Вперед", а "Назад"

Сообщение Deinis »

Народ! Пишу ТХО API, такой вопрос:
Есть интерфейс:
select
*
from
SoprHoz
,StepDoc
,BaseDoc
,BaseFin
where
((
CurSoprHoz /== SoprHoz.nRec
and SoprHoz.cStepDoc == StepDoc.nRec
and StepDoc.cBaseDoc == BaseDoc.nRec
and BaseDoc.nRec == BaseFin.cBaseDoc
))
;

Дальше это дело использую так:
if (getfirst SoprHoz = tsOk)
{ ...
_loop BaseFin // цикл по Журналу платежей
{
...суммирую и всякие разности делаю...
}
}
...

А как мне сделать цикл _loop не с первой найденной записи по последнюю, а с последней по первую. Именно так.
sth
Постоянный обитатель
Сообщения: 148
Зарегистрирован: 29 мар 2005, 17:49

Re: Цикл не "Вперед", а "Назад"

Сообщение sth »

а что, _loop там обязательно использовать?
Deinis
Местный житель
Сообщения: 783
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва
Контактная информация:

Re: Цикл не "Вперед", а "Назад"

Сообщение Deinis »

А какая может быть ему альтернатива? Можно, по-моему, все...
sth
Постоянный обитатель
Сообщения: 148
Зарегистрирован: 29 мар 2005, 17:49

Re: Цикл не "Вперед", а "Назад"

Сообщение sth »

тогда предлагаю примерно так:
if getfirst soprhoz=tsok
{
..........
if getlast basefin=tsok
{
do
{
...........
}
while getprev basefin=tsok
}
..........
} //soprhoz
Deinis
Местный житель
Сообщения: 783
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва
Контактная информация:

Re: Цикл не "Вперед", а "Назад"

Сообщение Deinis »

Спасибо!
peterGunn
Сообщения: 7
Зарегистрирован: 29 мар 2005, 17:49

Re: Цикл не "Вперед", а "Назад"

Сообщение peterGunn »

а разве так уже не катит :
_loop backward basefin
{
...
}
?
Deinis
Местный житель
Сообщения: 783
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Москва
Контактная информация:

Re: Цикл не "Вперед", а "Назад"

Сообщение Deinis »

Хмм... интересная конструкция :))
Ответить