Quantcast
Channel: Visual COBOL - Forum - Recent Threads
Viewing all articles
Browse latest Browse all 4356

RE: Level 66 and managed code

$
0
0

Can you provide me with an example? I tested with the following simple program and it works fine in managed code:

working-storage section.
       01 my-field   pic x(10) value spaces.
       66 new-field renames my-field.
       procedure division.
       
           move "test" to my-field
           if new-field = "test"
              display "ok"
           else
              display "no"
           end-if

           goback.

Viewing all articles
Browse latest Browse all 4356

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>