*DECK NDLER1T PROC NDLER1T; BEGIN CONTROL STEXT; *CALL ER1CNDL END TERM