IS-EMPTY-FILE( ) Dateigröße prüfen

Anwendungsgebiet: Umgebungsinformationen

Die Funktion IS-EMPTY-FILE( ) prüft, ob eine Datei leer ist. Dies ist stets der Fall, wenn der Last-Page-Pointer auf die Seite 0 zeigt, d.h. wenn in der Ausgabe des Kommandos SHOW-FILE-ATTRIBUTES das Ausgabefeld HIGH-US-PA den Wert 0 enthält.
Die Funktion erkennt jedoch auch, wenn eine ISAM-Datei, für die bereits Verwaltungsblöcke existieren, logisch leer ist.

Format

IS-EMPTY-FILE( )

FILE-NAME = string_ausdruck

Ergebnistyp

BOOLEAN

Eingabeparameter

FILE-NAME = string_ausdruck

Bezeichnet die zu überprüfende Datei.

Ergebnis

TRUE
Die Datei ist leer.

FALSE
Die Datei ist nicht leer.

Fehlermeldungen

SDP0093   FEHLER BEIM ZUGRIFF AUF DATEI/BIBLIOTHEK '(&00)', FEHLER '(&01)'. 
          WEITERE INFORMATIONEN: /HELP-MSG (&01) 
SDP0440   NAME '(&00)' KEIN DATEINAME ODER KEIN SPEZIFISCHER DATEINAME
SDP0453   PARAMETER (&00) IST LEER ODER LAENGER ALS (&01) ZEICHEN ODER 
          ENTHAELT LEERZEICHEN

Beispiel

/CREATE-FILE newfile
/IF (IS-EMPTY-FILE ('newfile'))
/     WRITE-TEXT 'Diese Datei ist leer'
/ELSE
/     WRITE-TEXT 'Diese Datei ist nicht leer'
/END-IF

Ausgabe

Diese Datei ist leer