OPS1040I error 40 using the OPSTHRSH function