READ

Sie können die Anzahl der Datensätze, die mit dem READ-Statement gelesen werden sollen, durch Angabe von operand1 (in Klammern direkt hinter dem Schlüsselwort READ) als numerische Konstante (im Bereich von 0 bis 4294967295) oder als den Namen einer numerischen Benutzervariable begrenzen.

Beispiel:

READ (5) IN EMPLOYEES ...
  
MOVE 10 TO CNT(N2)
READ (CNT) EMPLOYEES  ...

Das angegebene Limit hat für dieses Statement Vorrang vor einem mit einem LIMIT-Statement gesetzten Limit.

Ist mit dem Profil-/Session-Parameter LT ein kleineres Limit gesetzt, so gilt das LT-Limit.

Anmerkungen:

1. Wenn Sie eine vierstellige Anzahl von Sätzen lesen möchten, geben Sie diese mit einer vorangestellten Null an: (0nnnn); denn Natural interpretiert jede vierstellige Zahl in Klammern als Zeilennummer-Referenzierung auf ein Statement.
2. operand1 wird zu Beginn des ersten READ-Schleifendurchlaufs ausgewertet. Wird der Wert von operand1 innerhalb der READ-Schleife geändert, hat dies keine Auswirkungen auf die Anzahl der gelesenen Datensätze.

Um hervorzuheben, dass alle Datensätze gelesen werden sollen, können Sie optional das Schlüsselwort ALL angeben.

Wenn Sie operand1 und ALL weglassen, wird die ALL-Option standardmäßig verwendet.

Als view-name geben Sie den Namen eines Views an, der entweder in einem DEFINE DATA-Statement oder in einer programmexternen Global oder Local Data Area definiert ist.

Im Reporting Mode ist view-name der Name eines DDM, falls kein DEFINE DATA LOCAL-Statement benutzt wird.

CIPHER=operand3

Diese Klauseln gelten nur für Zugriffe auf Adabas- oder VSAM-Datenbanken. Mit Entire System Server können sie nicht verwendet werden.

Die PASSWORD-Klausel dient dazu, ein Passwort anzugeben, um auf Daten einer passwortgeschützten Datei zugreifen zu können.

Die CIPHER-Klausel dient dazu, einen Cipher-Code (Chiffrierschlüssel) anzugeben, um in chiffrierter Form gespeicherte Daten in entschlüsselter Form zu erhalten.

Weitere Informationen hierzu siehe Statements FIND und PASSW.

Diese Option macht das READ-Statement empfänglich für Repositionierungsereignisse. Siehe WITH REPOSITION Option.

Diese Option gibt Lese-Reihefolge und -umfang an. Siehe Lesereihenfolge und -umfang.

Diese Klausel gilt nur für Adabas- und VSAM-Datenbanken.

Diese Klausel kann in Verbindung mit einem READ-Statement in physischer oder logischer Reihenfolge (aufsteigend/absteigend) verwendet werden. Der angegebene Wert (operand4) steht für eine Adabas ISN und wird verwendet, um einen bestimmten Datensatz anzugeben, ab dem die READ-Leseschleife gestartet werden soll.

Auch wenn das READ-Statement mit einem Gleichheitszeichen (=) versehen ist, gibt es nicht nur diejenigen Datensätze mit genau dem Startwert in dem betreffenden Deskriptorfeld zurück, sondern startet ab dem angegebenen Startwert einen logischen Suchlauf in aufsteigender oder absteigender Reihenfolge. Wenn einige Datensätze im Deskriptorfeld denselben Inhalt haben, werden sie in der Reihenfolge der ISNs sortiert zurückgegeben.

Die Klausel STARTING WITH ISN ist so etwas wie ein "Selektionskriterium der zweiten Stufe", das nur gilt, wenn der Startwert mit dem Deskriptorwert für den ersten Datensatz übereinstimmt.

Alle Datensätze mit einem Deskriptorwert, der mit dem Startwert identisch ist, und mit einer ISN, die kleiner gleich (größer gleich für ein absteigendes READ) der Start-ISN ist, werden von Adabas ignoriert. Der erste in der READ-Schleife zurückgegebene Datensatz ist entweder

