ONHBOUND

ONHBOUND returns a REAL FIXED BIN(63) value that specifies the upper bound of an array for which SUBSCRIPTRANGE has been raised.

Read syntax diagramSkip visual syntax diagramONHBOUND()

If ONHBOUND is used out of context, zero is returned.

If the following code is run, then ONHBOUND would return 4.
          dcl a(3,2:4) fixed bin(31) init( (*) 0 );
          dcl jx       fixed bin(31);
          dcl value    fixed bin(31);

          jx = 5;
          (subrg): value = a(1,jx);