Plant stages in MgmtEvent.OUT

[chporter]

If more than one stage occurs on a day, only the last one is printed in MgmtEvents.OUT.
OPVIEW.for line 251.

In OPVIEW:
!Store current Stage, STGDOY and STNAME
CALL PUT('PLANT','iSTAGE', I)
CALL PUT('PLANT','iSTGDOY', STGDOY(I))
CALL PUT('PLANT','iSTNAME', STNAME(I))

In MgmtOps.for:
! Retrieve current Stage, STGDOY and STNAME
CALL GET('PLANT','iSTAGE', iSTAGE)
CALL GET('PLANT','iSTGDOY', iSTGDOY)
CALL GET('PLANT','iSTNAME', iSTNAME)

The issue is that one value is sent at at time. Only the last value "PUT" will be retrieved with "GET". Need to send the entire array if we want to print more than one. Or send the whole array STNAME and STGDOY thru the argument lists. Or create a module?