and*_*lrc 2 rpg rpgle ibm-midrange icebreak
我正在尝试调用一个过程并为输出分配一个变量.
我的问题是我的程序名称是为了允许的空间:
这是我的工作来源,是否可以使用move或movel做同样的事情?
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)
不,你不能使用MOVE或MOVEL
结果变量和不需要的过程调用之间有很多额外的空间.你的代码实际上只适合一行.
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)
| 归档时间: |
|
| 查看次数: |
173 次 |
| 最近记录: |