*COMDECK NP$ZHDR
      COMMON NP$ZHDR; 
        BEGIN 
        ARRAY ZHDR P(4);
          BEGIN 
          ITEM ZH$ANAM    C(0,0, 7);    # APPLICATION NAME             #
          ITEM ZH$TIM     I(1,0,60);
          ITEM ZH$CLK     C(2,0,10);    # CLOCK TIME                   #
          ITEM ZH$DATE    C(3,0,10);    # DATE                         #
          END                # ZHDR                                    #
  
        END                  # NP$ZHDR                                 #
  
