From SV Support today, I learn’t this: “ANY reference can receive a reference to any data type.”.
Although that doesn’t seem to be the case for everything that I’ve tried, this compiles and works.
PROGRAM
Q &QUEUE
MAP
ViewGroup(*GROUP pGroup)
END
MyQueue QUEUE
Field1 STRING(100)
END
CODE
Q &= MyQueue
ViewGroup(Q)
ViewGroup PROCEDURE(*GROUP pGroup)
CODE
Message(WHO(pGroup,1))