CALYPSO
Test-/Demoversion
EDV-Beratung Unger GmbH
Calypso
Calypso ist ein Tool, das die Umstellung von DL/1 Datenbanken nach DB2 weitgehend automatisiert. Es führt DL/1 Calls gegen DB2 Tabellen oder DL/1 Datenbanken aus und ermöglicht so die Koexistenz migrierter und nicht migrierter Datenbanken im selben PSB, ohne die Anwendung ändern zu müssen.
Diese Testversion wird Ihnen zeigen, wie Sie DL/1 Datenbanken nach DB2 mit
vergleichsweise geringem Aufwand umstellen können. Die für die Installation erforderliche Zeit sollte nicht mehr als 1-2 Tage in Anspruch nehmen, sie hängt aber auch von den notwendigen oder beabsichtigten Anpassungen ab. Für eine Umstellung der Produktion ist bei der Komplexität eines derartigen Migrationsprozesses ein längerer Zeitraum
einzuplanen.
Mit diesem Download steht Ihnen eine kostenlose Calypso Testinstallation zur Verfügung, was nicht heißt, dass Calypso kostenlos ist.
Calypso ist Eigentum der EDV-Beratung Unger GmbH. Software und Dokumente, die Sie im Rahmen der Testinstallation oder vertraglicher Vereinbarungen erhalten, dürfen nicht kopiert oder zurückentwickelt werden, ebenso ist eine Weitergabe an Dritte nicht gestattet.
Zum Schutz der Software und um eine praktikable Lösung bereitstellen zu können, mussten einige Änderungen am Produkt vorgenommen werden. Bitte beachten Sie, dass mit der Testinstallation weder der volle Funktionsumfang, noch die produktive Version von Calypso zur Verfügung stehen und dass die Anzahl der Datenbanken, die Sie damit umstellen können begrenzt ist.
Es ist möglich, dass auf Grund unterschiedlicher Releasestände der Software oder aus organisatorischen Gründen Probleme oder Fehler auftreten, die Sie meist selbst durch entsprechende Anpassungen der JCL , Datenbanken, Migrationstabellen etc. beheben können.
Sollten bei der Installation oder im Testbetrieb Probleme auftreten, die Sie nicht beheben können, stehen wir Ihnen gerne unter Tel. +49 (0)8441 18380 zur Verfügung.
Inhalt des Download Package
Target Name Bemerkung
PC Calypso_readme.pdf Bitte lesen
Mainframe Calypso_test.zip Bitte auf dem PC entpacken (UNZIP) und binär zum Mainframe hochladen
Der Download
Mit dem Download erhalten Sie u.a. die digitale Testlizenz TEST, die Sie bitte im Zielsystem als Member der Datei CALYPSO.IMS.LICENSE unverändert bereitstellen.
Calypso prüft diese Datei und ist nicht mehr funktionstüchtig oder liefert unvorhersehbare Fehler, wenn die Lizenz nicht gefunden wird, oder Änderungen an ihr vorgenommen wurden.
Hier jedoch die wichtigsten Anpassungen, die an den bereitgestellten Jobs in der Testumgebung vorzunehmen sind:
Parametereinstellungen und Templates. Es wird an anderen Stellen nochmals darauf verwiesen welche das sind.
Jobkarte(n)
SSIDs von IMS und DB2
Systemdateien wie RESLIB, DB2 Bibliotheken, PROCLIBs Volumes, ggf. UNITs.
Um Dateien unter SMS anzulegen sind die DD-Statements ggf. um MGMTCLAS= und STORCLAS= zu erweitern.
Es empfiehlt sich, den HLQ „CALYPSO“ im Systemkatalog anzulegen und die Dateinamen der CALYPSO Dateien beizubehalten, da andernfalls die Anzahl erforderlicher Anpassungen groß und u.U. unübersichtlich wird. Unbedingt beizubehalten sind der Name und die DSORG der Datei, die das Lizenzticket enthält, da der Name im Lizenzmanagement hinterlegt ist.
Das Lizenzticket darf inhaltlich nicht – also auch nicht versehentlich mit Sequenznummern in den Spalten 73-80 - modifiziert werden, da es in den Programmen überprüft wird und
Änderungen oder das Fehlen des Lizenztickets zur Folge haben, dass Calypso nicht korrekt startet oder arbeitet.
Die Installationsjobs müssen seriell in der dargestellten Reihenfolge des Ablaufs ausgeführt werden, bei paralleler Ausführung entstehen u.U. gravierende Fehler.
Es ist wichtig, dass alle Steps eines Jobs korrekt gelaufen sind, bevor der Folgejob gestartet wird. Kontrollieren Sie daher bitte alle COND CODEs der JOBs und vertrauen Sie nicht darauf, dass mit der Terminierung alles richtig gelaufen ist.
Die meisten Steps der JOBs werden nicht in Abhängigkeit von COND CODEs abgebrochen, um möglichst viele Fehler im JOB bei einem Durchlauf feststellen zu können.
Die Jobs sind, wenn nicht anders vermerkt, nicht restartfähig – beginnen Sie daher am besten von vorne, wenn ein Step nicht oder fehlerhaft gelaufen ist. Sofern es nicht der wieder aufgesetzte Ablauf tut, vergessen Sie bitte nicht, bereits angelegte DB2 Objekte ggf.
zuvor manuell (z.B. mit SPUFI oder AQT) zu löschen, um Fehler beim Neustart zu vermeiden.
Die Calypso Test-/Demoversion, lauffähig in MPP-, BMP- und Batch-Umgebungen unter IMS, ist gedacht Ihnen zu zeigen, wie Calypso aus DL/1 Datenbanken DB2-Tabellen erstellt und wie bestehende Anwendungen ohne Änderungen des Sourcecodes auf DB2 umgestellt werden können. Voraussetzungen dafür sind:
Betriebssystem MVS, z/OS IMS (Testsystem)
DB2 (Testsystem) TSO / REXX
Language environment LEE
ASM Compiler ASMA90 (kann auch ein ALIAS einer anderen Version sein) Gute Systemkenntnisse des Testers in MVS / z/OS, JCL, IMS und DL/1, DB2
Calypso wurde unter JES2 realisiert und getestet. Da sich JES3 etwas anders verhält, sind u.U. weitere Anpassungen der JCL für JES3 erforderlich.
Um das Verfahren für Tests einfacher und schlanker zu machen und das Produkt selbst vor Missbrauch zu schützen, wurden eine Reihe von Funktionen deaktiviert oder ausgebaut.
Bitte beachten Sie daher, dass diese Demoversion folgenden Einschränkungen unterliegt:
Die Anzahl migirierbarer Datenbanken ist auf 3 begrenzt. Mit der eingebauten Toleranz können jedoch bis zu 7 Datenbanken migriert werden.
Die Anzahl migrierbarer PSBs ist auf 10 begrenzt, mit der eingebauten Toleranz auf max. 20.
Die Dauer der Verfügbarkeit ist entsprechend der Lizenz zeitlich begrenzt.
Die Paketbildung wurde entfernt.
Logische Datenbanken und Sekundärindizes sind auf Grund der fehlenden Paketbildung nicht möglich (d.h. nur physische Datenbanken können konvertiert werden).
Overlaystrukturen (Überlagerungsstukturen nicht oder wenig strukturierter Segmente) werden von dieser Testversion nicht unterstützt.
Das zentrale Errorlogging wurde deaktiviert.
Die gleichzeitige Ausführung echter DL/1 und DB2 Calls gegen die gleiche Datenbank - migriert und nicht migriert (Dup-Mode) - ist inaktiv.
Die Konvertierung von dynamic SQL in static SQL steht nicht zur Verfügung.
Diese Version ist nicht für CICS geeignet.
Sie sollten diese Version in einer Testumgebung implementieren, auf keinen Fall in einem Produktionsenvironment. Diese Version ist auch nicht für Performancetests geeignet, da einige Testfeatures in Calypso aktiviert und Produktionseinrichtungen z.T. deaktiviert wurden.
Bitte führen Sie die Tätigkeiten und Abläufe nach erforderlichen Anpassungen in der dargestellten Reihenfolge aus.
Abläufe
Ablauf / Job Manuelle Tätigkeiten
DOWNLOAD
Ihr PC sollte mit dem Internet und dem Zielsystem (Mainframe) verbunden sein.
Laden Sie die Datei Calypso.zip auf den PC herunter und entpacken Sie sie. Die Calypso.zip Datei enthält die auf den Mainframe hochzuladenden Dateien.
UPLOAD
Die Calypso-Dateien des Mainframe wurden mit XMIT unter den Namen CALYPSO.XMI.TEST.* und den Attributen DSORG=PS, LRECL=80, BLKSIZE=3120 und RECFM=FB entladen. Anschließend wurden sie binär auf einen PC gebracht und mit ZIP archiviert.
Die für den Mainframe bestimmten Dateien des Archivs enden mit dem Suffix “xmi“ und sind vom PC binär auf den Mainframe in die TSO / IMS Test-/Entwicklungsumgebung hochzuladen unter den Namen:
PC Mainframe
ASSMAC.xmi CALYPSO.XMI.TEST.ASSMAC CNTL.xmi CALYPSO.XMI.TEST.CNTL DBDLIB.xmi CALYPSO.XMI.TEST.DBDLIB DBDS.xmi CALYPSO.XMI.TEST.DBDS DBRMLIB.xmi CALYPSO.XMI.TEST.DBRMLIB IMS.xmi CALYPSO.XMI.TEST.IMS IMSIC.xmi CALYPSO.XMI.TEST.IMS.IC JCL.xmi CALYPSO.XMI.TEST.JCL LICENSE.xmi CALYPSO.XMI.TEST.LICENSE LINKLIB.xmi CALYPSO.XMI.TEST.LINKLIB PSBLIB.xmi CALYPSO.XMI.TEST.PSBLIB PSBS.xmi CALYPSO.XMI.TEST.PSBS REXX.xmi CALYPSO.XMI.TEST.REXX
RECEIVE
Auf dem Mainframe sind die Dateien mit RECEIVE zu entladen.
Ihre Organisationsform ist meist DSORG=PO, PDSE Dateien wurden in PO Dateien zuvor umgewandelt, VSAM Dateien sind nicht vertreten.
Beginnen Sie bitte manuell unter TSO mit:
RECEIVE INDATASET('CALYPSO.XMI.TEST.JCL') DSNAME('CALYPSO.TEST.JCL') UNIT(????) VOLUME(??????) NEW Die Datei 'CALYPSO.TEST.JCL' enthält die JCL, die Sie im Anschluss benötigen.
Alle anderen Dateien werden mit dem Folgeablauf A001JOB per RECEIVE entladen.
Ablauf / Job Installationsjobs in 'CALYPSO.TEST.JCL'
A001JOB
Vor dem Start dieses Ablaufs bitte UNIT und VOLUME anpassen oder bei SMS managed Datasets um MGMTCLAS und STORCLAS ergänzen.
Der Job entlädt folgende Dateien mit RECEIVE:
CALYPSO.TEST.ASSMAC CALYPSO.TEST.CNTL CALYPSO.TEST.DBDLIB CALYPSO.TEST.DBDS CALYPSO.TEST.DBRMLIB CALYPSO.TEST.IMS CALYPSO.TEST.IMS.IC CALYPSO.IMS.LICENSE CALYPSO.TEST.LINKLIB CALYPSO.TEST.PSBLIB CALYPSO.TEST.PSBS CALYPSO.TEST.REXX
Eine kurze Beschreibung der Inhalte finden Sie in einer nachgeordneten Tabelle.
A002JOB
Vor der Ausführung des JOBs ist zu prüfen, ob Sie bereits Datenbanken gleicher Namen im System haben und ggf. die Namen der CALYPSO Datenbanken anzupassen sind. Ferner sollten Sie die JCL modifizieren
Die Jobcard austauschen.
DSN1 durch den Bezeichner Ihres DB2 Subsystems (SSID) ersetzen.
Das Programm und den Plan DSNTIAD Ihrer Installation übernehmen.
Die DB2 RUNLIB entsprechend Ihrer Installation ersetzen.
Die GRANTs anpassen
Step STEP01 löscht folgende DB2-Datenbanken (sofern vorhanden) und legt sie neu an:
DATABASE STAT DATABASE PRM DATABASE REC DATABASE TRC DATABASE DBD DATABASE PSB
um anschließend folgende DB2-Tabellen anzulegen und mit einigen wenigen Parametern zu versorgen:
CALYPSO.FMIGSTAT CALYPSO.FSTAT CALYPSO.FPRM CALYPSO.FREC CALYPSO.FTRC CALYPSO.XTAB CALYPSO.FDBD CALYPSO.FMIGDBD CALYPSO.FLDB
CALYPSO.FMIGLDB CALYPSO.FXDF CALYPSO.FMIGXDF CALYPSO.FMIGNDX CALYPSO.FNDX CALYPSO.FMIGPSB CALYPSO.FPSB
Eine kurze Beschreibung und deren Inhalte finden Sie in einer nachgeordneten Tabelle.
Im STEP02 werden die GRANTs vergeben. Bitte anpassen !
Die Steps STEP03+04 führen die Binds für DB2-Packages und -Pläne aus BIND PACKAGE(GENER)
BIND PACKAGE(DYNDB2) BIND PACKAGE(STDTAB)
BIND PLAN(GENER) BIND PLAN(TESTINT)
Plan GENER wird für die Generierungsjobs benötigt, TESTINT zur Ausführung des Interface.
Bitte passen Sie in der JCL an:
Die Jobcard.
DSN1 durch den Bezeichner Ihres DB2 Subsystems (SSID) ersetzen.
Die DB2 RUNLIB entsprechend Ihrer Installation ersetzen.
Generierungsjobs in 'CALYPSO.TEST.JCL'
GENER00
Löscht die folgenden Dateien und legt sie neu an:
CALYPSO.TEST.CONVERT CALYPSO.TEST.DB2ST CALYPSO.TEST.PSBCVRT CALYPSO.TEST.SEQU01 CALYPSO.TEST.SEQU02 CALYPSO.TEST.SEQU10 CALYPSO.TEST.SEQU20
Diese Dateien sind Arbeitsdateien, die bei jedem Generierungszyklus neu angelegt werden.
Bevor Sie fortfahren, sollten Sie spätestens jetzt Ihre IMS Umgebung etwas anpassen siehe Aufbau der DL/1 Testdatenbanken
GENER01
Der Job GENER01 generiert die für die Umstellung relevanten Daten, indem er aus dem Sourcecode der DBDs die Parameter der zu migrierenden DL/1 Datenbanken sowie relevante Informationen betroffener PSBs extrahiert.
Bitte achten Sie daher darauf, dass der Sourcecode der DBDs und PSBs zu 100% mit den Load-DBDs, den Load-PSBs und ACBs übereinstimmt.
Weitere Funktionen dieses Jobs sind:
Die Durchführung einiger Plausibilitätsprüfungen.
Die Prüfung, ob die Member für die dynamic allocation (erforderlich) zur Verfügung stehen.
Eine Analyse welche PSBs von der Umstellung der Datenbank(en) betroffen sind.
Bitte beachten Sie, dass alle PSBs die einen DBD der umzustellenden Datenbanken enthalten verfügbar sein sollten und alle entsprechenden Anwendungen mit dem neuen Language Interface DFSLI000 neu zu linken sind.
Die Analyse dieser PSBs
Das Zusammenstellen eines Migrationspakets, damit der
Migrationsprozess in mehrere Stufen aufgeteilt werden kann und Sekundärindizes und logische Datenbanken nicht unberücksichtigt bleiben (in der Demoversion nicht vorhanden).
Der Job beginnt hinter 2 Instream Procedures mit dem Anlegen temporärer Datasets. In den Steps ST02A und ST02B werden die DBDs der
umzustellenden Datenbanken angegeben, im Falle der Testinstallation sind dies die Datenbanken DI21PART und TESTDAT, die Sie jedoch ersetzen oder durch andere erweitern können.
Bitte Berücksichtigen Sie aber die Restriktionen der Testlizenz.
GENER02
Hauptaufgabe des Ablaufs GENER02 ist die Generierung eines Ablaufs, dessen JCL die Umstellung der DL/1 Datenbanken auf der Basis der Architektur des Migrationsprozesses gewährleistet.
Dafür stehen die Daten aus den vorangegangenen Analysen und
Templates der Datei CALYPSO.TEST.CNTL zur Verfügung. Auch diese Templates sollten bis auf 2 Ausnahmen nicht geändert werden, da sonst die Gefahr besteht, dass das Generatorprogramm GENER02 Ergebnisse liefert, die nicht korrekt sind.
Ausnahme(1) ist das Member DB2CONF, das für die Generierung des Folgeablaufs folgende Daten enthält:
DB2C.SSID = 'DSN1'
DB2C.RUNLIB = 'DB2.RUNLIB.LOAD' DB2C.MIG_PLAN = 'TESTINT' DB2C.RUN_PLAN = 'TESTINT' DB2C.MIG_OWNER = 'CALYPSO' DB2C.STD_OWNER = 'CALYPSO' DB2C.TGT_OWNER = 'CALYPSO' DB2C.TGT_GRANT = 'P390A, P390K, AAT08' ;
Anpassungen werden voraussichtlich erforderlich sein bei der SSID, der DB2 Runlib und den GRANTS. Von einer Anpassung der Owner ist bei der
Testinstallation abzuraten. Bitte achten Sie bei der Anpassung an die DB2 konforme Schreibweise der GRANTS, deren Länge bei dieser Version auf eine 1 Zeile und max. 50 CHAR beschränkt ist.
Ausnahme(2) ist das Member DDJ01, das die Schablone für das JOB- Statement und die Instreamprozedur DLIBATCH zum Inhalt hat. Beides kann entsprechend den Anforderungen angepasst werden.
GENER02 generiert für jede Datenbank einen Job, d.h., dass nach korrekter Terminierung eine entsprechende Anzahl JOB Statements anzupassen sind, wenn dies nicht schon in der Schablone geschehen ist.
Die generierten Jobs werden in der Datei CALYPSO.TEST.SEQU20 abgelegt und können somit auch nach Ende dieses Ablaufs modifiziert werden. Auf Grund des Jobnamens laufen diese Folgejobs seriell ab, können jedoch durch unterschiedliche Job-Namen parallelisiert werden.
GENER03
Mit diesem Job werden die Daten der Migrationstabellen, die eigentlich nur der Vorbereitung der Migration dienen, in die Steuertabellen übertragen.
D.h., dieser Step sollte nur dann ausgeführt werden, wenn der Ablauf GENER02 fehlerfrei gelaufen ist.
GENER03 sollte vor oder unmittelbar nach erfolgreicher Ausführung der GENER0A Jobs (die generierten Jobs in CALYPSO.TEST.SEQU20) gestartet werden.
Dieser Ablauf ist jedoch sehr wichtig, da erst danach die Daten zur
Steuerung des Calypso Interface, also der Schnittstelle zwischen DL/1 Call und dem Zugriff auf die korrespondierenden DB2 Tabellen, zur Verfügung stehen.
Wenn nach diesem Ablauf die zuvor gelaufenen Jobs korrekt ausgeführt wurden, die Daten in die Tabellen repliziert und alle involvierten
Anwendungen mit dem neuen Language Interface DFSLI000 gelinkt wurden, kann die Downtime beendet werden.
Bitte vergessen Sie die erforderlichen Anpassungen nicht.
Ablauf / Job Ausführung der generierten Jobs aus ‘CALYPSO.TEST.SEQU20‘
GENER0A
Dieser generierte Ablauf befindet sich nach der Terminierung des Ablaufs GENER02 in der Datei CALYPSO.TEST.SEQU20. Er kann aus mehreren Jobs bestehen, die mit einem Submit gestartet werden können. Von GENER02 wurden je Datenbank folgende Steps generiert:
PSBGEN für den Unload der DL/1 Datenbank
CREATEs der DB2 Objekte, die der Architekur entsprechen 1 Database
1-n Tablespaces 1-n Tabellen 1-n Indizes 1-n Views
0-n Trigger (bei dieser Version 0)
Ein Update der Migrations-Steuertabellen (hauptsächlich die Namen der korrespondierenden DB2-Objekte)
Ein Unload der DL/1 Datenbank Ein Step für den Load der Tabellen
Ein Step für die Generierung des Input für den RUNSTATS Die Ausführung des RUNSTATS
Die Ausführung dieser Jobs setzt eine Downtime des IMS oder die
Deallocation der betroffenen DL/1 Datenbanken voraus, deren Dauer von der Laufzeit der Jobs abhängt.
Abhängig von der Installation sind ggf. Image Copies (ICs) erforderlich.
Bitte berücksichtigen Sie auch bei Batchjobs, die bisher ohne DB2 ausgeführt wurden, im Vorfeld den CONNECT zu DB2 über die JCL herzustellen.
Testjobs in 'CALYPSO.TEST.JCL'
TEST01
Der Testjob TEST01 setzt voraus, dass die Testdatenbanken DI21PART und TESTDAT konvertiert wurden, die Objekte in IMS und DB2 zur Verfügung stehen und identische Daten enthalten - d.h. dass weder die DL/1 Datenbanken, noch die entsprechenden DB2 Tabellen inhaltlich voneinander abweichen dürfen. Der Testjob besteht aus:
der JCL
dem Programm TSTFKT3
dem PSB TESTUPD
der Schablone LAYOUT dem Input TESTDAT
TSTFKT3 ist dem Programm DFSDDLT0 ähnlich. Es liest die Eingabedaten und führt sie gegen die DL/1 Datenbanken und die
konvertierten Datenbanken aus, ermittelt und vergleicht die Ergebnisse in PCBs und den IO-Areas (nur die ersten 33 Character) und markiert die Unterschiede in Spalte 80 mit einem § Zeichen.
Unterschiede können im PCB bei Statuscodes festgestellt werden, die keine wirklichen Ergebnisse liefern und daher nicht relevant sind.
TEST02 TEST02 führt DFSDDLT0 auf DL/1 DB’s aus TEST03 TEST03 führt DFSDDLT0 auf DB2 Tabellen aus
TEST04
Link von Anwendungen. In Ladeprogrammen ist das Language Interface DFSLI000 durch das Calypso Interface DFSLI000 zu ersetzen damit auf migrierte Datenbanken zugegriffen werden kann.
Bitte achten Sie darauf, dass nach dem Link der Entrypoint des Programms der selbe ist wie zuvor.
XREMOV
Löscht die während der Installation angelegten Dateien und Datenbanken.
Die Datei CALYPSO.IMS.LICENSE und während des Testens zusätzlich angelegte Dateien und DB2 Objekte sind manuell zu entfernen.
Zum Entfernen der DL/1 Test Datenbanken DI21PART und TESTDAT steht auf CALYPSO.TEST.IMS das Member XDLETDB zur Verfügung.
Aufbau DL/1 Test-Datenbanken
Die folgenden Jobs / Member der Datei CALYPSO.TEST.IMS sollten benutzt werden, zwei DL/1 Testdatenbanken aufzubauen. Bitte überprüfen und passen Sie Jobs und die Member für die dynamic allocation an, bevor Sie starten.
CREAPART
Mit diesem Job kann eine Testversion der Test-Datenbank DI21PART (IBM) angelegt werden. Der Inhalt liegt als IC in der
CALYPSO.TEST.IMS.IC vor.
Sollte die Datenbank bereits vorhanden sein, kann auch diese benutzt werden, sofern die DBDs übereinstimmen.
CREATEST Mit diesem Job wird die Test-Datenbank TESTDAT angelegt.
Die Daten selbst werden generiert.
DYNAPART Das Member enthält die für die Test-Datenbank DI21PART erforderlichen Definitionen der dynamic allocation
DYNATEST Das Member enthält die für die Test-Datenbank TESTDAT erforderlichen Definitionen der dynamic allocation
DYNALL Job der Member für die dynamic allocation der DL/1 Testdatenbanken umwandelt.
LSTDDLT0 DFSDDLT0 Job zum Anlisten der Inhalte der DL/1 Testdatenbanken XDLETDB XDLETDB löscht die Datasets der Datenbanken DI21PART und TESTDAT
Dateien
Die Dateien enthalten die für die Testversion benötigten Daten.
Datei Inhalt
CALYPSO.IMS.LICENSE Testlizenz
CALYPSO.TEST.ASSMAC DBD / PSB Analyse Makros CALYPSO.TEST.CNTL Templates und Parameter CALYPSO.TEST.DBDLIB IMS DBD Library für Test-DBDs CALYPSO.TEST.DBDS Sourcecode Test-DBDs
CALYPSO.TEST.DBRMLIB DBRM Library
CALYPSO.TEST.LINKLIB Programm- / Ladebibliothek CALYPSO.TEST.PSBLIB IMS PSB Library für Test-PSBs CALYPSO.TEST.PSBS Sourcecode Test-PSBs
CALYPSO.TEST.REXX REXX Prozeduren (2)
CALYPSO.TEST.IMS Jobs zum Aufbau von IMS Test DBs
CALYPSO.TEST.IMS.IC ICs zum Laden der Test-Datenbank DI21PART (IBM)
Tabellen
Die mit CALYPSO.MIG* beginnenden Tabellen dienen der Vorbereitung des Cut Over.
Ihr Inhalt wird mit dem Ablauf GENER03 in die Steuertabellen (ohne ‘MIG‘) übernommen.
Tabelle Bemerkung
CALYPSO.FPRM Parameter
CALYPSO.FREC Fehleraufzeichnung (inaktiv) CALYPSO.FTRC Tracing (inaktiv)
CALYPSO.XTAB Crossreferenzen CALYPSO.FMIGSTAT Status vor Migration CALYPSO.FSTAT Status
CALYPSO.FMIGDBD Daten von DBDs vor Migration CALYPSO.FDBD Daten von DBDs
CALYPSO.FMIGLDB Daten logischer DBDs vor Migration (inaktiv) CALYPSO.FLDB Daten logischer DBDs (inaktiv)
CALYPSO.FMIGXDF Daten zu Indexed Fields vor Migration (inaktiv) CALYPSO.FXDF Daten zu Indexed Fields (inaktiv)
CALYPSO.FMIGNDX Daten zu Sekundärindizes vor Migration (inaktiv) CALYPSO.FNDX Daten zu Sekundärindizes (inaktiv)
CALYPSO.FMIGPSB PSB Daten vor Migration CALYPSO.FPSB PSB Daten
Beispiele
Nach Ablauf GENER01 sollten SPUFI oder AQT folgende Ergebnisse zeigen:
SELECT * FROM CALYPSO.FMIGDBD;
---+---+---+---+---+---+---+---+
PSBNAME PCBNAME DBDNAME RELPOS SEGNAME VPOS HPOS PPOS VARSEG ---+---+---+---+---+---+---+---+
DI21PART 0 PARTROOT 1 1 0 N DI21PART 0 STANINFO 2 1 1 N DI21PART 0 STOKSTAT 2 2 1 N DI21PART 0 CYCCOUNT 3 1 2 N DI21PART 0 BACKORDR 3 2 2 N TESTDAT 0 A 1 1 0 N TESTDAT 0 B 2 1 1 N TESTDAT 0 C 2 2 1 N TESTDAT 0 D 3 1 2 N TESTDAT 0 E 3 2 2 N
DSNE610I NUMBER OF ROWS DISPLAYED IS 10 DSNE616I STATEMENT EXECUTION WAS SUCCESSFUL, SQLCODE IS 100
SELECT * FROM CALYPSO.FMIGPSB;
---+---+---+---+---+---+---+---+
PSBNAME PCBNAME DBDNAME RELPOS SEGNAME VPOS HPOS PPOS VARSEG ---+---+---+---+---+---+---+---+
TESTUPD TEST TESTDAT 1 A 1 1 0 TESTUPD TEST TESTDAT 1 B 2 1 1 TESTUPD TEST TESTDAT 1 C 2 2 1 TESTUPD TEST TESTDAT 1 D 3 1 2 TESTUPD TEST TESTDAT 1 E 3 2 2 TESTUPD DI21PART 2 PARTROOT 1 1 0 TESTUPD DI21PART 2 STANINFO 2 1 1 TESTUPD DI21PART 2 STOKSTAT 2 2 1 TESTUPD DI21PART 2 CYCCOUNT 3 1 2 TESTUPD DI21PART 2 BACKORDR 3 2 2 DSNE610I NUMBER OF ROWS DISPLAYED IS 10
DSNE616I STATEMENT EXECUTION WAS SUCCESSFUL, SQLCODE IS 100
Auszug aus dem TEST01 Output nach Ausführung eines qualifizierten GU gegen die TESTDAT. In den Spalten DL/1 und DB2 werden die Ergebnisse der echten DL/1 Calls den Ergebnissen des selben Calls gegen das CALYPSO Interface gegenübergestellt.
--- VORLETZTES D SEGMENT IN DB ---
============= SEARCH ARGUMENTS ===============================================
CNT= 6 FKT='GU ' LANG='PLI' PCBNAM=' SSX(1)='A (AKEY = A9 ) ';
SSX(2)='C (CKEY = C8 ) ';
SSX(3)='D (DKEY = D9 ) ';
============= SELECT STATEMENTS ===============================================
===============================================================================
COUNT 0006 FUNKTION GU DBD TESTDAT SSA_1 A (AKEY = A9 ) SSA_2 C (CKEY = C8 ) SSA_3 D (DKEY = D9 ) SSA_4 SSA_5 =========== DL/1 ================ ============ DB2 ================
IO_AREA1 _________________________________ _________________________________
IO_AREA2 D9 A9C8D9 02_____________ D9 A9C8D9 02_____________
DBDNAME TESTDAT TESTDAT SEGLEVEL 03 03 STATCD PROCOPT A A SEGNAM D D KFBLEN 0018 0018 NSENSEG 0005 0005 KFBA A9 C8 D9 _______________ A9 C8 D9 _______________
______________________________________________________________
Feldnamen
IO_AREA1 wird hier nicht benutzt
IO_AREA2 IO-Area im Programm DBDNAME Name des benutzten DBD SEGLEVEL Segmentlevel
STATCD Statuscode PROCOPT Processing Option
SEGNAM Segmentname
KFBLEN Länge der Key Feedback Area NSENSEG Anzahl sensitiver Segmente im PCB KFBA Key Feedback Area
