COBCH0637 ACCEPT references internal floating point data item