在 RPGLE 中使用 String.format

Question

我想将 RPGLE 与 String.format 接口，它接受可变长度参数或数组，我还想传递数字和字符串，所以我将使用类似 “hello %s，你已经 %d 年了”的格式旧”。有人可以给我一些关于如何在 RPGLE 中制作原型的建议吗？

---

更新

似乎有些人对这个问题感到困惑。为了清楚起见，我想在 RPGLE 中制作以下原型。请注意，该方法的第二个参数是一个 varargs 参数，因此可以提供任意数量的参数！ RPGLE 绝对不支持这一点，但它确实支持 *nopass 所以这对实现我需要的结果很有帮助。

  String format = "|%1$-10s|%2$-10s|%3$-20s|\n";
  System.out.format(format, "FirstName", "Init.", "LastName");

  or

  String.format(format, "FirstName", "Init.", "LastName");

我对如何在 RPGLE 中格式化字符串不感兴趣，我想制作一个 java 方法的原型。

Answer 1

使用消息进行格式化怎么样？它们非常强大，并且文本是外部化的（并且 CCSID 感知）。

您可以使用 QMHRTVM API 检索格式化消息。

当您使用 RPG 代码时，调用本机功能总是比 Java 更快。

Answer 2

您想使用 Java 有什么特殊原因吗？启动 JVM 的开销对于许多应用程序来说可能是致命的。 RPG 本身可以使用串联轻松做到这一点。

/free
 resultString = 'hello ' + %trim(name) + ', you are ' + 
                %trim(%char(years)) + ' years old';
/end-free

Answer 3

我完全同意我们更喜欢尽可能使用原生 RPGLE 函数。然而，作为 RPGLE 开发者，我们也愿意根据需要使用任何外部函数。

下面是一个可能与您的情况相关的示例，但我不确定它是否直接解决您的情况：

步骤 1. 使用接受格式字符串和可变参数参数的方法创建一个 Java 类：

public class StringFormatter {
    public static String formatString(String format, Object... args) {
        return String.format(format, args);
    }
}

步骤 2. 在 RPGLE 中程序中，定义 Java 方法的原型。您需要使用 *JAVA 和 *NOPASS 选项来处理可变参数。此原型允许您传递最多 10 个参数，这对于大多数情况来说应该足够了。如果您需要更多，可以使用其他参数扩展原型。最后，您可以从 RPGLE 程序中调用 formatString 方法，如下所示

dcl-pr formatString varchar(32767) extproc(*JAVA : 'StringFormatter' : 'formatString');
   format varchar(32767);
   arg1   varchar(32767) options(*nopass);
   arg2   varchar(32767) options(*nopass);
   arg3   varchar(32767) options(*nopass);
   arg4   varchar(32767) options(*nopass);
   arg5   varchar(32767) options(*nopass);
   arg6   varchar(32767) options(*nopass);
   arg7   varchar(32767) options(*nopass);
   arg8   varchar(32767) options(*nopass);
   arg9   varchar(32767) options(*nopass);
   arg10  varchar(32767) options(*nopass);
end-pr;

dcl-s result varchar(32767);

result = formatString('|%1$-10s|%2$-10s|%3$-20s|\n'
                     : 'FirstName'
                     : 'Init.'
                     : 'LastName');

dsply result;

*inlr = *on;