标签: ibm-midrange

有没有办法释放饱和的连接池?

我在glassfish服务器上使用open esb.我们有一个与as400数据库一起使用的连接池.

每隔几天我们就会收到此错误:分配连接时出错.原因:正在使用的连接等于max-pool-size和expired max-wait-time.无法分配更多连接

缓解cp的最佳方法是重启服务器.我们还设法设置了另一个具有相同属性的cp.

我的问题是:有没有办法主动"告诉"cp释放所有打开的连接?

干杯,伊兰

java database connection-pooling open-esb ibm-midrange

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

IBM i上的外部存储过程

我正在尝试在IBM i(V5R4)上创建一个外部存储过程,但是在尝试运行它时出现错误。

我要做的就是调用RPG程序,而无需传递任何参数或担心返回任何数据。抱歉,我不是RPG程序员或IBM i专家,所以我可能会缺少一些非常简单的东西。

创建过程的SQL:

CREATE PROCEDURE SOMELIB.SOMEPROC ( ) 

    LANGUAGE RPGLE 

    NOT DETERMINISTIC 

    NO SQL
    EXTERNAL NAME 'OTHERLIB/SOMERG' 

    PARAMETER STYLE GENERAL; 
Run Code Online (Sandbox Code Playgroud)

执行CALL SOMELIB.SOMEPROC()时出现的错误是:

SQL状态:38501
供应商代码:-443
消息:[CEE9901]应用程序错误。BB1002RG在语句2100000001的X'0000'指令中未监视RNX1216。原因。。。。。:由于发生异常且未处理异常,因此应用程序异常结束。将未处理的异常发送到的程序的名称为SOMERG SOMERG。发送消息时,程序已在高级语言语句编号处停止。如果显示了多个语句号,则该程序是优化的ILE程序。优化不允许确定单个语句号。如果* N显示为一个值,则表示实际值不可用。恢复。。。:请参阅前面列出的低级消息,以查找导致异常的原因。更正所有错误,然后重试该请求。

stored-procedures rpgle ibm-midrange

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

将RPGLE从GitHub集成到iSeries(IBM i)

我们正在考虑将Git用于所有来源。我们有不同的语言(PHP,SQL,RPGLE,JavaScript等),并且想要尝试集中源位置。而且,与基于iSeries的SCM相比,Git还具有许多其他优势。

将源代码直接传送到Git相当简单,我正在努力解决的是如何将代码从Git仓库移至iSeries。

我们将RDi用于我们的IDE,并且我已经安装了eGit插件,但是我在努力将修改后的源代码从本地PC转移到iSeries(开发人员的个人库)上很挣扎。

有人做过吗?您可以协助我执行此设置吗?

git github rpgle ibm-midrange

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

在IBM i上运行jar(as400/iSeries)

我正在使用IBM i(通常称为AS/400服务器).

目前我已经能够创建.CLASS文件并完美运行

在as400目录(我认为它被称为IFS或类似的东西)a我的树像:

/
+--Javacfd/
   +--bin/
      +--com/
         +---company/
             Class1.class
             Class2.class    
             Hello.class
             Server.class
             +---other/
                 Other.class
                 Another.class
                 Etc.class
Run Code Online (Sandbox Code Playgroud)

当我运行RUNJVA CLASS('com.company.Hello')良好的作品!要么 RUNJVA CLASS('com.company.other.Other')

现在我需要运行一个可执行jar

在Windows中运行java -jar my-jar.jar良好

我尝试了as400

RUNJVA CLASS('hello.Application') CLASSPATH(':\Javacfd\bin\my-jar.jar')    
Run Code Online (Sandbox Code Playgroud)

我明白了

线程"main"中的异常java.lang.NoClassDefFoundError:hello.Application

RUNJVA CLASS('hello.Application') CLASSPATH('Javacfd\bin\my-jar.jar') 
Run Code Online (Sandbox Code Playgroud)

我明白了

线程"main"中的异常java.lang.NoClassDefFoundError:hello.Application

RUNJVA CLASS('hello.Application') CLASSPATH('\Javacfd\bin\my-jar.jar') 
Run Code Online (Sandbox Code Playgroud)

我明白了

