ZTMS2 (341)    ROUTINE (9.8)