5 calls to
WRTSFCDT

INITOUT
ARPSCVT
ARPSINTRP
ARPSSFC20
ARPSTINTRP