问题标签 [rpg]

我正在使用三个具有不同记录格式的逻辑文件，在第一个子文件上我使用 LF1 和 LF2，在第一个子文件上我不能使用 *LOVAL SETLL 它会给我运行时错误。不知道为什么？

然后程序将引导我进入第二个子文件，我正在使用 LF3 看起来不错。

但是如果我回到第一个子文件，子文件就会变成空白。？？？？为什么？

这是我构建子文件的子程序：

和相关的子程序

n 我使用的 LF 是 USRLG 和 USRLGX。其中两个 LF 指的是相同的记录格式。但每个 LF 都有不同的排序顺序。*记录格式已在 F-Spec 上重命名

• 我有这两个问题是：
• 我只能使用一次 *LOVAL setll 逻辑文件。
• n上面的编码结果有时会给出UserTime的结果在某些时候它等于空白。（000000）

我的显示文件“EMPID”中有一个字段。

该字段必须自动生成并受到保护。

如果我要使用数据区，我该如何将它包含在我的 rpg（不是 rpgle）中。在 rpg 中自动生成数字的其他可能方法是什么。请指导。

重新编辑：使用了数据区域，它就像一个魅力：

请注意以下代码：

感谢所有的帮助。

通常为了分析 SQL 语句，我运行 STRDBG，然后在 STRSQL 中输入 SQL。

但是，我有一个 CGI RPGLE 程序，它执行许多 SQL 语句，大多数是动态的，我想对所有这些语句进行概要分析，以查看哪些导致程序变慢。

这样做的最佳做法是什么？

我试图让一个 RPG 程序在其中的程序调用出错时能够说出更具体的细节。我要监视的异常与错误的程序逻辑无关，例如除以零。我要检查的是程序调用是否由于权限问题或未找到程序而失败。73-74 的指标只能说明存在异常，但不能说明其背后的原因。是否有任何可能的方法可以在 RPG 中检测到这一点，就像 CL 程序中的 MONMSG 语句一样？

SQL 预编译器可以为 SQLRPGLE 源对象处理的内容是否有限制？

我在编译 25,000 行程序时遇到了一些问题，而行数限制是唯一可以解释我遇到的错误的东西

是否有任何插件可以在 Sublime text 2 编辑器中以突出显示的语法查看 rpg、rpgle 或数据库文件（从 as-400 服务器获得）。此外，是否有任何好的插件项目可供我修改以创建自己的插件并共享？

我正在查看一些遗留程序，其中可以找到如下代码：

所讨论的程序是一个类似服务器的程序，其中子例程处理通过网络传入的请求。对我来说，*INLR = *On 语句似乎没有任何效果，但话又说回来，我对 RPG 的知识非常有限，而且这种模式在我正在查看的几个程序中重复出现。

因此，我的问题是： /end-free 之前的最后一行是否无法访问，因此是多余的？

RPG 中的另一件事我永远不知道如何做正确：编写字符串操作函数/程序。

由于 RPG 中的大多数时间字符串具有固定长度（至少对于我们的程序而言），而且也许更重要的是它们始终具有有限长度，所以当我想编写一个用于一般字符串操作的过程时，我总是有点迷茫。

我如何编写一个处理任何长度的字符串的过程？有没有问题，如果我这样做功能风格（如text = manip_str(text);）？如果我直接操纵参数（如manip_str(text);），它是否适用于不同的长度？

我会发布我自己的尝试作为答案，但是那里有一些我不确定的问题。你是怎么做到的，因为我敢肯定很多人曾经或一千次做过这样的任务。不同的方法很受欢迎，最好是提到这些方法的问题。

在你问之前：我对（EBCDIC）字节字符串和（UTF-16）unicode字符串有这个问题。但我可以接受两次手术，每次一次。

如何防止用户在 AS400 的文本字段（字符类型）中输入特殊字符（如键盘中不可见的符号）？显然，大多数时候 iseries/as400 在接受它并将其保存到文件中没有问题，但有时当数据在下游报告系统中处理时，它会在系统中因不同的错误而被拒绝。有没有办法防止入口点本身？

例如：在客户的地址字段中，最终用户从网页或文档中复制粘贴 (ctrl + c ctrl + v) 详细信息，导致输入垃圾字符或空值，这些字符在存储时没有问题，但后来在其他报告应用程序中出现问题。

使用 iSeries 在 AS400/RPG/DB2 中调用存储过程时出现转换错误。

db2 参数定义为 CHAR 32000，.net 应用程序传入大约 20000 个字符，调用会引发错误。

当 .net 应用程序传递包含双字节字符的数据时，似乎会发生此错误。如何将字符串传递给包含双字节字符的 DB2 存储过程？

IBM 错误代码是 6107。