问题标签 [control-language]

我需要在 IBM RDi 中制作一个 CLLE 程序，允许用户输入选项 1 到 7，这将调用要运行的子例程。我不知道如何在他们输入 5 时显示系统序列号/型号。这是我迄今为止与选项 5 相关的代码。

在 CL 中，我试图将数字 (193) 转换为其 alpha 表示 (A)。一无所获，需要一点帮助。有 CHAR 函数吗？

我对管理 AS/400 IFS 权限感到有些头疼。IFS 文件是使用 CLE 或 ILE-COBOL 通过调用 CPYTOIMPF 创建的。默认情况下，IFS 下的权限设置为 700。问题是我用来创建文件的 ID (A)，而使用它的人将是另一个 ID (B)。因此，即使 A 和 B 在同一组 GP01 中，B 也无法读取该文件。

我已经尝试将 IFS 根目录 /RootDir/MyDir CHGPGP 放到同一个组中，比如 GP01。另外，我还CHGAUT OBJ('/RootDir/MyDir') USER(*PUBLIC) DTAAUT(*RW) OBJAUT(*NONE)。但是，我仍然无法通过 ID B 访问该文件。

请帮忙！提前致谢。

我对整个 IBM i (as400)，rpgle 场景相当陌生。

我的任务是将一些信息导出为 XML 格式。

我能够使信息的输出正确，当我使用 CPYTOPCD 将信息复制到 XML 文件时出现了问题。

出于某种原因，我还没有理解甚至找到有关的信息，当我在程序中使用时，CPYTOPCD 仅复制一小部分数据。但是，当我转到 as400 命令行时，它会毫无问题地复制全部数据。

当我这样做时，我能看到的唯一区别是，在命令行中，CPYTOPCD 命令都适合一行，而在程序中，我必须使用“+”并移动到下一行来完成命令。

我查看了许多不同的网站，但找不到类似的问题。也许我没有正确地表达这个问题，这是我最大的问题。

如果我对情况的解释不够好，我深表歉意，所以请让我知道我可以提供哪些其他信息以使其更容易。

非常感谢您提供的任何帮助。

编辑：我不知道这是否是问题的一部分，但我想我不妨添加它以防万一。当我检查输出的 XML 时，它在哪里结束，这是它之前写的一些标签的一半，没有问题，它放了一个小框。根据我在网上找到的内容，我认为这是一个空格字符，但我不确定。

edit2：CLP 对于不同的文件是多次。

CLRPFM 文件（SDIXW4）

呼叫 PGM(SDI812)

CPYTOPCD FROMFILE(SDIXW4) TOFLR('AUDIT') +
TODOC(RELLOC.XML) 替换(*YES) + TRNFMT(*NOTEXT)

编辑3：我将尝试查尔斯给出的建议。希望这可以绕过我在使用 CPYTOPCD 时遇到的问题。我会在测试新表格后更新它。再次感谢你的帮助。

可以帮我找出这个 PGM 中的任何错误。它不为我编译

在 CL 程序中，我将打印文件覆盖到 IFS 上的文件夹中；但是，我没有指定文件名，只是说明它是一个 PDF 文件。因此，当创建 PDF 时，系统会为其分配一个唯一的文件名。

在 RPGLE 程序中，我使用用户控件来打开和关闭文件；但是，我需要在 IFS 上创建的唯一文件名。

我认为使用 INFDS 可以获得此信息，但我看不到在哪里可以获得此信息。

如果我在错误的区域发帖或者我不应该出现在这个版块上，请告诉我。

汤姆

CL 程序 –

RPGLE 程序 –

我们正在尝试将我们的应用程序从大型机迁移到 AS400。我们已经将我们的 COBOL 程序发送到 AS400 并在经过一番努力后成功在 AS400 中编译它，因为我的队友都没有使用 AS400 的经验。我们现在被困在运行 COBOL 程序上。我们检查过的示例 CL 程序和互联网上的东西没有任何好处。

那么，有人可以提供一个在 AS400 中运行 COBOL 程序的示例程序吗？COBOL 程序有两个输入文件和一个输出文件。输入文件存在于 AS400 库中。还有，如何创建索引文件（如 Mainframe 中的 KSDS VSAM）？关于命令的简要说明会好很多。

我正在尝试编写一个简单的 CL 程序来获取文件名参数并使用 COMMIT(*CHG) 和 DBGVIEW(*SOURCE) 在文件中运行 SQL。我收到 CPD018A：路径名包含嵌入的空值：

原因 。. . . . : 路径名 /SQL/TRIGGERS/PCUSTOMERS_INSERT
?????????????????????????????????????????? ??????????????????????????????.
为 SRCSTMF 指定的 SQL 包含一个或多个嵌入的空值 (X'00')。路径名中不允许有空值。

这是我的程序：

我正在调用该程序：CALL CCSQL PARM('TRIGGERS/PCUSTOMERS_INSERT').

这可能只是解决真正问题的可怕解决方法：我想SET OPTION在触发器中添加语句：

我无法弄清楚如何让 SET OPTION 语句通过 JDBC，所以我每次都必须将这些语句复制到 iSeries Navigator 中。我认为我可以通过调用此 CL 程序的外部过程来改进此工作流程，以在调用流文件中的 SQL 之前处理预编译选项，但我无法使用我发送给过程的参数（或当我从命令行调用它）CALL MYLIB.CCSQL('TRIGGERS/PCUSTOMER_INSERT');

在这一点上，我离我最初的目标还很远......任何建议都非常受欢迎。如果它有助于了解，我是一个试图在 iSeries 7.2 系统上实现它的 PHP/SQL 类型的人。

感谢您的阅读。

从 CLLE 调用 RPGLE 时是否应该传递压缩的数字字段？或者将它们转换为字符传递它们并将它们转换回 RPG 中的数字。如果推荐前者，这是如何做到的？

使用分号作为 sql 语句分隔符运行多行 SQL 代码时，会出现以下错误：

而以下工作：

我在 CRTQMQRY 和 STRQMQRY 上搜索了选项，但找不到任何指定语句分隔符的内容。