Finding Sundays - Level Extreme

De

12/04/2000 12:09:10

Cetin Basoz
Engineerica Inc.
Izmir, Turkey

a

12/04/2000 12:08:15

Cetin Basoz
Engineerica Inc.
Izmir, Turkey

General information

Foro:

Visual FoxPro

Category:

Programación, sintáxis y comandos

Título:

Re: Finding Sundays

Miscellaneous

ID de la conversación:

00358746

ID del mensaje:

00358755

Views:

24

>>I need to find all Sundays in a given month.
>>
>>Thanks and Gog Bless,
>>S.Dyke
>
>

lparameters tnMonth, tnYear
>ldStart=ctod("^"+str(tnYear,4)+"/"+padl(int(tnMonth),2,"0")+"/"+"01")
>ldEndDay = gomonth(ldStartDay,1)-day(gomonth(ldStartDay,1))
>for ix = 0 to day(ldEndDay-1)
> ? ldStart+ix, dow(ldStart+ix,2) = 7 && Sunday
>endfor

Cetin

Çetin Basöz

The way to Go
Flutter - For mobile, web and desktop.
World's most advanced open source relational database.
.Net for foxheads - Blog (main)
FoxSharp - Blog (mirror)
Welcome to FoxyClasses

LinqPad - C#,VB,F#,SQL,eSQL ... scratchpad

Mapa

Ver