IR Sätze aus zweiter Datei einfügen
Mischen von zwei sequentiellen Dateien
In der zu erzeugenden Ausgabedatei soll Satz 1 von Datei-1 vor Satz 1 von Datei-2 stehen, usw.
ONXCONV' '='.ISAM',FCBTYPE=ISAM,IK (IK: Insert Keys)
Die sequentiellen Dateien 1 und 2 werden mit der Variablen Action ONXCONV zunächst in zwei ISAM-Dateien konvertiert.
Action-Code M (Modify) bei der ersten der erzeugten ISAM-Dateien (Datei-1) eintragen. DUPKEY-Modus einschalten durch Kommando DUPK.
IR 9999,datei-2,K
Sätze der zweiten ISAM-Datei schlüsselgerecht hinter die entsprechenden Sätze von ISAM-Datei-1 einfügen.
ONXCONV'.ISAM'='.SAM',FCBTYPE=SAM,EK
Display von Datei-1 durch Betätigung der K1-Taste beenden und in eine sequentielle Datei konvertieren. Die ISAM-Schlüssel werden dabei gelöscht (EK).
In einer ISAM-Datei (Keypos=10, Keylen=20) soll die Zeichenfolge 'ABC' in den Schlüsseln durch 'XYZ' ersetzt werden. Die sich ergebenden Datensätze sollen ihrem neuen Schlüssel entsprechend eingereiht werden. Die dazu nötige Vorgehensweise wird i
S9999,:6-13:'ABC'=W CFS.DAT3
S9999,:6-13:'ABC'=D
ONXCONV' '='.SAM',FCBTYP=SAM
S9999,:6-13:'ABC'='XYZ'
ONXCONV'.SAM'='',FCBTYP=ISAM,KEYPOS=10,KEYLEN=20
IR9999,CFS.DAT3,K
Alle Datensätze aus der Display-Datei, die die Zeichenfolge 'ABC' enthalten, werden in die Datei CFS.DAT3 übertragen. Danach müssen diese Datensätze aus der Display-Datei gelöscht werden, da im letzten Schritt die gleichen Datensätze mit veränderten Schlüsseln an anderen Stellen wieder in die Datei eingefügt werden.
Datei CFS.DAT3 kann gesondert bearbeitet werden. Da sie vom Fcbtyp ISAM ist, können Schlüssel im CFS-Editor nicht mit Suchen und Ersetzen verändert werden. Letzteres ist nur möglich, falls die ISAM-Datei in eine sequentielle Hilfsdatei CFS.DAT3.SAM konvertiert und die ISAM-Schlüssel als normale Daten mit Suchen und Ersetzen verändert werden. Die sequentielle Hilfsdatei ist danach wieder in eine ISAM-Datei mit dem ursprünglichen Datenformat zurückzukonvertieren. Das Einbringen der so veränderten Datei CFS.DAT3 in die ursprüngliche Display-Datei erfolgt durch das Kommando IR 9999,CFS.DAT3,K.