Question

我在Micro Focus Cobol Eclipse中运行Cobol程序时遇到错误。不知道为什么会这样。请帮助我，因为我必须将此作为我明天的大作业的一部分提交。另一个问题，如果可能的话，请帮我修改变量，我把它放在本地存储部分。例如，在Java中，我想为每个获取访问权限的方法将其设置为全局？

控制文件：

   Identification Division.
    Program-Id. Client.
    Environment Division.
    Configuration Section.
    Repository.
    Class Student.

    Data Division.
    Working-Storage Section.
    01 H object reference Student.

    Procedure Division.

        display "goodbye goodbye".                
        Invoke Student "new" returning H.
        Invoke H "sayHello".
        Invoke H "GetAverage" .
        Invoke H "Grading".

    Exit Program.
    End Program Client.

这是类文件：

   class-id. Student data is protected 
  *            inherits from base with data
   inherits Base.

   object section.
   class-control.
       Student is class "student"
       base is class "base"
       .
   working-storage section.


   class-object.
   object-storage section.

   Method-Id. sayHello.
    Procedure Division.
            Display "Hello World!".
  *         Display "I'm hello".
    End Method sayHello.


  *Method1
   method-id. "GetAverage".
   local-storage section.

   linkage section.
   01 English  pic 99 value 9.
   01 Math     pic 99 value 5.
   01 AverMark pic 99 value 3.
   procedure division using by reference English,
                               by reference Math.
  *                            returning AverMark.

       COMPUTE AverMark = (English+Math)/2
       Display "Average mark is ", AverMark.
       Accept English.
   exit method.
   end method "GetAverage".

  *Method2
   method-id. "Grading"
   local-storage section.

   linkage section.
   01 AverMark pic 9.
   01 Grade pic X.
   procedure division using by reference AverMark.
  *                            returning Grade.

   IF AverMark < 5 
       MOVE "FAIL" TO Grade
   ELSE 
       MOVE "PASS" TO Grade.

   exit method.
   end method "Grading".

   end class-object.

   end class Student.

结果是：

再见再见

执行错误：文件'客户' 错误代码：243，pc = 0，call = 1，seg = 0 找不到243错误消息文本

Answer 1

根据Micro Focus网站上的文档，错误243解释如下..

“无法加载COBRT243类（致命）

尝试加载对象类失败，因为该类不包含有效的类控件部分，或者因为未正确定义类。“

检查您是否正确定义了学生。

这是什么意思Cobol错误代码：243？

1 个答案: