小编MAS*_*400的帖子

我正在将RPGLE固定格式转换为自由格式,而在转换时我遇到了一个问题,KEY-LIST&Fields被转换为数据结构.这基本上是重新定义已经直接或间接定义的字段......

DCL-DS Key_List;                                                                               
     Field1 CHAR(4);                                                                            
     Field2 CHAR(4);  
END-DS;  

field1和field2都是文件的字段.下面是旧式(固定格式)

C     Key_list      KLIST                           
C                   KFLD                    Field1
C                   KFLD                    Field2       

请注意...程序给出编译时错误(SQL0314)field1&field不是唯一的

我已经将一个 RPGLE 程序转换为 SQLRPGLE，我这样做了很多次。这次我遇到了奇怪的问题。(1) 程序一执行，SQLCODE就设置为077952576，不知道为什么。(2) 当我在调试中运行时，声明游标语句没有被执行，但其他以下 sql 语句被命中。

  Exec Sql                                                   
     DECLARE My_cursor CURSOR for                           
     select * FROM File1    where FLAG <> 'Y' 
     Order by Field1, Field2, Field3, Field4, Field5;

请指教，谢谢