*DECK NDLDATT 
      PROC NDLDATT; 
      BEGIN 
      CONTROL STEXT;
*CALL DATANDL 
      END 
      TERM