从 COBOL 到 IBM DB2 转换

使用Ispirer Migration容易转换COBOL成IBM DB2! 我们的团队可以帮助您自动化转换您的当前COBOL应用。它也消除大多数风险及重要减少需要的努力的总量。Ispirer MnMTK是也非常灵活的转换工具。任何迁移方向可以进一步的开发。他可以提供转换以短时间。

为什么选择Ispirer MnMTK为COBOL转换到IBM DB2?

Ispirer MnMTK自动您的现在的COBOL应用的整一迁移过程到DB2。此外，您对Ispirer MnMTK减少大多数的风险及低需要的努力的总量。所有这些好处是可用的最合理的与竞争成本，可以Ispirer MnMTK更佳生动工具为此项目类型。

我们主要好处:

高素质和经验丰富的技术支持: 我们的技术团队拥有在复杂程度不同的迁移项目的工作经验。我将帮助您从COBOL迅速且简单的迁移到DB2。
高度定制化:根据您对迁移项目的需求定制工具包。
最大化节省时间和精力:自动迁移总是比手动迁移更快，更有效。Ispirer将帮助您避免在代码中的任何错误，并明显地加快迁移的过程。如果您对转换的结果不满意，您可以随时更改转换规则和快速再次转换您的COBOL代码。
灵活的定价策略: 我们为您提供广泛的选择，其中您一定会找到最适合您的价格方案。
纯代码: 没有Ispirer的文库或转换后使用IP。

您可以使用我们的评估向导为搜集关于您的应用程序统计信息。请填写调查问卷，以开始您项目中的谈判或得到粗略的估计：

现场演示

Ispirer转换解决方案

从 COBOL 到 IBM DB2

请求报价

Ispirer转换解决方案

从 COBOL 到 IBM DB2

服务工具

IDENTIFICATION DIVISION.
PROGRAM-ID. DemoId.
ENVIRONMENT DIVISION.
DATA DIVISION.
PROCEDURE DIVISION.
FIRST-PARAGRAPH.
   DISPLAY "First DEMO".

共有四个部：

CREATE OR REPLACE PROCEDURE DemoId()
LANGUAGE SQL
BEGIN
   CALL DBMS_OUTPUT.PUT_LINE ('FIRST DEMO');
END

WORKING-STORAGE SECTION.
01 MY_STRING_1    PIC X(20).
01 MY_STRING_2    PIC X(30).
01 MY_NUMBER    PIC 9(2) VALUE 1.

到:

  DECLARE MY_STRING_1 VARCHAR(20);
  DECLARE MY_STRING_2 VARCHAR(30);
  DECLARE MY_NUMBER INTEGER; 
  SET MY_NUMBER = 1;

01 MY_DATA_RECORD.
    03 MY_NAME        PIC X(20).
    03 MY_ADDRESS  PIC X(40).
    03 MY_ID               PIC 9(2).

到:

DECLARE SWV_MY_DATA_RECORD_MY_NAME VARCHAR(20);
     DECLARE SWV_MY_DATA_RECORD_MY_ADDRESS VARCHAR(40);
     DECLARE SWV_MY_DATA_RECORD_MY_ID DOUBLE;

MOVE 5 TO MY_NUMBER.

到:

SET MY_NUMBER=5;

IF/ELSE/END IF

到:

IF/ELSE/END IF;

从:

PERFORN UNTIL/END-PERFORM

到:

WHILE  LOOP

            

      END LOOP;

将屏幕输出（DISPLAY语句）转为DBMS_OUTPUT.PUT_LINE
将EXEC SQL/ END-EXEC语句（select, insert, update, delete, CURSOR语句）转为DB2 SQL 语句（SELECT, INSERT, UPDATE, DELETE, CURSOR语句）

EXEC SQL
    SELECT cur_date 
    FROM val_date
    WHERE cur_date < CURRENT
 END-EXEC.

到:

SELECT cur_date 
FROM val_date
WHERE cur_date < CURRENT TIMESTAMP

您还可以通过联系我们页面与我们联系。