Проблема с датой.......

[Pasynkova]

Здравствуйте!
Не пойму что делаю не так....

Код: Выделить всё

Procedure Saldo_Dog;


{  message(dtn+' '+add_day(dtk,1));   
  _loop SaldMoun  where          
                  (( 
                       dtn                   == Saldmoun.datesal   and
                       add_day(dtk,1)  == Saldmoun.datesal   and
                       Saldmoun.Kauos[1]   == SpKau.nrec           and
                       Saldmoun.Kauos[2]   == SpKau1.nrec         and
                       Saldmoun.Kauos[3]  /== MainPick3.crec      and
                       MainPick3.crec     /== Katorg.nrec               and
                       KatOrg.cState       == KatState.nrec             and
                       Saldmoun.Kauos[4]   == Basedoc.nrec       and
                       Basedoc.cdogovor    == Dogovor.nrec     and
                       Dogovor.cVal      == KlVal.nrec         and
                       KlVal.nrec        == CursVal.cmain      and
                       Dogovor.cviddog   == KatVidd.nrec       
                  )) 

message по дате выводит, добавляет один день к конечной дате.
А дальше не идет.....
Если убрать функцию add_day(), то все формируется, за исключением конечно сальдо на dtk.....

[Den]

интересное у Вас ограничение по датам...

[Pasynkova]

Упс

Код: Выделить всё

                       dtn                   <<= Saldmoun.datesal   and 
                       add_day(dtk,1) >>= Saldmoun.datesal   and 

надо было так писать....

[PViP]

Pasynkova, а вы попробуйте сначала в переменную запихать значение add_day(dtk,1) , а потом уже переменную в подцепки пихайте!

[Алексей]

PViP это может повлиять лишь на скорость выборки, на результат не повлияет.

[Pasynkova]

Спасибо с датой я разобралась

Возник другой вопрос....
В таблице SPDocs поле cGrMCUsl ссылается на две таблицы, если услуга то GroupUsl, если МС то GroupMC.
Как можно сделать выбор этих групп в одном запросе???

[Алексей]

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

[Pasynkova]

А как правильно написать условие?

[Алексей]

в зависимости от того, что стоит в поле spdocs.prmc, МЦ=1 Услуги=2

[Pasynkova]

....

Код: Выделить всё

{  
               _loop SpDocs  where          
                                                (( 400               == Spdocs.tidk     and
                                                   Dogovor.nrec      == SpDocs.cdoc     and
                                                   SpDocs.CGRMCUSL   == GroupMC.nrec    and
                                                   SpDocs.CGRMCUSL   == GroupUsl.nrec   
                                                ))

                                                if  Spdocs.prmc=1     ????????????

[Pasynkova]

А можно какой нить пример привести???

[Алексей]

я так понимаю у вас Vip программа,ну вот и дальше пишите, допустим вы хотите название группы вытащить, то делайте следующее:

Код: Выделить всё

if Spdocs.prmc=1 then myName := GroupMC.name else myName := GroupUsl.name

[Pasynkova]

Спасибки!