从Progress 4GL到Microsoft SQL Server T/SQL转换

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

从Progress 4GL到Microsoft SQL Server T/SQL转换概观

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

Ispirer MnMTK能够转换以下数据库对象:

• 从Progress 表/视图/序列到Microsoft SQL Server T-SQL表/视图/序列
• 从Progress 4GL 触发器到Microsoft SQL Server T-SQL触发器/过程
• 从Progress 4GL 过程文件(*.p)到Microsoft SQL Server过程
• 从Progress 4GL 包含文件 (*.i)到Microsoft SQL Server功能
• Progress ABL 报告到Microsoft SQL Server报告

为什么选择Ispirer MnMTK？

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

我们主要好处:

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

---

评估过程

迁移项目的评估肯定有助于计算所需的努力和成本。 为了简化这个过程，请填写我们的调查问卷:

• 从Progress 4GL迁移到Microsoft SQL Server T-SQL问卷调查

转换特征

• 转换Progress表/视图/程序到Microsoft SQL Server T/SQL表/视图/程序

例如，

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
 

Microsoft SQL Server T/SQL：

 
CREATE TABLE TB_DATATYPES
(
   c1 CHAR(16)   NULL,
   c4 INT   NULL,
   c5 BIT   NULL
)
 
 

• 转换Progress 4GL触发器到Microsoft SQL Server T/SQL触发器/程序

Progress 4GL：

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

Microsoft SQL Server T/SQL：

 
CREATE TRIGGER SWT_Delete_gsinvhd
ON gsinvhd
AFTER DELETE
   AS
   DECLARE @distribution_company VARCHAR(255)
   SELECT    @distribution_company = company FROM distribution
   WHERE distribution.company = gsinvhd.company
 

转换Progress 4GL代码到Microsoft SQL Server T/SQL代码

• 转换Progress 4GL Procedure文件(*.p)到Microsoft SQL Server T/SQL程序

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.
 

Microsoft SQL Server T/SQL：

 
CREATE PROCEDURE [generate-DATA] AS
BEGIN
   DECLARE @company_company VARCHAR(255)
   DECLARE @company_numperiods VARCHAR(255)
   DECLARE @company_gcuserid INT
   DECLARE @budget_company VARCHAR(255)
   DECLARE @i INT
   DECLARE @gccompany VARCHAR(4000)
   SELECT    @company_company = company,  
             @company_numperiods = [num-periods],
             @company_gcuserid = [gc-user-id]
   FROM company   WHERE company.company = @gccompany
   SELECT    @budget_company = company 
   FROM budget   WHERE budget.company = @gccompany
   while EXISTS(SELECT * FROM budget)
   BEGIN
      SET @i = 0
      while @i <= 5
      BEGIN
         DECLARE @budgetanalysis_userid INT
         DECLARE @budgetanalysis_company VARCHAR(255)
         DECLARE @budgetanalysis_pccenter VARCHAR(255)
         DECLARE @budgetanalysis_acctperiod VARCHAR(255)
         SELECT    @budgetanalysis_userid = [user-id],
                   @budgetanalysis_company = company,
                   @budgetanalysis_pccenter = [pc-center],
                   @budgetanalysis_acctperiod = [acct-period]
         FROM [budget-analysis]   
         WHERE [budget-analysis].[user-id] = company.[gc-user-id] AND
         [budget-analysis].company = @gccompany AND
         [budget-analysis].[pc-center] = 'ALL' AND
         [budget-analysis].[acct-period] = @i
         SET @i = @i+1
      END
   END
END
 
 

• 转换Progress 4GL包含文件(*.i)到Microsoft SQL Server T/SQL功能
• 转换Progress ABL报表到Microsoft SQL Server T/SQL报表

我们的转换技术保证：

• 可读性和可维护性的代码
  生产手动转换质量的可读性和可维护性的代码
• 代码转换和重构
  代码转换执行最佳实践的Microsoft SQL Server T/SQL比在新老技术仿真平台
• 最后的科技
• 纯粹的T/SQL代码
  没有任何Ispirer文库或IP使用转换后

Ispirer MnMTK是有效的以转换大脚本包含数千或数百万行代码：

• 自动化地解决依赖关系
  可以取出信息从依赖的文件，数据库等以自动化地决定相关性和冲突
• 配置
  可以从阅读各种配置信息和项目文件（Ispirer MnMTK配置文件，.xml文件）
• 快速和强大的定制
  抽象层，可重复使用的转换模板，内部转换语言和工具允许快速的定制和复杂的代码转换。

关于从Progress 4GL到Microsoft SQL Server T/SQL转换更多的信息，请与我们联系。