Kontakt    Impressum

 

Datenmodell


Das Datenmodell wird in mehreren Schritten aus den vorhanden Datenbankbeschreibungen (IMS = DBD, VSAM = define Cluster, UDS = Schema, ...) und Satzbeschreibungen (Copy-Bücher) entwickelt.

In das relationale Modell werden nach folgenden Regeln (Auszug) die Datentypen umgesetzt
COBOL PL/1 Column-Format Anmerkung
PIC X(n) CHAR (n) CHAR (n)
VARCHAR (n)
n < 256
n > 255
PIC S9(n)V(n) FIXED DEC (n,n) Decimal (n,n)  
PIC S9(9) COMP FIXED BIN (31) Integer  
PIC S9(4) COMP FIXED BIN (15) Smallint  
BIT (n) BIT (n) CHAR (1) je BIT ein CHAR

 

Tabellen Editor

DBAutoMig Table Editor. Bild vergrössern.

Folgende Änderungen können im Datenmodell vorgenommen werden:

  Tabellennamen global ändern.
  Spalten in zusätzliche Tabellen auslagern.
  Spaltennamen ändern.
  Datenformat anpassen.
  Länge der Datenspalte ändern.
  Dezimalstellen einfügen oder verändern.
  Konvertierungsregeln bestimmen.
  Einfügen einer neuen Spalte, mit Zuordnung einer Regel, die die Datenbestückung während der Migration und im konvertierten Anwendungsprogramm bestimmt.
  Normalisierung (Auslagerung einer Spalte in eine neue Tabelle, die über einen Schlüssel beschrieben wird).
 

 

Generierung der DDL's

DBAutoMig DDL Generierung

Generierungsbeispiel: DB2 for z/OS

-- Generate DDL's for DBD: DEMOA  27.1.2004 8:32:42 
-- DBAutoMig Version : 1.0.0 
-- DDL-File : \\Swbp\SWBPE\DBAutoMig\OutPut\DDL\DEMOA.SQL 

-- Database : DEMO     
-- Qualifier: DEMO 

-- Create Tablespace for Table: DEMOA_DEA 

DROP TABLESPACE DEMO.TS#0001;
COMMIT;

CREATE TABLESPACE TS#0001
       IN    DEMO    
       USING STOGROUP   TSGROUP
             PRIQTY     #priqty#
             PCTFREE    #free#
             BUFFERPOOL BP0;

CREATE TABLE DEMO.DEMOA_DEA 
       ( DVSNR                CHAR(12)   NOT NULL
       , DORNRM               SMALLINT   NOT NULL
       , DORNRA               SMALLINT   NOT NULL
       )
       IN DEMO.TS#0001
;

CREATE UNIQUE INDEX IX_DEMOA_DEA
       ON DEMO.DEMOA_DEA
          ( DVSNR             
          , DORNRM            
          , DORNRA             )
       USING STOGROUP   ISGROUP
             PRIQTY     #priqty#
             PCTFREE    #free#
             BUFFERPOOL BP1
             CLUSTER ;

ALTER TABLE DEMO.DEMOA_DEA ADD 
       PRIMARY KEY ( DVSNR             
                   , DORNRM            
                   , DORNRA             )
;

CREATE VIEW DEMO.V_DEMOA_DEA 
       ( DVSNR             
       , DORNRM            
       , DORNRA            )
  AS SELECT 
         DVSNR             
       , DORNRM            
       , DORNRA            
  FROM  DEMO.DEMOA_DEA
;

GRANT SELECT ON DEMO.V_DEMOA_DEA
             TO PUBLIC
;