• der erste Datensatz mit Deskriptor = Startwert und einer ISN größer (kleiner für ein absteigendes READ) als die Start-ISN

• oder wenn ein solcher Datensatz nicht vorhanden ist, der erste Datensatz mit einem Deskriptor größer (kleiner für ein absteigendes READ) als der Startwert.

Die Datensätze werden in der Reihenfolge zurückgegeben, in der sie physisch gespeichert sind. Wenn eine STARTING WITH ISN-Klausel angegeben wird, ignoriert Adabas alle Datensätze, bis der Datensatz mit der ISN, die mit der Start-ISN identisch ist, erreicht ist. Der erste zurückgegebene Datensatz ist der nächste auf den Datensatz mit der Start-ISN folgende Datensatz.

Diese Klausel kann nur in physischer Reihenfolge verwendet werden. Der angegebene Wert (operand4) steht für eine VSAM RBA (relative Byte-Adresse von ESDS) oder RRN (relative Datensatznummer von RRDS), die als Startwert für die READ-Leseoperation verwendet werden soll.

Diese Klausel kann zum Repositionieren innerhalb einer READ-Schleife, deren Verarbeitung unterbrochen wurde, benutzt werden, um auf einfache Weise den nächsten Datensatz zu bestimmen, mit dem die Verarbeitung fortgesetzt werden soll. Dies ist besonders hilfreich, wenn der nächste Datensatz sich nicht eindeutig durch einen seiner Deskriptorwerte ermitteln lässt.

Die Klause kann auch hilfreich sein in einer verteilten Client/Server-Anwendung, in der das Lesen der Datensätze von einem Server-Programm und die weitere Verarbeitung der Datensätze von einem Client-Programm durchgeführt werden, wobei die Datensätze nicht alle auf einmal, sondern stapelweise verarbeitet werden.

Beispiel: Siehe Programm REASISND weiter unten.

Mit dieser Option können Sie die zurzeit gelesenen Datensätze in einen "Shared Hold"-Status setzen. Ein Datensatz kann durch viele Benutzer gleichzeitig in den "Shared Hold"-Status gesetzt werden. Solange sich ein Datensatz im "Shared Hold"-Status befindet, ist er vor Änderungen geschützt, weil er nicht durch zeitgleich arbeitende Benutzer in einen "Exclusive Hold"-Status gesetzt werden kann. Dadurch wird die Datenkonsistenz für die Daten des Datensatzes sichergestellt, weil niemand den Datensatz ändern kann, während er sich in Verarbeitung befindet.

Insbesondere wenn auf denselben Datensatz mit mehreren Statements zugegriffen wird, um verschiedene MU-/PE-Ausprägungen zu lesen (GET SAME-Statement) oder um ein LOB-Feld segmentweise zu lesen (READLOB-Statement), kann der "Shared Hold"-Status die Stabilität der Daten während dieser Transaktion garantieren, ohne den Datensatz für andere Benutzer zu blockieren.

Obwohl ein solcher Hold-Status eine effiziente Art ist, Leseabfolgen zu schützen, ist es dennoch eine grundlegende und wichtige Angelegenheit, den Datensatz aus dieser sanften Sperre wieder freizugeben. Da dies von individuellen Aspekten der Anwendung abhängt, besteht die Möglichkeit, mit Hilfe der MODE-Subklausel verschiedene Optionen auszuwählen.

• der nächste Datensatz in der Schleifenabfolge gelesen wird oder

• die Schleife beendet wird oder

• ein END TRANSACTION- oder BACKOUT TRANSACTION-Statement ausgeführt wird.

Falls die MODE-Subklausel weggelassen wird, gilt MODE=C als Standardwert.

Siehe auch Beispiel 8 - SHARED HOLD-Klausel weiter unten

