|
◆ datetime_init()
subroutine datetime_init |
( |
type(datetime), intent(inout) |
this, |
|
|
integer, intent(in), optional |
year, |
|
|
integer, intent(in), optional |
month, |
|
|
integer, intent(in), optional |
day, |
|
|
integer, intent(in), optional |
hour, |
|
|
integer, intent(in), optional |
minute, |
|
|
integer, intent(in), optional |
msec, |
|
|
integer(kind=int_ll), intent(in), optional |
unixtime, |
|
|
character(len=*), intent(in), optional |
isodate, |
|
|
character(len=*), intent(in), optional |
simpledate, |
|
|
integer, intent(in), optional |
now |
|
) |
| |
Costruisce un oggetto datetime con i parametri opzionali forniti.
Se non viene passato nulla lo inizializza a 1/1/1. Notare che i gruppi di parametri opzionali (year, month, hour, minute, msec), (unixtime), (isodate), (simpledate), (oraclesimdate) sono mutualmente escludentesi; oraclesimedate � obsoleto, usare piuttosto simpledate. - Parametri
-
[in,out] | this | oggetto da inizializzare |
[in] | year | anno d.C., se � specificato, tutti gli eventuali parametri tranne month, day, hour e minute sono ignorati; per un problema non risolto, sono ammessi solo anni >0 (d.C.) |
[in] | month | mese, default=1 se � specificato year; pu� assumere anche valori <1 o >12, l'oggetto finale si aggiusta coerentemente |
[in] | day | mese, default=1 se � specificato year; pu� anch'esso assumere valori fuori dai limiti canonici |
[in] | hour | ore, default=0 se � specificato year; pu� anch'esso assumere valori fuori dai limiti canonici |
[in] | minute | minuti, default=0 se � specificato year; pu� anch'esso assumere valori fuori dai limiti canonici |
[in] | msec | millisecondi, default=0 se � specificato year; pu� anch'esso assumere valori fuori dai limiti canonici |
[in] | unixtime | inizializza l'oggetto a unixtime secondi dopo il 1/1/1970 (convenzione UNIX, notare che il parametro deve essere un intero a 8 byte) |
[in] | isodate | inizializza l'oggetto ad una data espressa nel formato AAAA-MM-GG hh:mm:ss.msc , un sottoinsieme del formato noto come ISO, la parte iniziale AAAA-MM-GG � obbligatoria, il resto � opzionale |
[in] | simpledate | inizializza l'oggetto ad una data espressa nel formato AAAAMMGGhhmmssmsc , la parte iniziale AAAAMMGG � obbligatoria, il resto � opzionale, da preferire rispetto a oraclesimdate |
[in] | now | inizializza l'oggetto all'istante corrente, se � datetime_utc inizializza con l'ora UTC (preferibile), se � datetime_local usa l'ora locale |
Definizione alla linea 845 del file datetime_class.F90.
847
848END SUBROUTINE datetime_write_unit
849
850
855SUBROUTINE datetime_vect_write_unit(this, unit)
856TYPE(datetime),INTENT(in) :: this(:)
857INTEGER, INTENT(in) :: unit
858
859CHARACTER(len=40) :: form
860CHARACTER(len=23), ALLOCATABLE :: dateiso(:)
861INTEGER :: i
862
863ALLOCATE(dateiso(SIZE(this)))
864DO i = 1, SIZE(dateiso)
865 CALL getval(this(i), isodate=dateiso(i))
|