RT# 79239 - updated code to use existing sub routine