6 calls from
PRECPD

SGETMO  3
SGETMO_T  3