3 calls to
WRITESND
INIBASE
INITGRDVAR
INITGRDVAR