COBCH0853S System error - evaluation stack mismatch

Hi,

I am getting

'COBCH0853S System error - evaluation stack mismatch ... -> in the line 'EVALUATE HV-POS' 

using the VC5 Bytecode Compiler when compiling

EVALUATE HV-POS
       WHEN 02 MOVE 'something ' TO H-TEXT
       ADD 1 TO ZZ-02
       WHEN 67 MOVE 'something else ' TO H-TEXT
       MOVE 'J' TO KEZ-AUSGABE
      WHEN 68 MOVE 'something else x ' TO H-TEXT
      MOVE 'J' TO KEZ-AUSGABE
      WHEN ANY MOVE ' ' TO H-TEXT
END-EVALUATE

Reducing the nestings, e.g.

EVALUATE HV-POS
       WHEN 02 MOVE 'something ' TO H-TEXT
       ADD 1 TO ZZ-02
*       WHEN 67 MOVE 'something else ' TO H-TEXT
*       MOVE 'J' TO KEZ-AUSGABE
      WHEN 68 MOVE 'something else x ' TO H-TEXT
      MOVE 'J' TO KEZ-AUSGABE
      WHEN ANY MOVE ' ' TO H-TEXT
END-EVALUATE

or 

EVALUATE HV-POS
       WHEN 02 MOVE 'something ' TO H-TEXT
       ADD 1 TO ZZ-02
       WHEN 67 MOVE 'something else ' TO H-TEXT
       MOVE 'J' TO KEZ-AUSGABE
      WHEN 68 MOVE 'something else x ' TO H-TEXT
      MOVE 'J' TO KEZ-AUSGABE
*      WHEN ANY MOVE ' ' TO H-TEXT
END-EVALUATE

ist works.

It also compiles with a former VC compiler (2.3 or 4) or the 'native compiler'

Is there any Directive where I can limit the nestings ?!

Thanks and greetings,

Herbert

 

Parents Reply Children
No Data