Hello James,
with your filter you are testing if there is a booking exactly in this period.
If you change for example the booking
00002 Cliente H 3 1 01-01-2009 31-12-2009 .F. 1 0434 A 24-07-2002 GIOVANNI BIANCHI to a whole year booking your code still returns 1.
If think what I posted is the right filter:
set filter to ( dIniziale < AL .AND. dFinale > dal )
Best regards,
Otto
set filter to alltrim(tipoattrez) == cTipoAttrez .AND. CAMERA == nCamera ;
.AND. ;
(;
( dIniziale >= DAL .AND. dIniziale <= AL ) .OR.;
( dFinale >= DAL .AND. dFinale <= AL );
)>00002 Cliente H 3 1 01-01-2009 31-12-2009 .F. 1 0434 A 24-07-2002 GIOVANNI BIANCHI to a whole >year booking your code still returns 1.
As it should. There is one record that overlaps the new range.
Otto,
>but if you change this record to a booking over the whole season shouldn'd there then be 2:
>the whole season booking and the booking from 14-15.6.2009
Other than the dates, there are two other criteria which that record (recno 2) doesn't meet.
>I am not clear what the msginfo should report: the free places or the occupied one?
msgInfo() is returning the number of records that exist that overlap the desired booking date. If nRec>0 then you cannot make the booking.
James
If aData[nY,nX]== "O"
cTipoAttrez:="O"
cTipoSol :=""
cPosNome := ""
nOmbrellone := (oDBeach)->camera
nFila:= (oDBeach)->Y
cCaption2:="Ombrellone n.:"+str(nOmbrellone)+CRLF+"Fila:"+str(nFila)
n:= nOmbrellone
(oDPre)->(OrdSetFocus(3))
set filter to alltrim((oDPre)->tipoattrez) == cTipoAttrez .AND. (oDPre)->CAMERA == n ;
.AND. ;
(;
( (oDPre)->DAL >= dDataIniziale .AND. (oDPre)->DAL <= dDataFinale ) .OR.;
( (oDPre)->AL >= dDataIniziale .AND. (oDPre)->AL <= dDataFinale );
)
(oDPre)->(DbGoTop())
DO WHILE !(oDPre)->(EoF())
cPosNome := alltrim( (oDPre)->RAZSOC)
cTipoSol := alltrim( (oDPre)->TIPSOL)
nStato:=((oDPre)->stato)
(oDPre)->(DbSkip())
ENDDO
endifOtto,
How You control if a room is free in your Whotel application ?
I want a room from 16.08.2009 to 20.08.2009 : your application not control it ?
Otto,
>Both parts of the condition return false but the period is occupied.
While trying to fall asleep last night, I realized that my previous filter was not covering all conditions. You have pointed out one of those conditions and you are correct. There are more conditions also.
I am going to think about this some more this morning and run more tests. This is more complicated than it at first seemed. Now that I have had some sleep, maybe the little gray cells will be working better.
Regards,
James
set filter to alltrim(tipoattrez) == cTipoAttrez .AND. CAMERA == nCamera ;
.AND. ;
(;
( dIniziale >= DAL .AND. dIniziale <= AL ) .OR.;
( dFinale >= DAL .AND. dFinale <= AL ) .OR. ;
( dIniziale < DAL .AND. dFinale > AL ) ;
)OK, testing seems to confirm that the filter is working. If you use these test dates:
dIniziale:= ctod("14/01/2009")
dFinale := ctod("15/12/2009")
You will get nRecs=6 which is all records in the database that also meet the first two criteria (the non-date criteria). Before adding Otto's filter, nRecs would have been 0. Thanks Otto!
Regards,
James
( dIniziale >= DAL .AND. dIniziale <= AL ) .OR.;
( dFinale >= DAL .AND. dFinale <= AL ) ( dIniziale >= DAL .AND. dIniziale <= AL ) .OR.;
( dFinale >= DAL .AND. dFinale <= AL ) .OR. ;
( dIniziale < DAL .AND. dFinale > AL )Hello James,
why do you think that the condition I posted should not work?
Best regards,
Otto
Otto,
>why do you think that the condition I posted should not work?
>( dIniziale < AL .AND. dFinale > DAL )
Well because I tested it and it didn't as I pointed out in a previous message.
I have looked at it again and I realized that I was not seeing it properly. I was confusing DAL and AL. What I was thinking you had was this:
( dIniziale < DAL .AND. dFinale > AL )
But after looking at your filter again and making a slight modification this seems to work:
( dIniziale <= AL .AND. dFinale >= DAL )
It is important to add the = signs. It works the same as my previous filter but it is much simpler. I like it!
Regards,
James
Hello James,
thank you for your answer.
> I was confusing DAL and AL.
James, therefore I ask what you show in the msginfo.
It was not clear from the question Silvio posted what he really wants:
the free umbrellas or the occupied.
This with the equal signs is much depending of the purpose.
Silvio needs free umbrellas during the day in my case with WINHOTEL
I check if the night is free.
Best regards,
Otto
Otto,
>> I was confusing DAL and AL.
>James, therefore I ask what you show in the msginfo.
>It was not clear from the question Silvio posted what he really wants:
>the free umbrellas or the occupied.
It appears that he was looking to tell if an umbrella was reserved for a date range. However, it would seem to be a better user interface to just select a date and show all umbrellas that are not reserved. Maybe that is what he wants. Silvio?
Howerver, msgInfo() was just a quick test of the filter.
>This with the equal signs is much depending of the purpose.
>Silvio needs free umbrellas during the day in my case with WINHOTEL
>I check if the night is free.
Hmm. But, wouldn't it be the same? If a room is occupied for the night of the 15th, don't you consider the room occupied on the 15th? So, wouldn't you need the same filter?
James