智能和高度自动化的跨平台数据库和应用程序迁移


从Progress 4GL到Oracle PL/SQL转换

Oracle

Ispirer现代化转换工具支持从Progress 4GL到Oracle PL/SQL不同复杂程度应用转换!


从Progress 4GL转换到Oracle PL/SQL概观

我们的工具包是灵活的,并我们根据您对具体迁移项目的需求会定制工具包,以便达到自动化最高的水平。我们的技术团队拥有在复杂程度不同的迁移项目的工作经验。我将帮助您从Progress 4GL迅速且简单的迁移到Oracle PL/SQL。


为什么选择Ispirer MnMTK为从Progress 4GL转换到Oracle PL/SQL?

Ispirer Systems一直以实现高品位和一流的数据库迁移而备受关注。我们调整我们的迁移工具Ispirer MnMTK定制版以这样的方式能充分符合客户的业务需求。

我们主要好处:

  • 高素质和经验丰富的技术支持: 我们的技术团队拥有在复杂程度不同的迁移项目的工作经验。
  • 客户至上的方针和快速定制: 我们个性化我们的迁移工具可以充分满足客户的业务需求,定制的转换和优化在1-2工作日完成。
  • 预售参与 : 我们会在评估决定之前展示完全转换。
  • 灵活的定价策略: 我们为您提供广泛的选择,其中您一定会找到最适合您的价格方案。
  • 优化转换-: 没有Ispirer的文库或转换后使用IP

了解更多关于Ispirer MnMTK的主要好处在为什么选择Ispirer页面。


评估过程

请填写调查表开始合作讨论为您的项目或获得一些粗略评估:

现场演示

Ispirer转换解决方案

从Progress 4GL到Oracle PL/SQL

请求

请求报价

Ispirer转换解决方案

从Progress 4GL到Oracle PL/SQL

服务 工具

转换特征

迁移Progress数据库到Oracle数据库


Migrate Progress databases to Oracle databases

  • 转换Progress表/视图/程序到Oracle表/视图/程序

例如,

Progress 4GL:

 
ADD TABLE "TB_DATATYPES"
  AREA "Schema Area"
  DUMP-NAME "tb_datat"
 
ADD FIELD "c1" OF "TB_DATATYPES" AS CHARACTER 
  FORMAT "X(8)"
  INITIAL ""
  POSITION 2
  SQL-WIDTH 16
  ORDER 10
 
ADD FIELD "c4" OF "TB_DATATYPES" AS INTEGER 
  FORMAT "->,>>>,>>9"
  INITIAL "0"
  POSITION 5
  SQL-WIDTH 4
  ORDER 20
 
ADD FIELD "c5" OF "TB_DATATYPES" AS logical 
  FORMAT "yes/no"
  INITIAL "no"
  POSITION 6
  SQL-WIDTH 1
  ORDER 30
 
.
PSC
cpstream=ISO8859-1
.
0000000976
 

Oracle PL/SQL:

 
CREATE TABLE TB_DATATYPES
(
   c1 CHAR(16),
   c4 NUMBER(10,0),
   c5 NUMBER(1,0)   
);
 
  • 转换Progress 4GL触发器到Oracle触发器/程序

Progress 4GL:

 
TRIGGER PROCEDURE FOR DELETE OF gsinvhd.
FIND distribution 
WHERE distribution.company = gsinvhd.company NO-LOCK NO-ERROR.
 

Oracle PL/SQL:

 
CREATE OR REPLACE TRIGGER SWT_Delete_gsinvhd
AFTER DELETE
ON gsinvhd
   DECLARE
   v_distribution_company  VARCHAR2(255);
BEGIN
   SELECT   company INTO v_distribution_company FROM distribution
   WHERE (distribution.company = gsinvhd.company) AND ROWNUM <=1;
   EXCEPTION
   WHEN NO_DATA_FOUND THEN
      NULL;
END;
 

转换Progress 4GL代码到Oracle PL/SQL代码


Convert Progress 4GL code to Oracle PL/SQL code

  • 转换Progress 4GL Procedure文件(*.p)到Oracle程序

Progress 4GL:

 
PROCEDURE generate-DATA :
DEFINE VARIABLE i            AS INTEGER NO-UNDO.
DEFINE VARIABLE gc-company AS CHARACTER NO-UNDO.
 
FIND company WHERE company.company = gc-company NO-LOCK NO-ERROR.
 
 find budget WHERE budget.company = gc-company no-LOCK no-error.
  Do while avail budget:
       Do i = 0 TO 5:  
         find budget-analysis 
         WHERE budget-analysis.user-id = company.gc-user-id AND 
         budget-analysis.company = gc-company AND
         budget-analysis.pc-center = "ALL" AND
         budget-analysis.acct-period = i
         no-error.   
