Here is one example of a get / set in Visual COBOL. There are a couple of other ways to do this. class-id WPFGridZeilen. working-storage section. 01 _grso01 string. property-id GrSp01 string. getter. set property-value to _grso01 setter. set _grso01 to property-value end property. end class.
↧