WORK DS CL6
DS X , Slack byte
UNPK WORK(7),SDWACMPC
NI WORK,=X'0F0F0F0F0F0F'
TR WORK,=C'0123456789ABCDEF'-- Donald H. Blake Ecclesiastes 12:1 <https://www.kingjamesbibleonline.org/Ecclesiastes-Chapter-12/>
