Calendar Function

[Smash]

Visto che recentemente sul Forum è stato fatto cenno ad un possibile utilizzo in EasyScript di funzioni di calendario, vorrei condividere con voi il codice di queste Funzioni definite dall\'utente che al momento mi sembrano non ancora contemplate in EasyScript.
Nel caso in cui invece lo fossero ed io non me ne fossi accorto, allora smentitemi pure!


Per utilizzare le funzioni bisogna di volta in volta creare una nuova funzione





quindi inserire il codice e salvare il file con il nome opportuno.

[Smash]

Funzione Year

# Restituisce il valore numerico dell\'anno a cui appartiene una certa data.
# Esempio: per impostare che il calcolo inizi ad una data successiva all\'anno 2013
# Year() > 2013
# Restituisce TRUE quando Year() è maggiore del numero di anno impostato 2013


SET A = DATE
SET Year = INTPORTION(A / 10000)

Salvare il file con il nome "Year"

[Smash]

Funzione Month

# Restituisce il valore numerico del mese a cui appartiene una certa data.
# Esempio: per impostare che il calcolo inizi ad una data successiva al mese di Agosto 
# Month() > 8
# Restituisce TRUE quando Month() è maggiore del numero di mese impostato 8


SET A = DATE
SET B = INTPORTION(A / 100)
SET Month = MOD(B, 100)

Salvare il file con il nome "Month"

[Smash]

Funzione Day

# Restituisce il valore numerico del giorno a cui appartiene una certa data.
# Esempio: per impostare che il calcolo inizi ad una data successiva al giorno 15 del mese
# Day() > 15
# Restituisce TRUE quando Day() è maggiore del numero di giorno impostato 15


SET A = DATE
SET Day = MOD(A, 100)

Salvare il file con il nome "Day"

[Smash]

Funzione DayOfWeek

# Restituisce il valore numerico del giorno della settimana a cui appartiene una certa data
# secondo il seguente criterio:
# 0 = Sunday
# 1 = Monday
# 2 = Tuesday
# 3 = Wednesday
# 4 = Thursday
# 5 = Friday
# 6 = Saturday


# Esempio: per impostare che il calcolo inizi ad una data successiva al giorno Mercoledì
# DayOfWeek() > 3
# Restituisce TRUE quando DayOfWeek() è maggiore del numero di giorno della settimana impostato 3


SET A = Month()
SET B = Year()
SET C = Day()
SET YearCorr = IF(A < 3, B - 1, B)
SET FirstMarch = MOD((YearCorr - 1900) + INTPORTION((YearCorr - 1900) / 4) + 4 , 7)


SET B3 = 0
SET B1 = IF(A = 1, 306, B3)
SET B2 = IF(A = 2, 337, B1)
SET B4 = IF(A = 4, 31, B2)
SET B5 = IF(A = 5, 61, B4)
SET B6 = IF(A = 6, 92, B5)
SET B7 = IF(A = 7, 122, B6)
SET B8 = IF(A = 8, 153, B7)
SET B9 = IF(A = 9, 184, B8)
SET B10 = IF(A = 10, 214, B9)
SET B11 = IF(A = 11, 245, B10)
SET B12 = IF(A = 12, 275, B11)




SET D = FirstMarch + B12 + C


SET DayOfWeek = MOD(D, 7) - 1

Salvare il file con il nome "DayOfWeek"




NOTA: quest\'ultima funzione può funzionare soltanto qualora siano state create prima le altre 3 funzioni, in quanto vengono utilizzate nel suo codice!

[Smash]

Ne approfitto per segnalare che beeTrader ogni tanto fa qualche errore di calcolo con la funzione DayOfWeek, per qualche motivo che ignoro.

Anche perchè i dati che sembrano sballati non sono mai riproducibili.

[Andrea Cagalli]

Ne approfitto per segnalare che beeTrader ogni tanto fa qualche errore di calcolo con la funzione DayOfWeek, per qualche motivo che ignoro.

Anche perchè i dati che sembrano sballati non sono mai riproducibili.

[ATTACH=CONFIG]17129[/ATTACH]

[ATTACH=CONFIG]17130[/ATTACH]

[ATTACH=CONFIG]17131[/ATTACH]

Ciao caro,
con la prossima release introdurremo le proprietà: DAY, DAYOFWEEK, MONTH, YEAR...così vai meglio.

Ciao Ciao

[Smash]

Ciao caro,
con la prossima release introdurremo le proprietà: DAY, DAYOFWEEK, MONTH, YEAR...così vai meglio.

Ciao Ciao

Ottimo!

Grazie