Immer wenn ein im Hold befindlicher Datensatz gelesen werden soll, kann ein Natural-Fehler NAT3145 (Adabas-Rückmeldeschlüssel 145) auftreten, falls der Datensatz zu diesem Zeitpunkt durch einen anderen Benutzer in den Hold-Status versetzt worden ist. Das geschieht, wenn ein "Shared Hold"-Status angefordert wird und der Datensatz sich im "Exclusive Hold"-Status befindet, oder wenn ein "Exclusive Hold"-Status angefordert wird und der Datensatz sich entweder im "Exclusive Hold"- oder im "Shared Hold"-Status befindet.

Gewiss ist der Natural-Fehler NAT3145 die angemessene Reaktion, um eine einwandfreie Datenverarbeitung sicherzustellen, jedoch kann es gelegentlich von Nutzen sein, dass ein im Hold befindlicher Datensatz übersprungen werden kann.

Wenn es in Ordnung ist, dass ein solcher Datensatz nicht bearbeitet und die Schleifenverarbeitung fortgesetzt wird, sollte die SKIP RECORDS-Klausel verwendet werden.

Wenn die SKIP RECORDS-Klausel angewendet wird, versucht Natural zunächst, den Datensatz mit Hold zu lesen.

Wenn die Fehlersituation für einen Natural-Fehler NAT3145 eintrifft, dann

• wird keine Fehlerverarbeitung eingeleitet;

• der (zurzeit durch einen anderen Benutzer gesperrte) Datensatz wird sofort ohne Hold erneut abgerufen, jedoch nicht im Sinne der Programmlogik verarbeitet;

• der Datensatz, der nach dem übersprungenen Datensatz an der Reihe ist, wird ohne Hold gelesen und die Verarbeitung wird fortgesetzt.

Die SKIP RECORD IN HOLD-Funktionalität greift nur, wenn der Natural-Profilparameter WH auf OFF gesetzt ist.

Siehe auch Beispiel 9 - SKIP RECORDS-Klausel weiter unten

Mit der WHERE-Klausel können Sie ein zusätzliches Selektionskriterium in Form einer logischen Bedingung (logical-condition) angeben. Diese wird ausgewertet, nachdem ein Wert gelesen wurde, und bevor eine weitere Verarbeitung auf der Grundlage dieses Wertes (einschließlich AT BREAK-Verarbeitung) erfolgt.

Näheres zu logischen Bedingungen und die Syntax finden Sie unter Logische Bedingungen im Leitfaden zur Programmierung.

Ist über ein LIMIT-Statement oder eine Limit-Notation die Anzahl der zu lesenden Datensätze begrenzt, so werden bei einem READ-Statement, das eine WHERE-Klausel enthält, Datensätze, die aufgrund der WHERE-Bedingung nicht weiterverarbeitet werden, bei der Ermittlung des Limits nicht mitgezählt.

Im Structured Mode muss das für Natural reservierte Schlüsselwort END−READ zum Beenden des READ-Statements benutzt werden.

Im Reporting Mode wird das Natural-Statement LOOP zum Beenden des READ-Statements benutzt.

PHYSICAL SEQUENCE bedeutet, dass die Datensätze in der physischen Reihenfolge, in der sie auf der Datenbank gespeichert sind, gelesen werden.

Ist nichts anderes angegeben, gilt standardmäßig IN PHYSICAL SEQUENCE.

READ BY ISN bedeutet, dass die Datensätze in der Reihenfolge der Adabas-ISNs (Interne Satznummern) bzw. VSAM-RBAs (relative Byte-Adressen von ESDS) bzw. -RRNs (relative Datensatznummern von RRDS) gelesen werden. Anstelle des Schlüsselworts BY können Sie, mit gleichem Ergebnis, auch das Schlüsselwort WITH verwenden.

READ BY ISN ist nur bei Adabas- und VSAM-Datenbanken möglich, und zwar bei VSAM nur für ESDS und RRDS.

LOGICAL SEQUENCE bedeutet, dass die Datensätze in der Reihenfolge der Werte eines bestimmten Deskriptorfeldes (Key) gelesen werden.

Wenn Sie ein Deskriptorfeld angeben, werden die Datensätze in der Wertabfolge dieses Feldes gelesen. Als Feld können Sie einen Deskriptor, Subdeskriptor, Superdeskriptor oder Hyperdeskriptor verwenden, nicht aber einen phonetischen Deskriptor, einen Deskriptor innerhalb einer Periodengruppe oder einen Superdeskriptor, der ein Periodengruppenfeld enthält.

