Раздел экрана as400 не принимается - PullRequest
Новая
       21

Раздел экрана as400 не принимается

0 голосов
/ 18 мая 2018

Я пытаюсь выучить COBOL на AS400.У меня возникает проблема, когда я пишу SCREEN SECTION.

. Я получаю это сообщение (LNC1030 вызывает «ЭКРАН НЕПРАВИЛЬНЫЙ»).Это код: 

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

1 Ответ

0 голосов
/ 22 мая 2018

Спасибо за дополнительную информацию.Я получил вашу программу для компиляции и запуска следующим образом: 

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

Редактируя в SEU тип источника "CBL", редактор даже не разрешил "РАЗДЕЛ ЭКРАНА" там, где он изначально был помещен в Зону-А.Он также признал, что операторы «DISPLAY» и «EXIT PROGRAM» должны были иметь отступ для области B.

A «РАЗДЕЛ ЭКРАНА», если бы это было необходимо и определено, было бы абзацем в области Bкак часть программной (PROCEDURE DIVISION) логики.Я нашел это руководство по структуре программы ILE COBOL, которое может быть полезно: https://www.ibm.com/support/knowledgecenter/en/ssw_ibm_i_61/rzase/sc09254033.htm
(как показывает ваш пример, не все части необходимы, но многие из них являются хорошей практикой)

...