屏幕部分as400不被接受

时间:2018-05-18 15:01:21

标签: ibm-midrange cobol

我正在尝试在AS400上学习COBOL。我写SCREEN SECTION.

时遇到问题

我收到此消息(LNC1030导致“SCREEN INCORRECT”)虽然我在编写SCREEN SECTION时查看是否出错。

这是代码:

**==================================================== 
 SCREEN SECTION. *>This line generates a error 
**====================================================
 PROCEDURE DIVISION.
**========================================================
 DISPLAY "Bonjour tout le monde" "Hello World".
 exit program. 

1 个答案:

答案 0 :(得分:1)

感谢您提供更多信息。我让你的程序编译并运行如下:

  **===========================================      
   PROCEDURE DIVISION.                               
  **===========================================      
       DISPLAY "BONJOUR TOUT LE MONDE" "HELLO WORLD".
       EXIT PROGRAM.   

在SEU中编辑为源类型“CBL”,编辑器甚至不允许“SCREEN SECTION”在最初放置在Area-A中。它还认识到“DISPLAY”和“EXIT PROGRAM”语句必须缩进到Area-B。

“屏幕部分”,如果必要和定义,将是区域B中的段落,作为程序(程序部门)逻辑的一部分。我找到了这个可能有用的ILE COBOL程序结构指南:https://www.ibm.com/support/knowledgecenter/en/ssw_ibm_i_61/rzase/sc09254033.htm
(正如你的例子所示,并非所有的部分都是必要的,但很多都是很好的做法)