如何设计报表正在进行App Builder？

问题描述：

我只是想设计新的进度应用程序生成器报告。如何设计报表正在进行App Builder？

示例：我只想传递员工编号作为输入参数，并在Excel表中获取各自的员工详细信息。为此如何编写正在进行的代码。请看图片。

感谢，

答

当然，我不知道你的数据库实际上是如何组织的，但像下面这样会导出所有的匹配传递给该过程的员工号“员工”记录。输出将是一个适合Excel打开的CSV文件。它应该给你一些关于你可能喜欢的语法的想法。

define variable employeeNum as integer no-undo. 

update employeeNum. 

run exportEmployees (input employeeNum). 


procedure exportEmployee: 

    define input parameter empNum as integer no-undo. 

    define buffer employee for employee. 

    output to value("employee.csv"). 
    for each employee no-lock where employee.employeeId = empNum: 
    export delimiter "," employee. 
    end. 
    output close. 

    return. 

end.

答

获取数据到excel的一个简单方法是使用EXPORT。

即

OUTPUT TO file.csv. 
FOR EACH Customer NO-LOCK: 
    EXPORT DELIMITER ";" Customer. 
END. 
OUTPUT CLOSE.

这将不带任何格式导出虽然。

答

根据您的excel版本，您可以尝试使用com-handles直接与其交互，而不是打开保存的文件。

http://knowledgebase.progress.com/articles/Article/21671

您的代码将类似于上面的例子，但你会改变/ *添加数据* /部分类似于下面的东西。

FOR EACH EMP NO-LOCK  
    WHERE EMP.EMPNO = INTEGER(EMPNO:SCREEN-VALUE): 

    /* Add data */ 
    ASSIGN chWorksheet:Range("B1"):VALUE = EMP.ENAME 
      chWorksheet:Range("B2"):VALUE = EMP.SAL. 

END.

此处假定填充称为“EMPNO”，并且您的EMPNO字段为整数。

如何设计报表正在进行App Builder？

相关推荐