Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Week
Message
De
27/11/2002 13:32:12
 
 
À
27/11/2002 13:05:37
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Re: Week
Divers
Thread ID:
00727666
Message ID:
00727679
Vues:
10
PROCEDURE FunctionX
LPARAMETERS WeekNb, nYear
LOCAL FDOY, inc
FDOY = Date (nYear, 1, 1) 
inc = 8 - DOW (FDOY, 2)

IF (inc < 7)
   FDOY = FDOY + inc
ENDIF

RETURN FDOY + (WeekNb - 2) * 7
HTH

>I need one way to know , the day at begin of week ? of year .
>
>Example , week 48 in this year , begin at 25/11/2002
>
>I want make :
>
>MyDay = FunctionX(48,2002)
>
>? MyDay && 25/11/2002
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform