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;

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

Answer 1

RPGLE编译器非常智能。它知道你没有使用文件中的任何数据......

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

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

来自IBM编译团队的Barbara Morris的帖子中的更多信息：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外部描述的数据结构

1 个答案: