(regesm) : add missing subroutine ATM_DataInit