Skip to main content

How to use a dataname in place of a zliteral?

  • February 15, 2013
  • 0 replies
  • 0 views

Problem:

Release 4.0:

Setting the compiler directive PERFORM-TYPE"ENTCOBOL" to ensure that programs have the best compatibility with the mainframe COBOL dialect.

Since doing so, the user cannot do a RUN RETURN in the animator to step out of a performed paragraph or section.

Resolution:

This is the expected behaviour.

Setting a mainframe dialect for PERFORM-TYPE has an implementation, where the appropriate information to determine the correct return point is not available.

The PERFORM-statement behaves different from the default to the PERFORM-TYPE setting to mainframe compatibility (or RM).

       a.     perform b through d.

               display "a1".

               goback.

        b.    perform c through e.

               display "b".

        c.   display "c".

        d.   display "d".

        e.   display "e".

        

Output on  $set perform-type"ENTCOBOL":

c

d

a1

Output on $set perform-type"MF":

c  

d  

e  

b  

c  

d  

a1

Old KB# 5310

0 replies

Be the first to reply!