问题标签 [rpgle]

For questions regarding programming in ECMAScript (JavaScript/JS) and its various dialects/implementations (excluding ActionScript). Note JavaScript is NOT the same as Java! Please include all relevant tags on your question; e.g., [node.js], [jquery], [json], [reactjs], [angular], [ember.js], [vue.js], [typescript], [svelte], etc.

0 投票
2 回答
2344 浏览

ibm-midrange - 显示加载了已排序数据库记录的子文件

例如,假设我有这些表:

USRMF(主要物理文件)

USRTS

我的子文件应该看起来像这样:

*此子文件显示每个用户和日期的摘要数据:第一次进入和最后一次退出。该名称应从其他数据库表 (USRMF) 中读取,并且应按考勤卡日期排序。

如果用户将选项 5 放在子文件的第三行,其中用户 id:A000001 用户名:samuel 和日期 090812,则将显示下一个子文件屏幕。

该子文件应列出所选日期和人员的所有进出时间。

我该怎么做这个程序????????? 特别是对于第一个子文件.???????

0 投票
1 回答
567 浏览

ibm-midrange - 逻辑文件不适用于 SUBFILE/SETLL?

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

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

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

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

和相关的子程序

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

  • 我有这两个问题是:
  • 我只能使用一次 *LOVAL setll 逻辑文件。
  • n上面的编码结果有时会给出UserTime的结果在某些时候它等于空白。(000000)
0 投票
1 回答
2046 浏览

rpgle - 学习 RPGIV 的免费在线资源

我想学习一些RPGIV。我对语言了解不多。我正在寻找免费的在线资源,到目前为止,我刚刚找到了需要付费的网站。

我想学习的原因是我们正在使用调用 Web 服务的 RPG 函数。它给出了一般的内部服务器错误 500。所以我想学习 RPGIV,这样我就可以提出正确的问题并解决这个问题。

0 投票
3 回答
474 浏览

ibm-midrange - SQLRPGLE 源大小限制

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

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

0 投票
1 回答
220 浏览

sql - 使用多个键检索记录。OPENJPA

在我所知道的语言上,RPG...您可以使用多个键并查找检索记录的值。

喜欢餐桌。我可以选择键 lolo 和 apple 来检索性女巫的值是 F。Howerver 我在 OPENJPA 中找不到类似这样的功能.. find() 只能使用一个键?是否有类似 find(names.class,:"LOLO","Apple") 的键是 F_NAME 和 L_NAME 的东西?

读取jpa时,通常表有P_ID

要检索记录 lolo apple,我需要使用此代码..

如果给定的值为 F_NAME,您将如何知道性别?和 L_NAME?在 SQL 中,你可以说 select * from Names where F_NAME = Lolo , L_NAME = "Apple" ,它会输出

从那你可以说Sex = F。就像我想知道lolo apple是男性还是女性,我会在数据库中搜索lolo apple...不是P_ID = 1。我怎么知道Lolo Apple的P_ID是什么.

希望你明白我的意思.. 谢谢。

或者也许在等式的另一部分,在 JPA 上,您如何在不知道 P_ID(主键)的情况下检索要更新的记录,就像您只知道名字和姓氏一样?

0 投票
2 回答
770 浏览

sublimetext2 - Sublime Text 2 有 rpg 语言插件吗?

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

0 投票
1 回答
380 浏览

db2 - SQL 是否有等效的 JDFTVAL?

对于 Iseries/IBMi DB2。

我将多个文件/表连接在一起。

我已经在 DDS 和 SQL 中编写了代码。

DDS 逻辑文件完全按预期工作,但我不能将它用于 rpgle 中的嵌入式 sql,因为它默认为 SQE 引擎,从而导致可怕的性能。

另一方面,SQL 视图在NULLs我使用IFNULL( MBRDESCR, ''). 但现在MBRDECSR是一个VARCHAR。这是不可接受的。

那么如何在没有NULLsand的情况下创建 SQL 连接VARCHARs

要求的示例代码:

DDS:

SQL:

请注意以下事项:

  1. 上面的例子是简化的

  2. 不是 TRANSPF 中的每个 MBRID 在 MBRPF 中都有对应的条目(即没有引用约束)。因此,当 MBRPF 加入 TRANSPF 时,MBRNAME、MBRSURNME 中将有 NULL 值。除非使用 JDFTVAL 或 IFNULL()。

  3. 由于 rpgle 中的性能和 extname(),我不喜欢使用 VARCHAR。

  4. 我不希望有 NULL 值,我不希望 pgm 必须处理它们。

0 投票
2 回答
163 浏览

sql - 在不同的 LPAR 上删除和更新

是否可以从开发 lpar 计算 rpgle 程序中的文件成员删除。

并完全在不同的 lpar 中对不同的文件执行更新?

如何在一个程序中执行 lpars 的设置?这可能吗?请指导。

0 投票
1 回答
6552 浏览

rpgle - RPGLE 编译错误:“未定义名称或指示符”

我正在上 IBM iSeries 和 Rational Developer 的入门课程,我在为实验室编译我的一个 RPGLE 程序时遇到了困难……不幸的是,实验室只是我们应该编译的代码的演练,没有太多解释,所以我完全不知道我在做什么......

当我编译我的程序 MARKSRPG.RPGLE 时,我的大部分错误都是“未定义名称或指示符”......我不知道这是什么意思,我无法继续查看我是否编写了代码到目前为止工作。

(更新:我已经对建议进行了更正,现在我得到了不同的错误。“左右手边的类型在 EVAL 操作中不匹配”和“操作数与操作员。)

该程序分为两个文件:MARKSRPG.RPGLE 和 MARKSDSP.DSPF。这是两者的代码,但我的错误只显示在 MARKSRPG.RPGLE

MARKSDSP:

MARKSRPG:

如果您知道任何有用的学习 RPGLE 和 CLLE 的资源,我将不胜感激,任何额外的见解和帮助也会很棒!

谢谢。

0 投票
2 回答
1238 浏览

string - RPG中的多功能字符串操作程序

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

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

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

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

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