2 calls to
TYPOSTFL
BLOKCALC
BLOKCNTL