标签: ibm-midrange

代码我正在尝试运行:

$query = "DESCRIBE TABLE TABLENAME";
$result = odbc_exec($h, $query);

结果:

PHP警告:odbc_exec():SQL错误:[unixODBC] [IBM] [iSeries Access ODBC驱动程序] [DB2 UDB] SQL0104 - 令牌TABLENAME无效.有效令牌:INTO.,SQLExecDirect中的SQL状态37000 ...

在同一连接上,SELECT,INSERT,UPDATE或DELETE查询没有其他问题.这是语法错误吗？

是否有任何方法可以清除RPG中的AS400屏幕？我正在寻找与clrscr()C中结果相同的东西.

我想知道是否有人知道AS400是否与Java 6兼容？我在网上看过,我只能找到Java 2之前的日期资料.

以下代码在CRTBNDRPG下编译但在运行时仅停留在1个I/O上.

我要做的就是 - 我们所有的表都有8号订单号,但是这个文件有10个.所以我只创建了2个字段,我需要一个使它成为8,另一个是好的.为什么这个小程序没有起飞的想法？

FMFHHMH    IF   E             DISK                                    
F* output file                                                        
FMFHHMHPK  O  A E             DISK                                    
D*EXTSHP           S             13  6                                
D                                                                     
C                                                                     
C                   READ      MFHHMH                                  
C                   Dow       NOT %EOF(MFHHMH)                        
C                   iF        %found                                  
c                   MOVE      MHORDR        MHORDp                    
c                   MOVE      MHZONE        MHZONE                    
C                   WRITE     MFHHMHP                                 
C                   READ      mfhhmh                                  
C                   End                                               
C                   END                                               
C                   SETON                                        LR   

我在AS400表上运行SQL查询.

我事先不知道我在SQL中提取的列名.

在我的ResultSet中,我需要:

1. 获取结果集列(结果记录的MetaData - 一次).

2. 对于集合中的每个记录,获取列的值.

我怎样才能做到这一点？

我们无法从VB.NET 2010应用程序中将记录插入到iSeries上的文件/表中.

在Windows XP上运行的旧系统没有问题,但我们正在尝试在Windows 7 64位盒和OS400 V5.4上运行代码(insode VS 2010)

以下是驱动程序返回的错误消息:

ERROR [42000] [IBM][System i Access ODBC Driver][DB2 for i5/OS]SQL0104 - Token 2014 was not valid. Valid tokens: ) ,.

以下是代码的相关部分:

sConStr = "Driver={Client Access ODBC Driver (32-bit)};" & _
    "System=" & sAS400Server & ";" & _
    "Uid=" & UCase(sAS400UserName) & ";" & _
    "Pwd=" & UCase(sAS400UserPwd) & ";" & _
    "DBQ=" & UCase$(sAS400Library) & _
    IIf(Trim$(sLibraryOther) <> "", "," & sLibraryOther, "") & _
        ";COMPRESSION=1;ALLOWUNSCHAR=1;TRANSLATE=1;"

conOdbc = New Odbc.OdbcConnection(sConStr)
conOdbc.Open() …

谁能告诉我这条线是如何在免费RPG中编码的？

C                   MOVEL     TEST          TESTFELD 

请考虑以下代码:

D#TIME1           S               T                                             
D#numeric1        S              6  0                                           
D#numeric2        S              6  0                                           
D                                                                               
C                   TIME                    #numeric1                           
C                   eval      #TIME1 = %TIME(#numeric1:*HMS)                    
C                                                                               
C*                  This does not work:                                             
C                   eval      #numeric2 = %int(TIME1)                           
C*                  Errormessage: The expression contains a operator, which is not defined
C                                                                               
C                   MOVE      *ON           *INLR            

有人可以告诉我,如何将*HMS时间值(如'07:02:22')转换为6 0数值.我需要这个来比较两个时间戳.

嘿我正在尝试重新创建一个包含大约900万条记录的表,当我这样做时,我想首先在表上删除/暂停索引,然后重新创建/启动它们.

我们正在运行IBMI 7.3.

我已经创建了下面的存储过程来执行此操作.但是一旦它命中Drop索引语句,它就会"崩溃/停止",但不会出错.

任何人都知道如何做到这一点？

CREATE PROCEDURE YXDB.GENERATE_SEARCH_DATA()
LANGUAGE SQL MODIFIES SQL DATA
SET OPTION DBGVIEW=*SOURCE,COMMIT=*NONE,OUTPUT=*PRINT
P1: BEGIN
    DECLARE is_there_index INT;
    DECLARE zero_index INT;
    DECLARE first_index INT;
    DECLARE next_index INT;
    DECLARE pre_phonetic_string varchar(100);
    DECLARE post_phonetic_string varchar(100);
    DECLARE search_string_actionable varchar(100);

    DECLARE END_TABLE INT DEFAULT 0;
    DECLARE ADDRESS_KEY INT;
    DECLARE ADDRESS_INFO VARCHAR(500);
    DECLARE ACTIVE INT;

    DECLARE C1 CURSOR FOR
           select distinct faadrnr,
            info, 
            (case 
                WHEN FKRELTYP like 'FFADRESSE%' AND FKKNTNR = 0
                THEN (select 1 from dual)
                WHEN FKRELTYP like 'SMOLEVADR%' AND …

我正在使用DB2上的一些SQL查询.是否可以选择表中的所有列,还可以在该select语句中使用"as"关键字指定某些条件？例如,此查询是否可行:

select
  *,
  col1 + col2 as sum1,
  col3 - col4 as dif1
from 
  table;

每当我尝试这个,我得到SQL0104错误,它说"令牌,无效.有效令牌:FROM INTO".

谢谢您的帮助.

编辑:此查询在AS400上的SQLRPLGE程序中运行.