COBCH1880 DECLARE は規格外の ENTRY 文 の後に指定することはできない

プログラムに含まれる DECLARE 文が、複合文内にある ENTRY 文の後に使用されています (たとえば、IF の後で、対応するピリオド (.) や END-IF の前など)。このような指定はできません。

解決方法:

コードを修正してから再コンパイルします。

例:

次の例は、このエラーをスローするコードを示しています。

       01 i1 binary-long.
           if i1 = 1
       entry "StrangeEntryPoint"
              declare i2 as binary-long = 3
              display i1
           end-if