END.
END.
END PROCEDURE.
 

Oracle PL/SQL:

 
CREATE OR REPLACE PROCEDURE "generate-data" AS
  v_company_company  VARCHAR2(255);
  v_company_numperiods  VARCHAR2(255);
  v_company_gcuserid  NUMBER(10,0);
  v_budget_company  VARCHAR2(255);
  v_i  NUMBER(10,0);
  v_gccompany  varchar2(4000);
  v_if_exists NUMBER(10,0);
  v_budgetanalysis_userid  NUMBER(10,0);
  v_budgetanalysis_company  VARCHAR2(255);
  v_budgetanalysis_pccenter  VARCHAR2(255);
  v_budgetanalysis_acctperiod  VARCHAR2(255);
BEGIN
  BEGIN
    SELECT   company, "num-periods", "gc-user-id" 
    INTO v_company_company,v_company_numperiods,v_company_gcuserid
    FROM company  
    WHERE (company.company = v_gccompany) AND ROWNUM <=1;
    EXCEPTION
    WHEN NO_DATA_FOUND THEN
      NULL;
  END;                        
  BEGIN
    SELECT   company INTO v_budget_company FROM budget
    WHERE (budget.company = v_gccompany) AND ROWNUM <=1;
    EXCEPTION
    WHEN NO_DATA_FOUND THEN
      NULL;
  END;
  LOOP
    SELECT   COUNT(*) INTO v_if_exists FROM budget;
    exit  WHEN  v_if_exists = 0;
    BEGIN
      v_i := 0;
      while v_i <= 5 LOOP   
        BEGIN
          SELECT   "user-id", company, "pc-center", "acct-period" 
          INTO v_budgetanalysis_userid,v_budgetanalysis_company,
          v_budgetanalysis_pccenter,v_budgetanalysis_acctperiod
          FROM "budget-analysis"  
          WHERE ("budget-analysis"."user-id" = company."gc-user-id"
          AND "budget-analysis".company = v_gccompany
          AND "budget-analysis"."pc-center" = 'ALL'
          AND "budget-analysis"."acct-period" = v_i)
          AND ROWNUM <=1;
          EXCEPTION
          WHEN NO_DATA_FOUND THEN
            NULL;
        END;
        v_i := v_i+1;
      END LOOP;
    END;
  END LOOP;
END;
 

此外,您可以随时联系我们

 
客户评价
2018年 5月 15日System Protocol Information, 马来西亚
Informix到Microsoft SQL Server数据库迁移

尊敬的先生们,

我们刚刚完成了到目前为止最大的从Informix到MS SQL Server迁移任务。这项运动是按计划按时完成的。这是成功的,感谢您工具做很大一部分。

...

2018年 5月 11日Bellnet (HAS), 日本
Delphi转成C#

我们的客户BELLNET是一家日本IT公司,它维护用于控制医疗设备的计算机软件。它需要把这样的医疗软件迁移从Delphi到C#,并联系我们要求转换工具。

...

2018年 4月 24日Steek-IT,荷兰
Progress迁移到SQLServer

Steek-IT是一家荷兰ICT公司,具有15年以上的数据迁移经验。除了我们专业的领域MSSQL、SSIS、SSAS,我们还创建网站、企业软件和iOS应用程序。

...

案例研究
2018年 4月 28日Informix 4GL转移到Microsoft SQL Server的解决方案, 美国

我们的客户是一家值得信赖的美国公司,为美国的100000多家中小企业提供人力资源服务和业务解决方案。

...

2018年 3月 26日Oracle Forms迁移到Java, 美国
用于Ispirer MnMTK的Oracle Forms自动化迁移到Java的可行性已被证明!

于2017年初,一家全球信息技术咨询公司联系Ispirer Systems。该公司与组织合作,制定技术战略并实现IT解决方案,增强公司的业务能力。

...

2018年 3月 23日IBM DB2 iSeries迁移到Microsoft SQL Server, 美国

来自美国的全方服务资讯科技公司,致力于软件和应用程序开发、再工程和维护。该公司提供Web服务,包括网站设计、网站托管和SEO。也从事CRM系统的实施、升级和管理。

...

客户的反馈
我们将研究你和其他人在接下来的一两周内发送的所有材料。几乎所有的竞争对手都无法为我们提供迁移代码的样本。你寄给我们的材料,包括迁移的代码,将把你的公司放在一个小的顶部。如果我们的客户应该决定实现迁移项目,我只能推荐你的公司,因为你除了沟通,显得非常高效和简单。



更多