FiveTech Software tech support forums

... )   oDbf:goBottom()   dDataEstrazione:= oDbf:data   oDbf:close()   //determino numero giorno   nDayarchive:= dow(dDataEstrazione)  //estrazione salvata   nDaytoday:= dow(date())   //oggi            IF nDaytoday = nMartedi      IF nDayarchive ...

... SET FILTER TO ( dFirst <= FIELD->DATA .AND. ; dLast >= FIELD->DATA .AND. ; aCountMesi[ MONTH( FIELD->DATA ) ] .AND. ; aCountGiorni[ DOW( FIELD->DATA )-1 ] .AND. ; aCountDate[ DAY( FIELD->DATA ) ] .AND. ; aCountIndici[ FIELD->IDX ] ) return nil > ) where I insert the conditions ...

Mr. Nages, dow can I solve this?

Thanks, thanks,thanks!!

Roberto

... dDate ) dSelect := dDate dWork := TToD( "01/" + padl( nMonth, 2 ) + "/" + ; right( cCYear, 2), "DD/MM/YY" ) while DoW( dWork ) > 1 dWork -- enddo DEFINE FONT oFont NAME "Ms Sans Serif" SIZE 0, -14 DEFINE FONT oFont2 NAME "Ms Sans Serif" SIZE ...

Parece que hoy me levante sin muchas ganas de pensar
La funsion en cuestion es Dow() que devuelve en forma numérica el día de la semana espesando con un 1 para el domingo así correlativamente.
Gracias y disculpen
Abrazos

... will be much more noticesable. I have to setup a system like Otto has told before... Running on a server and not like I do Peer to Peer. I works dow!!! but sometimes with delay's and these can be possible due to my minor program techniques. BTW : Maybe we can convince Mr. Rao to put his collection ...

hi Silvo, why do you "just" use DOW() and not DTOS() which give you "more" Information you can ad "more" to DTOS() like Postcode of City to compare (use Number) lottery drawings in Italy are drawn every week and ...

hi Silvo,

why do you "just" use DOW() and not DTOS() which give you "more" Information
you can ad "more" to DTOS() like Postcode of City to compare (use Number)

... SET FILTER TO ( dFirst <= FIELD->DATA .AND. ; dLast >= FIELD->DATA .AND. ; aCountMesi[ MONTH( FIELD->DATA ) ] .AND. ; aCountGiorni[ DOW( FIELD->DATA ) ] .AND. ; aCountDate[ DAY( FIELD->DATA ) ] ) return nil > ) oLotto:gobottom() If nTipo=2 atempDbf:= oLotto:DbfToArray() ...

This is wrong:

Code: Select all  Expand view  RUN

aCountGiorni[ DOW( FIELD->DATA )-1 ]
 

If FIELD->DATA is Sunday, DOW( FIELD-> DATE ) evaluates to 1 and [ DOW[FIELD->DATA] - 1 ] evaluates to 0/
Naturally aCountGiorni[ 0 ] results in a runtime error.
This must be simple to understand.

... of week are six {.T.,.T.,.T.,.F.,.F.,.F.} because In italy we have Monday Tuesday Wednesday Thursday Friday Saturday So six day no 7 So I made DOW( FIELD->DATA )-1 is it right ? I have to do a filter more complex 1) Init records 2) End records 3) month(data) 4) dow(data) 5) day(data) 6) ...

... se como resolverlo con XBROWSE para añadirle una primera columna que permita incorporar el nombre del día con la búsqueda en un array con nomdia[dow(DIARIO->FECHA)] . Copio el código: LISTBOX: REDEFINE LISTBOX oTbr FIELDS ;             nomdia[dow(DIARIO->FECHA)],;  ...

... DEFAULT dDate := ::dDateSelected if ::Classname() != "TDAYVIEW" // Si ponemos +2 empieza en lunes dFirstDateWeek = dDate - DoW( dDate ) + 1 + _GFD else dFirstDateWeek = dDate endif RETURN dFirstDateWeek

... } cLeyenda := aDias[ DoW( dFecha ) ] + Str( Day( dFecha ),2 ) + " de " + aMeses[ Month( dFecha ) ] + ; " de " + Str( Year( dFecha ),4 ) Return cLeyenda ...

... } cLeyenda := aDias[ DoW( dFecha ) ] + Str( Day( dFecha ),2 ) + " de " + aMeses[ Month( dFecha ) ] + ; " de " + Str( Year( dFecha ),4 ) Return cLeyenda ...