1 calls from
LCDBAS

SHR_KIND_MOD  1