*COMDECK PNAT1
         CONTROL EJECT; 
  # #    COMMON PNATCOMM; 
  # #    BASED ARRAY PNAT [0] S(1); 
  # #    BEGIN
  # #    ITEM PN$WORD        U(00,00,60); 
  # #    ITEM PN$AUXREF      U(00,00,15); 
  # #    ITEM PN$FIRSTADDR   U(00,00,30); 
  # #    ITEM PN$EQUATE      U(00,15,15); 
  # #    ITEM PN$PREVSECTN   U(00,30,15); 
  # #    ITEM PN$NEXTSECTN   U(00,30,15); 
  # #    ITEM PN$LASTADDR    U(00,30,30); 
  # #    ITEM PN$SEGMENTNO   U(00,45,07); 
  # #    ITEM PN$ALTERED     U(00,52,01); 
  # #    ITEM PN$DEBUG       U(00,53,01); 
  # #    ITEM PN$PERFLAST    U(00,54,01); 
  # #    ITEM PN$PROCKIND    U(00,55,01); 
  # #    ITEM PN$ALTERABLE   U(00,56,01); 
  # #    ITEM PN$DECLARATV   U(00,57,01); 
  # #    ITEM PN$SORTPROC    U(00,58,01); 
  # #     END 
