Archiviazione, calcolo e confronto di dati Data/ora in Microsoft Access

In questo articolo viene descritto come vengono archiviati i dati di tipo Data/ora in Microsoft Access. In questo articolo viene inoltre descritto perché può accadere di ottenere risultati imprevisti quando si calcolano o si confrontano date e ore.

Verranno illustrati i seguenti argomenti:

• Archiviazione di dati Data/ora
• Formattazione di un campo Data/ora
• Calcolo di dati ora
• Confronto di dati data
• Confronto di dati ora

Archiviazione di dati Data/ora

In Access il tipo di dati Data/ora viene archiviato come numero a precisione doppia e a virgola mobile fino a 15 posizioni decimali. La parte dell'intero del numero a precisione doppia rappresenta la data. La parte decimale rappresenta l'ora.

I valori validi per la data vanno da -657,434 (1° gennaio 100 d.C.) a 2,958,465 (31 dicembre 9999 d.C.). Il valore di data 0 rappresenta il 30 dicembre 1899. Access memorizza le date precedenti al 30 dicembre 1899 come numeri negativi.

I valori validi per l'ora vanno da .0 (00.00.00) a .99999 (23.59.59). Il valore numerico rappresenta una frazione di un giorno. È possibile convertire il valore numerico in ore, minuti e secondi moltiplicando il valore numerico per 24.

Nella tabella seguente viene mostrato come Access memorizza i valori Data/ora: Per visualizzare come Access memorizza i valori Data/ora sotto forma di numeri, digitare i seguenti comandi nella finestra Immediata, premere INVIO, quindi osservare i risultati: Il risultato equivale a: 36298.5833333333 Il risultato equivale a: -18278.7305555556

Per visualizzare la data e l'ora dei valori numerici, digitare i seguenti comandi nella finestra Immediata, premere INVIO, quindi osservare i risultati:
Il risultato equivale a: 31/12/1899 09.00.00 Il risultato equivale a: 1/8/1066 13.48.00

Formattazione di un campo Data/ora

È possibile formattare un valore Data/ora per visualizzare una data, un'ora o entrambe. Quando si utilizza un formato solo data, viene archiviato il valore 0 per la porzione relativa all'ora. Quando si utilizza un formato solo ora, viene archiviato il valore 0 per la porzione relativa alla data.

Nella tabella seguente viene mostrato in che modo i valori Data/ora vengono archiviati in Access. Viene inoltre mostrato come è possibile visualizzare tali valori utilizzando formati diversi: Nota Il formato predefinito per un valore Data/ora è Data generica. Se un valore è del tipo solo data, non viene visualizzata l'ora. Se il valore è del tipo solo ora, non viene visualizzata la data.

Calcolo di dati ora

Poiché un valore orario è archiviato come frazione di un giorno di 24 ore, è possibile che si ottengano risultati di formattazione non corretti quando si calcolano intervalli di tempo maggiori di 24 ore. Per aggirare il problema, è possibile creare una funzione definita dall'utente con cui garantire che gli intervalli di tempo siano formattati correttamente.

Microsoft fornisce esempi di programmazione a scopo puramente illustrativo, senza alcuna garanzia di qualsiasi tipo, sia espressa che implicita, ivi incluse, senza limitazioni, le garanzie implicite di commerciabilità o idoneità per uno scopo particolare. In questo articolo si presume che l'utente conosca il linguaggio di programmazione in questione e gli strumenti utilizzati per creare ed eseguire il debug delle routine. Gli esperti Microsoft sono autorizzati a fornire spiegazioni in merito alla funzionalità di una determinata routine, ma in nessun caso a modificare questi esempi per fornire funzionalità aggiuntive o a creare routine atte a soddisfare specifiche esigenze. Per calcolare e formattare correttamente gli intervalli di tempo, attenersi alla procedura seguente:

1. Creare una maschera e digitare la seguente riga nella sezione Dichiarazioni se non è già presente:

   Option Explicit
   					

