CLASS _EXP_FOO
    _Value : INTEGER
ENDCLASS
FUNCTION _Read(_Arg : INTEGER) RETURNS INTEGER
    RETURN _Arg + 1
ENDFUNCTION
DECLARE _X : _EXP_FOO
_X._Value <- _Read(41)
OUTPUT _X._Value