将程序(长名称)调用到变量(不是免费的)

and*_*lrc 2 rpg rpgle ibm-midrange icebreak

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

我的问题是我的程序名称是为了允许的空间:

这是我的工作来源,是否可以使用movemovel做同样的事情?

c                   eval      pSitProp      = json_parseString(wSitProp)
Run Code Online (Sandbox Code Playgroud)

...

  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.                                              
Run Code Online (Sandbox Code Playgroud)

Cha*_*les 5

不,你不能使用MOVEMOVEL

结果变量和不需要的过程调用之间有很多额外的空间.你的代码实际上只适合一行.

 c                   eval      pSitProp = json_parseString(wSitProp)
Run Code Online (Sandbox Code Playgroud)

但是让我们假装没有.
您需要阅读RPGLE 延续规则

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

 c                   eval      pSitProp
 c                              = json_parseString(wSitProp)
Run Code Online (Sandbox Code Playgroud)

如果需要,您可以使用省略号(...)分解长名称,如下所示:

 c                   eval      pSitProp = json_parseString(wSit...
 c                              Prop)  
Run Code Online (Sandbox Code Playgroud)

话虽如此,最好的选择是简单地使用自由格式.

    pSitProp = json_parseString(wSitProp);
Run Code Online (Sandbox Code Playgroud)