Wenn Sie kein Deskriptorfeld angeben, wird der im verwendeten DDM eingetragene Standarddeskriptor (Feld Default Sequence) genommen.

Anmerkungen:

1. Bei DL/I-Datenbanken: Der verwendete Deskriptor muss entweder das Schlüsselfeld eines Wurzelsegments oder ein Sekundärindexfeld sein. Ein verwendetes Sekundärindexfeld muss ebenfalls im PROSEQ-Parameter eines PCB angegeben werden; Natural benutzt diesen PCB und die entsprechende hierarchische Struktur, um die Daten zu lesen. Wenn Sie READ LOGICAL bei HDAM-Datenbanken verwenden, erhalten Sie keine sinnvollen Ergebnisse, da HDAM-Datenbanken zum Auffinden von Wurzelsegmenten eine Schlüsselumrechnungsroutine benutzen; daher sollten Sie für HDAM-Datenbanken READ PHYSICAL verwenden.
2. Bei VSAM-Datenbanken: LOGICAL ist nur möglich für KSDS mit definierten Primär- und Alternativschlüsseln bzw. ESDS mit Alternativschlüsseln. Wird ein Deskriptorfeld verwendet, das mit Nullwertunterdrückung definiert ist (gilt nur für Adabas), werden Datensätze, bei denen das Deskriptorfeld einen Nullwert enthält, nicht gelesen. Wird als Deskriptorfeld ein multiples Feld verwendet (gilt nur für Adabas), wird ein einzelner Datensatz mehrmals gelesen, wenn das Feld mehrere Werte enthält.

Informationen zu READ IN LOGICAL SEQUENCE finden Sie auch im Leitfaden zur Programmierung; siehe Statements für Datenbankzugriffe, READ-Statement.

Diese Klausel gilt nur für Adabas-, XML-, VSAM- und SQL-Datenbanken. Bei einem READ PHYSICAL-Statement gilt sie nur für VSAM- und DB2-Datenbanken.

Mit dieser Klausel können Sie bestimmen, ob die Datensätze in aufsteigender Reihenfolge oder in absteigender Reihenfolge gelesen werden sollen.

• Standardmäßig werden die Datensätze in aufsteigender Reihenfolge gelesen (was Sie mit dem Schlüsselwort ASCENDING auch ausdrücklich angeben können, aber nicht müssen).

• Wenn die Datensätze in absteigender Reihenfolge gelesen werden sollen, geben Sie das Schlüsselwort DESCENDING an.

• Wenn erst zur Laufzeit bestimmt werden soll, ob die Datensätze in aufsteigender oder absteigender Reihenfolge gelesen werden sollen, geben Sie das Schlüsselwort VARIABLE oder DYNAMIC gefolgt von einer Variablen (operand5) an. Der Wert von operand5 zu Beginn der READ-Verarbeitungsschleife bestimmt dann die Reihenfolge. operand5 muss Format/Länge A1 haben und kann den Wert A (für Ascending/aufsteigend) oder D (für Descending/absteigend) enthalten.

  • Wenn das Schlüsselwort VARIABLE benutzt wird, wird die Leserichtung (Wert von operand5) am Anfang der READ-Verarbeitungsschleife ausgewertet, und sie bleibt bestehen, bis die Schleife beendet wird, ganz gleich ob das Feld von operand5 in der READ-Schleife geändert wird oder nicht.

  • Wenn das Schlüsselwort DYNAMIC benutzt wird, wird die Leserichtung (Wert von operand5) vor jedem Aufruf eines Datensatzes in der READ-Verarbeitungsschleife ausgewertet und kann von Datensatz zu Datensatz geändert werden. Dies ermöglicht es überall in der READ-Schleife, die Reihenfolge beim Durchblättern von aufsteigend in absteigend (und umgekehrt) zu ändern.

Anmerkungen:

