|
|
|
|
|
|
|
|
|
Version 6.0
BK GET SIZES
| Parameter | Typ | Beschreibung | |
| Daten | Lange Ganzzahl |  | Größe der Datendatei in Bytes |
| Struktur | Lange Ganzzahl | | Größe der Strukturdatei in Bytes |
| Logbuch | Numerisch | | Größe der Logbuchdatei in Bytes |
| Zusatzdateien | Numerisch | | Größe der Zusatzdateien in Bytes |
| Total | Numerisch | | Gesamtgröße der Sicherung in Bytes |
Beschreibung
Der Befehl BK GET SIZES gibt die Größe der einzelnen Dateien in Bytes zurück.
Die Variable Zusatzdateien gibt die Summe der Zusatzdateien in Bytes zurück.
Die Variable Total gibt die Gesamtgröße der archivierten Datei zurück. Beachten Sie, daß ihr Wert größer ist, als die Summe der Dateien ansich. Der Grund dafür ist, daß die Archivdatei auch einen Kopfteil enthält, der ihren Inhalt beschreibt, sowie Codes zur Prüfung und automatischen Reparatur der Daten.
Beispiel
Diese Methode zeigt nur die Volumes an, die über genügend Platz für die Sicherung verfügen:
C_INTEGER($Backup;$vErr;$i)
C_LONGINT($Kapazität;$Verwendet;$Verfügbar;$Daten;$Struktur;$Log;$ZusDat;$Tot)
$vErr:=BK Begin full backup
If ($vErr=0)
ARRAY STRING (32;TabVolume;0)
BK GET VOLUME LIST (TabVolume)
BK GET SIZES ($Daten;$Struktur;$Log;$ZusDat;$Tot)
`Starte Schleife bei 2, um nicht das Disquettenlaufwerk auszuwählen
For ($i;2;Size of array(TabVolume))
BK GET VOLUME SIZE($i;$Kapazität;$Verwendet;$Verfügbar)
`Die zusätzlichen 100 K dienen als Sicherheitspuffer
If ($Verfügbar>($Tot+100000))
CONFIRM("Soll das Backup auf dem Volume: "+TabVolume{$i}
erstellt werden?)
If (OK=1)
BK SET VOLUME ($i)
$vErr:=BK Start copie
Repeat
Until (BK Get state #4)
$i:=Array size(TabVolume) `Erzwingt Verlassen der Schleife
End if
End if
End for
End if
BK END BACKUP
|
|
|
|
|
|
|
|
|