主页 / dba / 问题

问题[iseries](dba)

Martin Hope
John Kuhns
Asked: 2022-02-15 06:14:04 +0800 CST
  • 0

我负责部署在 iSeries V7R3 上的遗留应用程序。该应用程序的容量相当大，每月有 200 万次左右的交易。

这个应用程序的数据库跨越多个库，我目前正在单独记录每个库。我一直在网上寻找关于这是否是最佳方法的建议，或者该应用程序的单一期刊是否可能更好或至少同样有效。

到目前为止，我还没有找到任何关于这个主题的明确建议，其中一些建议为每个物理文件单独的期刊。当然，搜索有关 iSeries 的任何内容通常会返回古老的结果，而不会提及操作系统版本或信息的日期。

除了管理多个期刊有时很痛苦之外，我没有遇到任何问题。

iseries db2-midrange
Martin Hope
Oliviu Vais
Asked: 2021-07-28 23:26:01 +0800 CST
  • 3

上一个问题：如果不符合条件，则返回带有值的行

我几乎得到了这个工作。我遇到的问题是，如果它们相同，则此查询变体不会将 SELECT 中的行与 UNION 中的行合并：

SELECT CODPRO, VALPRO, COALESCE(SUM(UVCLIV), 0)  AS SUM 
FROM FGE50LM0TV.GESUPD                              
WHERE CNFLIG = '2'                                                                          
AND CODPRO IN (SELECT VALINV FROM FGE50LM0TV.SVINVD WHERE NUMINV = 59)                                 
GROUP BY CODACT, CODPRO, VALPRO 
UNION (SELECT VALINV, 0, 0 FROM FGE50LM0TV.SVINVD WHERE NUMINV = 59) ;

这就是 SVINVD 的样子：

在此处输入图像描述

这就是 GESUPD 的样子：

在此处输入图像描述

这里没有“PRODUIT5”行。

因此，我得到一条双线：

在此处输入图像描述

iseries
Martin Hope
Sarov
Asked: 2019-09-11 06:49:20 +0800 CST
  • 0

如果相关，我正在使用 IBM i V7R1M0。

我在 C# 中有一些代码：

var generateSqlSql = $@"
CALL QSYS2.GENERATE_SQL(
    '{obj.Name}',
    '{obj.Library}',
    'VIEW',
    CREATE_OR_REPLACE_OPTION => '1',
    HEADER_OPTION => '0',
    COMMENT_OPTION => '1',
    PRIVILEGES_OPTION => '0',
    LABEL_OPTION => '0'
)";
...
//get results
//split on semicolon
//change library
//write back to database

然后它试图编写的 sql 是：

CREATE OR REPLACE VIEW AMMLIBC.BBI_USER_MY_VIEW FOR SYSTEM NAME         BBIU_00001 ( 
/* view columns */ ) 
AS 
/*view definition */
RCDFMT BBIU_00001

当我尝试运行它时，它会出现以下错误：

iDB2SQLErrorException: SQL7029 New name BBIU_00001 is not valid.

...为什么？是什么原因造成的，我该如何让它发挥作用？

iseries errors
Martin Hope
Ruslan
Asked: 2019-03-22 08:27:37 +0800 CST
  • 2

我正在尝试解决我的应用程序中的竞争条件。

我有一个用作工作队列和许多线程并读取/更新它的表。以下查询从应用程序执行。首先，它读取可用作业的 ID，然后保留它们并获取信息。

SELECT ID FROM JOBS WHERE LOCKED_BY IS NULL LIMIT 5; --Check available jobs
UPDATE JOBS LOCKED_BY = 'Thread#1' WHERE ID IN (?); --Lock jobs
SELECT * FROM JOBS WHERE ID IN(?); --Get info about jobs to process

当多个线程同时进入此表时会出现问题。如果'Thread#2'在'Thread#1'运行UPDATE. 导致相同的作业运行两次。

我通过将查询包装在以下内容中找到了解决方案：

LOCK TABLE JOBS;
--Queries from above
COMIT;

这可以正常工作并防止竞争条件，但它有点极端，因为线程必须等待彼此完成。

如何确保只能对来自以下查询的记录进行锁定？

SELECT ID FROM JOBS WHERE LOCKED_BY IS NULL LIMIT 5;

这是在 AS400 DB2 数据库上，现在是 LUW

db2 iseries
Martin Hope
Ruslan
Asked: 2019-03-21 13:22:44 +0800 CST
  • 0