2. Digitare la seguente routine:

   '------------------------------------------------------------------
   '  This function calculates the elapsed time between two values and then 
   '  formats the result in four different ways.
   '
   '  The function accepts interval arguments such as the following:
   '
   '     #5/12/95 6:00:00AM# - #5/11/95 10:00:00PM#
   '
   '     
   '
   '     [End Time]-[Start Time]
   '------------------------------------------------------------------
   
   Function ElapsedTime (Interval)
     Dim x
     x = Int(CSng(Interval * 24 * 3600)) & " Seconds"
     Debug.Print x
     x = Int(CSng(Interval * 24 * 60)) & ":" & Format(Interval, "ss") _
        & " Minutes:Seconds"
     Debug.Print x
     x = Int(CSng(Interval * 24)) & ":" & Format(Interval, "nn:ss") _
        & " Hours:Minutes:Seconds"
     Debug.Print x
     x = Int(CSng(Interval)) & " days " & Format(Interval, "hh") _
        & " Hours " & Format(Interval, "nn") & " Minutes " & _
        Format(Interval, "ss") & " Seconds"
     Debug.Print x
   
   End Function

3. Nella finestra Immediata digitare la seguente riga e premere INVIO:
   ? ElapsedTime(#6/1/1999 8:23:00PM#-#6/1/1999 8:12:12AM#)
   Vengono visualizzati i seguenti valori:
   43848 secondi
   730.48 minuti.secondi
   12.10.48 ore.minuti.secondi
   0 giorni 12 ore 10 minuti 48 secondi

Confronto di dati data

Poiché le date e le ore vengono archiviate insieme come numeri a precisione doppia, è possibile ottenere risultati imprevisti quando si esegue il confronto di date e ore. Se ad esempio si digita la seguente espressione nella finestra Immediata, si ottiene un risultato errato anche se la data odierna è 31/03/1999: La funzione Now() restituisce un numero a precisione doppia che rappresenta la data e l'ora correnti. Tuttavia, la funzione DateValue() restituisce un numero intero che rappresenta la data ma non un valore orario frazionario. Pertanto, Now() equivale a DateValue() solo quando Now() restituisce l'ora 00.00.00.

Per ottenere risultati accurati quando si confrontano i valori di data, utilizzare una delle funzioni seguenti. Per provare ciascuna funzione, digitarla nella finestra Immediata, sostituire 3/31/1999 con la data corrente e premere INVIO:

• Per restituire un valore intero, utilizzare la funzione Date():
  ?Date()=DateValue("3/31/1999")
• Per rimuovere la parte frazionaria della funzione Now(), utilizzare la funzione Int():
  ?Int(Now())=DateValue("3/31/1999")

Confronto di dati ora

Quando si confrontano valori orari, è possibile che si ottengano risultati incoerenti perché un valore orario è archiviato come parte frazionaria di un numero a precisione doppia e con virgola mobile. Se ad esempio si digita la seguente espressione nella finestra Immediata, si ottiene un risultato errato (0) anche se i due valori orari sono gli stessi: Quando Access converte un valore orario in una frazione, il risultato calcolato potrebbe non essere identico al valore orario. La lieve differenza dovuta al calcolo è sufficiente a produrre un risultato errato (0) quando si confronta un valore archiviato con una valore costante.

Per ottenere risultati accurati quando si confrontano valori orari, utilizzare uno dei metodi seguenti. Per provare ciascun metodo, digitarlo nella finestra Immediata, quindi premere INVIO:

Aggiunta di una data associata al confronto orario:Conversione dei valori orari in tipi di dati stringa prima di confrontarli:Uso della funzione DateDiff() per confrontare unità precise quali i secondi:

Per ulteriori informazioni sul calcolo dei valori data e ora, fare clic sul numero dell'articolo della Microsoft Knowledge Base riportato di seguito: Per ulteriori informazioni su come formattare i tipi di dati Data/ora, scegliere Guida in linea Microsoft Access dal menu ?, digitare proprietà formattazione - tipo di dati Data/ora nell'Assistente di Office o nella Ricerca libera e scegliere il pulsante Cerca per visualizzare l'argomento.