*** RTL testing for 3270