1. Bei Adabas-Datenbanken: Dynamische Lesereihenfolge setzt folgende Adabas-Version voraus: Adabas V7 (oder höher).
2. Bei XML-Datenbanken steht DYNAMIC SEQUENCE nicht zur Verfügung.

Mit den Klauseln STARTING FROM und ENDING AT können Sie angeben, ab welchem Wert und bis zu welchem Wert des Deskriptorfeldes gelesen werden soll.

Die STARTING FROM-Klausel (= oder EQ oder EQUAL TO oder [STARTING] FROM) legt den Startwert für die READ-Operation fest. Wenn ein Startwert angegeben wird, beginnt das Lesen mit dem angegebenen Wert. Wenn der Startwert in der Datei nicht vorhanden ist, wird der nächsthöhere (oder niedrigere bei einem absteigenden READ) Wert benutzt. Wenn kein höherer (oder niedrigerer für absteigendes READ) Wert vorhanden ist, wird die Schleife nicht durchlaufen.

Um die Datensätze auf einen Endwert zu begrenzen, können Sie eine ENDING AT-Klausel mit den Bedingungen THRU, ENDING AT oder TO angeben, wobei dann bis einschließlich der angegebenen Werte gelesen wird. Immer wenn das READ-Deskriptorfeld den angegebenen Endwert überschreitet, wird die Schleife automatisch beendet. Obwohl die Basis-Funktionalität der Schlüsselwörter TO, THRU und ENDING AT sich jeweils ähnelt, so unterscheiden sie sich doch im Detail.

Wenn THRU oder ENDING AT benutzt wird, wird nur der Startwert an die Datenbank übergeben, aber die Endwerte-Prüfung vom Natural-Laufzeitsystem durchgeführt, nachdem der Datensatz von der Datenbank zurückgegeben wird. Wenn die Lese-Richtung ASCENDING (aufsteigend) ist, müssen Sie den niedrigeren Wert als den Startwert und den höheren Wert als den Endwert angeben, da der Startwert den zuerst in der READ-Schleife zurückgegebenen Wert (und den Datensatz) darstellt. Wenn Sie aber einen rückwärtsgerichteten (DESCENDING) Lesevorgang starten, muss der höhere Wert im Startwert und der niedrigere Wert im Endwert erscheinen.

Um das Ende des zu lesenden Wertebereichs zu bestimmen, liest Natural intern einen Datensatz über den Endwert hinaus ein. Wenn Sie die READ-Schleife verlassen haben, weil der Endwert erreicht war, denken Sie bitte daran, dass dieser letzte Datensatz wirklich nicht der letzte Datensatz innerhalb des erforderlichen Bereiches ist, sondern der erste Datensatz jenseits dieses Bereiches (außer in dem Fall, dass die Datei keinen weiteren Datensatz nach dem letzten Ergebnisdatensatz enthält).

THRU / ENDING AT kann für alle Datenbanken benutzt werden, die die READ- oder HISTOGRAM-Statements unterstützen.

Wenn das Schlüsselwort TO verwendet wird, werden sowohl der Startwert als auch der Endwert an die Datenbank übergeben, und Natural führt keine Prüfungen auf Wertebereiche hin aus. Wenn der Endwert überschritten wird, reagiert die Datenbank genauso wie wenn das Dateiende (End-of-File) erreicht wäre, und die Datenbank-Schleife wird verlassen. Da alle Bereichsprüfungen von der Datenbank vorgenommen werden, wird immer der niedrigere Wert (des Bereiches) im Startwert und der höhere Wert im Endwert angegeben, ungeachtet der Tatsache, ob Sie in aufsteigender (ASCENDING) oder absteigender (DESCENDING) Reihenfolge lesen.

Die Systemvariable *ISN enthält die Adabas-ISN des gerade verarbeiteten Datensatzes.

Anmerkungen:

1. Bei VSAM-Datenbanken enthält *ISN entweder die RRN (für RRDS) oder die RBA (für ESDS) das aktuellen Datensatzes.
2. Bei DL/I- und SQL-Datenbanken oder mit Entire System Server ist *ISN nicht verfügbar.