RPGLE 外部描述数据结构

Question

我以前使用外部描述的数据结构来使用文件字段。现在当我调试数据结构时是空白的。如果我错过了什么，我不记得了。请协助。

H option(*nodebugio) cvtopt(*datetime)                           
FEMPMSTP   IF   E           K disk    prefix(A_)                 
D empDs         E DS                  extname(EMPMSTP) prefix(A_)

           dou %eof(EMPMSTP);                                    
               read EMPMSTP;                                     
               if %eof;                                          
                  leave;                                         
               endif;                                            
           enddo;                                                

           *inlr = *on;

在读取语句之后，empDs 将具有已读取记录的值。

Answer 1

RPGLE 编译器非常聪明。它知道您没有使用文件中的任何数据...

尝试添加..
h debug(*input)

请注意，在 6.1 中，行为发生了变化，读取变得更加智能。所以这可能就是为什么这对你来说是新的。

来自 IBM 编译器团队的 Barbara Morris 的 post 中的更多信息：https://www.ibm.com/developerworks/community/blogs/b542d3ac-0785-4b6f-8e53-f72051460822/entry/are_you_using_option_nounref_if_so_good_if_not_read_on?lang=en

RPGLE 外部描述数据结构

RPGLE Externally Described Data Structures

rpgle