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

inherits from superclasse with data.

$
0
0

My superclasse have a FD, like this:

.

.

.

End class-object.

Object.
Input-Output Section.
File-Control.
SELECT arqSYSCONF ...

File Section.
FD arqSYSCONF ...

Object-Storage Section.
01 InstanceData pic x(032).

*/////////////////////////////////////////////////////////////

The FD causes a problem in InstanceData.

I move "ajSauro" to InstanceData and in the class that inherits superclasse, the value of InstanceData is an unexpected value.

If I remove SELECT and FD, then it is OK.

Anybody have a soluction to this?

Hug

Antonio João

NextExpress + Dialog System.


Viewing all articles
Browse latest Browse all 4356

Trending Articles



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