将过程（长名称）调用到变量（不是免费的）

Question

我正在尝试调用一个过程并为输出分配一个变量。

我的问题是我的程序名称对于允许的 space:

来说太长了

这是我的工作来源，是否可以使用 move 或 movel 来做同样的事情？

c                   eval      pSitProp      = json_parseString(wSitProp)

...

  3774 c                   move      pSitProp      json_parseString(wSitProp)                            01 CA050            005000                                                                  
======>                                                          aaaaabbccddee                                                      
*RNF5038 20 a      005000  Field-Length entry is not valid; defaults to blanks.                                                     
*RNF5044 20 b      005000  Decimal-Positions entry is not blank or 0 - 63; defaults to                                              
                           0.                                                                                                       
*RNF5051 20 c      005000  Resulting-Indicator entry is not valid; defaults to blanks.                                              
*RNF5051 20 d      005000  Resulting-Indicator entry is not valid; defaults to blanks.                                              
*RNF5051 20 e      005000  Resulting-Indicator entry is not valid; defaults to blanks.

Answer 1

不，你不能使用 MOVE 或 MOVEL

结果变量和不需要的过程调用之间有很多额外的 space。您的代码实际上适合放在一行中。

 c                   eval      pSitProp = json_parseString(wSitProp)

但让我们假装它没有。
您需要阅读 RPGLE continuation rules

这是打破界限的一种方法。

 c                   eval      pSitProp
 c                              = json_parseString(wSitProp)

如果需要，您可以像这样使用省略号 (...) 拆分长名称：

 c                   eval      pSitProp = json_parseString(wSit...
 c                              Prop)

话虽如此，最好的选择就是简单地使用自由格式。

    pSitProp = json_parseString(wSitProp);

将过程（长名称）调用到变量（不是免费的）

Call procedure (long name) into variable (not free)

rpg

rpgle

ibm-midrange

icebreak