COBOL에서 DB2로 마이그레이션

COBOL에서 DB2로Ispirer MnMTK 툴의 관리 통해 마이그레이션을 하시기 바랍니다. 어떤 복잡한 변환이라도 지원하며, 고객의 모든 비즈니스 요구 사항에 대로 쉽게 최적화할 수 있습니다.

왜 Ispirer MnMTK 인가?

Ispirer Systems의 주된 목적은 최상의 애플리케이션의 마이그레이션을 제공하는 것입니다. Ispirer Systems의 마이그레이션 툴은 고객님의 비즈니스 요구 사항을 충족할 수 있도록 여러 가지 방식으로, 원하는 대로 개인화합니다. Ispirer MnMTK는 Microsoft SQL Server T/SQL로 마이그레이션 과정을 제공으로 가능하게 합니다. 또한, Ispirer MnMTK를 선택하실 때 분명히 위험 및 노력을 줄입니다. 이러한 장점은 합리적이고 경쟁력있는 비용으로 받을 수 있습니다.

Ispirer MnMTK 2015의 주요 장점

• 고품질의 기술 지원 Ispire Systems의 기술 팀은 다양한 수준의 마이그레이션 프로젝트에서 엄청난 경험을 가지고 있습니다.
• 고객 지향적 접근 방식 및 신속한 고객화 맞춤 버전이 고객님의 비즈니스 요구 사항을 완벽하게 충족할 수 있도록 Ispirer MnMTK를 개인화합니다. 고객님께 맞춤 및 최적화 변환은 영업일 2일 내에 수행합니다.
• 사전 판매 전시 결정을 내리기 전에 평가 과정에서 변환을 입증합니다.
• 유연한 가격 정책 다양한 옵션을 제공 할 수 있으며, 그 중에서 고객님께 딱 맞는 옵션을 찾을 수 있습니다
• 최적화된 변환 변환 후에는 Ispirer의 미들웨어를 사용할 필요없이 지능적인 코드를 얻을 수 있습니다.

평가 과정

평가는 마이그레이션의 노력과 비용을 추정하는데 도움을 줍니다. 고객님께서 Ispirer Systems와 프로젝트에 대해 공동 논의를 위해 주저 없이 설문지를 작성하시고 보내주십시오.

• Cobol to DB2 Migration Questionnaire

변환의 특징

COBOL 프로그램 구조

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

4개 구문에 대한 설명:

• IDENTIFICATION DIVISION: 프로그램의 이름을 입력하는 곳
• ENVIRONMENT DIVISION: 프로그램에서 필요한 파일을 정의하는 곳
• DATA DIVISION: 변수, 레코드, 파일 등을 선언하는 곳
• PROCEDURE DIVISION: 프로그램을 작성하는 곳. 이 위의 샘플 단락 입니다. 이 단락은 레이블로 명명된 일련의 명령어입니다. 단락 마지막에 특정 표시는 없습니다.

변환 기능

DB2:

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

COBOL:

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.

DB2:

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

COBOL:

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

DB2:

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;

COBOL:

MOVE 5 TO MY_NUMBER.

DB2:

SET MY_NUMBER=5;

COBOL:

IF/ELSE/END IF

DB2:

IF/ELSE/END IF;

COBOL:

PERFORN UNTIL/END-PERFORM

DB2:

WHILE  LOOP

            

      END LOOP;

COBOL:

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

DB2:

SELECT cur_date 
FROM val_date
WHERE cur_date < CURRENT TIMESTAMP

추가로 문의 사항이 있으시면 연락주시기 바랍니다.