Pro*Cobol埋め込みのOracleからCobol埋め込みのHiRDBへの移行
Ispirer MnMTKデータベース・アプリケーション移行ツールは、様々な個別のビジネス要件に応えることができる費用対効果の高い製品です。私たちの柔軟性の高いツールは絶えず進化しています。私たちはデータベースとアプリケーションの移行作業が円滑に行われ様々な作業が達成されるようお客様をご支援することを最も重視しております。
Pro*Cobol埋め込みのOracle からCobol埋め込みのHiRDBへの移行
埋め込みSQLステートメントの変換は、OracleからHiRDBへの移行の初期の実装を元にしています。
変換機能：
データベース接続／トランザクション制御 変換
- Connectステートメントの変換
- HiRDBは接続にVARCHAR変数をサポートしていないため、固定バイトの Username と Password 変数を追加
- 新たに宣言した変数への "MOVE" ロジックを追加
Cobol(Oracle):
1. EXEC SQL
2. CONNECT :ID22 IDENTIFIED BY :P22
3. END-EXEC.
Cobol (HiRDB):
1. WORKING-STORAGE SECTION.
2. ** SQLWays Variable for Username/Password **
3. 01 SQLWAYS-ID22 PIC X(08) DEFAULT SPACE.
4. 01 SQLWAYS-P22 PIC X(30) DEFAULT SPACE.
5. …
6. MOVE ID22-ARR TO SQLWAYS-ID22.
7. MOVE P22-ARR TO SQLWAYS-P22.
8.
9. EXEC SQL
10. CONNECT USER :SQLWAYS-ID22 USING :SQLWAYS-P22
11. END-EXEC.
カーソルの変換
Cobol(Oracle):
1. EXEC SQL DECLARE EMPCURSOR CURSOR FOR
2. SELECT T1.C2 INTO :VCHAR FROM T1, T2
3. WHERE T1.C1=T2.C1(+)
4. AND T2.C3(+)>0 AND T1.C4>0
5. END-EXEC.
Cobol (HiRDB):
1. EXEC SQL DECLARE EMPCURSOR CURSOR FOR
2. SELECT T1.C2 INTO :VCHAR FROM T1 LEFT OUTER JOIN T2
3. ON T1.C1 = T2.C1 AND T2.C3 > 0
4. WHERE T1.C4 > 0
5. END-EXEC.
DML クエリの変換
Cobol(Oracle):
1. EXEC SQL
2. UPDATE T1 SET C3=add_months(C1,C2)
3. END-EXEC.
Cobol (HiRDB):
1. EXEC SQL
2. UPDATE T1 SET C3 = C1+C2 MONTH
3. END-EXEC.
プロシージャ呼出しの変換
- PL/SQLブロックの Call ステートメントの変換
- パッケージ名の削除
Cobol(Oracle):
1. EXEC SQL
2. CALL myschema.mypkge.getsal(:increase)
3. END-EXEC.
4.
5. EXEC SQL EXECUTE
6. BEGIN
7. myschema.mypkge.raise_salary(:emp_id);
8. END;
9. END-EXEC.
Cobol (HiRDB):
1. EXEC SQL
2. CALL myschema.getsal(:increase)
3. END-EXEC.
4.
5. EXEC SQL
6. CALL myschema.raise_salary(:emp_id)
7. END-EXEC.
ホスト変数宣言の変換
- SQLCA および SQLDA変数のコメントアウト
- ファイルのインクルード の変換
Cobol(Oracle):
1. EXEC SQL INCLUDE SQLCA END-EXEC.
2. EXEC SQL INCLUDE D:\Test\Statements\incl_file.cob END-EXEC.
Cobol (HiRDB):
1. ** EXEC SQL INCLUDE SQLCA END-EXEC.
2. EXEC SQL COPY incl_file END-EXEC.
拡張子の変換
なぜIspirer MnMTKなのか
Ispirer MnMTKはPro*Cobol埋め込みのOracleアプリケーションからCobol埋め込みのHiRDBアプリケーションへの移行プロセスを自動化します。さらにIspirer MnMTKを使うことにより関連するリスクの多くを軽減し内部作業も大幅に削減する事ができます。これらの利点は妥当な価格で提供されているため、このようなプロジェクトにとってIspirer MnMTKは魅力的なツールであると言えます。
Ispirer MnMTK変換ソフトウェアの試用版をご希望の場合は、デモ版のリクエストからお問い合わせください。価格について知りたい場合は、見積り依頼からお問い合わせください。
詳細はお問い合わせください。
|
