FiveTech Software tech support forums

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

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 ...

Thanks for your reply. But it does not work.

XBrowse can call build-in function like "DOW(DOC_DATE)", but I do not know how to call my user defined function.

Marcelo Via Giglio wrote:Hola,

try to use code block COLUMNS "DOC_DATE", {|| Get_name( Customer_code ) }

regards

Marcelo

... IS AN ERROR ON FIRST Please see BuildPlanning method DEFINE PLANNING ::oPlann OF ::oWnd; HEADER "Elementi/Giorni"; COLOR HEADER ( If( Dow( dDate ) == 1 .OR. Dow( dDate ) == 7, CLR_WHITE, ::oPlann:nClrText ) ); COLOR CELL ::ColorData( oData ) ; START DAY Date() - 5; END DAY Date() + ...

... : "+Origen,aFon5) oPrn:Cmsay(3.5,.2,"Destino : "+Destino,afon5) oPrn:Cmsay(4.5,.2,"Fecha : "+Vec_Dia[dow(ctod(fechasalida))]+ " "+FechaSalida,afon5) * oPrn:Cmsay(5.0,.2,"Hora : "+Am_Pm(AllTrim(HoraSalida)),afon5) oPrn:Cmsay(5.0,.2,"Hora ...

... CallDll(<pFunction>,[<xParams,...>])->xResult CDoW(<dExpr>)->cDayName Ceiling(<nValue>)->nInteger Celsius(<nFahrenheit>)->nCelsius Center(<cString>,[<nLength>],[<cPadChar>],[<lBothSides>])->cCenteredString ...