Ibm midrange 将过程（长名称）调用为变量（非自由）

我试图调用一个过程，并用输出赋值一个变量

我的问题是，我的过程名称太长，无法获得允许的空间：

这是我的工作源代码，是否可以使用

move

或

movel

并执行相同的操作

c                   eval      pSitProp      = json_parseString(wSitProp)

---

不，您不能使用

MOVE

或

MOVEL

在results变量和过程调用之间有很多不需要的额外空间。您的代码实际上正好适合一行

 c                   eval      pSitProp = json_parseString(wSitProp)

但让我们假装它没有。
你需要仔细阅读这本书

这里有一个打破界限的方法

 c                   eval      pSitProp
 c                              = json_parseString(wSitProp)

如果需要，您可以使用省略号（…）拆分长名称，如下所示：

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

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

    pSitProp = json_parseString(wSitProp);

---

是的，我知道自由格式。。我只是想体验一下固定格式。。从前端背景到rpg是一种乐趣。欢迎。在这种情况下，我可以理解想要玩固定格式。但老实说，RPG IV确实是为自由格式而设计的。在这一点上，支持固定格式只是为了允许您将CVTRPGSRC从RPG III转换为RPG IV。只需确保您远离过时的操作码，如move。Charles是对的。较旧的操作码，如

MOVE

，在早期具有实际功能。今天，它们不应该与更新的功能（如过程调用和可变长度项）混合使用。过去存在的旧技术元素不再需要，可能会导致问题。

    pSitProp = json_parseString(wSitProp);