Newsgroup: it.comp.appl.access
Titolo: Pasqua

La pasqua non casca nello stesso giorno, come si calcola?


Vai sul SitoComune........!
@Alex.

 La pasqua non casca nello stesso giorno, come si calcola?
Pasqua è la domenica immediatamente successiva alla prima luna piena di
primavera, ovvero dopo l'equinozio di primavera (circa il 21 marzo).
Se hai un calendario con le fasi lunari sottomano puoi verificare che
quest'anno la prima luna piena dopo l'equinozio è mercoledì 16 aprile e
Pasqua è domenica 20.
Se la prima luna piena di primavera cade proprio di domenica, Pasqua è la
domenica dopo ancora.
Questo per quanto riguarda il calendario, per quanto riguarda Access non ti
posso essere di aiuto.
ciao - Marcello

 La pasqua non casca nello stesso giorno, come si calcola?
Qui di seguito la funzione per calcolarti il giorno in cui cade Pasqua in un
determinato anno.
Public Function Pasqua(Anno As Integer) As Date
   Dim a%, b%, c%, p%, q%, r%
   a = anno% Mod 19: b = anno% \ 100: c = anno% Mod 100
   p = (19 * a + b - (b \ 4) - ((b - ((b + 8) \ 25) + 1) \ 3) + 15) Mod 30
   q = (32 + 2 * ((b Mod 4) + (c \ 4)) - p - (c Mod 4)) Mod 7
   r = (p + q - 7 * ((a + 11 * p + 22 * q) \ 451) + 114)
   Pasqua = DateSerial(anno%, r \ 31, (r Mod 31) + 1)
End Function
Memorizza la funzione in un modulo del tuo database e se il controllo che
contiene l'anno si chiama Anno ed il controllo dove vuoi la data di Pasqua
si chiama GiornoPasqua scrivi:
Me!GiornoPasqua = Pasqua(Me!Anno)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:kob1a.96964$ZE.26...@twister2.libero.it...

Grazie, puoi spiegarmi l'algoritmo?

 Grazie, puoi spiegarmi l'algoritmo?
Non sono in grado di farlo, la funzione non č mia, č di G. Paolo Bizzaro.


 End Function
Mamma mia! Ma uno che scrive funzioni cosě che droghe usa? ;-))
Ciao,
Lo

 ha scritto nel messaggio
news:cEu1a.99566


Insomma vorresri sapere che droga usa! :-)


 La pasqua non casca nello stesso giorno, come si calcola?
Basta utilizzare la funzione dateadd sommando 40 giorni al giorno delle
Ceneri...
Antonio

 ha scritto nel messaggio
news:A672a.105579$YG2.3...@twister1.libero.it...

Le ceneri sono sempre di mercoledě ma non lo stesso giorno (di numero
intendo) quindi se devo calcolare la Pasqua del 2010 come faccio?

 ha scritto nel messaggio
news:1183a.242592$AA2.9...@news2.tin.it...

Basta verificare quando finisce carnevale: le ceneri č il giorno dopo
Antonio


Ma l'ultimo di Carnevale è sicuramente di Martedi' ma non sempre lo stesso
giorno di numero quindi lo devo verificare anno per anno nel senso che non
mi viene automatico.
Pertanto codesto sistema mi pare inutile per avere un calendario per esempio
fino al 2020 (atomiche permettendo)

 ha scritto nel messaggio
news:GVS4a.204210$0v.57...@news1.tin.it...

Ma ti perdi in un bicchier d'acqua!!!
L'ultimo giorno di carnevale è esattamente 90 giorni prima del giorno della
pentecoste!!!
Antonio

 ha scritto nel messaggio
news:Sm05a.137494$ZE.39...@twister2.libero.it...

E' quand'è la pentecoste?
Sai sono un po' ateo ( e pure ignorante in materia )

...

Veramente sono 47; 40 la quaresima + 7 della settimana santa che non
fa parte della quaresima.
basta fare un conto 20/04/03 (pasqua) - 04/03/03 (martedi grasso) = 47
--
Andrea MAlfatti

COMUNQUE LA FUNZIONCINA SOPRA DESCRITTA FUNZIONA BENISSIMO!

 ha scritto nel messaggio
news:7Sq5a.287561$AA2.10...@news2.tin.it...

Ufff..
Però un po' di etimologia la conoscerai no?
PENTEcoste viene da penta, in questo caso 50 giorni dopo pasqua!!!
E il gioco è fatto!!!
Antonio