ibm-midrange - IBM i RPG 程序代码

Question

我正在查看一个 RPG 程序。有一些这样的子程序:有没有工具哪个会将其创建为一个过程，可以在单独的过程中使用？

C                   Eval      FinQty# = 0                           
C                   Eval      OdCom# = OhCom#                       
C                   Eval      OdOrd# = OhOrd#                       
C     OdKey         Setll     OeOrd1                                
C     OdKey         Reade     OeOrd1                                
C                   Dow       %eof = *off                           
 *                                                                  
C                   If        OdPrt# = OdAls# and                   
c                             %subst(odprt#:1:3) <> 'FRT'           
C                   Eval      FinQty# += OdQty#                     
C                   Endif                                           
 *                                                                  
C     OdKey         Reade     OeOrd1                                
C                   Enddo                                           
 *                                                      

Answer 1

是的，有工具。我不会使用它们。

可以说，子过程的主要好处是局部变量和参数化接口(interface)。没有任何自动化工具能够梳理出界面，弄清楚哪些全局变量应该变成局部变量是一项艰巨的任务。

在我看来，自动化工具所做的就是将语法从 EXSR 转换为 CALLP。 “子过程”仍在使用全局变量，接口(interface)仍然对程序员隐藏。有什么意义？