使用IBM i (OS/400)处理DB2表单例的示例代码

展示如何在IBM i (OS/400)上使用RPG编程语言处理DB2表。

FEXAMPLE    UF A E           K Disk    
     D EXAMPLE          DS                  INZ
     D  FLD1                           10I 0
     D  FLD2                           10I 0
     D  FLD3                            8A
     DEXAMPLE2         SDS
     D                                 1  6  NAME
     C                     READ      EXAMPLE                 
     C           ADD       FLD1      FLD2                 
     C                     EVAL      FLD3 = 'Hello'
     C           WRITE     EXAMPLE2         
     C                     SETON                                        LR

免责申明：文章和图片全部来源于公开网络，如有侵权，请通知删除 server@dude6.com