*COMDECK RSBCNDCLS
  
# THE FOLLOWING BASED ARRAY IS FOR AN RSB CONSTRAINT CONTROL BLOCK #
  
        BASED ARRAY RSCONBLK; 
  
          BEGIN              # RSCONBLK BASED ARRAY # 
  
                                       # BITS 0-44 RESERVED FOR LATER#
            ITEM RSCNCSTP U(0,45,15);  # DISPL TO CST CONST WORK BLCK#
  
          END                # RSCONBLK BASED ARRAY # 
  
