HBOUNDACROSS

HBOUNDACROSS returns a FIXED BINARY value that specifies the current upper bound of a DIMACROSS reference x.

x: DIMACROSS reference

Under the CMPAT(V3) compiler option, HBOUNDACROSS returns a FIXED BIN(63) value. Under the CMPAT(V2) and CMPAT(LE) compiler options, HBOUNDACROSS returns a FIXED BIN(31) value.

Example

The following example shows the use of HBOUNDACROSS:

     dcl jx fixed bin(31);

     dcl
       1 a,                            
         2 b fixed bin,                
         2 c fixed bin;                
     dcl 1 xa( 100 ) like a dimacross; 
    
     ... 

     do jx = 1 to hboundacross(xa);  
       a = xa, by dimacross(jx);     
       ...                           
     end;