Convertir Pro*Cobol Embedded Oracle vers Embedded HiRDB

L'outil de migration de base de données et d'application SQLWays est un produit présentant un bon rapport coût/efficacité qui peut répondre aux besoins d'affaires uniques. Notre outil est flexible et est en constante évolution. Nous travaillons durement pour aider nos clients à effectuer une migration lisse de base de données et d'application et d'accomplir une grande variété de tâches.

Conversion de Pro*Cobol Embedded Oracle vers Cobol Embedded HiRDB

Conversion des instructions SQL embarquées est basée sur l'implémentation initiale de Oracle vers HiRDB.

Caractéristiques de Conversion:

Conversion de Connect Database/Transaction control

• Conversion de l'instruction Connect
• Addition de nouvelles variables fix byte Username et Password pour la connection car HiRDB ne supporte pas les variables VARCHAR pour la connection
• Addition de la logique "MOVE" pour les nouvelles variables de déclaration

Cobol(Oracle):

           EXEC SQL
             CONNECT :ID22 IDENTIFIED BY :P22
           END-EXEC.

Cobol (HiRDB):

           WORKING-STORAGE SECTION.
      ** SQLWays Variable FOR Username/Password **
            01  SQLWAYS-ID22 PIC X(08) DEFAULT SPACE.
            01  SQLWAYS-P22   PIC X(30) DEFAULT SPACE.
           …
           MOVE  ID22-ARR TO SQLWAYS-ID22.
           MOVE  P22-ARR  TO SQLWAYS-P22.
 
           EXEC SQL
             CONNECT USER :SQLWAYS-ID22 USING :SQLWAYS-P22
           END-EXEC.

Conversion de Curseur

• Sélectionner une requête dans la conversion des instructions Curseur basée sur la mise en œuvre de Oracle vers HiRDB

Cobol(Oracle):

           EXEC SQL DECLARE EMPCURSOR CURSOR FOR
             SELECT T1.C2 INTO :VCHAR FROM T1, T2 
             WHERE T1.C1=T2.C1(+) 
             AND T2.C3(+)>0 AND T1.C4>0
           END-EXEC.

Cobol (HiRDB):

           EXEC SQL DECLARE EMPCURSOR CURSOR FOR
             SELECT T1.C2 INTO :VCHAR FROM T1 LEFT OUTER JOIN T2 
             ON T1.C1 = T2.C1 AND T2.C3 > 0 
             WHERE T1.C4 > 0
           END-EXEC.

Conversion de Requête DML

• Conversion des instructions Select, Insert, Update, Delete est basée sur l'implémentation de Oracle vers HiRDB

Cobol(Oracle):

           EXEC SQL
             UPDATE T1 SET C3=add_months(C1,C2) 
           END-EXEC.

Cobol (HiRDB):

           EXEC SQL
             UPDATE T1 SET C3 = C1+C2 MONTH 
           END-EXEC.

Conversion des Appels de Procédure

• Appels des instructions dans la conversion de PL/SQL Block
• Supprimation de nom de Paquet

Cobol(Oracle):

           EXEC SQL 
             CALL myschema.mypkge.getsal(:increase) 
           END-EXEC.
 
           EXEC SQL EXECUTE 
             BEGIN 
               myschema.mypkge.raise_salary(:emp_id); 
             END; 
           END-EXEC.

Cobol (HiRDB):

           EXEC SQL 
             CALL myschema.getsal(:increase) 
           END-EXEC.
 
           EXEC SQL  
             CALL myschema.raise_salary(:emp_id) 
           END-EXEC.

Déclarer la Conversion de Variables Hôtes

• Commenter les variables SQLCA et SQLDCA
• Conversion de "includes" de fichiers

Cobol(Oracle):

           EXEC SQL INCLUDE SQLCA END-EXEC.
           EXEC SQL INCLUDE D:\Test\Statements\incl_file.cob END-EXEC.

Cobol (HiRDB):

      ** EXEC SQL INCLUDE SQLCA END-EXEC.
            EXEC SQL COPY incl_file END-EXEC.

Conversion d'Extention

• Convertit l'extension .PCO vers .ECB

Pourquoi Ispirer MnMTK?

Ispirer MnMTK automatise le processus de migration de votre application Pro*Cobol Embedded Oracle vers Cobol Embedded HiRDB. De plus, avec Ispirer MnMTK vous éliminez la plupart des risques associés et réduisez considérablement les efforts internes. Tous ces avantages sont disponibles à des coûts très raisonnables et concurrentiels, ce qui fait de l'outil de base de migration de base données et de l'application Ispirer MnMTK   un instrument plus attractif pour ce type de projet.

Contactez-nous pour en savoir plus.