SDCO31 (775)    ROUTINE (9.8)