标签: ibm-midrange

CRTPGM 和 UPDPGM 有什么区别

假设我的模块发生了一些变化,所以我必须更新服务程序,结果签名发生了变化。那么我应该选择哪个选项呢?我应该使用 CRTPGM 或 UPDPGM 重新创建使用服务程序的程序。在这种情况下,您能区分 CRTPGM 和 UPDPGM 之间的区别吗?

rpgle ibm-midrange

2
推荐指数
1
解决办法
375
查看次数

达到总和后停止 SQL 选择

我的数据库是 IBM i 的 Db2。

我具有只读访问权限,因此我的查询必须仅使用基本 SQL 选择命令。

=================================================== ===========

目标:

我想选择表中的每条记录,直到金额列的总和超过预定限制。

例子:

我想匹配表中的每个项目,直到“价格”列中匹配值的总和 >= $9.00。

在此输入图像描述

期望的结果:

在此输入图像描述

这可能吗?

sql sum db2-400 ibm-midrange

2
推荐指数
1
解决办法
409
查看次数

rpgle(sqlrpgle) 中编译器指令 /Include 和 /copy 之间的区别

在 rpgle /sqlrpgle 代码中,我遇到了 /INCLUDE 和 /COPY 等编译器指令,有人可以告诉我两者之间的核心区别是什么,因为它们似乎几乎做了同样的事情。

rpg rpgle ibm-midrange

2
推荐指数
1
解决办法
481
查看次数

在rpg中使用激活组的真正优势是什么

有人可以告诉我使用激活组的真正优势是什么吗?我的意思是,除了我们可以一起停用一堆程序这一事实之外,激活组还为我们提供了比不使用它的真正优势。

rpg rpgle ibm-midrange

2
推荐指数
1
解决办法
354
查看次数

从RPG在iSeries上调用远程Java程序

我正在寻找从Iseries V5r4上运行的RPG调用Java程序.远程程序是在Websphere中运行的Web服务客户端(执行邮政编码查找).

理想情况下,我想直接从RPG中调用它?那可能吗?或者我是否必须创建一个在iSeries上运行的java程序,并使用RMI或其他东西来调用远程java程序.

我们并不热衷于直接调用extenral webservice,因为它意味着从其他世界直接到iSeries的开放路径.

我不是一个RPG程序员,只是想找点东西指出我们的人正确的方向或我需要的任何东西,以使java程序更适合RPG人员.

谢谢,斯科特

java rpg ibm-midrange

1
推荐指数
1
解决办法
6495
查看次数

如何清除IBM中端机器上的作业日志

我们在AS/400上运行了作业,但随后我们的会话或工作随机结束.我们已确定作业达到格言作业消息,然后结束作业.

有没有办法清除作业日志,而作业正在运行?

jobs ibm-midrange

1
推荐指数
1
解决办法
628
查看次数

是否可以重用在RPG的另一个OS/400作业中创建的JVM?

我有一个调用Java类的RPG PGM,如果Job中没有JVM,RPG运行时会在调用Java类时添加一个.在此之后,来自同一RPG程序的所有调用或同一作业中的另一个RPG程序使用相同的JVM.

问题是,如果我从另一个Job启动相同的PRG程序,它会启动另一个JVM,基本上我有一个JVM for Job.

我想知道是否可以只有一个JVM并从其他Jobs连接到它.

任何帮助将不胜感激.

这就是我试图通过程序整合RPG/JAVA的方法.但由于某种原因,线程没有被解雇.

========
RPG CODE
========

d DSP_class       c                   'tests.mthreads.RPGProcessDispatcher'
d DSP             s               o   class(*JAVA:DSP_class)           

d DSP_new         pr              o   extproc(*JAVA:                   
d                                     DSP_class:                       
d                                     *CONSTRUCTOR)                    

d DSP_dispatch    pr              n   extproc(*JAVA:                   
d                                     DSP_class:                       
d                                     'dispatch')                      


d dispatcher      s                   like(DSP)
d dispatched      s               n            

d i               s              3i 0          
  /free                                         
     dispatcher = DSP_new();                   
     for i=1 by 1 to 2;                        
        dispatched = DSP_dispatch(dispatcher); 
      endfor;                                   

      *inlr=*on;   
  /end-free        


RPGProcessDispatcher
====================

public boolean dispatch() {
    if (freeThreads == 0) {
        return …
Run Code Online (Sandbox Code Playgroud)

java jvm rpgle ibm-midrange

1
推荐指数
1
解决办法
432
查看次数

如何将我的String拆分为3个分隔的字符串(不管SubString Length)?

我将字符串存储在一个数组中.一个例子是:

ssnDateTime = "123456789|20140225|114528"
Run Code Online (Sandbox Code Playgroud)

我试图将每个子字符串存储到它自己的变量中,如下所示:

string SSN  = ssnDateTime.Substring(0, 9);
string Date = ssnDateTime.Substring(ssnDateTime.Length - 15, 8);
string Time = ssnDateTime.Substring(19);
Run Code Online (Sandbox Code Playgroud)

这适用于我的10个测试记录中的5个,但是第6个具有时间值91514,导致我的3个字符串:

SSN = 123456789
Date = |2014022
Time = 91514
Run Code Online (Sandbox Code Playgroud)

当我的应用程序试图运行时INSERT INTO Library.TrackingTable (SSN, DATE, TIME) VALUES ("123456789", "|2014021", "91514"),AS400自然会抱怨|Date值.

有什么方法可以使用分隔符从主字符串中获取每个SSN,Date和Time值,无论子字符串长度如何(当时间值比6个字符短时,防止上述问题)?

SSN自然会一直是9个字符,而Date将是8个字符的格式20140225,但Time可以是5个或6个字符,具体取决于值.

.net c# sql ibm-midrange

1
推荐指数
1
解决办法
801
查看次数

AS400 DDL SQL语法,用于添加具有短字段和长字段名称的新列

AS400 SQL DDL将列添加到现有表的语法是什么?我还需要指定长字段和短字段名称.

(SQL - 结构化查询语言)(DDL - 数据定义语言:这是更改表结构或可以修改数据库设置的SQL)

sql db2 alter ibm-midrange

1
推荐指数
1
解决办法
1884
查看次数

在除QSYS lib之外的as400中创建USRPRF

如何在AS400中创建其他QSYS lib的用户配置文件.AS400是否允许用户创建除QSYS lib之外的用户配置文件,或者QSYS是默认库以在AS400/IBMi中创建用户配置文件.

ibm-midrange

1
推荐指数
1
解决办法
72
查看次数

标签 统计

ibm-midrange ×10

rpgle ×4

rpg ×3

sql ×3

java ×2

.net ×1

alter ×1

c# ×1

db2 ×1

db2-400 ×1

jobs ×1

jvm ×1

sum ×1