RPGLE 打印到命令窗口

标签 rpgle

希望可以有人帮帮我。我在命令窗口中看不到我的 RPGLE 程序的 DSPLY 'some text' 输出。我正在使用 IBM Websphere development studio client for iseries 创建一个简单的 RPGLE 程序。我可以编译没有错误的程序,但是在运行 CALL MYLIB/TESTRPG 时看不到显示文本以查看它是否有效。
这是我的程序代码:

     /free
         dsply 'Hello World';
         return;   

请帮忙。感觉就像我“在黑暗中学习”。

提前致谢

最佳答案

如果你在模拟终端(绿屏)上运行你的程序,那么在某些地方你的程序的输出并没有真正显示出来(它在你的程序执行期间亮起,但通常很简单,甚至注意到它)。

您可以使用 dspjoblog 查看交互式作业的作业日志中显示的内容。 (刚开始使用有点奇怪)。

  • 执行命令 dspjoblog
  • F10显示所有消息
  • 新闻PageUp滚动到以前的消息

  • 你应该看到类似的东西:
    3 > call MYLIB/TESTRPG
        DSPLY  Hello World!
    

    有些地方你不必这样做。工具 PDM 就是这样一个地方(至少在我使用的机器上)。您可以通过简单的输入启动该程序
    strpdm
    

    您将在底部有一个命令行,您可以从中调用您的程序。在 PDM 内部,每个 dsply命令应该中断您的程序流程,点亮并等待您按 Ctrl 或 Enter 或任何您的执行键。

    另一个可以立即查看消息的地方是 QCMD。您可以通过键入来启动它
    call qcmd
    

    您可能需要打 F10在那里,切换您的 dsply 的显示消息。在这里,您无需按回车即可看到消息。

    如果您实际上是直接从 IBM Websphere Development Studio 中运行您的程序,恐怕我无法帮助您,因为我从来没有这样做过。如果您可以访问终端,则可以尝试我描述的其中一种方法。

    关于RPGLE 打印到命令窗口,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/18313289/

    相关文章:

    ibm-midrange - CL 命令如何构建其确切的参数列表?

    ibm-midrange - RPG编译器将类型S转换为类型P?

    error-handling - AS400- MOVEA无法编译,无法将十进制数据结构移动到十进制数组

    ibm-midrange - 如何在 RPGLE 中获取角色的 EBCDIC 值?

    ibm-midrange - 在 DSPF 中包含带有 MSGID 的动态文本

    ibm-midrange - CPF4131 在打开文件时出现

    api - 如何从 RPG 程序创建新的文件成员?

    data-structures - 转换为具有固定位置的完整自由格式数据结构

    rpgle - 如何让 RPG 程序在内存中运行?