目标：我正在尝试检索受UPDATE查询影响的记录。

根据IBM 的文章，我可以使用以下查询：

SELECT empno, salary FROM FINAL TABLE
(UPDATE employee SET salary = salary * 1.10 WHERE job = 'CLERK')

但是，当我尝试在数据库中运行类似查询时，出现以下错误：

[42601][-199] [SQL0199] Keyword UPDATE not expected. Valid tokens: INSERT.

db2 iseries
Martin Hope
Test User
Asked: 2018-10-21 05:57:09 +0800 CST
  • 1

这个 db2 查询：

alter table mylib.mytable add primary key(field1, field2, field3)

回报

[SQL0624] MYLIB 中的表 MYTABLE 已经有主键'。

然而

alter table mylib.mytable drop primary key

回报：

[SQL0539] MYLIB 中的表 MYTABLE 没有主键或唯一键'。

如何删除现有主键并创建新主键？

该文件是在绿屏中创建的，而不是通过执行 SQL CREATE TABLE 创建的。数据库版本为V7R2。

db2 iseries
Martin Hope
Liv Carman
Asked: 2016-04-23 04:02:14 +0800 CST
  • 4

我是 DB2 的新手，正在使用 unixODBC 和适用于 Linux 的 IBM i Access ODBC 驱动程序连接到 DB2 for i (V7R1) 数据库。

当我查询数据库时，结果只包括列名的首字母。例如，使用该isql实用程序运行的典型查询将给我如下所示的内容：

SQL> SELECT column1, column2 FROM schema.table WHERE column1 = 12345
+--------+---------------------------------+
| C      | C                               |
+--------+---------------------------------+
| 12345  | Lorem ipsum dolar sit           |
+--------+---------------------------------+
SQLRowCount returns -1
1 rows fetched

这对我来说是个问题，因为当我尝试在应用程序中查询数据库时（例如使用pyodbcPython 库），我无法通过列名访问结果；两列在结果集中都被命名为“C”。

我的问题是：

  1. 为什么会这样？
  2. 是否有可能改变这种行为？（如何？）

编辑：

即使我尝试给列别名也会发生这种情况：

SQL> SELECT column1 as foo, column2 as bar FROM schema.table WHERE column1 = 12345
+--------+---------------------------------+
| F      | B                               |
+--------+---------------------------------+
| 12345  | Lorem ipsum dolar sit           |
+--------+---------------------------------+
SQLRowCount returns -1
1 rows fetched
db2 iseries
Martin Hope
Justin Dearing
Asked: 2015-09-26 06:44:42 +0800 CST
  • 3

我在表中有一个 XML 列。我只想从 XML 文档的每一行中检索第一个子元素（即 XPath 表达式的结果/root/someVal[1]），并在我的查询中将其子元素作为 DB2 for IBM i 中的列返回。在 Microsoft SQL Server 中，我可以通过xmlColumn.value('some xpath', 'someType').

鉴于此示例数据：

DECLARE GLOBAL TEMPORARY TABLE XMLSAMPLE(

    ID SMALLINT NOT NULL GENERATED ALWAYS AS IDENTITY,
    -- CONSTRAINT PK_XMLTABLE PRIMARY KEY(ID),
    XMLVAL XML NOT NULL
) WITH REPLACE;

