*COMDECK CPMCOMM
  $BEGIN
  COMMON CPMCOMM; 
    BEGIN 
      ITEM CPMCOPYCOUNT I;
      ITEM CPMCREPCOUNT I;
      ARRAY CPMCOMMARRAY[0:0] S(1); 
        BEGIN 
          ITEM CPMHIGHVALUE C(0,0,1); 
          ITEM CPMLOWVALUE  C(0,6,1); 
        END 
      ITEM CPMSPARE2    I;
    END # OF COMMON BLOCK CPMCOMM # 
  $END
