An attempt to access object data in a containing class has been made from a nested class.
To access object data in a containing class, the nested class must specify the SHARING PARENT phrase.
class-id myContainingClass.
working-storage section.
01 i1 binary-long VALUE 1.
01 i2 string.
class-id myNestedClass1.
method-id myMethod1.
set i2 to "abc". *> this is incorrect
end method.
end class.
class-id myNestedClass2 sharing parent.
method-id myMethod2.
set i1 to 123. *> this is correct
end method.
end class.
end class.