INSERT INTO QTEMP.XMLSAMPLE(XMLVAL) VALUES('<?xml version="1.0"?>
<catalog>
   <book id="bk101">
      <author>Gambardella, Matthew</author>
      <title>XML Developer''s Guide</title>
      <genre>Computer</genre>
      <price>44.95</price>
      <publish_date>2000-10-01</publish_date>
      <description>An in-depth look at creating applications 
      with XML.</description>
   </book>
   <book id="bk102">
      <author>Ralls, Kim</author>
      <title>Midnight Rain</title>
      <genre>Fantasy</genre>
      <price>5.95</price>
      <publish_date>2000-12-16</publish_date>
      <description>A former architect battles corporate zombies, 
      an evil sorceress, and her own childhood to become queen 
      of the world.</description>
   </book>
   <book id="bk103">
      <author>Corets, Eva</author>
      <title>Maeve Ascendant</title>
      <genre>Fantasy</genre>
      <price>5.95</price>
      <publish_date>2000-11-17</publish_date>
      <description>After the collapse of a nanotechnology 
      society in England, the young survivors lay the 
      foundation for a new society.</description>
   </book>
   <book id="bk104">
      <author>Corets, Eva</author>
      <title>Oberon''s Legacy</title>
      <genre>Fantasy</genre>
      <price>5.95</price>
      <publish_date>2001-03-10</publish_date>
      <description>In post-apocalypse England, the mysterious 
      agent known only as Oberon helps to create a new life 
      for the inhabitants of London. Sequel to Maeve 
      Ascendant.</description>
   </book>
   <book id="bk105">
      <author>Corets, Eva</author>
      <title>The Sundered Grail</title>
      <genre>Fantasy</genre>
      <price>5.95</price>
      <publish_date>2001-09-10</publish_date>
      <description>The two daughters of Maeve, half-sisters, 
      battle one another for control of England. Sequel to 
      Oberon''s Legacy.</description>
   </book>
   <book id="bk106">
      <author>Randall, Cynthia</author>
      <title>Lover Birds</title>
      <genre>Romance</genre>
      <price>4.95</price>
      <publish_date>2000-09-02</publish_date>
      <description>When Carla meets Paul at an ornithology 
      conference, tempers fly as feathers get ruffled.</description>
   </book>
</catalog>'),
('<?xml version="1.0"?>
<catalog>
   <book id="bk107">
      <author>Thurman, Paula</author>
      <title>Splish Splash</title>
      <genre>Romance</genre>
      <price>4.95</price>
      <publish_date>2000-11-02</publish_date>
      <description>A deep sea diver finds true love twenty 
      thousand leagues beneath the sea.</description>
   </book>
   <book id="bk108">
      <author>Knorr, Stefan</author>
      <title>Creepy Crawlies</title>
      <genre>Horror</genre>
      <price>4.95</price>
      <publish_date>2000-12-06</publish_date>
      <description>An anthology of horror stories about roaches,
      centipedes, scorpions  and other insects.</description>
   </book>
   <book id="bk109">
      <author>Kress, Peter</author>
      <title>Paradox Lost</title>
      <genre>Science Fiction</genre>
      <price>6.95</price>
      <publish_date>2000-11-02</publish_date>
      <description>After an inadvertant trip through a Heisenberg
      Uncertainty Device, James Salway discovers the problems 
      of being quantum.</description>
   </book>
   <book id="bk110">
      <author>O''Brien, Tim</author>
      <title>Microsoft .NET: The Programming Bible</title>
      <genre>Computer</genre>
      <price>36.95</price>
      <publish_date>2000-12-09</publish_date>
      <description>Microsoft''s .NET initiative is explored in 
      detail in this deep programmer''s reference.</description>
   </book>
   <book id="bk111">
      <author>O''Brien, Tim</author>
      <title>MSXML3: A Comprehensive Guide</title>
      <genre>Computer</genre>
      <price>36.95</price>
      <publish_date>2000-12-01</publish_date>
      <description>The Microsoft MSXML3 parser is covered in 
      detail, with attention to XML DOM interfaces, XSLT processing, 
      SAX and more.</description>
   </book>
   <book id="bk112">
      <author>Galos, Mike</author>
      <title>Visual Studio 7: A Comprehensive Guide</title>
      <genre>Computer</genre>
      <price>49.95</price>
      <publish_date>2001-04-16</publish_date>
      <description>Microsoft Visual Studio 7 is explored in depth,
      looking at how Visual Basic, Visual C++, C#, and ASP+ are 
      integrated into a comprehensive development 
      environment.</description>
   </book>
</catalog>');

我不想做以下事情：

SELECT id as catalog_id, books.* FROM
    QTEMP.XMLSAMPLE x,
    XMLTABLE (
        '$library/catalog/book' passing x.XMLVAL as "library"
      COLUMNS
        BOOKNO FOR ORDINALITY,
        BOOK_ID CHAR(5) PATH '@id',
        AUTHOR VARCHAR(100) PATH 'author',
        TITLE VARCHAR(100) PATH 'title',
        GENRE VARCHAR(25) PATH 'genre',
        PRICE DECIMAL(7,2) PATH 'price',
        PUBLISH_DATE DATE PATH 'publish_date',
        DESCRIPTION VARCHAR(1000) PATH 'description'
    ) books

因为这将返回：

1   1   bk101   Gambardella, Matthew    XML Developer's Guide   Computer    44.95   2000-10-01
1   2   bk102   Ralls, Kim  Midnight Rain   Fantasy 5.95    2000-12-16
1   3   bk103   Corets, Eva Maeve Ascendant Fantasy 5.95    2000-11-17
1   4   bk104   Corets, Eva Oberon's Legacy Fantasy 5.95    2001-03-10
1   5   bk105   Corets, Eva The Sundered Grail  Fantasy 5.95    2001-09-10
1   6   bk106   Randall, Cynthia    Lover Birds Romance 4.95    2000-09-02
2   1   bk107   Thurman, Paula  Splish Splash   Romance 4.95    2000-11-02
2   2   bk108   Knorr, Stefan   Creepy Crawlies Horror  4.95    2000-12-06
2   3   bk109   Kress, Peter    Paradox Lost    Science Fiction 6.95    2000-11-02
2   4   bk110   O'Brien, Tim    Microsoft .NET: The Programming Bible   Computer    36.95   2000-12-09
2   5   bk111   O'Brien, Tim    MSXML3: A Comprehensive Guide   Computer    36.95   2000-12-01
2   6   bk112   Galos, Mike Visual Studio 7: A Comprehensive Guide  Computer    49.95   2001-04-16

我只希望它返回以下内容：

1   1   bk101   Gambardella, Matthew    XML Developer's Guide   Computer    44.95   2000-10-01
2   1   bk107   Thurman, Paula  Splish Splash   Romance 4.95    2000-11-02

每个 XML 列一行。

db2 iseries
Martin Hope
SorryEh
Asked: 2015-05-10 14:56:29 +0800 CST
  • 1

我在正确表述这个问题时遇到了麻烦（也不确定我是否在正确的堆栈部分）

我的问题是我有一个ORDFILE位于ORDRENTLB库中的逻辑文件，即假设可以访问CIFFILE位于CUSTINFOLB库中的物理文件数据。

编译时，我得到的程序只是“异常结束”错误。

但是，当我删除PFILE(CUSTINFOLB/CIFFILE)并将类型更改为 PF 时，它可以完美编译。

CIFFILE 已成功编译为它唯一的 PF。

我尝试过的：移动ORDFILE到与 CIFFILE 相同的库（异常结束错误）尝试通过在其中放置一个旁边来声明为a （CUSTOMER出现错误）尝试在 , 周围放置单引号（错误）foreign keyFCUSTOMERORDFILE'CUSTINFOLB/CIFFILE'

我究竟做错了什么？

谢谢你的时间。 文件

排序文件

编辑

范围：在 iSeries 平台上创建一个小型分发系统。创建一系列包含以下代码的库：

  • 客户信息文件 (CIF) 功能
  • 订单输入功能
  • 采购功能
  • 库存功能

我的要求：

  • 根据指定的信息，为 4 个文件组中的每一个创建 4 个 DDS 规范。
  • 为您使用 DDS 规范设置的 4 个文件中的每一个创建 4 个 DFU 程序。
  • 创建 4 个 CL 程序来运行您创建的 DFU 程序。

包括一些评论以及选择菜单选项后将出现在屏幕上的消息。例如，如果您选择选项 #1 来输入 CIF 数据，则最初应显示一条消息，例如 -“CIF 数据输入程序现在正在执行”

  • 为 3 个部门（订单输入/库存/采购）中的每一个创建 3 个菜单，每个菜单上都有相应的标题。

  • 创建一个名为 MAINMENU 的主菜单以访问 3 个部门菜单。

  • 根据 CIF 文件创建 Query/400 报告并将其作为选项添加到主菜单。

确保您已遵循以下 3 个要求：

通过选择“打印”选项将查询创建为报告。格式化 CIF # 以消除报告上的数字中的“，”。在报表上放置一个页面标题。

  • 主菜单应包括以下菜单选项：

转到 3 个不同的“部门”菜单 运行 CIF 查询程序 访问假脱机文件 注销

  • 在您创建的菜单上设置 CLP 程序。

CIF 主文件只能存在于一个地方，但所有部门都必须能够访问同一个文件。

数据库：

客户信息文件 =>

客户编号（5 位数字字段）- KEY

公司名称

联系人姓名

城市

电话号码

客户订单总额 ($)

订单输入文件 =>

订单输入编号（6 位数字字段）- KEY

顾客号码

订购的商品编号（10 个字符）

订购日期 订购数量

排序者（人名）

订单总额 ($)

库存文件 =>

零件编号（6 位数字字段）- KEY

部分说明

手头数量

单位成本

缺货指示符（1 字节 Alpha）

购买文件 =>

采购订单号（4 位数字字段）- KEY

零件号

购买数量

数量延期交货

购买日期

总采购订单金额 ($)

iseries