小编War*_*enT的帖子

在DB2 for i上,搜索列,以列表形式返回表名

我仍然有点像菜鸟,所以请原谅这个问题是否有点明显.我确实在寻找答案,但要么无法理解我找到的答案如何应用,要么根本找不到答案.

我在DB2 for i服务器上有一个庞大的数据库,我通过SQLExplorer(基于Squirrel SQL)使用SQL访问它.这些表格记录很差,第一项业务就是弄清楚如何找到自己的方式.

我想写一个简单的查询来执行此操作:

1)允许我搜索整个数据库,查找包含名为"备注"(包含字段描述)的列的表.

2)然后我想让它在该列中搜索关键字.

3)我希望有一个表中返回,其中包括名称包含关键字(只是名称的表,我可以看一下表按字母顺序后,看看里面,如果我需要.)

我需要这个搜索超级轻量级​​,我希望我描述的概念能实现这一目标.任何占用大量资源的东西都可能会激怒服务器的系统管理员.

只是为了表明我已经尝试过(而且我是一个完整的菜鸟),这就是我迄今为止所拥有的.

SELECT *
FROM <dbname>
WHERE Remarks LIKE '<keyword>'
Run Code Online (Sandbox Code Playgroud)

随意嘲笑,我告诉你我是个白痴:-).

有帮助吗?或许至少可以推动正确的方向?

PS - 我似乎无法在SQLExplorer中找到搜索功能,如果有人知道我是否可以使用简单的搜索或过滤器来实现同样的目标......这将是很棒的.

sql db2 squirrel-sql ibm-midrange

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

CPF4131在OPEN期间出现在文件中

CPF4131出现在程序文件中的可能原因是什么?

我们如何解决这个问题呢?

 Message . . . . : Error message CPF4131 appeared during OPEN for file 
 TEST (C S D F). 

Cause . . . . . : RPG procedure TEST2 in program TESTLIB/TEST2
received the message CPF4131 while performing an implicit OPEN operation on 
file SOURCE. The actual file is SOURCE. 
Run Code Online (Sandbox Code Playgroud)

rpgle ibm-midrange

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

如何在DB2中查找约束列

我想知道属于每个唯一约束的列(名称)。我可以在syscat.tabconst中轻松找到约束和表名。但是我找不到列名称。

db2 constraints db2-luw

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

计算不同的前缀

tape_name在表中有一个列tapes.我想构造一个select语句,其中所有不同的前缀都被计数,即

SELECT COUNT(TAPE_NAME) 
  FROM TAPES 
  WHERE TAPE_NAME LIKE DISTINCT SUBSTRING(TAPE_NAME,1,3)
Run Code Online (Sandbox Code Playgroud)

如果这些是tape_name列的行:

DBZ000
DBZ001
AGT546
AGT432
Run Code Online (Sandbox Code Playgroud)

然后我希望它产生:

DBZ  2
AGT  2
Run Code Online (Sandbox Code Playgroud)

如果该解决方案适用于DB2,那将是非常棒的.

sql db2

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

基于 IBM AS400 的角色扮演游戏/系列

我们需要从基于 IBM AS400 的 rpg/iseries 程序访问 https api。

为了尝试这个,我们安装了“Mocha W32 TN5250”,但无法连接到会话。

是否可以从基于 IBM AS400 的 rpg/iseries 程序进行 https 调用?

rpg ibm-midrange

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

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

比方说,例如,我有这些表:

USRMF(主物理文件)

User ID   User Name  
A00001    SAMUEL
A00002    ADAM
Run Code Online (Sandbox Code Playgroud)

USRTS

user id   date   time in    time out
A000001   080812 084555     104545 
A000001   080812 120800     150000
A000001   080812 170000     180000
A000001   090812 084555     104545
A000001   090812 170000     180000
A000002   080812 084555     104545 
A000002   080812 120800     150000
A000002   080812 170000     190000
A000002   090812 084555     104545
A000002   090812 170000     190000
Run Code Online (Sandbox Code Playgroud)

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

Option:  5-display

OPT   User ID   User Name  Date   TimeIn  TimeOut
 _    A000001   SAMUEL     090812 084555  180000
 _    A000002   ADAM       090812 084555 …
Run Code Online (Sandbox Code Playgroud)

rpg rpgle ibm-midrange

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

as/400 RPG指针和地址

在AS/400上,在RPG中有没有办法将指针地址设置为变量的值而不是变量本身的地址?

例:

    variable = 'NewVariable' 
Run Code Online (Sandbox Code Playgroud)

其中值将是程序内部使用的实际变量

pointer = %addr('NewVariable') VS pointer = %addr(variable)

address of value VS address of variable

pointers rpgle ibm-midrange

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

RPG - 什么是+ =这里?

你能解释一下+=这句话中的意思吗?

Eval      AssGr2Pun += FinQty#        
Run Code Online (Sandbox Code Playgroud)

以下是上下文的其余代码:

 Exsr      FinItmTot                 
 Eval      AssGr2Pun += FinQty#      
 If        OrderAdd = 'N'            
 Eval      Gr2TPass += 1             
 Eval      OrderAdd = 'Y'            
 Endif                               
 Eval      AssGr2Pst += 1            
 When      OhReqd = Today            
 Exsr      FinItmTot                 
 Eval      AssGr2Tun += FinQty#      
 If        OrderAdd = 'N'            
 Eval      Gr2TTday += 1             
 Eval      OrderAdd = 'Y'            
 Endif                               
 Eval      AssGr2Tod += 1            
 When      OhReqd = Tomorrow         
 Exsr      FinItmTot               
Run Code Online (Sandbox Code Playgroud)

rpgle ibm-midrange

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

标签 统计

ibm-midrange ×6

rpgle ×4

db2 ×3

rpg ×2

sql ×2

constraints ×1

db2-luw ×1

pointers ×1

squirrel-sql ×1