If the length of items or number of items in a list could be variable, then these sizes can be determined by the following utility.
CALL USER_PEEK_SIZE(CDANAM, NSIZE, LENVEC, CERACT, CRESLT, CZ )
Input arguments:
CHARACTER*(*) CDANAM- solver name of parameter.CHARACTER*4 CERACT- error action.STOPto stop on error.SKIPto continue silently.WARNto continue after warning.
CHARACTER*4 CRESLT- result code.GOODif successful.
CHARACTER*1(*) CZ- solver stack forCHARACTERdata.
Output arguments:
INTEGER NSIZE- number of items in list.INTEGER LENVEC- number of characters in the longest item, ignoring any leading spaces