线程"main"中的异常java.lang.NoClassDefFoundError:hello.Application

RUNJVA CLASS('hello.Application') 
Run Code Online (Sandbox Code Playgroud)

我明白了

线程"main"中的异常java.lang.NoClassDefFoundError:hello.Application

注意 hello是包,Application是一个Main类.Jar文件是语言环境\Javacfd\bin\my-jar.jar

我做错了?

java console jar ibm-midrange

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

如何使用 C# ADO.NET 中的参数将行更新插入 DB2 iSeries?

我正在尝试编写 SQL 语句,仅当目标表中不存在该行时,才将带参数的多行批量插入到表中。

我在如何将参数标记传递到 SQL 查询中时遇到问题。当我使用下面的代码时,出现异常: “不允许 SQL0584 NULL 或 VALUES 中的参数标记。”

using (var conn = new iDB2Connection(_connectionString)) {
    await conn.OpenAsync();
    using (var tran = conn.BeginTransaction()) {
        using (var cmd = conn.CreateCommand()) {
            cmd.Transaction = tran;
            cmd.CommandText = @"
                MERGE INTO TableXYZ AS mt 
                USING (
                    VALUES(@column1, @column2)
                ) AS vt(Column1, Column2)
                ON (
                    mt.Column1 = vt.Column1 AND mt.Column2 = vt.Column2
                )
                WHEN NOT MATCHED THEN
                    INSERT (Column1, Column2) VALUES (vt.Column1, vt.Column2)
            ";
            cmd.DeriveParameters();

            foreach (var item in items) { …
Run Code Online (Sandbox Code Playgroud)

c# db2 ado upsert ibm-midrange

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

在IBM i IFS目录中创建一个新的文本文件

如何在绿色屏幕命令行或ACS或Navigator工具中的IBM i(as/400)集成文件系统(IFS)中创建新的文本文件?

我通常只是复制一个旧文件,但我意识到我不知道使用IBM i命令创建一个新文件.否F6 = WRKLNK中的创建选项.通过在线帮助没有效率.

  CPY OBJ('/home/myFile.txt') TOOBJ('/home/NEWUSER/MyNewFile.txt')
Run Code Online (Sandbox Code Playgroud)

ibm-midrange

3
推荐指数
2
解决办法
429
查看次数

为什么 *inlr(最后一条记录指示器)在 rpgle 程序结束时打开

*inlr(最后一条记录指示器)在 rpgle 程序结束时打开。打开最后一条记录指示器的主要原因是什么。如果不打开此指示灯会发生什么。

rpg rpgle ibm-midrange

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

如何获取已为特定库绑定给定 RPGLE 模块的程序和服务程序列表

假设我有一个 Rpgle 模型名称和一个库名称。我如何为该库列表找出模块绑定到的程序和服务程序列表。

rpgle ibm-midrange

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

使用 pyodbc 连接到 Db2 for IBM i 时遇到问题

我正在尝试使用 pyodbc 和 ibm db2 odbc 驱动程序通过 db2 连接到 as400。

import pyodbc

connection = pyodbc.connect(
    driver='{IBM DB2 ODBC DRIVER}',
    system='192.168.1.100',
    uid='user',
    pwd='pass')
c1 = connection.cursor()

#this is meaningless sql, i just want the connection
c1.execute('select * from libname.filename')
for row in c1:
    print (row)
Run Code Online (Sandbox Code Playgroud)

运行这个给我这个错误

python pydata.py

Traceback (most recent call last):
  File "C:\Users\tca\Desktop\ScriptingSTuff\pydata.py", line 3, in <module>
    connection = pyodbc.connect(
pyodbc.OperationalError: ('08001', '[08001] [IBM][CLI Driver] SQL1013N  The database alias name or database name "" could not be found.  SQLSTATE=42705\r\n …
Run Code Online (Sandbox Code Playgroud)

python db2 pyodbc ibm-midrange

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

我有一个 PF ,如何获取正在使用该特定 PF 的程序列表?

我有一个特定的物理文件。如何获取正在使用该 PF 的程序列表。AS400 中是否有任何命令(或本机实用程序)可以获取该列表并将其放在输出文件中?

rpg rpgle ibm-midrange

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