谁遇到过这样的sql错误，怎么解决？

zhonglei56

在AS400下，cobol调用sql语句
  EXEC SQL               
    DECLARE C1 CURSOR FOR
   select * from table_name where fld001 like :HST-FLD001    (其中HST-FLD001 为 PIC X（06），为其赋值‘abcde%’)
   END-EXEC.

现象：
    如果DB中有相应数据，sql正常open；如果DB中无数相应据则open时sqlcode 00000050K


请问这是什么原因造成的？如何解决呢？

wuxing164

sql程序有个sqlcode的关键字可以使用，如果sqlcode等于0是正常的，不常于0是不正常，程序逻辑中应该有不正常的处理，参考以下代码，代码是从red book拿出来的

1. 
   
2. 18200 EXEC SQL OPEN NEXT_PART END-EXEC.
   
3. 18300 EXEC SQL
   
4. 18400 FETCH NEXT_PART
   
5. 18500 INTO :PART-TABLE,
   
6. 18600 :QUANT-TABLE,
   
7. 18700 :ROP-TABLE,
   
8. 18800 :EOQ-TABLE
   
9. 18900 END-EXEC.
   
10. 19000 IF SQLCODE = 100    //这里做没数据的处理
    
11. 19100 MOVE 100 TO RTCODE1 03/29/92
    
12. 19200 PERFORM TRAILER-PROC THRU TRAILER-EXIT 03/29/92
    
13. 19300 ELSE  
    
14. 19400 MOVE 0 TO RTCODE2
    
15. 19500 MOVE 0 TO QTY-REQ
    
16. 19600 MOVE 0 TO QTY-REC

复制代码

zhonglei56

回复 2# wuxing164


    谢谢，这些都知道。就是不懂like的时候为什么找不到数据会错，难道和没有like的select语句不一样，sqlcode不会变成100，直接就报错了么。